equal
deleted
inserted
replaced
572 end; |
572 end; |
573 |
573 |
574 if ((HHGear^.State and gstMoving) <> 0) then |
574 if ((HHGear^.State and gstMoving) <> 0) then |
575 begin |
575 begin |
576 doStepHedgehogMoving(HHGear); |
576 doStepHedgehogMoving(HHGear); |
577 if (HHGear^.Damage > 0) then Gear^.Timer:= 0 |
577 if (HHGear^.State and gstHHDriven) = 0 then Gear^.Timer:= 0 |
578 end; |
578 end; |
579 |
579 |
580 if Gear^.Timer mod cHHStepTicks = 0 then |
580 if Gear^.Timer mod cHHStepTicks = 0 then |
581 begin |
581 begin |
582 b:= true; |
582 b:= true; |