Page 1 of 1
помогите с журналом...
Posted: 14.04.2005 17:16
by Dani
можно ли както сделать условие такова типа:
если 30 одинаковых сообщений например в журнале то делать дисконект...
хелп
Re: помогите с журналом...
Posted: 14.04.2005 19:01
by ParadoX
а мне говорили что ты мегаскриптер
Re: помогите с журналом...
Posted: 14.04.2005 19:32
by ParadoX
если уж так невтерпеж глупостями занимаца то можно шота помутить.. например через цикл простомотреть все 20 последних строк... и сделать переменную если тру... и если это тру будет = 30 .. дисконнект
Journal(StringIndex : Integer) : String: если я не ошибаюсь это...
луче бы совместными усилиями написали что та серьезное.. типа фишинга.. у мну уже какой день работа стоит изза читки из файла )
Re: помогите с журналом...
Posted: 15.04.2005 5:23
by Miralex
Dani wrote:можно ли както сделать условие такова типа:
если 30 одинаковых сообщений например в журнале то делать дисконект...
хелп
Смотри пример \Scripts\Demo\SavetoFile.sc
И какова вообще необходимость этого?
Re: помогите с журналом...
Posted: 15.04.2005 5:26
by Miralex
ParadoX wrote: типа фишинга.. у мну уже какой день работа стоит изза читки из файла
Зачем тебе вообще нужно чтение с файла? в скрипте загоняй данные в массив.
Re: помогите с журналом...
Posted: 15.04.2005 9:31
by Dani
ParadoX wrote:а мне говорили что ты мегаскриптер
все что я пишу, я пишу для себя и не для кого другого! все что тебе сказали это меня мало волнует! ты привык к инжекту я к изе... к этим операторам я еще не привык, темболие что расбираться особо нету чичас времени...
Miralex wrote:И какова вообще необходимость этого?
там где я играю заглючивают кирки... кирка юзаеццо а таргета нет, и пишет что я чета делою...
как отлечить строки (новую от предидущей)? дайте код мне нинада идеи и подсказки у миня нима время чичас мутить! еси не в лом хелпаните кодом
Posted: 15.04.2005 19:27
by Miralex
Code: Select all
Program DemoScript;
function IsCurMessages : Boolean;
var i,count : Integer;
s : String;
begin
Result := false;
count := 0;
for i := HighJournal downto HighJournal - 50 do
begin
S := Journal(i);
if S = 'System: You must wait to perform another action' then count := count + 1;
end;
if count >= 10 then Result := true;
end;
Begin
{Do Something}
if IsCurMessages then Disconnect;
End.
Просканирует последние 50 строчек журнала. Сработает Disconnect если найдет хотя бы 10 сигнальных строк. Не стоит волноваться если журнал будет пустым или строк в нем будет меньше 50. Ф-ция Journal(i) вернет пустую строку если строка в журнале не существует!
Posted: 16.04.2005 12:55
by Alex
Супер!! )) Очень полезный скрипт
Миралекс запости его в скриптах
ии возникает такой вопрос: если чар умер как ему сделать дисконекс, что бы потом не реконектился?
Posted: 16.04.2005 13:53
by Miralex
Управление скриптом и реконектором - в процессе разработки.
Posted: 17.04.2005 16:33
by Igorska
Miralex wrote:Управление скриптом и реконектором - в процессе разработки.
Так держать )