Code: Select all
VAR Sunduk1 ='0x401A743D'; шкура
VAR Sunduk2 ='0x4050641A'; мясо
VAR i
..........................
DIM Shkyra[1]
Shkyra[1] = '0x1067'
DIM Myso[3]
Myso[1] = '0x09F1' # мясо
Myso[2] = '0x09B9' # мясо птицы
Myso[3] = '0x1607' # мясо курицы
...................................
UO.Set('finddistance','2')
UO.FindType('0x0E41','-1','ground')
if UO.FindCount() > 0 then
if uo.getserial('finditem') == Sunduk1 then
uo.setreceivingcontainer(Sunduk1)
for i=1 to 1
while UO.Count( Shkyra[i] ) > 0
uo.findtype(Shkyra[i],"-1",'backpack')
if UO.FindCount()>0 then
UO.Grab("0","finditem")
wait(100)
end if
wend
next
end if
end if
UO.FindType('0x0E41','-1','ground')
if UO.FindCount() > 0 then
if uo.getserial('finditem') == Sunduk2 then
uo.setreceivingcontainer(Sunduk2)
for i=1 to 3
while UO.Count( Myso[i] ) > 0
uo.findtype(Myso[i],"-1",'backpack')
if UO.FindCount()>0 then
UO.Grab("0","finditem")
wait(700)
end if
wend
next
end if
end if
.........................................
endsubCode: Select all
UO.FindType('0x0E41','-1','ground')
