Yoko

sub CheckingPlayers()
VAR a, b
uo.ignore('self', 'on')
DIM Chars[2]
Chars[0] = '0x0190' #boba
Chars[1] = '0x0191' #ciuvas
while not uo.dead()
  for a = 0 to 1  
    while val(uo.getglobal('find')) == 1
      wait(50)
    wend
    uo.set('finddistance', '20')
    uo.findtype(Chars[a], '-1', '1') 
    if uo.findcount() > 0 then
       uo.exec('exec recnamo')
      return
    else
      wait(500)
    endif
  next
wend
end sub

sub recnamo()
var a
VAR d = uo.getx('self')
run()
uo.deletejournal()
repeat
   uo.deletejournal()
   uo.waittargetobject('0x4000465D')
   uo.cast('Recall')
   a = 0
    repeat
      wait(100)
      a = a + 1
    until a > 36 or d <> uo.getx('self') or uo.injournal('fizzles')
until not uo.injournal('fizzles')
end sub

sub run()
uo.exec('terminate CheckingPlayers')
uo.exec('terminate Checkinglife')
end sub

sub tt()
var timec
var myx = uo.getx('self')
var myy=uo.gety('self') #added
repeat
  uo.deletejournal()
  uo.waittargetobject('0x4000465D')
  uo.cast('Recall')
  timec=uo.timer()+80
  uo.deletejournal()
  while not uo.injournal('fizzles') and not uo.injournal('reagents') and not timec<uo.timer() and (myx==uo.getx('self') and myy==uo.gety('self'))
    wait(50)
  wend
until myx<>uo.getx('self') and myy<>uo.gety('self') or uo.injournal('reagents')
end sub