Показать сообщение отдельно
Старый 16.12.2007, 15:45   #46
Новичок
 
Регистрация: 09.12.2007
Сообщений: 24
Сказал Спасибо: 9
Имеет 12 спасибок в 12 сообщенях
alxabay
По умолчанию

мне надо эти действия в скрипте затормозить
Код:
procedure RR(scrl,wp: integer);
begin
buf:=HStr('33 01 00 00 00 1F 00 00 00'); //zato4ka na 31 slot
WriteD(scrl);
buf:=buf+HStr('01 00 00 00'); //zakrili perenos na panel
SendToServer;

buf:=#$14;      //activ zato4ku
WriteD(scrl);
WriteD(0);
SendToServerEx(Name);
buf:=#$58;        //vesh vibrali
WriteD(wp);
SendToServerEx(Name);
buf:=#$14;        //activ zato4ku tuje samuu
WriteD(scrl);
WriteD(0);
WriteD(wp);
SendToServerEx(Name);
end;
вот этот код нада послать в оффлине а тут как я понял sendtoserver отсылает все это в обход тово места где на все пакеты реакция
не осилю, эх ладна.
alxabay вне форума   Ответить с цитированием
За это сообщение alxabay нажился спасибкой от: