[Roman32]

PHP код:

const
kid=1000000;
id=7398;

var
ObjID, X, Y, Z: integer;

begin
  if FromServer and (pck[1]=#$16) then
  begin
    if ((ReadD(6)-kid)=id) then
    begin
      buf:=#$04;
      if (ObjID=0) then
      begin
        ObjID:=ReadD(2);
        X:=ReadD(14);
        Y:=ReadD(55);
        Z:=ReadD(27);
      end;
      WriteD(ObjID);
      WriteD(X);
      WriteD(y);
      WriteD(Z);
      WriteC(0);
      SendToServer;
      SendToServer;
    end;
  end;
  if FromServer and (pck[1]=#$0F) and (ObjID<>0) then
  begin
    if (pos('_Chat 2', ReadS(6))<>0) then
    begin
      buf:=#$21;
      WriteS('npc_' + inttostr(ObjID) + '_Chat 2');
      pck:='';
      SendToServer;
    end;              
  end;
end. 


Где не так?)