есть скрипт его смысал в том что по нажатию кнопки он должен подбирать вещи с пола (с земли), но почемуто он не хочет этого делать пишет что вещи не найдены
вот скрипт
sub arrowgrab()
Dim Item[9]
Item[0]='0x0E79' ;Arrows
Item[1]='0x0EED' ;Gold
Item[2]='0x0F7B' ;bm
Item[3]='0x0F7A' ; BP
Item[4]='0x0F90' ;deadwood
Item[5]='0x0F7E' ;bones
Item[6]='0x0F87' ;Eyes of newt
Item[7]='0x1BDD' ;Logs
Item[8]='0x1BFB' ;?bolts
Item[9]='0x0F8E' ; ??????? ???????
Var i
for i=0 to 9
if Item[i]<>'' then
uo.Findtype(Item[i],-1,ground)
if uo.GetQuantity('finditem') then
uo.MoveItem('finditem')
CheckLag()
wait(700)
endif
endif
end sub
sub arrowgrab()
Dim Item[9]
Item[0]='0x0E79' ;Arrows
Item[1]='0x0EED' ;Gold
Item[2]='0x0F7B' ;bm
Item[3]='0x0F7A' ; BP
Item[4]='0x0F90' ;deadwood
Item[5]='0x0F7E' ;bones
Item[6]='0x0F87' ;Eyes of newt
Item[7]='0x1BDD' ;Logs
Item[8]='0x1BFB' ;?bolts
Item[9]='0x0F8E' ; ??????? ???????
Var i
for i=0 to 9
if Item[i]<>'' then
uo.Findtype(Item[i],-1,'ground')
if uo.GetQuantity('finditem') then
uo.grab('all','finditem')
CheckLag()
wait(700)
endif
endif
end sub
все уже перепробывал
закономерность такая поставил граунд в кавычки подбирает стрелы и только поставил -1 в кавычки бодбирает только золото и все в чем прикол понять не могу
sub arrowgrab()
Dim Item[10]
Item[0]='0x0E79' ;Arrows
Item[1]='0x0EED' ;Gold
Item[2]='0x0F7B' ;bm
Item[3]='0x0F7A' ; BP
Item[4]='0x0F90' ;deadwood
Item[5]='0x0F7E' ;bones
Item[6]='0x0F87' ;Eyes of newt
Item[7]='0x1BDD' ;Logs
Item[8]='0x1BFB' ;?bolts
Item[9]='0x0F8E' ; ??????? ???????
Var i
for i=0 to 9
uo.Findtype(Item[i],'0x0000','ground')
if uo.FindCount()>0 then
uo.MoveItem('finditem','-1','backpack')
CheckLag()
wait(700)
end if
next
end sub
