407 if CheckNoTeamOrHH then exit;

   407 if CheckNoTeamOrHH then exit;

   408 with CurrentTeam^ do

   408 with CurrentTeam^ do

   409      with Hedgehogs[CurrHedgehog] do

   409      with Hedgehogs[CurrHedgehog] do

   410           begin

   410           begin

   411           bSelected:= false;

   411           bSelected:= false;

   412           if bShowAmmoMenu then bShowAmmoMenu:= false

   413           if bShowAmmoMenu then bShowAmmoMenu:= false

   413           else if ((Gear^.State and (gstAttacking or gstAttacked)) <> 0) or (AttacksNum > 0)

   414           else if ((Gear^.State and (gstAttacking or gstAttacked)) <> 0) or (AttacksNum > 0)

   414                or ((Gear^.State and gstHHDriven) = 0) then else bShowAmmoMenu:= true

   415                or ((Gear^.State and gstHHDriven) = 0) then else bShowAmmoMenu:= true

   415           end

   416           end

   416 end;

   417 end;