changeset 14205 | 1bdce164eb72 |
parent 14201 | ab5e710d353d |
child 14287 | 6015b74eea55 |
--- a/hedgewars/uGearsRender.pas Mon Nov 12 20:30:06 2018 +0300 +++ b/hedgewars/uGearsRender.pas Tue Nov 13 01:56:42 2018 +0300 @@ -1339,6 +1339,8 @@ gtAirMine: if (Gear^.State and gstFrozen <> 0) then DrawSprite(sprFrozenAirMine, x-16, y-16, 15) + else if (Gear^.Tag <> 0) then + DrawSprite(sprAirMine, x-16, y-16, 16 + ((RealTicks div 50 + Gear^.Uid) mod 16)) else if (Gear^.State and gstTmpFlag = 0) then // mine is inactive begin if (Gear^.State and gstTmpFlag = 0) then Tint(150,150,150,255);