sub Magery() 
   While NOT UO.Dead() 
      While UO.Mana>=9 AND UO.NS>0 ; здесь можно менять со скаких маны чар начнёт медетировать, то же число следует поставить в строку *. 
         UO.DeleteJournal() 
         Ns() 
         UO.Cast('Poison', 'targetself')  # targetself  -  или id той вещи на которую хочешь кастовать
         wait(3000) 
      wend 
      If UO.Mana<9 Then ;* 
         While UO.Mana<UO.Int 
            UO.DeleteJournal() 
            wait(1000) 
            UO.Useskill('Meditation') 
            Repeat 
               wait(100) 
            until UO.InJournal("You are") OR UO.InJournal("Медитация") #ВМЕСТО МЕДИТАЦИЯ напиши, что пишет шард если МЕДИТАЦИЯ СОРВАЛАСЬ (у меня шард наполовину руссифицирован, так что)
         Wend    
end sub      

sub Ns() 
UO.Buy('Ns') 
wait(1000) 
UO.Say('Bye ') 
end sub

sub Ns()
UO.Buy('Ns')
wait(1000)
UO.Say('Bye ')
end sub

sub Ns()
while true
UO.Buy('Ns')
wait(1000)#задержка 1секунда, 10000-10секунд, 60000-1минута
UO.Say('Bye ')
wend
end sub

uo.Set('buydelay',' ')