hedgewars/uGears.pas
changeset 823 90d651e75547
parent 822 2ae8fd8ef804
child 824 e632cc7caf3a
equal deleted inserted replaced
822:2ae8fd8ef804 823:90d651e75547
   497 		amt:= CurrentHedgehog^.Ammo^[CurrentHedgehog^.CurSlot, CurrentHedgehog^.CurAmmo].AmmoType;
   497 		amt:= CurrentHedgehog^.Ammo^[CurrentHedgehog^.CurSlot, CurrentHedgehog^.CurAmmo].AmmoType;
   498 		hx:= hwRound(Gear^.X) + 1 + 8 * hwSign(Gear^.dX) + WorldDx;
   498 		hx:= hwRound(Gear^.X) + 1 + 8 * hwSign(Gear^.dX) + WorldDx;
   499 		hy:= hwRound(Gear^.Y) - 2 + WorldDy;
   499 		hy:= hwRound(Gear^.Y) - 2 + WorldDy;
   500 		aangle:= Gear^.Angle * 180 / cMaxAngle - 90;
   500 		aangle:= Gear^.Angle * 180 / cMaxAngle - 90;
   501 		case amt of
   501 		case amt of
       
   502 			amBazooka: DrawRotated(sprHandBazooka, hx, hy, hwSign(Gear^.dX), aangle);
   502 			amRope: DrawRotated(sprHandRope, hx, hy, hwSign(Gear^.dX), aangle);
   503 			amRope: DrawRotated(sprHandRope, hx, hy, hwSign(Gear^.dX), aangle);
       
   504 			amShotgun: DrawRotated(sprHandShotgun, hx, hy, hwSign(Gear^.dX), aangle);
       
   505 			amDEagle: DrawRotated(sprHandDEagle, hx, hy, hwSign(Gear^.dX), aangle);
   503 		else
   506 		else
   504 		end;
   507 		end;
   505 		case amt of
   508 		case amt of
   506 			amRope: DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy,
   509 			amBazooka,
       
   510 			amRope,
       
   511 			amShotgun,
       
   512 			amDEagle: DrawHedgehog(hwRound(Gear^.X) + 1 + WorldDx, hwRound(Gear^.Y) - 3 + WorldDy,
   507 						hwSign(Gear^.dX),
   513 						hwSign(Gear^.dX),
   508 						0,
   514 						0,
   509 						4,
   515 						4,
   510 						0);
   516 						0);
   511 		else
   517 		else