Цитата:
Сообщение от h82w8
что надо изменить чтобы всегда работало?
|
По идее надо так:
Код:
begin
if FromClient and (ConnectName='name')
and pck[1]=#$15 then begin
buf:=HStr('51 55 B0 F1');
SendToServerEx('name);
pck:='';
end;
end.
Но ты уверен, что тебе нужны именно эти пакеты?
Цитата:
15=TradeRequest:h(ObjectID)
51=RequestSurrenderPledgeWar:s(PledgeName)
|
Короче что-то здесь не так)