diff -r 1d4926d10a9e -r 77161719ec3c hedgewars/HHHandlers.inc --- a/hedgewars/HHHandlers.inc Sat May 01 20:02:20 2010 +0000 +++ b/hedgewars/HHHandlers.inc Sat May 01 20:15:10 2010 +0000 @@ -162,7 +162,20 @@ 2) If on first shot, delete all existing gtPortal 3) On any other shot, delete any existing portals of type X%2, and spawn a new portal of type X%2 oriented at angle 180° from the portal gun. It might possibly be worth linking portals with a Gear reference, to save time on scanning through the Gear list every time we need a portal. *) - amPortalGun: CurAmmoGear:= AddGear(hwRound(X + xx * cHHRadius), hwRound(Y + yy * cHHRadius), gtPortal, 0, xx * _0_3, yy * _0_3, 0); + amPortalGun: begin + //if (Ammo^[CurSlot, CurAmmo].NumPerTurn >= MultiShootAttacks) then + + +//CurAmmoGear:= AddGear(hwRound(X + xx * cHHRadius), hwRound(Y + yy * cHHRadius), gtPortal, 0, xx * _0_6, yy * _0_6, 0); +AddGear(hwRound(X + xx * cHHRadius), hwRound(Y + yy * cHHRadius), gtPortal, 0, xx * _0_6, yy * _0_6, 0); + + + + end; + + + + amSniperRifle: begin PlaySound(sndSniperReload); CurAmmoGear:= AddGear(hwRound(X + xx * cHHRadius), hwRound(Y + yy * cHHRadius), gtSniperRifleShot, 0, xx * _0_5, yy * _0_5, 0);