D3VnuLL wrote:
Люди напишите скрипт в 3 действия плиз
Вообщем чтобы брал лопату и копал в одной точке, потом когда достигнет определёного веса клал в сундук стоящий рядом и потом опять копал

Code:
sub mining()
var mx, my, mz, i, j
var ismining, ixx, isheavy
mx = UO.GetX("self")
my = UO.GetY("self")
mz = UO.GetZ("self")
uo.setcatchbag('0x400E0BD3') Айди сундука
While not UO.Dead()
UO.DeleteJournal()
for i = mx-4 to mx+4
for j = my -4 to my+2
UO.Print("Now Mining In: "+str(mx-i)+" "+str(my-j))
ismining = 1
while not UO.InJournal("no ore here") and not UO.InJournal("location") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ismining
UO.DeleteJournal()
UO.Waittargettile("1341", str(i), str(j), str(mz))
UO.Usetype('0x0F39')
ixx = 0
ismining=1
while not UO.InJournal("You put") and not UO.InJournal("location") and not UO.InJournal("no ore") and not UO.InJournal("far away") and not UO.InJournal("in rock") and ixx <= 100
wait (100)
ixx = ixx + 1
wend
while UO.InJournal("but fail")
Wait (100)
UO.DeleteJournal()
wend
#if uo.injournal("Rusty") then
#ismining = 0
#endif
#if uo.injournal("Old Copper") then
#ismining = 0
#endif
#if uo.injournal("Dull Copper") then
#ismining = 0
#endif
#if uo.injournal("the Copper") then
#ismining = 0
#endif
#if uo.injournal("Iron") then
#ismining = 0
#endif
#if not ismining then
#uo.print("Not mining here")
#endif
wend
UO.DeleteJournal()
next
next
wend
end sub
sub CheckLag()
UO.DeleteJournal()
UO.Click('backpack')
repeat
wait(50)
until UO.InJournal('backpack')
end sub
Все так как ты попрасил, только выкапывая ор чар мгновенно ложет его в сундук)