713 gtShotgunShot: begin |
713 gtShotgunShot: begin |
714 if (CurAmmoGear^.State and gstAnimation <> 0) then |
714 if (CurAmmoGear^.State and gstAnimation <> 0) then |
715 DrawRotated(sprShotgun, hx, hy, hwSign(Gear^.dX), aangle) |
715 DrawRotated(sprShotgun, hx, hy, hwSign(Gear^.dX), aangle) |
716 else |
716 else |
717 DrawRotated(sprHandShotgun, hx, hy, hwSign(Gear^.dX), aangle); |
717 DrawRotated(sprHandShotgun, hx, hy, hwSign(Gear^.dX), aangle); |
718 HatVisible:= true |
|
719 end; |
718 end; |
720 gtDEagleShot: DrawRotated(sprDEagle, hx, hy, hwSign(Gear^.dX), aangle); |
719 gtDEagleShot: DrawRotated(sprDEagle, hx, hy, hwSign(Gear^.dX), aangle); |
721 gtBallgun: DrawRotated(sprHandBallgun, hx, hy, hwSign(Gear^.dX), aangle); |
720 gtBallgun: DrawRotated(sprHandBallgun, hx, hy, hwSign(Gear^.dX), aangle); |
722 gtRCPlane: begin |
721 gtRCPlane: begin |
723 DrawRotated(sprHandPlane, hx, hy, hwSign(Gear^.dX), 0); |
722 DrawRotated(sprHandPlane, hx, hy, hwSign(Gear^.dX), 0); |
879 amBlowTorch: DrawRotated(sprHandBlowTorch, hx, hy, hwSign(Gear^.dX), aangle); |
878 amBlowTorch: DrawRotated(sprHandBlowTorch, hx, hy, hwSign(Gear^.dX), aangle); |
880 amRCPlane: begin |
879 amRCPlane: begin |
881 DrawRotated(sprHandPlane, hx, hy, hwSign(Gear^.dX), 0); |
880 DrawRotated(sprHandPlane, hx, hy, hwSign(Gear^.dX), 0); |
882 defaultPos:= false |
881 defaultPos:= false |
883 end; |
882 end; |
|
883 amGirder: DrawSprite(sprGirder, sx-256, sy-256, 0); |
884 end; |
884 end; |
885 |
885 |
886 case amt of |
886 case amt of |
887 amAirAttack, |
887 amAirAttack, |
888 amMineStrike: DrawRotated(sprHandAirAttack, sx, hwRound(Gear^.Y) + WorldDy, hwSign(Gear^.dX), 0); |
888 amMineStrike: DrawRotated(sprHandAirAttack, sx, hwRound(Gear^.Y) + WorldDy, hwSign(Gear^.dX), 0); |
1252 DrawSprite(sprFAid, hwRound(Gear^.X) - 24 + WorldDx, hwRound(Gear^.Y) - 24 + WorldDy, i); |
1252 DrawSprite(sprFAid, hwRound(Gear^.X) - 24 + WorldDx, hwRound(Gear^.Y) - 24 + WorldDy, i); |
1253 end; |
1253 end; |
1254 posCaseUtility: begin |
1254 posCaseUtility: begin |
1255 i:= (GameTicks shr 6) mod 70; |
1255 i:= (GameTicks shr 6) mod 70; |
1256 if i > 23 then i:= 0; |
1256 if i > 23 then i:= 0; |
|
1257 i:= i mod 12; |
1257 DrawSprite(sprUtility, hwRound(Gear^.X) - 24 + WorldDx, hwRound(Gear^.Y) - 24 + WorldDy, i); |
1258 DrawSprite(sprUtility, hwRound(Gear^.X) - 24 + WorldDx, hwRound(Gear^.Y) - 24 + WorldDy, i); |
1258 end; |
1259 end; |
1259 end; |
1260 end; |
1260 gtDynamite: DrawSprite2(sprDynamite, hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 25 + WorldDy, Gear^.Tag and 1, Gear^.Tag shr 1); |
1261 gtDynamite: DrawSprite2(sprDynamite, hwRound(Gear^.X) - 16 + WorldDx, hwRound(Gear^.Y) - 25 + WorldDy, Gear^.Tag and 1, Gear^.Tag shr 1); |
1261 gtClusterBomb: DrawRotated(sprClusterBomb, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, 0, Gear^.DirAngle); |
1262 gtClusterBomb: DrawRotated(sprClusterBomb, hwRound(Gear^.X) + WorldDx, hwRound(Gear^.Y) + WorldDy, 0, Gear^.DirAngle); |