sub Loot()
UO.Print('Что лутать?')
UO.Exec('addobject kon')
while UO.Targeting()
wait(100)
wend
UO.UseObject('kon')
UO.FindType(-1,'-1','kon')
If UO.FindCount() > 0 then
repeat
UO.MoveItem('finditem', '1')
wait(100)
UO.FindType(-1,'-1','kon')
until not UO.FindCount()
UO.Print('Закончили...')
else
UO.Print('А кидать то нечего...')
endif
end sub
sub Loot()
UO.Print('Что лутать?')
UO.Exec('addobject kon')
while UO.Targeting()
wait(100)
wend
UO.UseObject('kon')
UO.FindType(-1,'-1','kon')
If UO.FindCount() > 0 then
repeat
UO.MoveItem('finditem')
wait(100)
UO.FindType(-1,'-1','kon')
until not UO.FindCount()
UO.Print('Закончили...')
else
UO.Print('А кидать то нечего...')
endif
end sub