Yoko

Code: Select all

sub att() 
#********** 
#(C) Cooper 
#*********** 
VAR monst=0x2006 #Тип монстра
VAR feathers=0x1bd1 
VAR dagger=0x13B9 
VAR backpack=0x401f3513 
var baggg 
var weapon='0x13B9' # Тип пушки
var i 

DIM garp[4] 
  
   garp[0]='0x1BD1' 
   garp[1]='0x0eed' 
   garp[2]='0x1BFB' 
   garp[3]='0x1F3F' 

  UO.Set('finddistance','3') 
  while UO.GetHP('self') < 500 
    UO.FindType(monst, '-1', 'ground') 
    if UO.FindCount() > 0 then 
      UO.DeleteJournal() 
      UO.Attack('finditem') 
      for i = 0 to 3 
        uo.warmode(0) 
        baggg=uo.getserial('lastcorpse') 
        uo.useobject(baggg) 
        uo.Waittargetobject(baggg) 
        wait(700) 
        uo.usetype(dagger) 
        wait(700) 
        uo.findtype(garp[i],-1,baggg) 
        if uo.findcount()>0 then 
          uo.grab(-1,'finditem') 
          Wait(600) 
        endif 
        uo.ignore('lastcorpse') 
      next 
      uo.IgnoreReset() 
      uo.usetype(weapon) 
      uo.warmode(1) 
      wait(700) 
    else 
      wait(100) 
    endif 
  wend 
end sub