[Pinko]

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