CHAR$(255),KEYWRD$(75)8NULL$(0):ESC$(27)yS$ESC$"":E$ESC$"": EMPHASIZED PRINT MODE FOR KEYWORDS(RS$ESC$"-"(1):RE$ESC$"-"NULL$: UNDERLINE FOR REM COMMENTS2SC$"[":EC$"]": BRACKETS FOR SPECIAL CHARACTER STRINGS <53281,11:53280,12M F(14)" RETTY RINTER "~ P" LEASE WAIT ONE MOMENT..." ZL0255:CHAR$(L)(L):L dL031:CHAR$(L):L:L129159:CHAR$(L):L nL075:KEYWRD$(L):L x" "3 "ILENAME TO PRINT";N$T 8,8,8,N$",P,R":4,4,7:290 LN2049"THIS IS NOT A BASIC PROGRAM":8:4:130 NSP0:FOF0 MAIN ROUTINE 290:LN0470 290:LS$(LN)" ":NSPNSPCOF:COF0:LL(LS$):210 LS$"":L1LL:LS$LS$" ":L% 310: B127380:260N B34330:270m B$":"A$A$B$:450:200 B0450:180 B167450:200 A$A$B$:210  LINE NUMBER RETRIEVAL ROUTINE "#8,L$:#8,H$:LN(L$NULL$)(H$NULL$)256: , CHARACTER RETRIEVAL ROUTINE; 6#8,B$:B(B$NULL$):` @ QUOTE STRING RETRIEVAL ROUTINE J(B32)((B160)(B128))A$A$SC$CHAR$(B)EC$:350 TA$A$B$ ^310:(B34)(B0) h330 r KEYWORD INTERPRETER |A$A$S$KEYWRD$(B128)E$ B167COFCOF2:4306 B129FOFFOF2:430Z B130FOFFOF2:NSPNSP2:430o B143A$A$RS${ B$"":  LINE PRINT ROUTINE 4,LS$NSP)A$RE$:A$"":NSPFOFCOF:  END ROUTINE "INISHED":8:4:  SPECIAL CHARACTER DESCRIPTORSD"NULL","1","2","3","4","WHITE","6","7","SHFT=OFF""SHFT=ON","10","11","12","CR","LOWERCASE","15","16","CRSR DOWN""RVS ON","HOME","DELETE","21","22","23","24","25","26","27""RED","CRSR RIGHT","GREEN","BLUE"1"ORANGE","","","","F1","F3","F5","F7","F2","F4","F6","F8"|"SHFT CR","UPPERCASE","BLACK","","CRSR UP","RVS OFF","CLEAR","INSERT"&"BROWN","LIGHT RED","GRAY 1","GRAY 2","LIGHT GREEN","LIGHT BLUE"0"GRAY 3","PURPLE","CRSR LEFT","YELLOW","CYAN": KEYWORDS/D""," "," "," ","#"[N" "," "," "," "," "X""," ",""," ",""b"",""," ",""," "l" ",""," "," ","#"," ","","",""Fv" "," "," "," "," ","","("," "," ","("" "," "," "," + "," - "," * "," / ",""" "," "," > "," = "," < "," ""","","","","","","","","","",""<"","","","","$","","","$","$","$"M"$",""