Category : BBS Programs+Doors
Archive   : QBBBS266.ZIP
Filename : STRUCT.266

 
Output of file : STRUCT.266 contained in archive : QBBBS266.ZIP

(****************************************************************************)
(* Structures document for QuickBBS version 2.66 *)
(* Copyright 1990, Steve Gabrilowitz and Richard Creighton. *)
(* All Rights Reserved. *)
(****************************************************************************)

Type
FlagType = Array[1..4] of Byte;

UserRecord = Record
Name: String[35];
City: String[25];
Pwd: String[15];
DataPhone,
HomePhone: String[12];
LastTime: String[5];
LastDate: String[8];
Attrib: Byte;
Flags: FlagType;
Credit,
Pending,
TimesPosted,
HighMsgRead,
SecLvl,
Times,
Ups,
Downs,
UpK,
DownK,
TodayK,
Elapsed,
Len: Integer;
CombinedPtr: Word; (* Record number in COMBINED.BBS *)
Age: Byte; (* Not yet implemented *)
ExtraSpace: Array[1..5] of Byte;
End;

(* Attrib:

Bit 0: Deleted
Bit 1: Screen Clear Codes
Bit 2: More Prompt
Bit 3: ANSI
Bit 4: No-Kill
Bit 5: Ignore Download Hours
Bit 6: ANSI Full Screen Editor
Bit 7: [ Reserved ]

*)

{ Nodelist Records *************************************************** }

NodeIdxRecord = Record
Zone,
Net,
Node: Integer;
NodeType: Byte;
End;

NodelistRecord = Record
NodeType: Byte;
Zone,
Net,
Node: Integer;
Name: String[20];
City: String[40];
Phone: String[40];
Password: String[8];
Flags: Integer;
BaudRate: Integer;
Cost: Integer;
End;

{ Message Records ******************************************************}

CombSelectType = Array[1..200] of Boolean; (* for COMBINED.BBS *)

InfoRecord = Record
LowMsg: Integer; { Lowest Message in File }
HighMsg: Integer; { Highest Message in File }

TotalActive: Integer; { Total Active Messages }

ActiveMsgs: Array[1..200] of Integer;
End;

IdxRecord = Record
MsgNum: Integer;
Board: Byte;
End;

HdrRecord = Record
MsgNum,
ReplyTo,
SeeAlsoNum,
TRead: Integer;
StartRec: Word;
NumRecs,
DestNet,
DestNode,
OrigNet,
OrigNode: Integer;
DestZone,
OrigZone: Byte;
Cost: Integer;
MsgAttr,
NetAttr,
Board: Byte;
PostTime: String[5];
PostDate: String[8];
WhoTo,
WhoFrom: String[35];
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: [ Reserved ]

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: [ Reserved ]

*)

{ Other Stuff *********************************************************** }

SysInfoRecord = Record
CallCount: LongInt;
LastCaller: String[35];
ExtraSpace: Array[1..128] of Byte;
End;

TimeLogRecord = Record
StartDate: String[8];
BusyPerHour: Array[0..23] of Integer;
BusyPerDay: Array[0..6] of Integer;
End;

MenuRecord = Record
Typ: Byte;
Sec: Integer;
Flags: FlagType;
Str: String[75];
Key: Char;
Data: String[80];
Fg,
Bg: Byte;
End;

{ Configuration Information ********************************************** }

EventRecord = Record
Status: Byte; { 0=Deleted 1=Enabled 2=Disabled }
RunTime: String[5];
ErrorLevel: Byte;
Days: Byte;
Forced: Boolean;
LastTimeRun: String[8];
End;

BoardRecord = Record
Name: String[16];
Typ: Byte; { 0=Standard 1=Net 3=Echo }
Kinds: Byte; { 0=Both 1=Pvt 2=Pub 3=Read-Only }
Combined: Boolean;
Aliases: Boolean;

ReadSecLvl: Integer;
ReadFlags: FlagType;

WriteSecLvl: Integer;
WriteFlags: FlagType;

SysopSecLvl: Integer;
SysopFlags: FlagType;
End;

ConfigRecord = Record
(* Modem Parameters *)
CommPort: Integer;
InitBaud,
InitTimes,
AnswerWait: Integer;
ModemInitStr,
ModemBusyStr: String[70];
ModemInitResp,
ModemBusyResp,
Resp300,
Resp1200,
Resp2400: String[40];

(* System Paths *)
MenuPath,
TextPath,
NetPath: String[66];

(* Restriction Parameters *)
MinBaud,
GraphicsBaud,
XferBaud: Integer;
LowBaudStart,
LowBaudEnd,
DownloadStart,
DownloadEnd,
PagingStart,
PagingEnd: String[5];

(* Matrix Information *)
MatrixZone,
MatrixNet,
MatrixNode: Integer;
AkaNet,
AkaNode: Array[1..5] of Integer;
NetMailBoard: Integer;

(* Default Information for New Users *)
DefaultSec: Integer;
DefaultCredit: Integer;
DefaultFlags: FlagType;

(* Sysop Security Levels *)
EditorCmdStr: String[70];
OriginLine: String[60];
SysopName: String[35];
AutoLogonChar,
FastLogon,
ScreenBlanking,
UseLastRead,
MonoMode,
DirectWrite,
SnowCheck,
NetEchoExit,
OneWordNames,
CheckMail,
AskHomePhone,
AskDataPhone,
GraphicsAvail: Boolean;
InactiveTimeOut: Integer;
LogonTime: Integer;
DefFgColor: Integer;
DefBgColor: Integer;
PasswordTries: Integer;
MaxPageTimes: Integer;
PageBellLen: Integer;

Use_Xmodem: Boolean;
Use_Xmodem1k: Boolean;
Use_Ymodem: Boolean;
Use_YmodemG: Boolean;
Use_Sealink: Boolean; { Changed for 2.04 }
Use_Zmodem: Boolean; { " " }
Inp_Fields: Boolean; { " " }
QuoteStr: String[3];
UploadCredit: Integer;
LoadingMessage: String[70];
SelectionPrompt: String[70];

VersionID: Word;

{ Added for 2.04: }

Resp4800,
Resp9600: String[40];

AkaZone: Array[1..5] of Integer;

{ Added for 2.60: }

MatrixPoint: Integer;
AkaPoint: Array[1..5] of Integer;

UseAka: Array[1..200] of Byte;
AskAge: Boolean; (* Not yet Implemented *)
SystemName: String[40];
RegKey: Longint;

ExtraSpace: Array[1..5] of Byte;

EventRec: Array[1..30] of EventRecord;
BoardRec: Array[1..200] of BoardRecord;
End;

GosubDataType = Array[1..20] of String[8];

ExitRecord = Record
BaudRate: Integer;
SysInfo: SysInfoRecord;
TimeLogInfo: TimeLogRecord;
UserInfo: UserRecord;
EventInfo: EventRecord;
NetMailEntered: Boolean;
EchoMailEntered: Boolean;
LoginTime: String[5];
LoginDate: String[8];
TmLimit: Integer;
LoginSec: LongInt;
Credit: LongInt;
UserRecNum: Integer;
ReadThru: Integer;
PageTimes: Integer;
DownLimit: Integer;
WantChat: Boolean;
GosubLevel: Byte;
GosubData: GosubDataType;
Menu: String[8];
End;


  3 Responses to “Category : BBS Programs+Doors
Archive   : QBBBS266.ZIP
Filename : STRUCT.266

  1. Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!

  2. This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.

  3. But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/