Нужен скрипт Медитация+Еволюшен
Moderators: Murderator+, Murderator
Code: Select all
repeat
If UO.Mana < 10 Then
repeat
UO.UseSkill( 'Meditation' )
wait(2000)
until UO.Mana == UO.Int
Endif
until false
медитация.
распишешь подробнее как качаешь эвал
тогда и макрос на него найдется ...
#########################
#####***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
Вроде работал !
#####***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
Вроде работал !