Yoko

Posted: **2006-02-23 19:27:00**

Hello i would like to know if some one would make me a script to auto loot a monster i killed and after its killed it .sac it and heals me when i need healing thanks.

Posted: **2006-03-01 05:29:47**

Code: Select all

sub healll()
while uo.weight < 1000
while uo.life < 150
uo.bandageself()
wait(3000)
sword3()
wend
wend
end sub

healll() -Run at first. That's autoheal, then join next:

Code: Select all

sub Cutter() 
var ser  
  repeat  
    uo.deletejournal() 
          repeat 
             wait(50) 
          until uo.injournal('Body') 
        ser = uo.getserial('lastcorpse') 
        while uo.getdistance(ser) > 4 
          wait(50) 
        wend 
          uo.setarm('arm1') 
          uo.waittargetobject(ser)  
          uo.usetype('0x0EC2') ; cleaver type(type of item to carve corpes)
          wait(500) 
          uo.arm('arm1') 
          Loot5()
  until uo.dead() 
endsub

Code: Select all

sub sword3()   ; Одевание щита и оружия 
Var Svord='0x0F51' ;Type of weapon
Var Shield='0x1B76' ;Shield
UO.Equipt('Lhand',Shield)
wait(1000)
UO.Equipt('Rhand',Svord)
Endsub

That's Loot. For me,that's "Bones" from skeleton. Do it yourself.

Code: Select all

sub Loot5()
   VAR i,Exit  
   DIM Loot[1]

       UO.WaitTargetObject("lastcorpse") 
       UO.useType('0x0EC2'); 
       wait(1000)

   Loot[0]='0x0F7E'
UO.SetReceivingContainer('0x40188C12')
 
   For i=0 to 1 
      Exit=0 
      repeat 
       UO.FindType(Loot[0],-1,'lastcontainer')            
        if UO.GetQuantity('finditem') then 
         UO.Grab('lastcontainer','finditem')
          wait(650)
          Else 
         Exit=1 
        endif
      until Exit==1 OR uo.injournal("loot")
   Next  
UO.UnSetReceivingContainer()
end sub

Code: Select all

UO.SetReceivingContainer('0x40188C12')

Your backpack

Yoko

[English only please]Script request

[English only please]Script request