Yoko

sub Med()
while not uo.dead()
   if UO.Mana<20 then
     
       while UO.Mana<UO.INT
         UO.useskill('Meditation')
         wait(3500)
       wend
       end if
Uo.waittargetobject('self')  
UO.cast('Mana Drain')
wait(3000)
wend
end sub

##################################################### 
# Meditation 1.0 (c) Homer                          # 
# Чар одевает курсу, снимает, одевает робу мага и   # 
# медитирует. Медитация качается очень быстро, т.к. # 
# ваш чар "теряет" только 1 единицу маны.           # 
##################################################### 
sub meditation() 
 var rmaga = '0x204E' # тип НЕ курсанутой вещи
 var curse = '0x1F03' # тип курсанутой вещи
  Repeat 
   UO.DeleteJournal() 
    While NOT UO.InJournal( 'You are at peace') 
     UO.UseSkill("Meditation") 
     Wait(1000) 
    Wend 
   UO.UseType( curse ) 
   Wait(6000) 
   UO.UseType( rmaga ) 
  Until UO.Dead() 
end sub