1335 else if Gear^.Health <> 0 then |
1335 else if Gear^.Health <> 0 then |
1336 DrawSpriteRotated(sprMineOn, x, y, 0, Gear^.DirAngle) |
1336 DrawSpriteRotated(sprMineOn, x, y, 0, Gear^.DirAngle) |
1337 else DrawSpriteRotated(sprMineDead, x, y, 0, Gear^.DirAngle); |
1337 else DrawSpriteRotated(sprMineDead, x, y, 0, Gear^.DirAngle); |
1338 end; |
1338 end; |
1339 gtAirMine: |
1339 gtAirMine: |
1340 if (Gear^.State and gstFrozen <> 0) then |
1340 if (Gear^.State and gstFrozen <> 0) then |
1341 DrawSprite(sprFrozenAirMine, x-16, y-16, 15) |
1341 DrawSprite(sprFrozenAirMine, x-16, y-16, 0) |
1342 else if (Gear^.Tag <> 0) then |
1342 else if (Gear^.Tag <> 0) then |
1343 DrawSprite(sprAirMine, x-16, y-16, 16 + ((RealTicks div 50 + Gear^.Uid) mod 16)) |
1343 DrawSprite(sprAirMine, x-16, y-16, 16 + ((RealTicks div 50 + Gear^.Uid) mod 16)) |
1344 else if (Gear^.State and gstTmpFlag = 0) then // mine is inactive |
1344 else if (Gear^.State and gstTmpFlag = 0) then // mine is inactive |
1345 begin |
1345 begin |
1346 if (Gear^.State and gstTmpFlag = 0) then Tint(150,150,150,255); |
1346 if (Gear^.State and gstTmpFlag = 0) then Tint(150,150,150,255); |
1347 DrawSprite(sprAirMine, x-16, y-16, 15); |
1347 DrawSprite(sprAirMine, x-16, y-16, 15); |