Скриптик

[mks]

raid,
все нормально, но тут есть один нюанс:
тебе кинули пати, да в этом скрипте бот примет пати, но диалоговое окно в клиенте о приеме в пати останется, и когда шкала пройдет клиент автоматом пошлет пакет кэнслпати 2A 00 00 00 00, либо если нажмете согласиться 2A 01 00 00 00, поэтому советую добавить в скрипт гашение этого пакета

begin
 if fromclient and (pck[1]=#$2A) then pck:=''; //<-------собсно вот

 if (ConnectName=Name) and FromServer and (pck[1]=#$39) then begin
//  ReadS(2) - ник того кто кинул пати.
  buf:=#$2A;
  WriteD(1); // 0 - отказ от пати
  SendToServerEx(Name);
 end;


end.

фигня... поробуй сам.. ну поймет клиент что пати просрал он и что будет? на разрыв пати запрос отдаст? нефига...