hedgewars/PascalExports.pas
changeset 3638 33ee433749ba
parent 3637 0db298524c3d
child 3648 2477029463ed
equal deleted inserted replaced
3637:0db298524c3d 3638:33ee433749ba
   195     exit(bShowAmmoMenu);
   195     exit(bShowAmmoMenu);
   196 end;
   196 end;
   197 
   197 
   198 function HW_isWeaponRequiringClick: boolean; cdecl; export;
   198 function HW_isWeaponRequiringClick: boolean; cdecl; export;
   199 begin
   199 begin
   200     exit( (savedAmmoType = amTeleport) or
   200     exit( (CurrentHedgehog^.Gear^.State and gstHHChooseTarget) <> 0 )
   201           (savedAmmoType = amBee) or
       
   202           (savedAmmoType = amAirAttack) or
       
   203           (savedAmmoType = amMineStrike) or
       
   204           (savedAmmoType = amGirder) or
       
   205           (savedAmmoType = amNapalm) or
       
   206           (savedAmmoType = amPiano)
       
   207         )
       
   208 end;
   201 end;
   209 
   202 
   210 //amSwitch
   203 //amSwitch
   211 {$ENDIF}
   204 {$ENDIF}
   212 
   205