Кружок нубов(Вопрос-Ответ)

[Byrger]

Сообщение от Grinch

не понятно что он вообще кроме этого должен делать

Что непонятного???
Он должен отправить 1 пакет...подождать 5сек
Затем отправить 2ой пакет и сново начать цикл

[Grinch]

Сообщение от Byrger

Что непонятного???
Он должен отправить 1 пакет...подождать 5сек
Затем отправить 2ой пакет и сново начать цикл

это точно весь скрипт? и вообще ты каким синтаксисом пользовался когда писал. просто delay(5000) процедура её нет в скрипте, а та что пнх заложена она основной поток замораживает вроде так я если честно вообще не понимаю как скрипт запустился, кстати говоря, так же нет в скрипте Inin процедуры и процедуры Free.
карчое примерно должно быть так.

procedure Init; 
begin

end;

procedure Free; 
begin
тут 
end;

begin

end.

короче дело к ночи учебник возьми

[Byrger]

procedure Init;
begin

end;

procedure Free; 

     const
hp='21 08 E8 5E 39 6B 5B 2B 00';
hp2='21 08 E8 5E 39 6B 5B 2B 00';
begin


buf:=hstr(hp);
SendToServer;
delay(5000);

begin
buf:=hstr(hp2);
SendToServer;
end;


end;


begin

end.

запускаю скрипт...
Ничего не происходит, а когда останавливаю скрипт секунды через 3-4 отправляется hp2