equal
deleted
inserted
replaced
756 begin |
756 begin |
757 AllInactive:= false; |
757 AllInactive:= false; |
758 if (Gear^.Timer and $FF) = 0 then PlaySound(sndMineTick, false); |
758 if (Gear^.Timer and $FF) = 0 then PlaySound(sndMineTick, false); |
759 if Gear^.Timer = 0 then |
759 if Gear^.Timer = 0 then |
760 begin |
760 begin |
|
761 DeleteCI(Gear); |
761 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, EXPLAutoSound); |
762 doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, EXPLAutoSound); |
762 DeleteGear(Gear) |
763 DeleteGear(Gear) |
763 end; |
764 end; |
764 dec(Gear^.Timer); |
765 dec(Gear^.Timer); |
765 end else // gsttmpFlag = 0 |
766 end else // gsttmpFlag = 0 |