hedgewars/GSHandlers.inc
changeset 4005 3a42cd3cc27f
parent 3991 82e4a5ef18f7
child 4017 048bcb8c72ae
equal deleted inserted replaced
4002:3e173ac63849 4005:3a42cd3cc27f
  3049     HHGear^.State := HHGear^.State or gstMoving;
  3049     HHGear^.State := HHGear^.State or gstMoving;
  3050 
  3050 
  3051     Gear^.X := HHGear^.X;
  3051     Gear^.X := HHGear^.X;
  3052     Gear^.Y := HHGear^.Y;
  3052     Gear^.Y := HHGear^.Y;
  3053     // For some reason I need to reapply followgear here, something else grabs it otherwise.
  3053     // For some reason I need to reapply followgear here, something else grabs it otherwise.
  3054     if not bShowAmmoMenu then FollowGear := HHGear;
  3054     if not bShowAmmoMenu and not CurrentTeam^.ExtDriven then FollowGear := HHGear;
  3055 
  3055 
  3056     if ((Gear^.State and gsttmpFlag) = 0) or (HHGear^.dY < _0) then doStepHedgehogMoving(HHGear);
  3056     if ((Gear^.State and gsttmpFlag) = 0) or (HHGear^.dY < _0) then doStepHedgehogMoving(HHGear);
  3057 
  3057 
  3058     if // (Gear^.Health = 0)
  3058     if // (Gear^.Health = 0)
  3059         (HHGear^.Damage <> 0)
  3059         (HHGear^.Damage <> 0)