equal
deleted
inserted
replaced
590 begin |
590 begin |
591 if Gear^.Kind = gtHedgehog then |
591 if Gear^.Kind = gtHedgehog then |
592 begin |
592 begin |
593 if PHedgehog(Gear^.Hedgehog)^.Effects[hePoisoned] then |
593 if PHedgehog(Gear^.Hedgehog)^.Effects[hePoisoned] then |
594 begin |
594 begin |
595 inc(Gear^.Damage, min(5, max(0,Gear^.Health - 1 - Gear^.Damage))); |
595 inc(Gear^.Damage, min(ModifyDamage(5,Gear), max(0,Gear^.Health - 1 - Gear^.Damage))); |
596 if getRandom(2) = 0 then |
596 if getRandom(2) = 0 then |
597 PlaySound(sndPoisonCough, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack) |
597 PlaySound(sndPoisonCough, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack) |
598 else |
598 else |
599 PlaySound(sndPoisonMoan, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack); |
599 PlaySound(sndPoisonMoan, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack); |
600 end; |
600 end; |