942 HHGear:= Gear^.Hedgehog^.Gear; |
942 HHGear:= Gear^.Hedgehog^.Gear; |
943 if not Gear^.Hedgehog^.Unplaced then DrawRotatedF(sprTeleport, x + 1, y - 3, Gear^.Pos, hwSign(Gear^.dX), 0); |
943 if not Gear^.Hedgehog^.Unplaced then DrawRotatedF(sprTeleport, x + 1, y - 3, Gear^.Pos, hwSign(Gear^.dX), 0); |
944 DrawRotatedF(sprTeleport, hwRound(HHGear^.X) + 1 + WorldDx, hwRound(HHGear^.Y) - 3 + WorldDy, 11 - Gear^.Pos, hwSign(HHGear^.dX), 0); |
944 DrawRotatedF(sprTeleport, hwRound(HHGear^.X) + 1 + WorldDx, hwRound(HHGear^.Y) - 3 + WorldDy, 11 - Gear^.Pos, hwSign(HHGear^.dX), 0); |
945 end; |
945 end; |
946 gtSwitcher: DrawSprite(sprSwitch, x - 16, y - 56, (GameTicks shr 6) mod 12); |
946 gtSwitcher: DrawSprite(sprSwitch, x - 16, y - 56, (GameTicks shr 6) mod 12); |
|
947 gtStructure, |
947 gtTarget: begin |
948 gtTarget: begin |
948 Tint($FF, $FF, $FF, round($FF * Gear^.Timer / 1000)); |
949 Tint($FF, $FF, $FF, round($FF * Gear^.Timer / 1000)); |
949 DrawSprite(sprTarget, x - 16, y - 16, 0); |
950 DrawSprite(sprTarget, x - 16, y - 16, 0); |
950 Tint($FF, $FF, $FF, $FF); |
951 Tint($FF, $FF, $FF, $FF); |
951 end; |
952 end; |