equal
deleted
inserted
replaced
5247 i, t, gX, gY: LongInt; |
5247 i, t, gX, gY: LongInt; |
5248 hogs: PGearArrayS; |
5248 hogs: PGearArrayS; |
5249 vg: PVisualGear; |
5249 vg: PVisualGear; |
5250 begin |
5250 begin |
5251 HHGear := Gear^.Hedgehog^.Gear; |
5251 HHGear := Gear^.Hedgehog^.Gear; |
5252 if (Gear^.Message and gmAttack <> 0) or (Gear^.Health = 0) or (HHGear = nil) or (HHGear^.Damage <> 0) or (HHGear^.dX.QWordValue > 4294967) then |
5252 if (Gear^.Message and gmAttack <> 0) or (HHGear = nil) or ((HHGear^.State and gstHHDriven) = 0) or (HHGear^.dX.QWordValue > 4294967) then |
5253 begin |
5253 begin |
5254 StopSoundChan(Gear^.SoundChannel); |
5254 StopSoundChan(Gear^.SoundChannel); |
5255 DeleteGear(Gear); |
5255 DeleteGear(Gear); |
5256 AfterAttack; |
5256 AfterAttack; |
5257 exit |
5257 exit |