Yoko

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

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

var eda='0x097B