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.
фигня... поробуй сам.. ну поймет клиент что пати просрал он и что будет? на разрыв пати запрос отдаст? нефига...