Что нужно знать для написания скриптов

[BioDread]

Люди подскажите плиз почему при выполнении скрипта:

PHP код:

begin
  begin
   Buf:=HStr('A7 4A 27 00 00 00 9F 24 00 E8 03 00 00 00 00 00 00 00 00 00 00');
   SendToServer;
   delay(800);
   end;    
    
    
    begin
    Buf:=HStr('04 4D 85 00 10 99 46 01 00 75 D9 00 00 1A FA FF FF 00');
    SendToServer;
    delay(500);
    end;
     begin
     Buf:=HStr('1E 00 00 00 00 01 00 00 00 C7 13 01 10 B6 05 00 00 80 38 01 00 ');
     SendToServer;
     delay(500);
     end.
end. 


пару сек отправляются пакеты но КОПМ ЖУТКО ЛАГАЕТ ЛАГАЕТ и мну дисконнектит от серва подскажите плиз в чём причина или напишите скрипт на посылку 3х пакетов с задержкой ПЛИИИЗ
П.С. Если не писать begin end после каждого то комп ещё быстрее залагивает.....

[Vilson]

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

Люди подскажите плиз почему при выполнении скрипта:

http://coderx.ru/showthread.php?t=4104

[Sherman]

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

Люди подскажите плиз почему при выполнении скрипта:

PHP код:

begin
  begin
   Buf:=HStr('A7 4A 27 00 00 00 9F 24 00 E8 03 00 00 00 00 00 00 00 00 00 00');
   SendToServer;
   delay(800);
   end;    
    
    
    begin
    Buf:=HStr('04 4D 85 00 10 99 46 01 00 75 D9 00 00 1A FA FF FF 00');
    SendToServer;
    delay(500);
    end;
     begin
     Buf:=HStr('1E 00 00 00 00 01 00 00 00 C7 13 01 10 B6 05 00 00 80 38 01 00 ');
     SendToServer;
     delay(500);
     end.
end. 


пару сек отправляются пакеты но КОПМ ЖУТКО ЛАГАЕТ ЛАГАЕТ и мну дисконнектит от серва подскажите плиз в чём причина или напишите скрипт на посылку 3х пакетов с задержкой ПЛИИИЗ
П.С. Если не писать begin end после каждого то комп ещё быстрее залагивает.....

У тебя принудительньнная остановка пакетхака на 1,8 секунды.
Что бы не тормозить работу пакетхака кури в сторону выполнения скрипта в отдельном потоке с помощью TTimer. Примеров в "ДА БУДЕТ БОТ" предостаточно. Там же где то есть отправка с задержкой.
И да, научись уже писать на Pascal.