Код:
const
name = 'AntBuf';
begin
if FromServer and (pck[1]=#$39) then begin //от сервера получен пакет $39
if ReadS(2) = ('Пиротехник') or ('Пиротyехник') then //проверяем от кого
buf:=hstr('43 01 00 00 00'); // принять пати
SendToServerEx(name);// от имени name = 'AntBuf';
//Отправляем его на сервер
end;
end.
посмотри может пригодится
http://coderx.ru/showthread.php?t=2080