1 'DMP106 3 CLS:B=27:PRINT"DMP 106 CONTROL CODES":PRINT," 1 MENU":PRINT"PRINT:"," 2 GRAPHICS MODE":PRINT," 3 C P MODE":PRINT"FONT:"," 4 NORMAL":PRINT," 5 COMPRESSED":PRINT," 6 CONDENSED":PRINT," 7 ELONGATION ON":PRINT," 8 ELONGATION OFF":PRINT," 9 BOLD ON" 4 PRINT,"10 BOLD OFF":PRINT"SCRIPT:","11 SUPER ON":PRINT,"12 SUB ON":PRINT,"13 SUPER/SUB OFF":PRINT"PRINTER MUST BE ON-LINE!!!" 5 INPUT"Type selection # then ";A 6 IF(A>13)OR(A<1)THEN CLS:PRINT"NO SUCH SELECTION":FORT=1TO600:NEXTT:GOTO3 7 IFA=1THENMENU 8 IFA=2THENLPRINTCHR$(18):GOTO3 9 IFA=3THENLPRINTCHR$(30):GOTO3 10 IFA=4THENX=19 11 IFA=5THENX=23 12 IFA=6THENX=20 13 IFA=7THENX=14 14 IFA=8THENX=15 15 IFA=9THENX=31 16 IFA=10THENX=32 17 IFA=11THENLPRINTCHR$(B);CHR$(83);CHR$(0):GOTO3 18 IFA=12THENLPRINTCHR$(B);CHR$(83);CHR$(1):GOTO3 19 IFA=13THENLPRINTCHR$(B);CHR$(88):GOTO3 20 LPRINTCHR$(B);CHR$(X):GOTO3