Yoko

sub PGMagery()
UO.print("Magery PG for BeePK")
   VAR maxmana
   VAR minmana
   VAR temp
   VAR i
#EINSTELLUNGEN
#--Bis wieviel Mana Meditieren ?
maxmana = 99
#--Ab wieviel Mana Meditieren ?
minmana = 90
   Repeat
     Repeat
     Wait(100)
       UO.Exec ("cast 'Night Sight' self")
       Wait(3000)
       i = 0
#wait
       While (i < 50)
         Wait(20)
         i = i+1
       Wend
         Wait(200)


     Until UO.mana < minmana

     UO.press(9)   # press TAB
     Wait(200)
      Repeat
       UO.useskill('Meditation')
Wait(1000)
     Until UO.mana > maxmana
   Until False
end sub

sub PGMagery()
   uo.print( "Magery PG for BeePK" )
   var maxmana = 99
   var minmana = 90
   repeat
      while uo.mana > minmana
         uo.cast( "Night Sight", "self" )
         wait( 4200 )
      wend
      uo.warmode( false )
      while uo.mana < maxmana
         uo.useskill( "Meditation" )
         wait( 1000 )
      wend
   until false
endsub