Page 1 of 1

Как осушествить?

Posted: 2004-12-05 01:46:02
by 666Man666
Вот пример, цикла... почему не выполняется это условие - or (x==50)

Code: Select all

sub test()
var x=0
REPEAT
UO.DeleteJournal()
UO.Print("1")
while NOT UO.InJournal("go") or (x==50)
wait(200)
x=x+1
wend
x=0
UO.Print("2")
wait(200)
Until UO.InJournal("off")
end sub

Posted: 2004-12-05 02:20:55
by 666Man666
А вот так работает :)

Code: Select all

sub test()
var x=0
REPEAT
UO.DeleteJournal()
UO.Print("1")
REPEAT
x=x+1
wait(200)
Until UO.InJournal("go") or (x==100)
x=0
UO.Print("2")
wait(200)
Until UO.InJournal("off")
end sub

Re: Как осушествить?

Posted: 2004-12-05 04:08:38
by Optical

Code: Select all

sub test()
var x=0
REPEAT
UO.DeleteJournal()
UO.Print("1")
while NOT UO.InJournal("go") AND NOT x==50
wait(200)
x=x+1
wend
x=0
UO.Print("2")
wait(200)
Until UO.InJournal("off")
end sub

Попробуй так =)

Posted: 2004-12-05 05:41:50
by 666Man666
ааааа точно :)
во блин... я протупил

а кстати, без разницы же ведь While() или Repeat() использовать.... суть то одна

Posted: 2004-12-05 10:29:06
by AGRS
666Man666 wrote:а кстати, без разницы же ведь While() или Repeat() использовать.... суть то одна

Ну не совсем. Один с предусловием, другой с постусловием. Тобишь repeat хоть раз но выполнит тело цикла.

Posted: 2004-12-05 12:07:49
by 666Man666
Понятно... будем знать :)