changeset 4809 | 9c7d5f802618 |
parent 4806 | 48c1a395f0a7 |
child 4818 | 202eef454354 |
4808:7c3e5b52344a | 4809:9c7d5f802618 |
---|---|
111 begin |
111 begin |
112 AddVisualGear:= nil; |
112 AddVisualGear:= nil; |
113 exit |
113 exit |
114 end; |
114 end; |
115 |
115 |
116 if ((cReducedQuality and rqFancyBoom) <> 0) and |
116 if ((cReducedQuality and rqAntiBoom) <> 0) and |
117 not Critical and |
117 not Critical and |
118 not (Kind in |
118 not (Kind in |
119 [vgtTeamHealthSorter, |
119 [vgtTeamHealthSorter, |
120 vgtSmallDamageTag, |
120 vgtSmallDamageTag, |
121 vgtSpeechBubble, |
121 vgtSpeechBubble, |
427 tinted:= true; |
427 tinted:= true; |
428 Tint($FF, $FF, $FF, $66); |
428 Tint($FF, $FF, $FF, $66); |
429 DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex) |
429 DrawCentered(round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Tex) |
430 end |
430 end |
431 end; |
431 end; |
432 if (cReducedQuality and rqFancyBoom) = 0 then |
432 if (cReducedQuality and rqAntiBoom) = 0 then |
433 case Gear^.Kind of |
433 case Gear^.Kind of |
434 vgtSmoke: DrawSprite(sprSmoke, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame); |
434 vgtSmoke: DrawSprite(sprSmoke, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame); |
435 vgtSmokeWhite: DrawSprite(sprSmokeWhite, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame); |
435 vgtSmokeWhite: DrawSprite(sprSmokeWhite, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame); |
436 vgtDust: DrawSprite(sprDust, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame); |
436 vgtDust: DrawSprite(sprDust, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame); |
437 vgtFeather: begin |
437 vgtFeather: begin |
456 tinted:= true; |
456 tinted:= true; |
457 Tint($FF, $FF, $FF, round($FF * (1 - power(Gear^.Timer / 250, 4)))); |
457 Tint($FF, $FF, $FF, round($FF * (1 - power(Gear^.Timer / 250, 4)))); |
458 DrawRotatedTextureF(SpritesData[sprBigExplosion].Texture, 0.85 * (-power(2, -10 * Int(Gear^.Timer)/250) + 1) + 0.4, 0, 0, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, 0, 1, 385, 385, Gear^.Angle); |
458 DrawRotatedTextureF(SpritesData[sprBigExplosion].Texture, 0.85 * (-power(2, -10 * Int(Gear^.Timer)/250) + 1) + 0.4, 0, 0, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, 0, 1, 385, 385, Gear^.Angle); |
459 end; |
459 end; |
460 end; |
460 end; |
461 if (cReducedQuality and rqFancyBoom) = 0 then |
461 if (cReducedQuality and rqAntiBoom) = 0 then |
462 case Gear^.Kind of |
462 case Gear^.Kind of |
463 vgtExplPart: DrawSprite(sprExplPart, round(Gear^.X) + WorldDx - 16, round(Gear^.Y) + WorldDy - 16, 7 - Gear^.Frame); |
463 vgtExplPart: DrawSprite(sprExplPart, round(Gear^.X) + WorldDx - 16, round(Gear^.Y) + WorldDy - 16, 7 - Gear^.Frame); |
464 vgtExplPart2: DrawSprite(sprExplPart2, round(Gear^.X) + WorldDx - 16, round(Gear^.Y) + WorldDy - 16, 7 - Gear^.Frame); |
464 vgtExplPart2: DrawSprite(sprExplPart2, round(Gear^.X) + WorldDx - 16, round(Gear^.Y) + WorldDy - 16, 7 - Gear^.Frame); |
465 vgtFire: if (Gear^.State and gstTmpFlag) = 0 then |
465 vgtFire: if (Gear^.State and gstTmpFlag) = 0 then |
466 DrawSprite(sprFlame, round(Gear^.X) + WorldDx - 8, round(Gear^.Y) + WorldDy, (RealTicks shr 6 + Gear^.Frame) mod 8) |
466 DrawSprite(sprFlame, round(Gear^.X) + WorldDx - 8, round(Gear^.Y) + WorldDy, (RealTicks shr 6 + Gear^.Frame) mod 8) |