Yoko
http://forum.yoko.com.ua/

[English only please]Script request
http://forum.yoko.com.ua/viewtopic.php?f=20&t=6044		 Page 1 of 1
Author:  big_boy_uk89 [ 2006-02-23 19:27:00 ]
Post subject:  [English only please]Script request
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.
Author:  Scripts Writer [ 2006-03-01 05:29:47 ]
Post subject: 
Code:
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:
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:
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:
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:
UO.SetReceivingContainer('0x40188C12')
Your backpack
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/