484 Tint($FF, $FF, $FF, Gear^.FrameTicks); |
484 Tint($FF, $FF, $FF, Gear^.FrameTicks); |
485 tinted:= true |
485 tinted:= true |
486 end; |
486 end; |
487 DrawRotatedF(sprEgg, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Frame, 1, Gear^.Angle); |
487 DrawRotatedF(sprEgg, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, Gear^.Frame, 1, Gear^.Angle); |
488 end; |
488 end; |
489 vgtSplash: DrawSprite(sprSplash, round(Gear^.X) + WorldDx - 40, round(Gear^.Y) + WorldDy - 58, 19 - (Gear^.FrameTicks div 37)); |
489 vgtSplash: if SuddenDeathDmg then |
490 vgtDroplet: DrawSprite(sprDroplet, round(Gear^.X) + WorldDx - 8, round(Gear^.Y) + WorldDy - 8, Gear^.Frame); |
490 DrawSprite(sprSDSplash, round(Gear^.X) + WorldDx - 40, round(Gear^.Y) + WorldDy - 58, 19 - (Gear^.FrameTicks div 37)) |
|
491 else |
|
492 DrawSprite(sprSplash, round(Gear^.X) + WorldDx - 40, round(Gear^.Y) + WorldDy - 58, 19 - (Gear^.FrameTicks div 37)); |
|
493 vgtDroplet: if SuddenDeathDmg then |
|
494 DrawSprite(sprSDDroplet, round(Gear^.X) + WorldDx - 8, round(Gear^.Y) + WorldDy - 8, Gear^.Frame) |
|
495 else |
|
496 DrawSprite(sprDroplet, round(Gear^.X) + WorldDx - 8, round(Gear^.Y) + WorldDy - 8, Gear^.Frame); |
491 vgtBeeTrace: begin |
497 vgtBeeTrace: begin |
492 if Gear^.FrameTicks < $FF then |
498 if Gear^.FrameTicks < $FF then |
493 Tint($FF, $FF, $FF, Gear^.FrameTicks div 2) |
499 Tint($FF, $FF, $FF, Gear^.FrameTicks div 2) |
494 else |
500 else |
495 Tint($FF, $FF, $FF, $80); |
501 Tint($FF, $FF, $FF, $80); |