Показать сообщение отдельно
Старый 22.12.2007, 22:10   #16
Гость
 
Сообщений: n/a
По умолчанию

что-то у вас не то =/
по такому скрипту, по вашему описанию, вместо действия victory должно выполняться действие сесть:

Код:
procedure Init; 
begin
end;

procedure Free; 
begin
end;

begin
  if FromClient and (ConnectName='nickname') and (pck=HStr('1b 04 00 00 00')) 
  then 
       begin
            buf:=HStr('45 00 00 00 00 00 00 00 00 00');
            SendToServerEx('nickname');
            pck:='';
       end;
end.
Или я неверно понял принцип работы программы?
  Ответить с цитированием