Yoko

Code: Select all

k = 0
  while (k<50) 
    wait(100)
    k = k + 1
  wend

Code: Select all

sub heal()
var frizheal = "You apply bandages but"
var hil = "You put bloody"
var bloodbandage = 0x0E20
var bandage = 0x0E21
var Sunduk = '0x40000FE8'
var DoborBintov = 1
var DoborRegov = 1


while not uo.Dead()
if DoborBintov == 1 then
  DoborBintov()
end if
  if uo.Count('0x0F0B') == 0 then
    MakeRefresh()
  end if
  if uo.Life < uo.Str then
    bandageself()    
  else 
    ClickNaUlej()
  end if
wend
end sub
######################################################################################################
sub DoborBintov()
if uo.count('0x0E20') >= 100 then
  uo.findtype('0x0E20', '-1', 'backpack') 
  if uo.getquantity('finditem') >= 60 then 
    uo.moveitem('finditem', '100', '0x40000FE8') 
    wait(700) 
  endif 
end if 
if uo.count('0x0E21') < 1000 then
  uo.findtype('0x0E21', '-1', '0x40000FE8') 
  if uo.getquantity('finditem') >= 60 then 
    uo.moveitem('finditem', '100', 'my') 
    wait(700) 
  else 
    uo.print( 'Áèíòû â ñóíäóêå êîí÷èëèñü!' ) 
    return 
  endif 
end if 
end sub
######################################################################################################
sub DoborRegov()
uo.findtype('0x0F7A', '-1', '0x40000FE8') 
if uo.getquantity('finditem') >= 60 then 
  uo.moveitem('finditem', '150', 'my') 
  wait(700) 
endif 
end sub
######################################################################################################
sub bandageself() 
if UO.Stamina < 30 then 
  uo.UseType('0x0F0B')
end if
uo.exec('bandageself')
uo.DeleteJournal()
repeat 
  wait(100)
until uo.InJournal("You apply bandages but") or uo.InJournal("You put bloody") 

end sub
######################################################################################################
sub ClickNaUlej()
var ulej = 0x091A
repeat
 UO.UseFromGround(ulej)
 wait(100)
until uo.Life < (uo.Str - 10)

end sub
######################################################################################################
sub MakeRefresh()
var garlick='0x0F7A'

if uo.bp  < 150 then 
  DoborRegov()
end if


while not uo.Count('0x0F0B') == 112 #
  uo.WaitMenu('What sort of potion do you want to','Refresh') 
  uo.UseType(garlick)
  uo.DeleteJournal()
  repeat 
    wait(100)
  until uo.InJournal("mes1") or uo.InJournal("mes")
wend
end sub

Code: Select all

repeat 
  wait(100) 
until uo.InJournal("You apply bandages but") or uo.InJournal("You put bloody") 

Code: Select all

var schetchik=0
repeat
 schetchik=schetchik+1 
  wait(100) 
until uo.InJournal("You apply bandages but") or uo.InJournal("You put bloody") or schetchik >200

Code: Select all

repeat 
 UO.UseFromGround(ulej) 
 wait(100) 
until uo.Life < (uo.Str - 10) 

Code: Select all

sub bandageself() 
var schetchik=0 
if UO.Stamina < 30 then 
  uo.UseType('0x0F0B')
end if
uo.exec('bandageself')
uo.DeleteJournal()
repeat 
  schetchik=schetchik+1 
  wait(100)
until uo.InJournal("bandages but") or uo.InJournal("bloody")  or schetchik >300
end sub

Code: Select all

repeat 
 UO.UseFromGround(ulej) 
 wait(100) 
until uo.Life < (uo.Str - 10)