Page 1 of 1

Нужен скрипт Медитация+Еволюшен

Posted: 2008-04-08 16:40:33
by Stoner
Помогите наити скрипт на медитацыю + єволюшин .

Posted: 2008-04-08 17:09:56
by Dolbo

Code: Select all

repeat
If UO.Mana < 10 Then
repeat
UO.UseSkill( 'Meditation' )
wait(2000)
until UO.Mana == UO.Int
Endif
until false

медитация.
распишешь подробнее как качаешь эвал
тогда и макрос на него найдется ...

Posted: 2008-04-20 12:53:52
by Perun
#########################
#####***GooD ver 1.0***##
#########################
###берете курсовыю вещь##
###в пак ##
###и запускаете скрипт ##
### ##
### ##
#########################
sub Meditation()
While NOT UO.Dead()
While UO.Mana>=50 ;значение маны после которого снимает курсу с себя
UO.DeleteJournal()
UO.UseType(0x1F03) ;курсанутая роба
uo.useskill ("Spirit Speak")
wait(5000)
wend

UO.Undress()
Repeat
wait(500)

If UO.Mana<50 Then ;значение маны после которого снимает курсу с себя
While UO.Mana<UO.Int
UO.DeleteJournal()
UO.Useskill('Meditation')
Repeat
wait(100)
until UO.InJournal("You are") OR UO.InJournal("You lose")
Wend
Endif

Endif
Wend
end sub


Вроде работал !