home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware 1 2 the Maxx
/
sw_1.zip
/
sw_1
/
BBS
/
SBBS_116.ZIP
/
STRUCT.116
< prev
next >
Wrap
Text File
|
1992-05-07
|
38KB
|
962 lines
Type
MsgToIdxRecord = String[35];
FlagType = Array[1..4] of Byte;
Msgtxtrecord = String[255];
Lastreadrecord = Array[1..200] of integer;
LineIdxRec = Record (* SUSERON.BBS *)
User: MsgToIdxRecord;
Attribute,
Status: Byte;
Baud: Word;
City: String[25];
Infobyte: byte;
ExtraSpace: Array[1..9] of byte;
End;
(* Attribute :
Bit 0 = Line in use
1 = Do not disturb mode
2 = waiting for call
Status (Not bit-mapped) :
Nr 0 = Doing nothing
1 = Downloading file(s)
2 = Uploading file(s)
3 = Reading messages
4 = Entering message (also onlinemsg)
5 = Chatting with SysOp
6 = Using external program, etc...
7 = Logging on
8 = using qwk system
9 = browsing filelist
10 = In node chat (conference number is in infobyte)
*)
NameIdxRec = Record (* NAMEIDX.BBS *)
NameCRC32: LongInt;
AliasCRC32: LongInt;
Attrib: Byte;
End;
BoxListRec = Record (* BBSLIST.BBS *)
BBSName: String[40];
Sysopname: MsgToIdxRecord;
Number: String[15];
Baud: Word;
OpenTimes: String[11];
Net: String[15];
BBSSoft: String[10];
Other: String[60];
ExtraSpace: Array[1..150] of byte;
End;
FLSearchRec = Record (* FLSEARCH.BBS *)
Name: String[60];
Directory: String[79];
Security: Integer;
Flags: Flagtype;
PFilesSec: Integer; { Not yet used }
PFlags: Flagtype; { Not yet used }
Attrib: Byte;
Age: Byte;
ListName: String[67]; (* If begins with *
character then the
rest of the string
shows the upload
path *)
ExtraSpace: Array[1..30] of Byte;
End;
(* Attrib:
Bit 0 : Exclude from template
Bit 1 : No downloads { Used in template system only }
Bit 2 : No uploads { Used in template system only }
Bit 3 : No virus check
Bit 4 : No dupe scan
Bit 5 : No new files check
Bit 6-7: Unused
*)
DoorRec = record
Name: String[35]; (* DOORCFG.BBS *)
CmdLine: String[127];
Security: Word;
Flags: Flagtype;
StartTime,
EndTime: String[5];
Active: Boolean;
ExtraSpace: Array[1..30] of Byte;
End;
CommentRecord = Record (* COMMENT.BBS *)
Txt : Array[1..2] of String[76];
FromName : MsgToIdxRecord;
FromCity : String[25];
PostTime : String[5];
PostDate : String[8];
End;
LastCallerRec = Record (* SCALLERS.BBS *)
Name: MsgToIdxRecord;
City: String[25];
Line,
Age: Byte;
Baud: Word;
LastDate: String[8];
LogOn,
LogOff: String[5];
End;
ExtraConfig = Record (* SCONFIG.BBS *)
SystemPath,
MsgBasePath,
TempPath: String[66];
RedirectDevice: String[12];
Resp19200,
Resp38400: String[40];
ShowSecurity: Boolean;
ShowPswdAtLogon: Boolean;
BetaCode: Longint;
Unused: Array[1..200] of boolean;
Empty1: Array[1..284] of byte;
AllowCat: Boolean;
Answerboard: Byte;
Use7bitChars: Boolean;
BufferSize: Word;
Empty2: Array[1..45] of byte;
EntryColor: Byte;
FilesBeforeRatio: Byte;
MinSpace: Word;
ClearTemp: Boolean;
Empty3: Array[1..163] of byte;
UseAliasSystem: Boolean;
Ansilogon: Byte; {0 = No,1 = Yes,2 = Auto detect}
ExcludeSysOp: Boolean;
Empty4: Array[1..122] of byte;
AltFkeys: Array[1..10] of string[60];
Checkfiles: Boolean;
PasswordBoard: Byte;
Alt_J_Swaptoems: Boolean;
MaxTimeInBank: Word;
NoBirthDayAsk: Boolean;
MaxDescLines: Byte;
Empty5: Array[1..45] of byte;
FastMailCheck: Boolean;
DefaultColors: Array[1..10] of byte;
Empty6: Array[1..45] of byte;
LinesInSystem: Byte;
CommonDir: String[79];
VersionNumber: Word;
FullScrChatBaud: Word;
PressEnterColor: Byte;
AreaSelectColor: Array[1..3] of byte;
StatusLineColor: Byte;
VirusChkMode: Byte;
WorkPath: String[79];
WatchCDatDos: Boolean;
UseCtrlX: Boolean;
MsgAfterPageBoard: Byte;
SearchAliases: Boolean;
EchoConvert: Boolean;
SwapAtPackers: Boolean;
InternalProtocols: Byte;
{ bit 0 : Zmodem
bit 1 : Ymodem batch
bit 2 : Xmodem
bit 3 : Xmodem 1K (Ymodem)
bit 4 : Xmodem 1K G
bit 5 : Ymodem-g }
FirstMenuInSystem: String[8];
ColoredQuoteText: Boolean;
AddUploadersName: Boolean;
DaysUntilExpiration: Word;
QWKBBSID: String[6];
QWKDefaultBoard: Byte;
QwkMaxNrToPack: Integer;
StatuslineStr: Array[1..2] of string[100];
Location: String[40];
UsPhoneNrFormat: Boolean;
DlCounterLBracket,
DlCounterRBracket: Char;
QWKAllowTagLines: Byte; {0=no, 1=yes, 2=only local areas}
LogonSecLvl: Word;
LogonAge: Byte;
LogonPassword: String[15];
NoGroupMailCheck,
NoUserListIntype27: Boolean;
GroupMsgSecLvl: Word;
AskSex: Boolean;
AskAnsi, {0=ask, 1=yes, 2=no}
AskMailCheck, {0=ask, 1=yes, 2=no}
AskNewFilesCheck, {0=ask, 1=yes, 2=no}
AskFullScrEditor, {0=ask, 1=yes, 2=no}
AskFullScrViewer, {0=ask, 1=yes, 2=no}
AskPagePause, {0=ask, 1=yes, 2=no}
AskScreenClears: Byte; {0=ask, 1=yes, 2=no}
PageStart: Array[0..6] of string[5];
PageEnd: Array[0..6] of string[5];
UseIEMSI: Boolean;
CapitalizeCity,
CapitalizeAlias: Boolean;
VirusScannerCmd: string[127];
NoExtractBeforeScan: Boolean;
VirusFoundErrorLvl: Byte;
SysOpsFscrChatClr,
UsersFscrChatClr: Byte;
ScanForDupePhones: Byte; {0 = no, 1 = log entry,
2 = don't allow}
NormalLongDesc: Boolean;
NodelistPath: String[72];
MinCrashMailSec: Word;
NoDorinfo1: Boolean;
NoTouch: Boolean;
ZoneMatching: Boolean;
strictdupecheck: Boolean;
noextendednodeinfo: Boolean;
Birthdayverify: Boolean;
realmsgnumbers: boolean;
LocalAttachPath: String[66];
NoLACheckAtLogon: Boolean;
AllowedPackers: Byte;
{Bit 0 : ZIP
Bit 1 : ARC
Bit 2 : LZH
Bit 3 : ARJ}
BoardsFileToCurDir: Boolean;
UnLockPwd: String[15];
Resp7200,
Resp12000,
Resp14400: String[40];
LineEditorQuote: Byte; {0=intelligent, 1=normal, 2=no}
SevenBitOnly: Boolean;
nofileflagging: boolean;
ReplyingToStr: String[80];
FreeFileTimeCheck: Byte; {0 = NO, 1 = YES, 2 = EVENT}
PageReasonToSubj: Boolean;
AgeGraphStartAge: Byte;
ETGCLocalAttrib,
ETGCRemoteAttrib: word; {Not yet used}
{BIT 0 : 320x200x16
BIT 1 : 640x200x16
BIT 2 : 640x350x16
BIT 3 : 640x480x16
BIT 4 : 320x200x256}
AskCombinedBoards: Boolean;
AskCombMailCheck: Byte; {0=ask, 1=yes, 2=no}
UseNewFilesCheckDate:Boolean;
BurnOutSecs: Word;
NoNamesInGroupMail: Boolean;
AutoChatCapture: Boolean;
AskDefProto: Boolean;
AskHotkeys: Byte; {0=ask, 1=yes, 2=no}
FreeAttaches: Boolean;
LogonFlags: Flagtype;
NoRemoteSysOp: Boolean;
FscrReaderColors: Array[1..12] of byte;
NewsDateCheck: Boolean;
NoNameIdx: Boolean;
AkaZone,
AkaNet,
AkaNode,
AkaPoint: Array[1..15] of integer;
MinorVersionNumber: Byte; {ie. 1 = Gamma-1, 2 = Gamma-2
100 = official}
Extraspace: Array[1..2709] of Byte;
End;
LanguageRecord = Record
VersionNr: Word;
Description: String[227]; (* ie. SF - Suomi Finland *)
InputFieldDateFormat: String[8];
DateFormat: String[9];
TimeFormat: String[8];
AnsiFilesPath: String[79];
MenuFilesPath: String[79];
(* Logon strings *)
AskAnsiLogon: String[50];
AskNameStr: String[40];
NameEnteredStr: String[40];
AskCorrectStr: String[60];
AskAliasStr: String[40];
AskUseAliasStr: String[60];
AskCityStr: String[50];
AskSexStr: String[60];
MaleChar,
FemaleChar: Char;
AskAnsiGraphicsStr,
AskMailCheckStr,
AskNewFileCheckStr,
AskEditorStr,
AskScreenLenStr,
AskBirthDayStr,
AskPagePausingStr,
AskScreenClearStr,
AskHomePhoneStr,
AskDataPhoneStr,
AskNewPswdStr,
AskCheckPswdStr,
AskIfCorrectStr,
AskPasswordAtlogon,
MailCheckStr,
MailCheckSorryStr,
AskReadMessagesStr: String[60];
AskPswdFailureMsgStr: String[60];
AskFullScrReaderStr: String[60];
ExtraSpace1: Array[1..183] of byte;
(* Messagebase strings *)
BoardInfoStr1,
BoardInfoStr2,
AskStartNumberStr,
AskPauseAfterEachStr,
AskAreYouSureStr,
EndofrepliesStr,
EndOfMessagesStr,
AskPrivateMsgStr,
AskUseAliasInMsgs,
MessageAbortedStr,
AskJumpNumberStr,
InvalidMsgNumberStr,
ChooseMsgAreaStr,
MessageToAllStr: String[60];
AskWhoToStr: String[40];
AskSubjectStr: String[9];
AskAliasInmsgs: String[40];
NameNotFoundStr: String[60];
NoWriteSecurityStr: String[60];
ShowNewAreasStr: String[60];
NoNewMessagesStr: String[60];
AskHowManyLatestStr: String[60];
ShowNewMsgsNewStr: String[20];
ShowNewMsgsToYouStr: String[20];
Received1Str,
Received2Str,
KillSentStr,
MsgPrivateStr,
MsgPublicStr,
FilesAttachedStr,
SentOKStr,
CrashMailStr,
ToFieldStr,
FromFieldStr,
SubjFieldStr,
DateFieldStr: String[20];
ExtraSpace2: Array[1..11] of byte;
(* Filearea strings *)
AskFileMaskStr,
AskBatchFilenamesStr,
AskFilenameStr: String[60];
AskKeySearchStr: String[40];
AskFnameSearchStr,
AskNewFileSearchStr,
AskNewFSearchDateStr,
ChooseFileAreaStr,
AskFilesToPackStr,
FileNotFoundStr,
AskFilesToDelStr: String[60];
AskFilesToUpldStr: String[60];
TransferInfoStr1: String[80];
TransferInfoStr2: String[70];
PleaseDescribeStr1: String[30];
(* Other Strings *)
MonthStr: Array [1..12] of String[10];
ShortWeekDay: Array [0..6] of String[10];
LongWeekDay: Array [0..6] of String[20];
PressEnterStr,
PressSorPStr,
PleaseWaitStr: String[60];
YesOrNoStr: String[6];
YesChar,
NoChar: Char;
ReasonForChatStr: String[17];
ChatStartStr1,
ChatStartStr2,
ChatEndStr,
DosShellStr1,
DosShellStr2,
UpdateStr1,
UpdateStr2,
FullPhoneNrMsg,
PswdNotChangedMsg,
AskCurrentPswdStr: String[60];
CurrentAliasStr: String[40];
CombinedStr1,
CombinedStr2: String[60];
AskUserSearchStr,
AskAliasSearchStr: String[60];
MoreStr: String[40];
MoreYesChar,
MoreNoChar: Char;
InactivityStr,
InactivityWarningStr,
TimeLeftWarningStr,
TimeLimitExceededStr,
AliasInUseStr,
InvalidScrLenStr,
ShortPswdStr,
PswdCheckFailedStr,
PswdChangedStr,
WrongStr: String[60];
YesStr,
NoStr: String[10];
AskEnterMsgToSysOpStr: String[60];
NoDwnldsFromAreaStr,
NoUpldsToAreaStr: String[60];
AskLineNumberStr: String[60];
FullScrChatHelpStr: String[80];
PleaseDescribeStr2: String[30];
PleaseDescribeStr3: String[70];
PleaseDescribeStr4: String[60];
DescTooShortStr: String[60];
FileExistsStr: String[60];
FileContainsVirusStr: String[60];
FileNotReceivedStr: String[60];
MinutesInBankStr,
TimeLeftStr: String[60];
DepositAskStr: String[60];
WithDrawAskStr: String[60];
YouCanDepositStr: String[60];
FileNotWantedStr: String[60];
FilesRcvdStr: String[60];
FilesSentStr: String[60];
NoFilesFoundStr: String[60];
NotEnoughTimeStr: String[60];
AskPwdForFileStr1: String[70];
AskPwdForFileStr2: String[70];
AskMsgAfterPageStr: String[60];
CommentToNextUserStr: String[60];
AskSaveCommentStr: String[60];
SelectFileAreaStr1: String[60];
SelectFileAreaStr2: String[60];
AskVirusChkFileStr: String[60];
OnStr,
OffStr: String[20];
ScreenClearStr,
MoreStatStr,
AnsiStr,
AnsiEditorStr,
MailCheckStatStr,
NewFilesCheckStatStr,
DisturbmodeStr,
FullScrViewerStr: String[60];
AvailableStr,
UnavailableStr: String[20];
CurrentTimeStr,
CurrentDateStr,
ConnectTimeStr,
TimeUsedStr,
TimeRemainingStr,
CallLimitStr: String[45];
AliasListTopStr: String[78];
MsgReaderHeaderStr: String[60];
FilesFieldStr: String[20];
MsgNextReplyStr,
MsgPrevReplyStr,
MsgQuitRepliesStr,
MsgAgainStr,
MsgNextStr,
MsgBackStr,
MsgJumpStr,
MsgReplyStr,
MsgWriteStr,
MsgDeleteStr,
MsgKeepStr,
MsgCopyStr,
MsgXportStr,
MsgEditStr,
MsgTogglePrivateStr,
MsgUpdateUserStr,
MsgStopStr: String[25];
UsageGraphInfoStr: String[60];
BBSListNameStr,
BBSListPhoneStr,
BBSListMaxBPSStr,
BBSListOpenTimesStr,
BBSListSoftwareStr,
BBSListNetaddrStr,
BBSListSysopStr,
BBSListOtherStr: String[15];
AskBBSToDeleteStr: String[35];
FileOfflineStr: String[18];
Status0Str,
Status1Str,
Status2Str,
Status3Str,
Status4Str,
Status5Str,
Status6Str,
Status7Str: String[36];
{ 0 : 'Doing nothing special'
1 : 'Downloading file(s)'
2 : 'Uploading file(s'
3 : 'Reading messages'
4 : 'Writing message'
5 : 'Chatting with SysOp'
6 : 'Using external program'
7 : 'Logging on'
}
TimeinBankStr: String[45];
OptionNotAvailableStr,
ChooseDoorStr,
TooYoungStr,
QwkRepNotFound,
QwkAskQwkFormat,
QwkLimitReached,
QwkMessagesExported,
QwkPackingMessages,
QwkNoNewMessages,
QwkMessageMoved,
QwkDoYouWantToUpld,
QwkMaxNrToPackQ,
ScanningForDupePhoneStr: String[60];
CallOrEventStr,
downstr: String[36];
NoReadAccess,
NoNewMessagesinArea,
JumpingToArea: String[60];
MsgJumpToNextArea: String[25];
QWKUpdPointers: String[60];
QwkChoosePacker: String[60];
Status8Str: String[36];
{ 8 : 'Using QWK system' }
ChooseMsgAreaStr2: String[60];
AgeGraphTopStr: String[60];
QwkPackerSelected: String[60];
MoreContinuousChar: Char;
NoRepliesToAreaStr: String[60];
MoreStr2: String[60];
MoreFlagChar: Char;
FilesTaggedStr: String[60];
TagDlLimitExceededStr: String[60];
WildCardsNotValidStr: String[60];
AskFileToFlagStr: String[60];
AskCombinedMailCheckStr: String[60];
CombMailCheckStatusStr: String[60];
HotKeysStatusStr: String[60];
AskHotKeysStr: String[60];
DownloadFlaggedStr: String[60];
RemoveFlaggedStr: String[60];
MoreViewArchiveChar: Char;
Status9Str: String[36];
Status10Str: String[36];
{ 9 : 'Browsing filelist'
10 : 'In nodehcat' }
End;
Limitsrecord = Record (* LIMITS.BBS *)
Security: Word;
Downlimit: Array [1..7] of word;
Timelimit: Word;
Ratiok: Word;
Ratio: Word;
Callsperday: Byte;
Description: String[35];
ExtraSpace: Array [1..14] of byte;
End;
ExtraUserRec=Record (* SUSERS.BBS *)
Name: MsgToIdxRecord;
Birthday: String[8];
Attrib: Word;
Flags: Array[1..4] of Byte; { Not yet used }
Firsttime: String[5];
FirstDate: String[8];
CombinedBoards: Array[1..25] of Byte;
SysOpComment: String[79];
DefaultProto: Char;
UserRecPtr: Integer;
Colors: Array[1..10] of byte;
FileListType: Byte; { Not yet used }
Alias: MsgToIdxRecord;
MinutesUsed: Longint;
ViewFileName: String[12]; { SeeAlso attrib bits 4 - 6 }
MenuToRun: String[8];
Timeinbank: Word;
TodayCalls: Byte;
LanguageFileN: String[8]; { *.LNG }
Expirationdate: String[8];
CurrentFArea,
CurrentMArea,
CurrentDoor: Byte;
DefaultPacker: Byte;
{not bit mapped !
1 = ZIP
2 = ARC
3 = LZH
4 = ARJ}
LastNewFilesCheck: String[8];
ExtraSpace: Array[1..403] of Byte;
End;
(* Attrib:
1 Bit 0: MailCheck at logon
2 Bit 1: Newfiles Check at logon
4 Bit 2: No downloadratio
8 Bit 3: Female
16 Bit 4: Delete file after viewing
32 Bit 5: Display file only once
64 Bit 6: File viewed
128 Bit 7: Fullscreen viewer
256 Bit 8: Combined mail check
512 Bit 9: No hotkeys
Bit 10:
Bit 11:
Bit 12:
Bit 13:
Bit 14:
Bit 15:
*)
UserRecord = Record (* USERS.BBS *)
Name: MsgToIdxRecord;
City: String[25];
Password: String[15];
DataPhone,
HomePhone: String[12];
LastTime: String[5];
LastDate: String[8];
Attrib: Byte;
Flags: FlagType;
Credit,
Pending: Integer;
MsgsPosted,
HighMsgRead,
SecLvl,
Times,
Ups,
Downs,
UpK,
DownK: Word;
TodayK: Integer;
Elapsed: Integer;
Len: Integer;
ExtraSpace1: Array[1..2] of byte;
Age: Byte;
ExtraUserrecPtr: Integer;
ExtraSpace2: Array[1..3] of Byte;
End;
(* Attrib:
bit 0: Deleted user
bit 1: Screen clear codes
bit 2: More prompt
bit 3: ANSI graphics
bit 4: No-Kill
bit 5: Ignore Download Hours
bit 6: ANSI editor
bit 7: Do not disturb mode ON
*)
InfoRecord = Record (* MSGINFO.BBS *)
LowMsg: Integer;
HighMsg: Integer;
TotalActive: Integer;
ActiveMsgs: Array[1..200] of Integer;
End;
IdxRecord = Record (* MSGIDX.BBS *)
MsgNum: Integer;
Board: Byte;
End;
HdrRecord = Record (* MSGHDR.BBS *)
MsgNum,
ReplyTo,
SeeAlsoNum,
TimesRead: Integer; { Not used }
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: MsgToIdxRecord;
Subj: String[72];
End;
(* Msg Attributes:
Bit 0: Deleted
Bit 1: Unsent net mail message
Bit 2: Net mail message
Bit 3: Private message
Bit 4: Received
Bit 5: Unsent echomail message
Bit 6: Local message
Bit 7: Not used
Net Attributes:
Bit 0: Kill after sent
Bit 1: Sent OK
Bit 2: File attach
Bit 3: Crash mail
Bit 4: Request Receipt
Bit 5: Audit Request
Bit 6: Is a Return Receipt
Bit 7: Not used
*)
SysInfoRecord = Record (* SYSINFO.BBS *)
CallCount: LongInt;
LastCaller: MsgToIdxRecord;
ExtraSpace: Array[1..128] of Byte;
End;
TimeLogRecord = Record (* TIMELOG.BBS *)
StartDate: String[8];
BusyPerHour: Array[0..23] of Integer;
BusyPerDay: Array[0..6] of Integer;
End;
MenuRecord = Record (* ????????.MNU *)
Typ: Byte;
Sec: Integer;
Flags: FlagType;
Str: String[75];
Key: Char;
Data: String[80];
Fg,
Bg: Byte;
End;
EventRecord = Record
Status: Byte; { 0=Disabled 1=Enabled }
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=Private & Public
1=Private 2=Public 3=Read-Only }
Combined: Boolean;
Aliases: Byte; {0=no aliases,1=yes,2=ask alias,3=Alias/name}
ReadSecLvl: Integer;
ReadFlags: FlagType;
WriteSecLvl: Integer;
WriteFlags: FlagType;
SysopSecLvl: Integer;
SysopFlags: FlagType;
End;
ConfigRecord = Record (* CONFIG.BBS *)
CommPort: Integer;
InitBaud,
InitTimes,
AnswerWait: Word;
ModemInitStr,
ModemBusyStr: String[70];
ModemInitResp,
ModemBusyResp,
Resp300,
Resp1200,
Resp2400: String[40];
MenuPath,
TextPath,
NetPath: String[66];
MinBaud,
GraphicsBaud,
XferBaud: Integer;
LowBaudStart,
LowBaudEnd,
DownloadStart,
DownloadEnd,
PagingStart, {!! Not used anymore !!}
PagingEnd: String[5]; {!! Not used anymore !!}
MatrixZone,
MatrixNet,
MatrixNode: Integer;
OldAkaNet,
OldAkaNode: Array[1..5] of Integer; {not used}
NetMailBoard: Integer;
DefaultSec: Integer;
DefaultCredit: Integer;
DefaultFlags: FlagType;
EditorCmdStr: String[70];
OriginLine: String[60];
SysopName: MsgToIdxRecord;
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;
Use_Zmodem: Boolean;
Inp_Fields: Boolean;
QuoteStr: String[3];
UploadCredit: Integer;
LoadingMessage: String[70];
SelectionPrompt: String[70];
VersionID: Word;
Resp4800,
Resp9600: String[40];
OldAkaZone: Array[1..5] of Integer; {not used}
MatrixPoint: Integer;
OldAkaPoint: Array[1..5] of Integer; {not used}
UseAka: Array[1..200] of Byte;
AskAge: Boolean; { Not used }
SystemName: String[40];
RegKey: Longint;
EntryfieldColor: Byte;
MenuBorderColor: Byte;
SysOpSeclvl: Integer;
AllowDelMsgs: Boolean;
EventRec: Array[1..30] of EventRecord;
UnusedBoards: Array[1..200] of BoardRecord;
End;
GosubDataType = Array[1..20] of String[8];
ExitRecord = Record (* EXITINFO.BBS *)
BaudRate: Word;
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;
ProtocolRecord = Record (* SPROTO.BBS *)
Name : String[15];
Key : Char;
LogFileType : Byte; { 0=OTHER,1=ICOM,2=DSZ}
ProtocolType : Byte; { 0=other,1=opus,2=BIMODEM}
MaxFiles,
Effic,
Attribute : Byte;
{ Bit 0: Actived
Bit 1: Batch
Bit 2: FullDuplex (Check for uploads)
}
DnCmdString,
UpCmdString : String[127];
LogFileName,
CtlFileName : String[66];
UpLogKeyword,
DnLogKeyword : String[20];
NameWordNr : Byte;
DnCtlString,
UpCtlString : String[60];
ExtraSpace : Array[1..64] of byte;
end;
MsgBoardRecord = Record (* BOARDS.BBS *)
Name: String[30];
QwkName: String[12];
Typ: Byte; { 0=Standard 1=Net 3=Echo }
Kinds: Byte; { 0=Private & Public
1=Private 2=Public 3=Read-Only}
Aliases: Byte; {0=no aliases,1=yes,2=ask alias,
3=Alias/name}
ReadSecLvl: Integer;
ReadFlags: FlagType;
WriteSecLvl: Integer;
WriteFlags: FlagType;
SysopSecLvl: Integer;
SysopFlags: FlagType;
Group: Char;
Replystatus: byte; {0 = normal, 1 = net/normal
2 = net only, 3 = no replies}
Age: Byte;
Attrib: Word;
End;
(*
Attributes :
bit 0 : Combined
bit 1 : Default combined
bit 2 : Allow message deleting
bit 3 : Allow taglines
bit 4 : Use in template system
bit 5 : Convert 8bit -> 7bit
bit 6 : forced ON in the mail check
*)