hedgewars/HHHandlers.inc
changeset 3717 d88719b0f0dc
parent 3710 411f5c2b5292
child 3768 39947624dabb
--- a/hedgewars/HHHandlers.inc	Tue Aug 03 12:52:21 2010 +0100
+++ b/hedgewars/HHHandlers.inc	Tue Aug 03 14:19:47 2010 +0200
@@ -198,6 +198,10 @@
                                  CurAmmoGear:= AddGear(hwRound(lx) + hwSign(dX) * 10, hwRound(ly), gtWhip, 0, SignAs(_1, dX), - _0_8, 0);
                                  PlaySound(sndWhipCrack)
                                  end;
+                       amHammer: begin
+                                 CurAmmoGear:= AddGear(hwRound(lx) + hwSign(dX) * 10, hwRound(ly), gtHammer, 0, SignAs(_1, dX), - _0_8, 0);
+                                 PlaySound(sndWhack)
+                                 end;
                   amBaseballBat: begin
                                  CurAmmoGear:= AddGear(hwRound(lx) + hwSign(dX) * 10, hwRound(ly), gtShover, gsttmpFlag, xx * _0_5, yy * _0_5, 0);
                                  PlaySound(sndBaseballBat) // TODO: Only play if something is hit?