Попробуй эту строчку
> uo.exec("usetype pickaxe")
Заменить на следующую:
> uo.exec("usetype '0x0E85'")
А вообще предлагаю другой скрипт на мининг, требующий наличие лопаты в главном бэгпаке: (скрипт писал не я,автора,к сожалению,не знаю)
Code: sub shovelmining()
#в Object Types прописать чем копать - pickaxe
#становимся в хайд
#n - номер в какую сторону будет копать , 1 - вверх ,2 - вверх-вправо,3 - вправо и т.д.
#x,y - координаты для выкапывания
var say0,say1,say2,say3,say4,say5,say6,say7,say8,say9,n,m,i,p,x,y,xx,yy,xxx,yyy,v
p=24
for n=1 to 8
if n==1 then
x=402
y=232
xx=398
yy=207
xxx=422
yyy=227
endif
if n==2 then
x=421
y=273
xx=442
yy=250
xxx=462
yyy=272
endif
if n==3 then
x=441
y=292
xx=483
yy=293
xxx=462
yyy=317
endif
if n==4 then
x=420
y=316
xx=440
yy=338
xxx=421
yyy=359
endif
if n==5 then
x=397
y=339
xx=397
yy=382
xxx=375
yyy=360
endif
if n==6 then
x=377
y=316
xx=356
yy=337
xxx=331
yyy=316
endif
if n==7 then
x=355
y=294
xx=312
yy=293
xxx=332
yyy=274
endif
if n==8 then
x=377
y=273
xx=353
yy=249
xxx=377
yyy=230
endif
#цикл выкапывания из трех клеток одного направления
for m=1 to 3
if m==2 then
x=xx
y=yy
endif
if m==3 then
x=xxx
y=yyy
endif
wait(1000)
UO.Print("metka x="+str(n)+" y="+str(m))
p=0
v=0
#цикл выкапывания из одной клетки
#Where do you want to use the pickaxe? - использование кирки
say0="use the shovel?"
#pack. - положил что-то в рюкзак
say1="pack."
#useable ore. - не можешь выкапать
say2="useable ore."
say9="distribe"
#There is no ore here to mine. - нет больше руды
say3="There is no ore here to mine."
#You put the Some with ore at eour feet. It is too heavy.. - выкапал что-то большое (It is too heavy..)
say4="It is too heavy.."
#Try mining in rock. - не капается
say5="Try mining in rock."
#You can't mining here. - не можешь здесь капать
say6="You can't mining here."
#"You can't reach that." - нельзя использовать
say7="You can't reach that."
#Elemental - выкопал элементаля
say8="Elemental"
while v==0
While not uo.hidden()
UO.UseSkill("Hiding")
wait (2500)
wend
While not UO.InJournal("")
UO.DeleteJournal()
wait (100)
wend
uo.exec("usetype '0x0f39'")
UO.DeleteJournal()
wait (100)
UO.LClick(x,y)
wait (100)
UO.LClick(x,y)
wait (100)
UO.LClick(x,y)
i=0
While i<>50 and not UO.InJournal(say1) and not UO.InJournal(say2) and not UO.InJournal(say3) and not UO.InJournal(say4) and not UO.InJournal(say5) and not UO.InJournal(say6) and not UO.InJournal(say7) and not UO.InJournal(say8)
i=i+1
wait(200)
wend
if i==50 then
UO.Print("ZADERJKA")
v=1
endif
if UO.InJournal(say1) then
p=0
endif
if (UO.InJournal(say2)) and (UO.InJournal(say1)) then
p=p+1
UO.Print("POVTOR p="+str(p))
endif
if p==7 or UO.InJournal(say5) or UO.InJournal(say3) or UO.InJournal(say6) or UO.InJournal(say7) then
v=1
endif
if UO.InJournal(say4)then
UO.Print("Net MESTA")
Goto TheEnd
endif
# if UO.InJournal(say8) then
# UO.Print("Vilez ELEMENTAL")
# Goto TheEnd
endif
wend
next
next
TheEnd:
UO.Print(" ")
UO.Print(" ")
UO.Print(" ")
UO.Print("---=== THE END ===---")
end sub
|
