equal
deleted
inserted
replaced
2445 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, EXPLAutoSound); |
2445 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, EXPLAutoSound); |
2446 DeleteGear(Gear); |
2446 DeleteGear(Gear); |
2447 exit; |
2447 exit; |
2448 end; |
2448 end; |
2449 |
2449 |
2450 Gear^.SoundChannel:= LoopSound(sndPickhammer); |
2450 Gear^.SoundChannel:= LoopSound(sndDrillRocket); |
2451 Gear^.doStep:= @doStepDrillDrilling; |
2451 Gear^.doStep:= @doStepDrillDrilling; |
2452 dec(Gear^.Timer) |
2452 dec(Gear^.Timer) |
2453 end |
2453 end |
2454 end; |
2454 end; |
2455 |
2455 |