890 gtMolotov: if (Gear^.State and gstDrowning) = 0 then |
890 gtMolotov: if (Gear^.State and gstDrowning) = 0 then |
891 DrawRotatedF(sprMolotov, x, y, (RealTicks div 125) mod 8, hwSign(Gear^.dX), Gear^.DirAngle * hwSign(Gear^.dX)) |
891 DrawRotatedF(sprMolotov, x, y, (RealTicks div 125) mod 8, hwSign(Gear^.dX), Gear^.DirAngle * hwSign(Gear^.dX)) |
892 else DrawSprite(sprMolotov, x, y, 8); |
892 else DrawSprite(sprMolotov, x, y, 8); |
893 |
893 |
894 gtRCPlane: begin |
894 gtRCPlane: begin |
895 if (Gear^.Tag = -1) then |
895 Tint(Gear^.Hedgehog^.Team^.Clan^.Color shl 8 or $FF); |
896 DrawRotated(sprPlane, x, y, -1, DxDy2Angle(Gear^.dX, Gear^.dY) + 90) |
896 if Gear^.Tag = -1 then |
|
897 begin |
|
898 DrawRotatedF(sprPlane, x, y, 0, -1, DxDy2Angle(Gear^.dX, Gear^.dY) + 90); |
|
899 Tint($FF, $FF, $FF, $FF); |
|
900 DrawRotatedF(sprPlane, x, y, 1, -1, DxDy2Angle(Gear^.dX, Gear^.dY) + 90) |
|
901 end |
897 else |
902 else |
898 DrawRotated(sprPlane, x, y,0,DxDy2Angle(Gear^.dY, Gear^.dX)); |
903 begin |
|
904 DrawRotatedF(sprPlane, x, y, 0, 0, DxDy2Angle(Gear^.dY, Gear^.dX)); |
|
905 Tint($FF, $FF, $FF, $FF); |
|
906 DrawRotatedF(sprPlane, x, y, 1, 0, DxDy2Angle(Gear^.dY, Gear^.dX)) |
|
907 end |
899 end; |
908 end; |
900 gtBall: DrawRotatedf(sprBalls, x, y, Gear^.Tag,0, Gear^.DirAngle); |
909 gtBall: DrawRotatedf(sprBalls, x, y, Gear^.Tag,0, Gear^.DirAngle); |
901 |
910 |
902 gtPortal: if ((Gear^.Tag and 1) = 0) // still moving? |
911 gtPortal: if ((Gear^.Tag and 1) = 0) // still moving? |
903 or (Gear^.IntersectGear = nil) or (Gear^.IntersectGear^.IntersectGear <> Gear) // not linked&backlinked? |
912 or (Gear^.IntersectGear = nil) or (Gear^.IntersectGear^.IntersectGear <> Gear) // not linked&backlinked? |