home *** CD-ROM | disk | FTP | other *** search
/ Hall of Fame / HallofFameCDROM.cdr / rbbs / 173a-bas.lzh / CNFG-VAR.BAS < prev    next >
BASIC Source File  |  1990-08-26  |  13KB  |  397 lines
  1. ' $SUBTITLE: 'Arrays passed between parts of CONFIG.BAS 17.3'
  2. ' $PAGE
  3.    DEFINT A-Z
  4. '
  5. ' The following arrays are passed between the various subroutines
  6. ' within RBBS-PC's configuration program, CONFIG.
  7. '
  8.     DIM A$(12)
  9.     DIM FILES.FUNCTION(8)            ' Files menu security
  10.     DIM FILES.FUNCTION$(8,2)         ' Base-line file system commands
  11.     DIM GLOBAL.FUNCTION(4)           ' Global commands security
  12.     DIM GLOBAL.FUNCTION$(4,2)        ' Global commands
  13.     DIM HELP$(9)                     ' Help file names
  14.     DIM MAIN.FUNCTION(18)            ' Main menu security
  15.     DIM MAIN.FUNCTION$(18,2)         ' Base-line message system commands
  16.     DIM MENU$(7)                     ' Menu file names
  17.     DIM SYSOP.FUNCTION(7)            ' Sysop menu security
  18.     DIM SYSOP.FUNCTION$(7,2)         ' Base-line SYSOP commands
  19.     DIM DNLD$(99)                    ' Download Sub-Dirs
  20.     DIM UTILITY.FUNCTION(12)         ' Utility menu security
  21.     DIM UTILITY.FUNCTION$(12,2)      ' Base-line utility system commands
  22.     DIM LIBRARY.FUNCTION(7)          ' Library menu security
  23.     DIM LIBRARY.FUNCTION$(7,2)       ' Base-line Library system commands
  24. ' $SUBTITLE: 'Variables passed between various components of CONFIG.BAS'
  25. ' $PAGE
  26. '
  27. ' The following variables are passed between the various and
  28. ' seperately compiled subroutines used by CONFIG.BAS.
  29. '
  30.    COMMON SHARED _
  31.           A$(), _
  32.           ACT.MNTHS.B4.DELETING, _
  33.           ACTIVE.BULLETINS, _
  34.           ADD.DIR.SECURITY, _
  35.           ALLOW.CALLER.TURBO, _
  36.           ALTDIR.EXTENSION$, _
  37.           ALWAYS.STREW.TO$, _
  38.           ANS.MENU$, _
  39.           ASK.EXTENDED.DESC, _
  40.           ASK.IDENTITY, _
  41.           AUTO.ADD.SECURITY, _
  42.           AUTO.ADD.SECURITY$, _
  43.           AUTO.UPGRADE.SEC, _
  44.           AUTODOWNLOAD$, _
  45.           AUTOPAGE.DEF$, _
  46.           BAUDOT, _
  47.           BAUDOT$, _
  48.           BG, _
  49.           BORDER, _
  50.           BUFFER.SIZE, _
  51.           BULLETIN.MENU$, _
  52.           BULLETIN.PREFIX$, _
  53.           BULLETINS.OPTIONAL, _
  54.           BYPASS, _
  55.           BYPASS.MSGS, _
  56.           BYPASS.SECURITY, _
  57.           BYPASS$, _
  58.           C$, _
  59.           CALLBACK.VERIFICATION, _
  60.           CALLBACK.VERIFICATION$, _
  61.           CALLER.BKGRD, _
  62.           CALLERS.FILE$, _
  63.           COM.PORT$, _
  64.           COMMANDS.BETWEEN.RINGS, _
  65.           COMMANDS.IN.PROMPT, _
  66.           COMMENTS.AS.MESSAGES, _
  67.           COMMENTS.FILE$, _
  68.           COMPRESSED.EXT$, _
  69.           COMPUTER.TYPE, _
  70.           COMPUTER.TYPE$, _
  71.           CONFERENCE.MENU$, _
  72.           CONFERENCE.MODE, _
  73.           CONFERENCE.VIEWER.SEC.LVL, _
  74.           CONFMAIL.LIST$, _
  75.           CONFIG.FILENAME$, _
  76.           CONFIG.VERSION$, _
  77.           D$, _
  78.           DD$, _
  79.           DAYS.IN.SUBSCRIPTION.PERIOD, _
  80.           DAYS.TO.WARN, _
  81.           DEFAULT.CATEGORY.CODE$, _
  82.           DEFAULT.ECHOER$, _
  83.           DEFAULT.EXTENSION$, _
  84.           DEFAULT.LINE.ACK$, _
  85.           DEFAULT.SECURITY.LEVEL, _
  86.           DIR.CATEGORY.FILE$,_
  87.           DIRECTORY.EXTENTION$, _
  88.           DIRECTORY.PATH$, _
  89.           DIRECTORY.PREFIX$, _
  90.           DISK.FOR.DOS$, _
  91.           DISKFULL.GO.OFFLINE, _
  92.           DNLD.SUB, _
  93.           DOORS.AVAILABLE, _
  94.           DOORS.DEF$, _
  95.           DOORS.TERMINAL.TYPE, _
  96.           DOS.VERSION, _
  97.           DOSANSI, _
  98.           DOWNLOAD.DRIVES$, _
  99.           DOWNLOAD.TO.SUBDIR, _
  100.           DR.1.DEF$, _
  101.           DR.2.DEF$, _
  102.           DR.3.DEF$, _
  103.           DR.4.DEF$, _
  104.           DR.5.DEF$, _
  105.           DRIVE.FOR.BULLETINS$, _
  106.           DRIVES.FOR.DOWNLOADS$, _
  107.           DRIVE.FOR.HELP.FILES$, _
  108.           DRIVE.FOR.UPLOADS$, _
  109.           DTR.DROP.DELAY, _
  110.           DUMB.MODEM, _
  111.           EMPHASIZE.OFF.DEF$, _
  112.           EMPHASIZE.ON.DEF$, _
  113.           END.OFFICE.HOURS, _
  114.           ENFORCE.UPLOAD.DOWNLOAD.RATIOS, _
  115.           EPILOG$, _
  116.           ESCAPE.INSECURE, _
  117.           EXPERT.USER, _
  118.           EXPERT.USER$, _
  119.           EXPIRED.SECURITY, _
  120.           EXTENDED.LOGGING, _
  121.           EXTENSION.LIST$, _
  122.           F7.MESSAGE$, _
  123.           FALSE, _
  124.           FAST.FILE.LIST$, _
  125.           FAST.FILE.LOCATOR$, _
  126.           FC, _
  127.           FG, _
  128.           FG.1.DEF$, _
  129.           FG.2.DEF$, _
  130.           FG.3.DEF$, _
  131.           FG.4.DEF$, _
  132.           FILE$, _
  133.           FILE.OF.CATEGORIES$, _
  134.           FILES.FUNCTION(), _
  135.           FILES.FUNCTION$(), _
  136.           FILE.NOTIFY, _
  137.           FILE.NOTIFY$, _
  138.           FILE.COMMANDS$, _
  139.           FILE.COMMANDS.DEFAULTS$, _
  140.           FILESEC.FILE$, _
  141.           FIRST.NAME.PROMPT$, _
  142.           FMS.DIRECTORY$ , _
  143.           FOSSIL, _
  144.           FREESPACE.UPLOAD.FILE$
  145. COMMON SHARED _
  146.           GB, _
  147.           GLOBAL.COMMANDS$, _
  148.           GLOBAL.COMMANDS.DEFAULTS$, _
  149.           GLOBAL.FUNCTION(), _
  150.           GLOBAL.FUNCTION$(), _
  151.           HALT.ON.ERROR$, _
  152.           HASH.ID$, _
  153.           HELP$(),_
  154.           HELP.EXTENSION$, _
  155.           HELP.FILE.PREFIX$, _
  156.           HELP.PATH$, _
  157.           HIDDEN, _
  158.           HJ$, _
  159.           HOST.ECHO.OFF$, _
  160.           HOST.ECHO.ON$, _
  161.           IB, _
  162.           ILOOKUP, _
  163.           INCLUDE.EXTENTION, _
  164.           INCLUDE.EXTENTION$, _
  165.           INDIV.ID$, _
  166.           IPAGE, _
  167.           IX, _
  168.           KEEP.INIT.BAUD, _
  169.           KEEP.TIME.CREDITS, _
  170.           KSTACKED$, _
  171.           LAST.NAME.PROMPT$, _
  172.           LEN.HASH, _
  173.           LEN.INDIV, _
  174.           LIBRARY.ARCHIVE.PATH$, _
  175.           LIBRARY.ARCHIVE.PROGRAM$, _
  176.           LIBRARY.COMMANDS$, _
  177.           LIBRARY.COMMANDS.DEFAULTS$, _
  178.           LIBRARY.DIRECTORY.PATH$, _
  179.           LIBRARY.DIRECTORY.EXTENTION$, _
  180.           LIBRARY.DRIVE$, _
  181.           LIBRARY.FUNCTION(), _
  182.           LIBRARY.FUNCTION$(), _
  183.           LIBRARY.MAX.DISK, _
  184.           LIBRARY.MAX.DIRECTORY, _
  185.           LIBRARY.MAX.SUBDIR, _
  186.           LIBRARY.SUBDIR.PREFIX$, _
  187.           LIBRARY.WORK.DISK.PATH$, _
  188.           LIMIT.DAILY.TIME, _
  189.           LIMIT.SEARCH.TO.FMS, _
  190.           LOGON.MAIL.LEVEL$
  191. COMMON SHARED _
  192.           M$, _
  193.           M11$, _
  194.           M22$, _
  195.           M23$, _
  196.           M24$, _
  197.           M25$, _
  198.           M26$, _
  199.           MACRO.DRVPATH$, _
  200.           MACRO.EXTENSION$, _
  201.           MAIN.FUNCTION(), _
  202.           MAIN.FUNCTION$(), _
  203.           MAIN.COMMANDS$, _
  204.           MAIN.COMMANDS.DEFAULTS$, _
  205.           MAIN.MESSAGE.BACKUP$, _
  206.           MAIN.MESSAGE.FILE$, _
  207.           MAIN.PUI$, _
  208.           MAIN.USER.FILE$, _
  209.           MAINMSG$, _                                                ' KG062302
  210.           MASTER.DIRECTORY.NAME$, _
  211.           MAX.ALLOWED.MSGS.FRM.DEF, _
  212.           MAX.CARRIER.WAIT, _
  213.           MAX.DESC.LEN, _
  214.           MAX.EXTENDED.LINES, _
  215.           MAX.MESSAGE.LINES, _
  216.           MAX.MSG.FILE.SIZE.FRM.DEF!, _
  217.           MAX.PER.DAY, _
  218.           MAX.REG.SEC, _
  219.           MAX.USR.FILE.SIZE.FRM.DEF, _
  220.           MAX.WORK.VAR, _
  221.           MAXD, _
  222.           MAXIMUM.DISPLAYABLE.PAGES, _
  223.           MAXIMUM.NUMBER.OF.NODES, _
  224.           MAXIMUM.PASSWORD.CHANGES, _
  225.           MAXIMUM.VIOLATIONS, _
  226.           MENU$(), _
  227.           MENUS.CAN.PAUSE, _
  228.           MESSAGE.REMINDER, _
  229.           MESSAGES.CAN.GROW, _
  230.           MIN.NEWCALLER.BAUD, _
  231.           MIN.OLDCALLER.BAUD, _
  232.           MIN.SEC.TO.VIEW, _
  233.           MINIMUM.LOGON.SECURITY, _
  234.           MINIMUM.SECURITY.FOR.TEMP.PASSWORD, _
  235.           MINUTES.PER.SESSION!, _
  236.           MLCOM, _
  237.           MM, _
  238.           MN1$, _
  239.           MN2$, _
  240.           MNP.SUPPORT, _
  241.           MO$, _
  242.           MODEM.ANSWER.COMMAND$, _
  243.           MODEM.COMMAND.DELAY.TIME, _
  244.           MODEM.COUNT.RINGS.COMMAND$, _
  245.           MODEM.GO.OFFHOOK.COMMAND$, _
  246.           MODEM.INIT.BAUD$, _
  247.           MODEM.INIT.COMMAND$, _
  248.           MODEM.INIT.WAIT.TIME, _
  249.           MODEM.RESET.COMMAND$, _
  250.           MUSIC, _
  251.           NET.MAIL$, _
  252.           NETWORK.TYPE, _
  253.           NETWORK.TYPE$, _
  254.           NEW.FILES.CHECK, _                                         ' nc030101
  255.           NEW.USER.DEFAULT.MODE$, _                                  ' nc030101
  256.           NEW.USER.GRAPHICS$, _                                      ' nc022101
  257.           NEW.USER.MARGINS, _                                        ' nc022101
  258.           NEW.USER.PREFERENCES, _
  259.           NEW.USER.PREFERENCES$, _
  260.           NEW.USER.QUESTIONNAIRE$, _
  261.           NEWUSER.FILE$, _
  262.           NEWUSER.PROMPT$, _
  263.           NEWUSER.SETS.DEFAULTS, _
  264.           NODE.ID$, _
  265.           NONE.PICKED$, _
  266.           NOT.YET.IN$, _
  267.           NUM.FILES, _
  268.           NUM.GLOBAL, _
  269.           NUM.LIBRARY, _
  270.           NUM.MAIN, _
  271.           NUM.SYSOP, _
  272.           NUM.UTILITY, _
  273.           OKAY, _
  274.           OMIT.MAIN.DIRECTORY$, _
  275.           OPTION$, _
  276.           OVERWRITE.SECURITY.LEVEL, _
  277.           PAGE.LENGTH, _
  278.           PAGING.PRINTER.SUPPORT$, _
  279.           PASSWORD.FILE$, _
  280.           PCJR, _
  281.           PERSONAL.BEGIN, _
  282.           PERSONAL.CONCAT, _
  283.           PERSONAL.DIR$, _
  284.           PERSONAL.DRVPATH$, _
  285.           PERSONAL.LEN, _
  286.           PERSONAL.PROTOCOL$, _
  287.           PRELOG$, _
  288.           PRIVATE.READ.SEC, _
  289.           PROMPT.BELL, _
  290.           PROMPT.BELL$, _
  291.           PROMPT.HASH$, _
  292.           PROMPT.INDIV$, _
  293.           PROTO.DEF$, _
  294.           PS, _
  295.           PUBLIC.READ.SEC, _
  296.           QUES.PATH$
  297. COMMON SHARED _
  298.           RBBS.BAT$, _
  299.           RBBS.NAME$, _
  300.           RCTTY.BAT$, _
  301.           RECYCLE.TO.DOS, _
  302.           RECYCLE.TO.DOS$, _
  303.           RECYCLE.WAIT, _
  304.           REDIRECT.IO.METHOD, _
  305.           REGISTRATION.PROGRAM$, _
  306.           REMEMBER.NEW.USERS, _
  307.           REMIND.FILE.TRANSFERS, _
  308.           REMIND.PROFILE, _
  309.           REQUIRE.NON.ASCII, _
  310.           REQUIRED.QUESTIONNAIRE$, _
  311.           REQUIRED.RINGS, _
  312.           RESTRICT.BAUD, _
  313.           RESTRICT.BAUD$, _
  314.           RESTRICT.BY.DATE, _
  315.           RESTRICT.VALID.CMDS, _
  316.           RTS$, _
  317.           SCREEN.OUT.MSG$, _
  318.           SEC.CHANGE.MSG, _
  319.           SEC.KILL.ANY, _
  320.           SEC.LVL.EXEMPT.FRM.PURGING, _
  321.           SECVIO.HLP$, _
  322.           SECURITY.EXEMPT.FROM.EPILOG, _
  323.           SF, _
  324.           SHOOT.YOURSELF, _
  325.           SHOW.SECTION, _
  326.           SIZE.OF.STACK, _
  327.           SL.CATEGORIZE.UPLOADS, _
  328.           SMART.TEXT, _
  329.           START.HASH, _
  330.           START.INDIV, _
  331.           START.OFFICE.HOURS, _
  332.           SUBROUTINE.PARAMETER, _
  333.           SURVIVE.NOUSER.ROOM, _
  334.           SWITCH.BACK, _
  335.           SYSOP.COMMANDS$, _
  336.           SYSOP.COMMANDS.DEFAULTS$, _
  337.           SYSOP.FIRST.NAME$, _
  338.           SYSOP.FUNCTION(), _
  339.           SYSOP.FUNCTION$(), _
  340.           SYSOP.LAST.NAME$, _
  341.           SYSOP.MENU.SECURITY.LEVEL, _
  342.           SYSOP.PASSWORD.1$, _
  343.           SYSOP.PASSWORD.2$, _
  344.           SYSOP.SECURITY.LEVEL, _
  345.           TB$, _
  346.           TIME.LOCK, _
  347.           TIME.TO.DROP.TO.DOS, _
  348.           TRASHCAN.FILE$, _
  349.           TRUE, _
  350.           TURBO.RBBS, _
  351.           TURN.PRINTER.OFF, _
  352.           UE, _
  353.           UNIQUE.USER.FIND$, _
  354.           UNIQUE.USER.ID$, _
  355.           UPCAT.HELP$, _
  356.           UPLOAD.DIRECTORY$, _
  357.           UPLOAD.PATH$, _
  358.           UPLOAD.SUBDIR$, _
  359.           UPLOAD.TIME.FACTOR!, _
  360.           UPLOAD.TO.SUBDIR, _
  361.           USE.BASIC.WRITES, _
  362.           USE.DEVICE.DRIVER, _
  363.           USE.DIR.ORDER, _
  364.           USER.FIRMWARE.CLEAR.CMND$, _
  365.           USER.INIT.COMMAND$, _
  366.           USER.ANSWER.COMMAND$, _                                    ' KG080901
  367.           USER.COUNT.RINGS.COMMAND$, _                               ' KG080901
  368.           USER.GO.OFFHOOK.COMMAND$, _                                ' KG080901
  369.           USER.INITIALIZE.COMMAND$, _
  370.           USER.FIRMWARE.WRITE.CMND$, _
  371.           USER.LOCATION$ , _
  372.           USER.RESET.COMMAND$, _                                     ' KG080901
  373.           UTIL.COMMANDS$, _
  374.           UTIL.COMMANDS.DEFAULTS$, _
  375.           UTILITY.FUNCTION(), _
  376.           UTILITY.FUNCTION$(), _
  377.           VOICE.TYPE, _
  378.           VOICE.TYPE$, _
  379.           WAIT.BEFORE.DISCONNECT, _
  380.           WELCOME.FILE$, _
  381.           WELCOME.INTERRUPTABLE, _
  382.           WILL.SUBDIRS.B.USED, _
  383.           WRAP.CALLERS.FILE, _
  384.           WRAP.CALLERS.FILE$, _
  385.           WRITE.BUF.DEF, _
  386.           XON.XOFF, _                                                ' nc022101
  387.           ZConfName$, _                                              ' KG062302
  388.           ZDistriHelp$, _                                            ' nc022101
  389.           ZDistriPath$, _                                            ' nc022101
  390.           ZEnableCC, _                                               ' nc030101
  391.           ZMinSecPersUpld                                            ' nc030101
  392. ' *****************************************************************
  393. ' *       Functions common to modules
  394. ' *****************************************************************
  395.          DEF FNYESNO$(TORF) = MID$("NOYES",1-2*TORF,2-TORF)
  396.          DEF FNYESNO(STRNG$) = (LEFT$(STRNG$,1) = "Y")
  397.