Спецификацию саур сделал. Она есть в архиве WPF с его сайта и была еще алчитсе. Есть она там щас или нет - я хз.
Как таковая задержка скрипта в ФС есть -
gSys.sleep(ms); Где ms - задержка в миллисекундах. Но использовать ее лучше не стоит, ибо тормозится не токлько выполнение самого скрипта но и всего потока, к которому он прикреплен. Другими словами, пока не кончится задержка клиент не получит и не отправит ни единого пакета. Зато есть шикарные таймеры. О них ниже.
А вот и сам скриптег:
Код:
function OnTimer(nt,cnt : integer) : boolean;
begin
gSys.EnSendS(HStr('1900D0090001000000104E6240D3130 0000100000008070000'));
gSys.EnSendS(HStr('1900D0090001000000104E6240D3130 0000100000008070000'));
result := true;
end;
BEGIN
gSys.SetTimer(1,100);
END.
-----------------------------------
Код:
gSys.SetTimer(1,100);
Запускает первый таймер (всего три таймера на каждый скрипт) c задержкой в 100 мс.
-----------------------------------
Код:
function OnTimer(nt,cnt : integer) : boolean;
begin
...
result := true;
end;
Функция обработки события таймера. Тут nt=[1,2,3] - номер таймера, вызвавшего событие, cnt - номер срабатывания таймера. После обнуления таймера этот счетчик сбрасывается.
Если хотим чтобы таймер работал дальше пишем в конце
или
дабы таймер остановился. После этой остановки счетчик срабатываний тоже обнуляется.
Добавлено через 5 минут
ЗЫ Код Ивана пахать не будет.. Точнее работать он будет но не будет пропускать пакеты.