758       AllInactive:= false;

   758       AllInactive:= false;

   759       if (Gear^.Timer and $FF) = 0 then PlaySound(sndMineTick, false);

   759       if (Gear^.Timer and $FF) = 0 then PlaySound(sndMineTick, false);

   760       if Gear^.Timer = 0 then

   760       if Gear^.Timer = 0 then

   761          begin

   761          begin

   762          doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, EXPLAutoSound);

   762          doMakeExplosion(hwRound(Gear^.X), hwRound(Gear^.Y), 50, EXPLAutoSound);

   764          end;

   765          end;

   765       dec(Gear^.Timer);

   766       dec(Gear^.Timer);

   766       end else // gsttmpFlag = 0

   767       end else // gsttmpFlag = 0

   767    if TurnTimeLeft = 0 then Gear^.State:= Gear^.State or gsttmpFlag;

   768    if TurnTimeLeft = 0 then Gear^.State:= Gear^.State or gsttmpFlag;

   768 end;

   769 end;