diff -r 45a73be4d8c1 -r 7eb4707d43f0 hedgewars/uGears.pas --- a/hedgewars/uGears.pas Fri Apr 30 23:39:32 2010 +0000 +++ b/hedgewars/uGears.pas Sat May 01 05:15:16 2010 +0000 @@ -186,7 +186,8 @@ @doStepPortal, @doStepPortalGun, @doStepPiano, - @doStepBomb + @doStepBomb, + @doStepSineGunShot ); procedure InsertGearToList(Gear: PGear); @@ -482,6 +483,10 @@ gtPiano: begin gear^.Radius:= 32 end; + gtSineGunShot: begin + gear^.Radius:= 5; + gear^.Health:= 6000; + end; end; InsertGearToList(gear); AddGear:= gear; @@ -1280,6 +1285,7 @@ amRope: DrawRotated(sprHandRope, hx, hy, hwSign(Gear^.dX), aangle); amShotgun: DrawRotated(sprHandShotgun, hx, hy, hwSign(Gear^.dX), aangle); amDEagle: DrawRotated(sprHandDEagle, hx, hy, hwSign(Gear^.dX), aangle); + amSineGun: DrawRotated(sprHandShotgun, hx, hy, hwSign(Gear^.dX), aangle); amSniperRifle: DrawRotatedF(sprSniperRifle, hx, hy, 0, hwSign(Gear^.dX), aangle); amBlowTorch: DrawRotated(sprHandBlowTorch, hx, hy, hwSign(Gear^.dX), aangle); amCake: DrawRotated(sprHandCake, hx, hy, hwSign(Gear^.dX), aangle);