1203 DrawSpriteRotatedF(sprAirplane, x, y, 1, Gear^.Tag, 0); |
1203 DrawSpriteRotatedF(sprAirplane, x, y, 1, Gear^.Tag, 0); |
1204 end; |
1204 end; |
1205 gtAirBomb: DrawSpriteRotated(sprAirBomb, x, y, 0, DxDy2Angle(Gear^.dY, Gear^.dX)); |
1205 gtAirBomb: DrawSpriteRotated(sprAirBomb, x, y, 0, DxDy2Angle(Gear^.dY, Gear^.dX)); |
1206 gtTeleport: begin |
1206 gtTeleport: begin |
1207 HHGear:= Gear^.Hedgehog^.Gear; |
1207 HHGear:= Gear^.Hedgehog^.Gear; |
1208 if ((Gear^.State and gstAnimation) <> 0) then |
1208 if HHGear <> nil then |
1209 DrawSpriteRotatedF(sprTeleport, x + 1, y - 3, Gear^.Pos, hwSign(Gear^.dX), 0); |
1209 begin |
1210 DrawSpriteRotatedF(sprTeleport, hwRound(HHGear^.X) + 1 + WorldDx, hwRound(HHGear^.Y) - 3 + WorldDy, 11 - Gear^.Pos, hwSign(HHGear^.dX), 0); |
1210 if ((Gear^.State and gstAnimation) <> 0) then |
|
1211 DrawSpriteRotatedF(sprTeleport, x + 1, y - 3, Gear^.Pos, hwSign(Gear^.dX), 0); |
|
1212 DrawSpriteRotatedF(sprTeleport, hwRound(HHGear^.X) + 1 + WorldDx, hwRound(HHGear^.Y) - 3 + WorldDy, 11 - Gear^.Pos, hwSign(HHGear^.dX), 0) |
|
1213 end |
1211 end; |
1214 end; |
1212 gtSwitcher: DrawSprite(sprSwitch, x - 16, y - 56, (GameTicks shr 6) mod 12); |
1215 gtSwitcher: DrawSprite(sprSwitch, x - 16, y - 56, (GameTicks shr 6) mod 12); |
1213 gtTarget: begin |
1216 gtTarget: begin |
1214 Tint($FF, $FF, $FF, round($FF * Gear^.Timer / 1000)); |
1217 Tint($FF, $FF, $FF, round($FF * Gear^.Timer / 1000)); |
1215 DrawSprite(sprTarget, x - 16, y - 16, 0); |
1218 DrawSprite(sprTarget, x - 16, y - 16, 0); |