1287 DrawSpriteRotated(sprMineOff, x, y, 0, Gear^.DirAngle) |
1287 DrawSpriteRotated(sprMineOff, x, y, 0, Gear^.DirAngle) |
1288 else if Gear^.Health <> 0 then |
1288 else if Gear^.Health <> 0 then |
1289 DrawSpriteRotated(sprMineOn, x, y, 0, Gear^.DirAngle) |
1289 DrawSpriteRotated(sprMineOn, x, y, 0, Gear^.DirAngle) |
1290 else DrawSpriteRotated(sprMineDead, x, y, 0, Gear^.DirAngle); |
1290 else DrawSpriteRotated(sprMineDead, x, y, 0, Gear^.DirAngle); |
1291 end; |
1291 end; |
1292 gtAirMine: if Gear^.State and gstTmpFlag = 0 then // mine is inactive |
1292 gtAirMine: if (Gear^.State and gstTmpFlag = 0) or (Gear^.State and gstFrozen <> 0) then // mine is inactive |
1293 begin |
1293 begin |
1294 Tint(150,150,150,255); |
1294 if (Gear^.State and gstTmpFlag = 0) then Tint(150,150,150,255); |
1295 DrawSprite(sprAirMine, x-16, y-16, 15); |
1295 DrawSprite(sprAirMine, x-16, y-16, 15); |
1296 untint |
1296 untint |
1297 end |
1297 end |
1298 else if (Gear^.Hedgehog <> nil) and (Gear^.Hedgehog^.Gear <> nil) then // mine is chasing a hog |
1298 else if (Gear^.Hedgehog <> nil) and (Gear^.Hedgehog^.Gear <> nil) then // mine is chasing a hog |
1299 DrawSprite(sprAirMine, x-16, y-16, (RealTicks div 25) mod 16) |
1299 DrawSprite(sprAirMine, x-16, y-16, (RealTicks div 25) mod 16) |