1298 if (Gear^.State and gstTmpFlag = 0) then Tint(150,150,150,255); |
1298 if (Gear^.State and gstTmpFlag = 0) then Tint(150,150,150,255); |
1299 DrawSprite(sprAirMine, x-16, y-16, 15); |
1299 DrawSprite(sprAirMine, x-16, y-16, 15); |
1300 untint |
1300 untint |
1301 end |
1301 end |
1302 else if (Gear^.Hedgehog <> nil) and (Gear^.Hedgehog^.Gear <> nil) then // mine is chasing a hog |
1302 else if (Gear^.Hedgehog <> nil) and (Gear^.Hedgehog^.Gear <> nil) then // mine is chasing a hog |
1303 DrawSprite(sprAirMine, x-16, y-16, (RealTicks div 25) mod 16) |
1303 DrawSprite(sprAirMine, x-16, y-16, (RealTicks div 25 + Gear^.Uid) mod 16) |
1304 else if Gear^.State and gstChooseTarget <> 0 then // mine is seeking for hogs |
1304 else if Gear^.State and gstChooseTarget <> 0 then // mine is seeking for hogs |
1305 DrawSprite(sprAirMine, x-16, y-16, (RealTicks div 125) mod 16) |
1305 DrawSprite(sprAirMine, x-16, y-16, (RealTicks div 125 + Gear^.Uid) mod 16) |
1306 else |
1306 else |
1307 DrawSprite(sprAirMine, x-16, y-16, 4); // mine is active but not seeking |
1307 DrawSprite(sprAirMine, x-16, y-16, 4); // mine is active but not seeking |
1308 |
1308 |
1309 gtSMine: if (((Gear^.State and gstAttacking) = 0)or((Gear^.Timer and $3FF) < 420)) and (Gear^.Health <> 0) then |
1309 gtSMine: if (((Gear^.State and gstAttacking) = 0)or((Gear^.Timer and $3FF) < 420)) and (Gear^.Health <> 0) then |
1310 DrawSpriteRotated(sprSMineOff, x, y, 0, Gear^.DirAngle) |
1310 DrawSpriteRotated(sprSMineOff, x, y, 0, Gear^.DirAngle) |