hedgewars/uCommandHandlers.pas
branch0.9.18
changeset 7946 a99a79bbd857
parent 7831 cd6c6b8d9b75
child 8025 07862ab415c8
child 8026 4a4f21070479
equal deleted inserted replaced
7944:a94f4ef5ba2b 7946:a99a79bbd857
   596             begin
   596             begin
   597             bSelected:= false;
   597             bSelected:= false;
   598 
   598 
   599             if bShowAmmoMenu then
   599             if bShowAmmoMenu then
   600                 bShowAmmoMenu:= false
   600                 bShowAmmoMenu:= false
   601             else if ((Gear^.State and (gstAttacking or gstAttacked)) <> 0)
   601             else if not(CurrentTeam^.Extdriven) and (((Gear^.State and (gstAttacking or gstAttacked)) <> 0)
   602             or ((MultiShootAttacks > 0) and ((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NoRoundEnd) = 0))
   602             or ((MultiShootAttacks > 0) and ((Ammoz[CurAmmoType].Ammo.Propz and ammoprop_NoRoundEnd) = 0))
   603             or ((Gear^.State and gstHHDriven) = 0) then
   603             or ((Gear^.State and gstHHDriven) = 0)) then
   604                 begin
   604                 begin
   605                 end
   605                 end
   606             else
   606             else
   607                 bShowAmmoMenu:= true
   607                 bShowAmmoMenu:= true
   608             end;
   608             end;