Page 1 of 1
Помогите скриптом на стелс
Posted: 2005-09-04 19:08:47
by Tor4ek
извените поиском не нашел может я кривой но все же пожалуйста
нужно чтоб он вставал в хайд юзал стелс если физл опять вставал в хайд и юзал стелс и тд спасибо большое буду очень благодарен

Posted: 2005-09-04 19:14:05
by Leo
Code: Select all
sub Stealth()
repeat
uo.UseSkill('Stealth')
wait(4100)
until uo.Dead()
end sub
Posted: 2005-09-04 19:27:50
by Tor4ek
Блин а когда фейл стелса он выходит из хайды нужно чтоб бы он опять встал в хайд и потом стелс если фейл опять хайд стелс
шард middle-earth
Posted: 2005-09-07 22:06:47
by Tor4ek
Блин ну помогите пожалуйста
Posted: 2005-09-07 22:12:28
by Tor4ek
я конечно знаю что я кривой но поправьте пожалуйста

я сделал все что мог пожалуйста
Code: Select all
sub Stealth()
repeat
uo.UseSkill('Stealth')
wait(5000)
If UO.InJournal ("You have revealed") Then ;*
wait (4500)
uo.UseSkill('Hiding')
until UO.InJournal ("You have hidden")
endif
wait(4500)
until uo.Dead()
end sub
Posted: 2005-09-08 11:31:43
by dUha
Вот моя версия скрипта на стелс
Code: Select all
sub main()
while 1
hide:
repeat
uo.useskill("Hiding")
wait(10000)
stealth:
while (UO.Hidden())
uo.useskill("Stealth")
wait(10000)
wend
goto hide
wend
end sub
прочто я не люблю журнал ето дело конефно хорошо но без него лучше
Posted: 2005-09-08 11:42:50
by Leo
Tor4ek wrote:я конечно знаю что я кривой но поправьте пожалуйста

я сделал все что мог пожалуйста
Code: Select all
sub Stealth()
repeat
uo.UseSkill('Stealth')
wait(5000)
If UO.InJournal ("You have revealed") Then ;*
wait (4500)
uo.UseSkill('Hiding')
until UO.InJournal ("You have hidden")
endif
wait(4500)
until uo.Dead()
end sub
Лучше так:
Code: Select all
sub Stealth()
repeat
uo.UseSkill('Stealth')
wait(5000)
If UO.InJournal ("You have revealed") Then
wait (1000)
uo.UseSkill('Hiding')
wait(4500)
endif
until uo.Dead()
end sub
Posted: 2005-09-08 15:50:52
by Tor4ek
Все всем спасибо большое