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

sub loottarget()
    UO.Set('quiet','1')
    uo.addobject('Trup')
    while uo.targeting()
        wait(100)
    wend
    uo.useobject('Trup')
    wait(300)

sub loottarget()
var Trup = '0x2008'
    UO.Set('quiet','1')
    #uo.addobject('Trup')
    while uo.targeting()
        wait(100)
    wend
    uo.usetype(Trup)
    wait(300)