-=> Quoting andrew clarke to Paul West <=-

 > Any chance of a QuickBBS GOLDBASE version?  The structures are almost 
 > the same.

 ac> Send me some info on the structures and I'll see what I can do.

Const
  MaxMsgAreas  = 500;

type
  MsgNumType = LongInt;

  BoardNumType = Word;

  NameType = String[35];

  TimeStr = String[5];

  DateType = String[8];

  MsgToIdxRecord = NameType; { MSGTOIDX.DAT }

  MsgTxtRecord = String[255]; { MSGTXT.DAT }

  InfoRecord = record { MSGINFO.DAT }
                 LowMsg,                   { Lowest Message in File }
                 HighMsg     : MsgNumType; { Highest Message in File }
                 TotalActive : LongInt;    { Total Active Messages }
                 ActiveMsgs  : array[1..MaxMsgAreas] of Word;
               end;

  IdxRecord = record { MSGIDX.DAT }
                MsgNum : MsgNumType;
                Board  : BoardNumType;
              end;

  HdrRecord = record { MSGHDR.DAT }
                MsgNum,
                ReplyTo,
                SeeAlsoNum : MsgNumType;
                TRead      : Integer;
                StartRec   : LongInt;
                NumRecs,
                DestNet,
                DestNode,
                OrigNet,
                OrigNode   : Integer;
                DestZone,
                OrigZone   : Byte;
                Cost       : Integer;
                MsgAttr,
                NetAttr    : Word;
                Board      : BoardNumType;
                PostTime   : TimeStr;
                PostDate   : DateType;
                WhoTo,
                WhoFrom    : NameType;
                Subj       : String[72];
              end;


(* Msg Attributes:

      Bit 0: Deleted
      Bit 1: Unmoved Outgoing Net Message
      Bit 2: Is a Net Mail Message
      Bit 3: Private
      Bit 4: Received
      Bit 5: Unmoved Outgoing Echo Message
      Bit 6: Local Bit
      Bit 7: Group Message (QuickBBS only)

   Net Attributes:

      Bit 0: Kill Message after it's been sent
      Bit 1: Sent OK
      Bit 2: File(s) Attached
      Bit 3: Crash Priority
      Bit 4: Request Receipt
      Bit 5: Audit Request
      Bit 6: Is a Return Receipt
      Bit 7: Freq  (QuickBBS)

*)

  LastReadType = Array[1..MaxMsgAreas] of MsgNumType; { LASTREAD.DAT }


--- Blue Wave/DOS v2.30