Yoko

Code: Select all

 sub magery() 
VAR LastTimer 
while NOT UO.Dead() 
UO.DeleteJournal() 
CheckLag() 
while UO.Mana>=10 
UO.Cast ('Poison', 'Self')
wait(3000) 
wend 
while UO.Mana<UO.Int 
LastTimer=UO.Timer() 
UO.UseSkill('Meditation') 
repeat 
wait(100) 
until UO.InJournal("You are") OR UO.InJournal("You lose") OR UO.Timer()>LastTimer+200 
UO.DeleteJournal()
CheckHeal()  
wait(2000) 
wend 
wend 
uo.useskill ("Spirit Speak") 
wait(4000)
end sub 

sub CheckLag() 
UO.DeleteJournal() 
UO.Click('backpack') 

repeat 
wait(500) 
until UO.InJournal('backpack') 
end sub

 
sub CheckHeal() 
if UO.Life<55 then 
UO.Say('guards') 
Repeat 
uo.Exec('warmode 0')
UO.Usetype("0x0E21") #Bandages 
UO.Exec("waittargetobject 0x00023D13")  # àéäè ÷àðà 
wait(3500) 
Until (UO.InJournal("need healing")) 
end if 
end sub 

Code: Select all

sub CheckHeal()
  var BCount; //Количество бинтов в начале
  if UO.Life<55 then
    UO.Say('guards')
    uo.WarMode(0)
    Repeat
      UO.WaitTargetObject('self')
      UO.Usetype("0x0E21") #Bandages
      BCount=UO.Count('0x0E21') #Сколько было бинтов
      repeat
        wait(100)
      until UO.Count(0x0E21)<>BCount #Пока бинтов не станет меньше
    Until UO.Life==UO.Str #Пока не вылечимся
  end if
end sub

Code: Select all

UO.FindType('bandage',-1,'self')
UO.WaitTargetObject('self')
UO.UseObject('finditem')

Code: Select all

UO.Cast ('Poison', 'Self')