hedgewars/uGearsHandlersMess.pas
changeset 10952 8ad21fe5d062
parent 10905 c0919d7e5ce9
child 10964 493bd837dc2e
equal deleted inserted replaced
10950:356c8fb7fb56 10952:8ad21fe5d062
  1927                     exit
  1927                     exit
  1928                     end;
  1928                     end;
  1929                 Gear^.State:= Gear^.State and (not gstAttacking);
  1929                 Gear^.State:= Gear^.State and (not gstAttacking);
  1930                 Gear^.Timer:= Gear^.WDTimer
  1930                 Gear^.Timer:= Gear^.WDTimer
  1931                 end;
  1931                 end;
  1932             dec(Gear^.Timer);
  1932             if Gear^.Timer > 0 then
       
  1933                 dec(Gear^.Timer);
  1933             end
  1934             end
  1934         end
  1935         end
  1935     else // gsttmpFlag = 0
  1936     else // gsttmpFlag = 0
  1936         if (TurnTimeLeft = 0)
  1937         if (TurnTimeLeft = 0)
  1937         or ((GameFlags and gfInfAttack <> 0) and (GameTicks > Gear^.FlightTime))
  1938         or ((GameFlags and gfInfAttack <> 0) and (GameTicks > Gear^.FlightTime))