Yoko

sub Loot() 
VAR i
DIM Loot[2]  
Loot[0]=0x0F87; Eyes of newt
Loot[1]=0x0F7E; Bones
Loot[2]=0x1078; Skin
AddObject()
UO.UseObject('Body')

if UO.GetQuantity('Body') then
   UO.WaitTargetObject('Body')
   UO.WarMode(0)
   UO.UseType('0x0F51');dagger
   wait(500)
   UO.UseType('0x13B1');bow
   UO.WarMode(1) 
   wait(100)
else
   wait(50)
endif

For i=0 to 2      
   If UO.GetQuantity('Body') then
      CheckLag()
      UO.FindType(Loot[i],-1,'Body')
      if UO.GetQuantity('finditem')>0 then
      UO.MoveItem('finditem')          
      wait(300)
   else
      wait(50)
   endif
next
   
If UO.Count('0x1078')>0 then
   UO.WaitTargetType('0x1078')
   CheckLag()
   UO.UseType('0x0F9E')
else
   wait(50)
endif

end sub

sub AddObject()
UO.exec('addobject Body')
while UO.targeting()
wait(50)
wend
end sub

Монстров всех режет и лутит нормально. Но вот столкнулся с тем, что скрипт отказываеться работать на Ограх. Parse error выводит. Запускал скрипт по частям, стопориться сразу же после команды UO.UseObject.

Менял Body на lastcorpes, толку 0.

P.S. Шард Антарес

Попробуй вставить паузу после UseObject.
Может Огры дольше открываюся