sub min()
var x1, x2, y1, y2
uo.deletejournal()
UO.Press(33,1,400) #otoci se smerem na Sever (North)
mining() #vyvolani scriptu na tezbu
chuze1: #chuze smerem Sever (North) s TEZBOU
UO.Press(33,1,400) #poposun se smerem na Sever (North)
x1 = UO.GetX("self") #zjisteni souradnic
y1 = UO.GetY("self")
mining() #vyvolani scriptu na tezbu
UO.Press(33,1,400) #posun smerem Sever (North)
x2 = UO.GetX("self") #zjisteni souradnic
y2 = UO.GetY("self")
if y1 == y2 then #porovnani souradnic pokud jsou stejne stojis na miste
goto chuze2 #presouva te do chuze2
endif
mining() #vyvolani scriptu na tezbu
goto chuze1 #presouva te do chuze1
chuze2: #chuze smerem Zapad (West) a na Jih (South)
x1 = UO.GetX("self") #zjisteni souradnic
y1 = UO.GetY("self")
UO.Press(36,2,400) #posun smerem Zapad (West)
x2 = UO.GetX("self") #zjisteni souradnic
y2 = UO.GetY("self")
if x1 == x2 then #porovnani souradnic pokud jsou stejne stojis na miste
UO.Press(35,2,400) #posun smerem Jih (South)
goto chuze2 #presouva te do chuze2
endif
goto chuze3 #presouva te do chuze3
chuze3: #chuze smerem Sever (North)
UO.Press(33,1,400) #posun smerem Sever (North)
x1 = UO.GetX("self") #zjisteni souradnic
y1 = UO.GetY("self")
UO.Press(33,1,400) #posun smerem Sever (North)
x2 = UO.GetX("self") #zjisteni souradnic
y2 = UO.GetY("self")
if y1 == y2 then #porovnani souradnic pokud jsou stejne stojis na miste
goto chuze4 #presouva te do chuze4
endif
goto chuze3 #presouva te do chuze3
chuze4: #TEZBA smerem Jih (South)
UO.Press(35,1,400) #otoceni smerem Jih (South)
mining() #vyvolani scriptu na tezbu
chuze5: #chuze smerem Jih (South) s TEZBOU
UO.Press(35,1,400) #posun smerem Jih (South)
x1 = UO.GetX("self") #zjisteni souradnic
y1 = UO.GetY("self")
mining() #vyvolani scriptu na tezbu
UO.Press(35,1,400) #posun smerem Jih (South)
x2 = UO.GetX("self") #zjisteni souradnic
y2 = UO.GetY("self")
if y1 == y2 then #porovnani souradnic pokud jsou stejne stojis na miste
goto chuze6 #presouva te do chuze6
endif
mining() #vyvolani scriptu na tezbu
goto chuze5 #presouva te do chuze5
chuze6: #chuze smerem Zapad (West) a na Sever (South)
x1 = UO.GetX("self") #zjisteni souradnic
y1 = UO.GetY("self")
UO.Press(36,2,400) #posun smerem Zapad (West)
x2 = UO.GetX("self") #zjisteni souradnic
y2 = UO.GetY("self")
if x1 == x2 then #porovnani souradnic pokud jsou stejne stojis na miste
UO.Press(33,2,400) #posun smerem Sever (North)
goto chuze6 #presouva te do chuze6
endif
goto chuze7 #presouva te do chuze7
chuze7: #chuze smerem Jih (South)
UO.Press(35,1,400) #posun smerem Jih (South)
x1 = UO.GetX("self") #zjisteni souradnic
y1 = UO.GetY("self")
UO.Press(35,1,400) #posun smerem Jih (South)
x2 = UO.GetX("self") #zjisteni souradnic
y2 = UO.GetY("self")
if y1 == y2 then #porovnani souradnic pokud jsou stejne stojis na miste
goto chuze1 #presouva te do chuze1
endif
goto chuze7 #presouva te do chuze7
end sub
sub mining()
var x1, x2, y1, y2
uo.deletejournal()
x1 = UO.GetX("self")
y1 = UO.GetY("self")
min:
if not uo.injournal("There is no ore here to mine.") then
uo.exec("waittargettile tilenum "+str(x1+0)+" "+str(y1+0)+" 0") #urci kde bude kopat
UO.usetype("0x0E85")
uo.deletejournal()
wait(3750)
goto min
endif
uo.deletejournal()
end sub
CEly SCR na kopani
