Помогите ктонить....никак не пойму как сделать правильно...

[TBAPb]

Поправте гдк я тут не правильно сделал...Он должен кастовать на себя feeblemind потом начинать медитировать, как только медитация сработала ждать пока наполнится мана...потом опять кастовать...

Code: Select all

sub FeeblemindSelf() 
while uo.mana >= uo.INT 
Uo.Exec("cast 'Feeblemind' self") 
wait(4000) 
wend 

If UO.Mana<15 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 
      Endif 
wend 
uo.exec("exec FeeblemindSelf")
endsub 

[Scripts Writer]

Code: Select all

            until UO.InJournal("You are") OR UO.InJournal