1015 Tint($f5, $db, $35, max($00, round($C0 * abs(1 - (GameTicks mod 6000) / 3000)))); |
1015 Tint($f5, $db, $35, max($00, round($C0 * abs(1 - (GameTicks mod 6000) / 3000)))); |
1016 DrawTexture(x - 108, y - 108, SpritesData[sprVampiric].Texture, 4.5); |
1016 DrawTexture(x - 108, y - 108, SpritesData[sprVampiric].Texture, 4.5); |
1017 Tint($FF, $FF, $FF, $FF); |
1017 Tint($FF, $FF, $FF, $FF); |
1018 end; |
1018 end; |
1019 gtNapalmBomb: DrawRotated(sprNapalmBomb, x, y, 0, DxDy2Angle(Gear^.dY, Gear^.dX)); |
1019 gtNapalmBomb: DrawRotated(sprNapalmBomb, x, y, 0, DxDy2Angle(Gear^.dY, Gear^.dX)); |
|
1020 gtFlake: if vobVelocity = 0 then |
|
1021 //DrawSprite(sprFlake, x-SpritesData[sprFlake].Width div 2, y-SpritesData[sprFlake].Height div 2, Gear^.Timer) |
|
1022 DrawSprite(sprFlake, x, y, Gear^.Timer) |
|
1023 else |
|
1024 //DrawRotatedF(sprFlake, x-SpritesData[sprFlake].Width div 2, y-SpritesData[sprFlake].Height div 2, Gear^.Timer, 1, Gear^.DirAngle); |
|
1025 DrawRotatedF(sprFlake, x, y, Gear^.Timer, 1, Gear^.DirAngle); |
|
1026 |
1020 end; |
1027 end; |
1021 if Gear^.RenderTimer and (Gear^.Tex <> nil) then DrawCentered(x + 8, y + 8, Gear^.Tex); |
1028 if Gear^.RenderTimer and (Gear^.Tex <> nil) then DrawCentered(x + 8, y + 8, Gear^.Tex); |
1022 end; |
1029 end; |
1023 |
1030 |
1024 end. |
1031 end. |