home *** CD-ROM | disk | FTP | other *** search
- ' $linesize:132
- ' $title: 'RBBSSUB4.BAS CPC17.3, Copyright 1986 - 90 by D. Thomas Mack'
- ' Copyright 1990 by D. Thomas Mack, all rights reserved.
- ' Name ...............: RBBSSUB4.BAS
- ' First Released .....: January 14, 1990
- ' Subsequent Releases.:
- ' Copyright ..........: 1986 - 1990
- ' Purpose.............: The Remote Bulletin Board System for the IBM PC,
- ' RBBS-PC.BAS utilizes a lot of common subroutines. Those that do not
- ' require error trapping are incorporated within RBBSSUB 2-5 as
- ' separately callable subroutines in order to free up as much
- ' code as possible within the 64K code segment used by RBBS-PC.BAS.
- ' Parameters..........: Most parameters are passed via a COMMON statement.
- '
- ' Subroutine Line Function of Subroutine
- ' Name Number
- ' AnyBut 59760 Determine where a "word" begins
- ' AskUsers 64003 Ask users questions based on a script and save answers
- ' AskMore 59858 Check whether screen full
- ' AutoPage 60300 Check whether to notify sysop caller is on
- ' BadFileChar 59800 Check file name for bad character
- ' Bracket 59960 Puts strings around a substring
- ' BufFile 58400 Write a file to the user quickly
- ' BufString 58300 Write a string with imbedded CR/LF to the user quickly
- ' CheckColor 59930 Highlighting based on search string
- ' SearchArray 58190 Check for the occurance of a string in an array
- ' ColorDir 59920 Adds colorization to FMS directory entry
- ' ColorPrompt 59940 Colorizes prompts
- ' CompDate 59880+ Produces a computational data from YY, MM, DD
- ' ConfMail 59854 Check conference mail waiting
- ' ConvertDir 58950 Checks for U & A (shorthand) and converts appropriately
- ' PackDate 59201 Compress date in string format to 2 characters
- ' EofComm 60000 Determine whether any chars in comm port buffer
- ' ExpireDate 59890 Calculate registration expiration date
- ' FakeXRpt 62650 Write out file transfer report for protocols that don't
- ' FindEnd 58770 Find where a "word" ends
- ' FindFile 58790 Determine whether a file exists without opening it
- ' FindLast 58600 Find last occurence of a string
- ' FMS 58200 Search the upload management system for entries
- ' GetAll 59780 Get list of all directories to display
- ' GetDirs 58895 Prompts for directories for file list/new/search cmds
- ' GetMsgAttr 62530 Restore attributes of original message
- ' GetYMD 59204 Pulls YY, MM, or DD from a 2 byte stored date
- ' GlobalSrchRepl 60100 Global search and replace
- ' LogPDown 59400 Records download in private directory
- ' MarkTime 60200 Give visual feedback during lengthy process
- ' MetaGSR 60130 Meta statement global search and replace
- ' MsgImport 59698 Allow local user to import a text file to a message
- ' Muzak 59100 Play musical themes for different RBBS functions
- ' NewPassword 60668 Get a new password
- ' PersFile 59300 View and select personal files for downloading
- ' Protocol 62600 Determine if external protocols are available
- ' PutMsgAttr 62520 Save attributes of original message
- ' Remove 58210 Remove characters from within strings
- ' RotorsDir 58700 Searches for a file using list of subdirs
- ' RptTime 62540 Report date/time and time on
- ' SetEcho 59600 Set RBBS properly for who is to echo
- ' SetHiLite 59934 Set user preference on highlighting
- ' SetGraphic 59980 Sets graphic preference for text file display
- ' SmartText 58250 Process SMART TEXT control strings
- ' SubMenu 59500 Processes options that have sub-menus
- ' TimedOut 63000 Write timed exit semaphore file
- ' TimeLock 60150 Check for TIME LOCK on certain features
- ' Transfer 62624 RBBS-PC support for external protocols for file transfer
- ' Toggle 57000 Toggles or views user options
- ' TwoByteDate 59200 Reduces a data to 2 byte string for space compression
- ' UnPackDate 59902 Uncompresses a 2 byte date
- ' UserColor 59965 Lets user set color for text and whether bold
- ' UserFace 59450 Processes programmable user interface
- ' ViewArc 64600 Display .ARC file contents to user
- ' PrivDoorRtn 62629 Private door exit routine
- ' WipeLine 58800 Wipes away a line so next prints in its place
- ' WordWrap 59710 Adjust a msg -- wrap lines and perserve paragraphs
- '
- ' $INCLUDE: 'RBBS-VAR.BAS'
- '
-