Подскажите почему не работает?
Подскажите почему не работает?
begin
if FromClient and (ConnectName='SokolA')
and (pck=HStr('1b 04 00 00 00')) then begin
buf:=HStr('45 00 00 00 00 00 00 00 00 00');
SendToServerEx('SokolB');
pck:='';
end;
end.
п.с. Имена менял
Если посылать отдельно 1b 04 00 00 00 и 45 00 00 00 00 00 00 00 00 00 работает, сам скрипт нет, может потому что интерлюдия?
|