Yoko

Code: Select all

sub WETERINARY() 
var bandage='0x0E21'
var bloodb='0x0E20'
var wb='0x1008'
var eda='0x097B'

while not UO.Dead()
    int=UO.Str     
    UO.arm("10")
    repeat 
     wait(200) 
    until UO.Hits<int 
    uo.disarm() 
    UO.DeleteJournal() 
    healing()  
  if UO.Count(bandage)==0 then 
    uo.waittargettype(wb) 
    uo.usetype(bloodb) 
    wait(500) 
    UO.DeleteJournal() 
  endif 
  if UO.STR < 300 then 
    caster() 
  endif 
wend 
end sub 

sub caster() 
castq:
UO.cast("Polymorph")
UO.waitmenu("What","Daemon") 
wait(6000) 
if UO.STR < 320 then 
  if UO.Mana < 50 then 
     medit() 
  endif
goto castq
endif 
end sub 

sub medit()
 while UO.Mana < 50
  while not UO.InJournal("You attempt")
    UO.UseSkill("Meditation")
    wait(2000)
  wend
  wait(500)
 wend
end sub

sub healing() 
while not UO.Life==uo.str
  UO.exec("bandageself")
  UO.Deletejournal()
  repeat  
    wait(200)
  until UO.InJournal("apply") or UO.InJournal("bloody")
wend
end sub

Code: Select all

sub abc()
    if ... then
        for ... to ...
            ...
        next
        .....
    else
        .....
    endif
end sub

Code: Select all

var eda='0x097B