delphi Код:
// 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.