Помогите ктонить....никак не пойму как сделать правильно...
Posted: 2006-08-06 21:01:58
Поправте гдк я тут не правильно сделал...Он должен кастовать на себя 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