Page 1 of 1
Прокачка детекта на 2 или 3 хайдерах! Шард Utopia
Posted: 2004-09-27 22:14:29
by denis
На всем форуме только один пример и тот не работает помогите кто нить скриптом
Хочу чтобы была проверка по журналу на discovered или если физл
скила!
Сам смог добиться только одного из этого когда прописываю и то и то
вообще ниче не пашет+(((
Posted: 2004-09-27 22:17:16
by denis
repeat
UO.DeleteJournal()
UO.UseSkill("Hiding")
while not UO.InJournal("discovered") or UO.InJournal("can`t")
wait (1000)
wend
goto loop
Until 1>2
end sub
Как бы получается что он or не понимает и по журналу не проверят что физл+(
Posted: 2004-09-28 08:12:28
by Bambr
denis wrote:repeat
UO.DeleteJournal()
UO.UseSkill("Hiding")
while not UO.InJournal("discovered") or UO.InJournal("can`t")
wait (1000)
wend
goto loop
Until 1>2
end sub
Как бы получается что он or не понимает и по журналу не проверят что физл+(
попробуй так:
Code: Select all
while not UO.InJournal("discovered") or NOT UO.InJournal("can`t")
wait (1000)
wend
и старайся не пользоваться ' внутри "" и наоборот. т.к. в некоторых случаях воспринимается как закрытие
Posted: 2004-09-28 08:28:18
by Sfagnum
Bambr wrote:попробуй так:
Code: Select all
while not UO.InJournal("discovered") or NOT UO.InJournal("can`t")
wait (1000)
wend
я конешно могу обшибаться но ИМХО там должно быть не or, a and...
Posted: 2004-09-28 08:45:17
by Bambr
Sfagnum wrote: я конешно могу обшибаться но ИМХО там должно быть не or, a and...
дык я постоянно ошибаюсь с этими whil-ами и until-ами
канечна AND, ведь как там у автора:
WHILE условие
команды
WEND
- цикл. Выполняется, пока условие истинно.
Posted: 2004-09-28 08:47:04
by Sfagnum
Bambr wrote:дык я постоянно ошибаюсь с этими whil-ами и until-ами
такая же херня
Posted: 2004-09-29 05:32:04
by denis
Bambr wrote:Sfagnum wrote: я конешно могу обшибаться но ИМХО там должно быть не or, a and...
дык я постоянно ошибаюсь с этими whil-ами и until-ами
канечна AND, ведь как там у автора:
WHILE условие
команды
WEND
- цикл. Выполняется, пока условие истинно.
Если вот так while not UO.InJournal("discovered") and UO.InJournal("can`t") ваще глюк макроса аж клиент виснет.
while not UO.InJournal("discovered") and not UO.InJournal("can`t") а так
робит только при discovered при физле скила стоп макрос+((((((((((
Posted: 2004-09-29 09:34:03
by Sfagnum
denis wrote:Если вот так while not UO.InJournal("discovered") and UO.InJournal("can`t") ваще глюк макроса аж клиент виснет.
while not UO.InJournal("discovered") and not UO.InJournal("can`t") а так
робит только при discovered при физле скила стоп макрос+((((((((((
я не про твой пример говорил, он у тебя изначально не верный...
читай ответы внематочно, или спрашиваешь ради вопроса?
я отвечал к
Code: Select all
while not UO.InJournal("discovered") or NOT UO.InJournal("can`t")
wait (1000)
wend
надо
Code: Select all
while not UO.InJournal("discovered") AND NOT UO.InJournal("can`t")
wait (1000)
wend
и ИМХО задержку до 100 уменьшить
Posted: 2004-09-29 09:42:42
by Sfagnum
я так понял что ты хочешь скрипт на прокачку Hiding'a вот тебе заточенный под ДРВ, надо только сообщения поменять, если они отличаются, в строке
Code: Select all
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preocopured') or UO.Dead()
Code: Select all
sub ToHide()
repeat
while not UO.Hidden()
CheckLag()
UO.WarMode(0)
UO.UseSkill('Hiding')
repeat
wait(200)
until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preocopured') or UO.Dead()
wend
UO.Say('a')
until UO.Dead
end sub
sub CheckLag()
uo.DeleteJournal()
uo.Click('backpack')
repeat
wait(50)
until uo.InJournal('backpack')
end sub
Posted: 2004-10-01 20:19:04
by denis
Sfagnum wrote:denis wrote:Если вот так while not UO.InJournal("discovered") and UO.InJournal("can`t") ваще глюк макроса аж клиент виснет.
while not UO.InJournal("discovered") and not UO.InJournal("can`t") а так
робит только при discovered при физле скила стоп макрос+((((((((((
я не про твой пример говорил, он у тебя изначально не верный...
читай ответы внематочно, или спрашиваешь ради вопроса?
я отвечал к
Code: Select all
while not UO.InJournal("discovered") or NOT UO.InJournal("can`t")
wait (1000)
wend
надо
Code: Select all
while not UO.InJournal("discovered") AND NOT UO.InJournal("can`t")
wait (1000)
wend
и ИМХО задержку до 100 уменьшить
НЕ РАБОТАЕТ ВСЕ ОСТАЛОСЬ ТАКЖЕ+((((((((((
Posted: 2004-10-04 10:27:26
by Sfagnum
denis wrote:НЕ РАБОТАЕТ ВСЕ ОСТАЛОСЬ ТАКЖЕ+((((((((((
положи сюда то, что не работает