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

Ask for scripts here

Moderators: Murderator+, Murderator

Post Reply
Stoner
Posts: 4
Joined: 2008-04-05 17:44:00
Contact:

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

Post by Stoner »

Помогите наити скрипт на медитацыю + єволюшин .
gdfdgd
Dolbo
Posts: 41
Joined: 2008-04-02 08:24:35

Post 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

медитация.
распишешь подробнее как качаешь эвал
тогда и макрос на него найдется ...
Perun
Posts: 11
Joined: 2007-08-31 18:08:55

Post 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


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