Yoko

Sub StoneField() 
if uo.waiting() then 
uo.canceltarget() 
endif 
uo.waittargettile('-1',uo.getX('laststatus'),uo.getY('laststatus'),uo.getZ('laststatus')) 
uo.cast('Wall of Stone') 
endsub 

sub wsl() 
uo.waittargettile("400",str(uo.getx("lasttarget")),str(uo.gety("lasttarget")),str(uo.getz("lasttarget"))) 
uo.cast("Wall of Stone") 
end sub

sub Poison() 
   If UO.Weight<500 then 
      UO.DeleteJournal() 
       UO.FindType('0x0E34',-1,'backpack')
     If UO.GetQuantity('finditem')>0 then 
         UO.UseType(0x0E34)
         wait(50) 
   uo.lclick(460,455)       
        wait(500) 
          repeat ;
        until UO.InJournal('You fail to inscribe the scroll') or UO.InJournal('You put the') 
     if UO.InJournal('You fail to inscribe the scroll') then 
       goto inscript 
     end if 
   end if 
 
uo.useskill('Meditation') 
wait(1000) 
endif
end sub

goto inscript 

uo.lclick(460,455) 

repeat
until

goto inscript 

uo.lclick(460,455) 

repeat
until

uo.lclick(460,455) 

uo.findtype('') #Type of scroll 
if uo.Count('finditem') > 0 then 
  uo.waittargetself() 
  uo.UseType('') # Scroll
else 
  uo.Print('There are no scrolls') 
end if