Yoko

На всем форуме только один пример и тот не работает помогите кто нить скриптом
Хочу чтобы была проверка по журналу на discovered или если физл
скила!
Сам смог добиться только одного из этого когда прописываю и то и то
вообще ниче не пашет+(((

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 не понимает и по журналу не проверят что физл+(

попробуй так:

while not UO.InJournal("discovered") or NOT UO.InJournal("can`t") 
wait (1000) 
wend 

и старайся не пользоваться ' внутри "" и наоборот. т.к. в некоторых случаях воспринимается как закрытие

_________________
принцип ясен?

я конешно могу обшибаться но ИМХО там должно быть не 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 при физле скила стоп макрос+((((((((((

я не про твой пример говорил, он у тебя изначально не верный...
читай ответы внематочно, или спрашиваешь ради вопроса?
я отвечал к

while not UO.InJournal("discovered") or NOT UO.InJournal("can`t") 
wait (1000) 
wend

надо

while not UO.InJournal("discovered") AND NOT UO.InJournal("can`t") 
wait (1000) 
wend

и ИМХО задержку до 100 уменьшить

я так понял что ты хочешь скрипт на прокачку Hiding'a вот тебе заточенный под ДРВ, надо только сообщения поменять, если они отличаются, в строке

until UO.InJournal('You have hidden') OR UO.InJournal('seem to hide') OR UO.InJournal('preocopured') or UO.Dead()

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

НЕ РАБОТАЕТ ВСЕ ОСТАЛОСЬ ТАКЖЕ+((((((((((

положи сюда то, что не работает