sub main() # Врубите перед запуском Num Lock
var i,x
var a=3 # величина ромба по которому ходит чар
wait(1000)
while not UO.dead()
for i=1 to a
start1:
UO.DeleteJournal()
wait(100)
uo.exec("usetype '0x0e85'") # в Обжект Тайп прописать pickaxe
wait (500)
UO.LClick (400,311)
wait (1500)
uo.exec("usetype '0x0e85'")
wait (500)
UO.LClick (383,236)
wait(1000)
If not (UO.InJournal("no ore here to mine.") or UO.InJournal("you cannot mine that.")) then
UO.DeleteJournal()
uo.exec("canceltarget")
goto start1
endif
next

for i=1 to a
start2:
UO.DeleteJournal()
wait(100)
uo.exec("usetype '0x0e85'")
wait (500)
UO.LClick (400,311)
wait (1500)
uo.exec("usetype '0x0e85'")
wait (500)
UO.LClick (383,236)
wait(10000)
If not (UO.InJournal("no ore here to mine.") or UO.InJournal("you cannot mine that.")) then
UO.DeleteJournal()
uo.exec("canceltarget")
goto start2
endif
uo.exec("unequip Rhand")
uo.press(35)
next

for i=1 to a
start3:
UO.DeleteJournal()
wait(100)
uo.exec("usetype '0x0e85'")
wait (500)
UO.LClick (400,311)
wait (1500)
uo.exec("usetype '0x0e85'")
wait (500)
UO.LClick (383,236)
wait(10000)
If not (UO.InJournal("no ore here to mine.") or UO.InJournal("you cannot mine that.")) then
UO.DeleteJournal()
uo.exec("canceltarget")
goto start3
endif
uo.exec("unequip Rhand")
uo.press(36)
next

for i=1 to a
start4:
UO.DeleteJournal()
wait(100)
uo.exec("usetype '0x0e85'")
wait (500)
UO.LClick (400,311)
wait (1500)
uo.exec("usetype '0x0e85'")
wait (500)
UO.LClick (383,236)
wait(10000)
If not (UO.InJournal("no ore here to mine.") or UO.InJournal("you cannot mine that.")) then
UO.DeleteJournal()
uo.exec("canceltarget")
goto start4
endif
uo.exec("unequip Rhand")
uo.press(33)
next
wend
end sub