[wimax]

begin
if fromclient and (pck[1]=#$0E) then
begin
buf := pck;
writed(216, 2); //216=ProtocolVersion
pck := buf;
end;
end.

ну вот типа такого посмотри какой у тя там протокол данный скрипт под пх