unit MQTT;
{**************************************************************************}
{                                                                          }
{**************************************************************************}
interface

const
  max_gw = 10000;
  PT_NAME_LEN = 10;

type
  TTopicInfo = record
    campus, zone, build, subSystemName : string;
    posNo, devID, devNo, subSystemNo : integer;
  end;

  TTagInfo = record
    tID : integer;
    shmAddr : integer;
    name : string;
    desc : string;
    topic : string;
    val, maxVal, minVal : single;
    sensorName : string;
    sensorAddr : integer;
    trdlog : string;
    almlog : string;
    almCode : integer;
    almType : string;
    almLevel : integer;
    almHH, almH, almL, almLL : single;
    Topic_01,
    Topic_02,
    Topic_03,
    Topic_04,
    Topic_05,
    Topic_06,
    Topic_07,
    Topic_08,
    Topic_09,
    Json_01, Json_02 : string;

  end;

  TIOTGW = record
    _TOPIC : string;
    _DI : array [0..15] of Boolean;
    _DO : array [0..7] of Boolean;
    _AI : array [0..3] of integer;
    _TEMP : array [0..9] of single;
    _HUMID : array [0..9] of single;
    run_dd, run_hh, run_mm, run_ss : integer;
  end;


  TNILM_VALUE = record
    PF, Vrms, Irms, _Var, Va, Pwr : array [1..3] of single;
    Gyro, Accel : array [1..3] of Single;
    TempC : single;
  end;

  TNILM = record
    idxNo : integer;
    _TOPIC : string;
    _VALUE : TNILM_VALUE;
    rcvCount, oldRcvCount : integer;
  end;

var
  ext_flag : char = chr(0);

implementation

end.