hedgewars/uGears.pas
changeset 834 5687fa57a6c1
parent 831 5cfd1096be5f
child 837 05e910ef2bf8
--- a/hedgewars/uGears.pas	Wed Apr 02 10:46:54 2008 +0000
+++ b/hedgewars/uGears.pas	Sat Apr 05 17:06:26 2008 +0000
@@ -528,18 +528,24 @@
 			amBazooka,
 			amRope,
 			amShotgun,
-			amDEagle: begin
+			amDEagle,
+			amBaseballBat: begin
 				DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy,
 						hwSign(Gear^.dX),
 						0,
 						4,
 						0);
-				defaultPos:= false
 				end;
 			amAirAttack,
 			amMineStrike: begin
 				DrawRotated(sprHandAirAttack, hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) + WorldDy, hwSign(Gear^.dX), 0);
-				defaultPos:= false
+				end;
+			amPickHammer: begin
+				DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy,
+						hwSign(Gear^.dX),
+						1,
+						2,
+						0);
 				end;
 		else
 			DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy,
@@ -547,8 +553,15 @@
 				0,
 				3,
 				0);
-			defaultPos:= false
-		end
+		end;
+
+		case amt of
+			amBaseballBat: DrawRotated(sprHandBaseball,
+					hwRound(Gear^.X) + 1 - 4 * hwSign(Gear^.dX) + WorldDx,
+					hwRound(Gear^.Y) + 6 + WorldDy, hwSign(Gear^.dX), aangle);
+		end;
+
+		defaultPos:= false
 	end
 end;