Page 1 of 1
Зависает стелс
Posted: 26.01.2012 0:00
by murderinc
Code: Select all
Program Dialog;
var
stime : TDateTime;
a,b,c : integer;
{$Include 'all.inc'}
Begin
SetARStatus(true);
hungry(1,backpack);
clearjournal;
stime := Now;
Addtosystemjournal('000');
repeat
wait(5000);
a := InJournalBetweenTimes('здарова|ку|',stime, Now);
b := InJournalBetweenTimes('красавчек!|оло', stime, Now);
c := InJournalBetweenTimes('а ты че!', stime, Now);
Addtosystemjournal('11111');
wait(200);
until (a >= 0) or (b >= 0) or (c >= 0) or Dead or (Now > stime + (2.0/1440));
UOSay('привет');
wait(1000);
End.
вот этот простенький скрипт зависает, ходит в репите все хорошо, потом получает необходимую фразу, выходит из репита говорит "привет" и стелс полностью зависает. Что бы это могло быть?
Re: Зависает стелс
Posted: 26.01.2012 9:54
by MuDaCk
судя по скрипту, он должен после этих действий просто выключиться...
Re: Зависает стелс
Posted: 26.01.2012 13:20
by murderinc
MuDaCk wrote:судя по скрипту, он должен после этих действий просто выключиться...
так и есть, там еще был цикл, что бы он постоянно это делал. но он и в том и в этом варианте тупо подвешивает стелс, что приходиться снимать задачу, в чем может быть дело?
Re: Зависает стелс
Posted: 26.01.2012 13:21
by Alex
на какой строчке скрипта зависает?
Re: Зависает стелс
Posted: 26.01.2012 13:29
by murderinc
тут работает все хорошо, ходит в репите все норм
Code: Select all
repeat
wait(5000);
a := InJournalBetweenTimes('здарова|ку|',stime, Now);
b := InJournalBetweenTimes('красавчек!|оло', stime, Now);
c := InJournalBetweenTimes('а ты че!', stime, Now);
Addtosystemjournal('11111');
wait(200);
until (a >= 0) or (b >= 0) or (c >= 0) or Dead or (Now > stime + (2.0/1440));
Но когда условие выполняется, то есть он находит фразу в журнале, он выполняет - это строку, а иногда может и не выполняет
и зависает.
Re: Зависает стелс
Posted: 26.01.2012 13:37
by CFA
Да баг есть, пофикшу позже.
Ну а чтоб не ждать фикса, просто вот тут InJournalBetweenTimes('здарова|ку|',stime, Now); убери последний "|".
Re: Зависает стелс
Posted: 26.01.2012 13:46
by murderinc
CFA wrote:Да баг есть, пофикшу позже.
Ну а чтоб не ждать фикса, просто вот тут InJournalBetweenTimes('здарова|ку|',stime, Now); убери последний "|".
хы.. копипаст до добра не доводит... ну с другой стороны - хорошо, есть возможность исправить)
спасибо.