979 DrawRotatedF(sprExplosivesRoll, x, y + 4, 1, 0, Gear^.DirAngle); |
979 DrawRotatedF(sprExplosivesRoll, x, y + 4, 1, 0, Gear^.DirAngle); |
980 end; |
980 end; |
981 gtDynamite: DrawSprite2(sprDynamite, x - 16, y - 25, Gear^.Tag and 1, Gear^.Tag shr 1); |
981 gtDynamite: DrawSprite2(sprDynamite, x - 16, y - 25, Gear^.Tag and 1, Gear^.Tag shr 1); |
982 gtClusterBomb: DrawRotated(sprClusterBomb, x, y, 0, Gear^.DirAngle); |
982 gtClusterBomb: DrawRotated(sprClusterBomb, x, y, 0, Gear^.DirAngle); |
983 gtCluster: DrawSprite(sprClusterParticle, x - 8, y - 8, 0); |
983 gtCluster: DrawSprite(sprClusterParticle, x - 8, y - 8, 0); |
984 gtFlame: DrawTextureF(SpritesData[sprFlame].Texture, 2 / (Gear^.Tag mod 3 + 2), x, y, (GameTicks shr 7 + LongWord(Gear^.Tag)) mod 8, 1, 16, 16); |
984 gtFlame: if Gear^.Tag and 1 = 0 then |
|
985 DrawTextureF(SpritesData[sprFlame].Texture, 2 / (Gear^.Tag mod 3 + 2), x, y, (GameTicks shr 7 + LongWord(Gear^.Tag)) mod 8, 1, 16, 16) |
|
986 else DrawTextureF(SpritesData[sprFlame].Texture, 2 / (Gear^.Tag mod 3 + 2), x, y, (GameTicks shr 7 + LongWord(Gear^.Tag)) mod 8, -1, 16, 16); |
985 gtParachute: begin |
987 gtParachute: begin |
986 DrawSprite(sprParachute, x - 24, y - 48, 0); |
988 DrawSprite(sprParachute, x - 24, y - 48, 0); |
987 DrawAltWeapon(Gear, x + 1, y - 3) |
989 DrawAltWeapon(Gear, x + 1, y - 3) |
988 end; |
990 end; |
989 gtAirAttack: begin |
991 gtAirAttack: begin |