Listing of file='SDINFO.BAS;01' on disk='vmedia/ncc_4_11-sector.ccvf'
100 REM ** INSTRUCTIONS PROGRAM FOR UTILITY PROGRAMS FOR 110 REM ** WHICH DOCUMENTATION WAS SUBMITTED TO THE NCCUG 120 REM ** DOCUMENTATION LIBRARY BY THE PROGRAM AUTHOR 130 REM ** VERSION: AUGUST 24, 1980 140 REM ** INSTRUCTION PROGRAM EDITOR: CHUCK SONTAG 150 PLOT 12,6,38,3,10,0,14 160 PRINT " I N S T R U C T I O N S P R O G R A M " 170 PLOT 6,3,3,0,4,15,255,13,32,13 180 PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT 230 PRINT TAB( 19);"FOR S T O D A T PROGRAM":PRINT 235 PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT :PRINT 240 PRINT TAB( 38):INPUT " PRESS RETURN: "; A$:PRINT :REM 250 ON A$= "RETURN" GOTO 260 260 X= 1 280 PLOT 12,6,X,3,8,0,14 290 PRINT TAB( 4)" S T O D A T I N S T R U C T I O N S " 300 PLOT 15,255,13,32,13:PRINT :PRINT :PRINT :PRINT :PRINT :PRINT 310 PRINT "TITLE: USER INSTRUCTIONS FOR STODAT COMMUNICATIONS PROGRAM." 320 PRINT :PRINT 330 PRINT "PURPOSE: BRIEFLY, STODAT MASKS OUT ALL UNWANTED CHARACTERS THAT" 340 PRINT TAB( 9);"MAY PRODUCE UNDESIRED RESULTS ON THE COMPUCOLOR II" 350 PRINT TAB( 9);"DURING OPERATION WITH A MODEM." 360 PRINT :PRINT 370 PRINT "REQUIRED: 1. AT LEAST 8K MEMORY (2K AVAIL FOR DATA STORAGE)." 380 PRINT TAB( 10);"2. EITHER V6.78 OR V8.79 VERSION OF DISK BASIC." 390 PRINT TAB( 10);"3. OPERATION WITH A MODEM AT 300 BAUD." 400 PRINT TAB( 10);"4. BOTH PARTS OF THE STODAT PROGRAM, I.E. THE PART" 410 PRINT TAB( 13);"NAMED STODAT.BAS AND THE PART NAMED STODAT.PRG." 430 PRINT :PRINT 440 PRINT TAB( 9):INPUT "WHEN READY TO CONTINUE PRESS: RETURN ";A$ 450 ON A$= "RETURN" GOTO 460 460 PLOT 12 470 PLOT 12,6,X,3,12,0,14 480 PRINT " S T O D A T I N S T R U C T I O N S " 490 PLOT 15,255,13,32,13 500 PRINT "FEATURES: 1. ELIMINATES CONTROL & NON-PRINTING CHARACTERS FROM" 510 PRINT TAB( 13);"THE ORIGINATING STATION THAT MAY START THE DISK" 520 PRINT TAB( 13);"DRIVE, ERASE THE SCREEN OR PRODUCE OTHER UNWANTED" 530 PRINT TAB( 13);"RESULTS UPON USER'S TERMINAL." 540 PRINT 550 PRINT TAB( 10);"2. ALLOWS UPPER & LOWER CASE CHARACTERS, PUNCTUATION," 560 PRINT TAB( 13);"CARRIAGE RETURNS AND LINE FEEDS TO BE PASSED" 570 PRINT TAB( 13);"THROUGH AND PRINTED ON USER'S TERMINAL." 580 PRINT 590 PRINT TAB( 10);"3. GIVES WARNING THAT ONLY 256 BYTES REMAIN IN MEMORY" 600 PRINT TAB( 13);"(BY CHANGING THE SCREEN COLOR TO YELLOW )." 610 PRINT 620 PRINT TAB( 10);"4. GIVES (RED) END OF MEMORY PROMPT (WHEREINAFTER" 630 PRINT TAB( 13);"PRINTING CONTINUES, BUT STORAGE OF DATA STOPS)." 640 PRINT 650 PRINT TAB( 10);"5. DETERMINES (BY A PROMPT) WHETHER USER'S TERMINAL" 660 PRINT TAB( 13);"HAS LOWER CASE; IF NOT, THEN PRESS 'N' IN WHICH" 670 PRINT TAB( 13);"CASE CAPITALS WILL APPEAR ON THE SCREEN IN CYAN &" 680 PRINT TAB( 13);"CHARACTERS 'CONVERTED TO CAPITALS' WILL APPEAR IN" 690 PRINT TAB( 13);"WHITE." 700 PRINT 710 PRINT TAB( 10);"6. NOTE THAT STODAT.BAS, IN BASIC, PROVIDES A MENU" 720 PRINT TAB( 13);"WHICH IS SELF-EXPLANATORY AND INCLUDES A PROVISION" 730 PRINT TAB( 13);"THAT BYPASSES THE 'CONVERSION TO CAPITALS' FEATURE." 750 PRINT TAB( 13);"ALSO, NOTE THAT STODAT.PRG, IN MACHINE LANGUAGE," 760 PRINT TAB( 13);"ACCOMMODATES THE 300 BAUD INPUT SPEED." 770 PRINT 780 PRINT TAB( 10):INPUT "WHEN READY TO CONTINUE PRESS: RETURN ";A$ 800 PLOT 12,6,X,3,7,0,14 810 PRINT TAB( 4);"S T O D A T I N S T R U C T I O N S " 820 PLOT 15,255,13,32,13 830 PRINT :PRINT :PRINT 840 PRINT "OPERATING INSTRUCTIONS: (THIS IS NOT A STEP-BY-STEP PROCEDURE)" 850 PRINT 860 PRINT TAB( 5);"1. GETTING STARTED:" 870 PRINT 880 PRINT TAB( 8);"LOAD PART OF STODAT PROGRAM WRITTEN IN BASIC." 890 PRINT 900 PRINT TAB( 8);"NOTE: THE PART OF STODAT PROGRAM WRITTEN IN BASIC" 910 PRINT TAB( 8);"SHOULD BE LOADED FIRST." 920 PRINT 930 PRINT TAB( 8);"NOTE: THE PART OF STODAT PROGRAM WRITTEN IN MACHINE" 940 PRINT TAB( 8);"LANGUAGE WILL BE LOADED BY THE PART WRITTEN IN BASIC." 950 PRINT 960 PRINT TAB( 5);"2. SPECIFYING LOWER CASE:" 970 PRINT 980 PRINT TAB( 8);"IF USER'S TERMINAL HAS LOWER CASE, THEN PRESS Y-KEY IN" 990 PRINT TAB( 8);"REPLY TO (LOWER CASE?) PROMPT; OTHERWISE PRESS N-KEY." 1030 PRINT :PRINT :PRINT 1040 PRINT TAB( 5):INPUT "WHEN READY TO CONTINUE PRESS: RETURN ";A$ 1050 ON A$= "RETURN" GOTO 1060 1060 PLOT 12,6,X,3,7,0,14 1070 PRINT TAB( 4);"S T O D A T I N S T R U C T I O N S " 1080 PLOT 15,255,13,32,13 1090 PRINT 1100 PRINT "OPERATING INSTRUCTIONS (CONT'D):" 1110 PRINT 1120 PRINT TAB( 5);"3. EXITING FROM .PRG LOOP:" 1130 PRINT 1140 PRINT TAB( 8);"WHEN THE INPUT MASK READY PROMPT APPEARS ON THE SCREEN," 1150 PRINT TAB( 8);"THEN THE USER IS IN THE MACHINE LANGUAGE LOOP." 1160 PRINT 1170 PRINT TAB( 8);"FIRST, PRESS CPU RESET, THEN PRESS ESC E AND RUN" 1180 PRINT TAB( 8);"TO EXIT THE MACHINE LANGUAGE LOOP (BECAUSE THE KEYBOARD" 1190 PRINT TAB( 8);"IS EFFECTIVELY ISOLATED)." 1200 PRINT 1210 PRINT TAB( 5);"4. RE-ENTERING THE .PRG LOOP:" 1220 PRINT 1230 PRINT TAB( 8);"PRESS ESC I TO RE-ENTER THE MACH LANGUAGE LOOP. ALTER-" 1240 PRINT TAB( 8);"NATIVELY, THE MENU SELECTION 'RETURN TO TERMINAL MODE'" 1250 PRINT TAB( 8);"ALSO ENABLES RE-ENTRY TO THE LOOP." 1260 PRINT 1270 PRINT TAB( 8);"NOTE: EITHER RESETS THE COUNTERS AND THUS CAUSES DATA" 1280 PRINT TAB( 8);"TO BE LOST UNLESS SAVED PREVIOUSLY ON DISK." 1290 PRINT 1300 PRINT TAB( 5);"5. STORING DATA:" 1310 PRINT 1320 PRINT TAB( 8);"TYPE ANY NAME OF SIX LETTERS OR LESS (JUST AS DONE IN" 1330 PRINT TAB( 8);"BASIC), WHEN 'PROMPT'-ED TO NAME THE DATA TO BE STORED." 1340 PRINT :PRINT 1350 PRINT TAB( 5):INPUT "WHEN READY TO CONTINUE PRESS: RETURN ";A$ 1360 ON A$= "RETURN" GOTO 1370 1370 PLOT 12,6,X,3,7,0,14 1380 PRINT TAB( 4);"S T O D A T I N S T R U C T I O N S " 1390 PLOT 15,255,13,32,13 1400 PRINT 1410 PRINT "OPERATING INSTRUCTIONS (CONT'D):" 1420 PRINT 1430 PRINT TAB( 5);"6. REVISION OF STORED DATA:" 1440 PRINT 1450 PRINT TAB( 8);"DATA IS STORED AS A SOURCE FILE; IT MAY BE EDITED WITH" 1460 PRINT TAB( 8);"THE SCREEN EDITOR PROGRAM, IF AVAILABLE." 1470 PRINT 1480 PRINT 1910 PRINT :PRINT 1920 PRINT TAB( 5):INPUT "ENTER YOUR CHOICE: 1) RETURN TO MENU OR 2) LOAD STODAT ";KE:PRINT :REM 1930 PRINT 1940 IF KE< 1OR KE> 2THEN GOTO 1920 1950 ON KEGOSUB 1980,2980 1980 PLOT 12,8:PRINT :PRINT :PRINT :PRINT :PRINT 1990 PRINT TAB( 15);"LOADING M E N U" 2000 FOR I= 0TO 500:NEXT I 2010 PLOT 27,4 2020 PRINT "LOAD MENU.BAS;01" 2030 PLOT 27,27 2040 RUN 2980 PLOT 12,8:PRINT :PRINT :PRINT :PRINT :PRINT 2990 PRINT TAB( 10);"LOADING S T O D A T PROGRAM" 3000 FOR I= 0TO 500:NEXT I 3010 PLOT 27,4 3020 PRINT "LOAD STODAT.BAS;2D" 3030 PLOT 27,27 3040 RUN 3100 END :RETURN