Yoko

Code: Select all

sub ManaDrain5()
   var script='ManaDrain' ; lowercase
   if uo.getglobal(script)=='On' then
      uo.setglobal(script,0)
      uo.print(' !!! -= '+script+' Terminated =- !!! ')
      uo.exec('terminate '+script)
      uo.exec('terminate all')
   else
      uo.setglobal(script,'On')
      uo.print(' !!! -= '+script+' =- !!! ')
      #uo.exec('exec ManaDrain6')
      
  while not uo.Dead()
  uo.deletejournal()
  wait(50)
      if uo.InJournal('An Ex Por|Kal Vas Flam') then
      pwav()
    end if
  wend
      
   uo.setglobal(script,0)
   uo.print(' !!! -= '+script+' Terminated =- !!! ')   
   endif   
endsub

Code: Select all

  uo.deletejournal()
  while not uo.Dead()
      if uo.InJournal('An Ex Por') then
       uo.deletejournal()
       UO.Sound(100)
      end if
      if uo.InJournal('Kal Vas Flam') then
       uo.deletejournal()
       UO.Sound(100)
      end if
  wait(100) 
 wend

Code: Select all

for i = 0 to n
for j = 0 to n
      if uo.InJournal(text[i]) then
       uo.deletejournal()
       UO.Sound(j)
      end if
next
next