Цитата:
Сообщение от Pahan
Народ помогите пожалуста. Надо переделать на прогу Саурона в FS
begin
if FromClient and (pck[1]=#$0F) then pck:=pck+#$01#$00#$00#$00;
end.
Вот что написал сам
begin
if (not _gFromServ) and StrCmp(copy(_gBuff,1,3), HStr('1F 00 0F')) then
_gOutBuff := _gBuff + #01+#00+#00+#00;
end.
Вообщем дело такое, меняет первый пакет а потом клиент перестаёт обращать внимание на команды, но в тоже время соединение не обрывается.
|
для wpf ppc вроде этот скрипт ?
скрипт из wpf650, а в публичном wpf655 его уже нету наверное забыли добавить
Код:
// demo_0F.fsc выправление пакета на движение на Камаель.
begin
if length(_gBuff) < 3 then exit;
if (not _gFromServ) and (_gBuff[3] = #$0F) then begin
_gOutBuff := _gBuff + HStr('01 00 00 00');
_gOutBuff[1] := chr(ord(_gOutBuff[1])+4);
end;
end.