лут своего трупа...
Posted: 2012-11-11 22:08:59
не лутает, пишет нету трупа
Code: Select all
sub Loottrup()
UO.UseObject('lastcorpse')
if UO.GetQuantity('lastcorpse') then
wait(700)
VAR g,Exit
DIM Loot[56]
Loot[0]='0x19B9' ;
Loot[1]='0x19B7' ;
Loot[2]='0x19BA' ;
Loot[3]='0x19B8' ;
Loot[4]='0x0F26' ;
Loot[5]='0x0F18' ;
Loot[6]='0x0F10' ;
Loot[7]='0x0F11' ;
Loot[8]='0x0F15' ;
Loot[9]='0x0F0F' ;
Loot[10]='0x0F16' ;
Loot[11]='0x0EED' ;
Loot[12]='0x0F3F' ;
Loot[13]='0x0F39' ;
Loot[14]='' ;
For i=0 to 13 # последнее значение Loot
Exit=0
repeat
UO.FindType(Loot[g],-1,'lastcontainer')
if UO.GetQuantity('finditem') then
UO.Grab('lastcontainer','finditem')
wait(1000)
Else
Exit=1
endif
until Exit==1 OR uo.injournal("not loot")
Next
end if
UO.UnSetReceivingContainer()
end sub