{$I rastruct.inc}


type
  msgattrs = set of (
    m_del, m_transit, m_netm, m_priv, m_rcvd, m_echotr, m_local, m_r1
  );
  netattrs = set of (
    n_kill, n_sent, n_file, n_crash, n_reqrec, n_audreq, n_retrec, n_r2
  );
  namestring = string[35];
  subjstring = string[72];


type
  lastcall = record
    line   :            byte;
    name   :  msgtoidxrecord;
    city   :      string[25];
    baud   :            word;
    times  :         longint;
    logon  :       string[5];
    logoff :       string[5];
  end;


  msgboardsarray = array[1..200] of messagerecord;
  msgboardsarrayptr = msgboardsarray;




const
  boardlim = 200;       {maximum number of boards}
  ok = 0;               {ioresult value}

  defaultmsgattr: array[msgtype] of msgattrs=(          {may be modified}
        [m_transit, m_netm],     {netmail}
        [m_echotr],             {echomail}
        [m_local]);             {local mail}
  defaultnetattr: array[msgtype] of netattrs=(
        [],                     {netmail}
        [],                     {echomail}
        []);                    {local mail}