@main:
gotoifobjectwithindist(@minerock1,100,3)
wait(100)
goto(@main)

@minerock1:
setvarfatigue(%f)
gotoifnum1abovenum2(@sleep,%f,92)
setvarsnearestobject(%x,%y,100)
objcmd1(%x,%y)
waitforminingmessage(3000)
wait(500)
resetlastservermessage()
goto(@main)

@sleep:
wait(2000)
useitembyid(1263)
wait(2000)
waitforwakeup(28000)
gotoifsleeping(@sleep)
goto(@main)
