hedgewars/HHHandlers.inc
changeset 6116 93e04cddd08e
parent 6099 e6dd54f8d334
child 6117 2a4829172a29
equal deleted inserted replaced
6115:485cfecadc9a 6116:93e04cddd08e
  1081     Gear^.Timer:= 150
  1081     Gear^.Timer:= 150
  1082     end else
  1082     end else
  1083     begin
  1083     begin
  1084     if Gear^.Timer = 0 then
  1084     if Gear^.Timer = 0 then
  1085         begin
  1085         begin
  1086         Gear^.State:= Gear^.State and not (gstWait or gstLoser or gstWinner or gstAttacked);
  1086         Gear^.State:= Gear^.State and not (gstWait or gstLoser or gstWinner or gstAttacked or gstNotKickable);
  1087         Gear^.Active:= false;
  1087         Gear^.Active:= false;
  1088         AddGearCI(Gear);
  1088         AddGearCI(Gear);
  1089         exit
  1089         exit
  1090         end else dec(Gear^.Timer)
  1090         end else dec(Gear^.Timer)
  1091     end;
  1091     end;