Показать сообщение отдельно
Старый 20.04.2010, 23:11   #1401
Новичок
 
Регистрация: 20.04.2010
Сообщений: 2
Сказал Спасибо: 1
Имеет 0 спасибок в 0 сообщенях
KOPOBA пока неопределено
По умолчанию

Код:
const
   first='23...00';
  second='23...00';


procedure Init; //Вызывается при включении скрипта
begin

end;

procedure Free; //Вызывается при выключении скрипта
begin

end;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin

begin
  if FromClient and (pck='19..00') then begin
    buf:=Hstr(first);
    SendToServer;
  end;
  if fromclient and (pck='19..00') then begin
    buf:=hstr(second);
    SendToServer;
  end; 
  if fromclient and (pck='19..00') then begin
    buf:=hstr(second);
    SendToServer;
  end;         
  
end;

end.
Почему скрипт может не работать? При получении требуемого пакета, ПХ не шлёт нужный в ответ
Вместо многоточия был пакет, но он очень длинный...
KOPOBA вне форума   Ответить с цитированием