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, |
|
948 gtTarget: begin |
947 gtTarget: begin |
949 Tint($FF, $FF, $FF, round($FF * Gear^.Timer / 1000)); |
948 Tint($FF, $FF, $FF, round($FF * Gear^.Timer / 1000)); |
950 DrawSprite(sprTarget, x - 16, y - 16, 0); |
949 DrawSprite(sprTarget, x - 16, y - 16, 0); |
951 Tint($FF, $FF, $FF, $FF); |
950 Tint($FF, $FF, $FF, $FF); |
952 end; |
951 end; |
1023 DrawSprite(sprFlake, x, y, Gear^.Timer) |
1022 DrawSprite(sprFlake, x, y, Gear^.Timer) |
1024 else |
1023 else |
1025 //DrawRotatedF(sprFlake, x-SpritesData[sprFlake].Width div 2, y-SpritesData[sprFlake].Height div 2, Gear^.Timer, 1, Gear^.DirAngle); |
1024 //DrawRotatedF(sprFlake, x-SpritesData[sprFlake].Width div 2, y-SpritesData[sprFlake].Height div 2, Gear^.Timer, 1, Gear^.DirAngle); |
1026 DrawRotatedF(sprFlake, x, y, Gear^.Timer, 1, Gear^.DirAngle) |
1025 DrawRotatedF(sprFlake, x, y, Gear^.Timer, 1, Gear^.DirAngle) |
1027 end; |
1026 end; |
|
1027 gtStructure: DrawSprite(sprTarget, x - 16, y - 16, 0); |
1028 |
1028 |
1029 end; |
1029 end; |
1030 if Gear^.RenderTimer and (Gear^.Tex <> nil) then DrawCentered(x + 8, y + 8, Gear^.Tex); |
1030 if Gear^.RenderTimer and (Gear^.Tex <> nil) then DrawCentered(x + 8, y + 8, Gear^.Tex); |
1031 end; |
1031 end; |
1032 |
1032 |