hedgewars/uGears.pas
branchwebgl
changeset 8839 caa57115d7ea
parent 8833 c13ebed437cb
child 8860 bde641cf53c8
equal deleted inserted replaced
8836:7a474fcc343d 8839:caa57115d7ea
   441     end;
   441     end;
   442 
   442 
   443 if TurnTimeLeft > 0 then
   443 if TurnTimeLeft > 0 then
   444     if CurrentHedgehog^.Gear <> nil then
   444     if CurrentHedgehog^.Gear <> nil then
   445         if ((CurrentHedgehog^.Gear^.State and gstAttacking) = 0) and 
   445         if ((CurrentHedgehog^.Gear^.State and gstAttacking) = 0) and 
   446             not(isInMultiShoot and (CurrentHedgehog^.CurAmmoType in [amShotgun, amDEagle, amSniperRifle])) then
   446             (not(isInMultiShoot and (CurrentHedgehog^.CurAmmoType in [amShotgun, amDEagle, amSniperRifle]))) then
   447                 begin
   447                 begin
   448                 if (TurnTimeLeft = 5000)
   448                 if (TurnTimeLeft = 5000)
   449                 and (cHedgehogTurnTime >= 10000)
   449                 and (cHedgehogTurnTime >= 10000)
   450                 and (not PlacingHogs)
   450                 and (not PlacingHogs)
   451                 and (CurrentHedgehog^.Gear <> nil)
   451                 and (CurrentHedgehog^.Gear <> nil)