1053 Tint($f5, $db, $35, max($00, round($C0 * abs(1 - (GameTicks mod 6000) / 3000)))); |
1053 Tint($f5, $db, $35, max($00, round($C0 * abs(1 - (GameTicks mod 6000) / 3000)))); |
1054 DrawTexture(x - 108, y - 108, SpritesData[sprVampiric].Texture, 4.5); |
1054 DrawTexture(x - 108, y - 108, SpritesData[sprVampiric].Texture, 4.5); |
1055 Tint($FF, $FF, $FF, $FF); |
1055 Tint($FF, $FF, $FF, $FF); |
1056 end; |
1056 end; |
1057 gtNapalmBomb: DrawRotated(sprNapalmBomb, x, y, 0, DxDy2Angle(Gear^.dY, Gear^.dX)); |
1057 gtNapalmBomb: DrawRotated(sprNapalmBomb, x, y, 0, DxDy2Angle(Gear^.dY, Gear^.dX)); |
1058 gtFlake: if (Gear^.State and gstTmpFlag) <> 0 then |
1058 gtFlake: if Gear^.State and (gstDrowning or gstTmpFlag) <> 0 then |
1059 begin |
1059 begin |
1060 Tint((cExplosionBorderColor shr RShift) and $FF, |
1060 Tint((cExplosionBorderColor shr RShift) and $FF, |
1061 (cExplosionBorderColor shr GShift) and $FF, |
1061 (cExplosionBorderColor shr GShift) and $FF, |
1062 (cExplosionBorderColor shr BShift) and $FF, |
1062 (cExplosionBorderColor shr BShift) and $FF, |
1063 $FF); |
1063 $FF); |