From c853f6aafe9eaaf7fb9810e920479bdcd99abb33 Mon Sep 17 00:00:00 2001 From: mysticbbs Date: Wed, 4 Sep 2013 06:07:36 -0400 Subject: [PATCH] Changes for QWK net config --- mystic/bbs_cfg_main.pas | 4 +++- mystic/records.pas | 13 +++++++++++++ 2 files changed, 16 insertions(+), 1 deletion(-) diff --git a/mystic/bbs_cfg_main.pas b/mystic/bbs_cfg_main.pas index 19985d5..e4493a0 100644 --- a/mystic/bbs_cfg_main.pas +++ b/mystic/bbs_cfg_main.pas @@ -29,7 +29,8 @@ Uses bbs_cfg_UserEdit, bbs_cfg_EchoMail, bbs_cfg_MenuEdit, - bbs_cfg_Events; + bbs_cfg_Events, + bbs_Cfg_QwkNet; Procedure Configuration_ExecuteEditor (Mode: Char); Var @@ -196,6 +197,7 @@ Begin '3' : Configuration_OptionalFields; 'F' : Configuration_FileSettings; 'M' : Configuration_MessageSettings; + 'Q' : Configuration_QwkNetworks(True); 'O' : Configuration_QWKSettings; '1' : Configuration_NewUser1Settings; '2' : Configuration_NewUser2Settings; diff --git a/mystic/records.pas b/mystic/records.pas index 7672396..7f1e978 100644 --- a/mystic/records.pas +++ b/mystic/records.pas @@ -131,6 +131,19 @@ Type Res : Array[1..341] of Byte; End; + RecQwkNetwork = Record + Index : LongInt; + Description : String[30]; + MemberType : Byte; // 0=HUB,1=Node + PacketID : String[20]; + UseQWKE : Boolean; + UsePassive : Boolean; + HostName : String[60]; + Login : String[20]; + Password : String[20]; + Res : Array[1..80] of Byte; + End; + RecSauceInfo = Packed Record Title : String[35]; Author : String[20];