hedgewars/uGears.pas
changeset 823 90d651e75547
parent 822 2ae8fd8ef804
child 824 e632cc7caf3a
--- a/hedgewars/uGears.pas	Mon Mar 24 20:27:12 2008 +0000
+++ b/hedgewars/uGears.pas	Tue Mar 25 16:07:23 2008 +0000
@@ -499,11 +499,17 @@
 		hy:= hwRound(Gear^.Y) - 2 + WorldDy;
 		aangle:= Gear^.Angle * 180 / cMaxAngle - 90;
 		case amt of
+			amBazooka: DrawRotated(sprHandBazooka, hx, hy, hwSign(Gear^.dX), aangle);
 			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);
 		else
 		end;
 		case amt of
-			amRope: DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy,
+			amBazooka,
+			amRope,
+			amShotgun,
+			amDEagle: DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy,
 						hwSign(Gear^.dX),
 						0,
 						4,