11 VTAB 21: HTAB 8: GET A$: PRINT A$:A$ = CHR$( ASC(A$) -32 *( ASC(A$) >95)): HOME : POKE 49235,0: IF A$ = "Q" THEN HOME : VTAB 21: PRINT "QUIT NOW? (Y/N): ";: GET A$: ON A$ < >"Y" AND A$ < >"y" GOTO 9: HOME : VTAB 23: DEL 3,3: END
12 ON A$ = "E" GOTO 15: ON A$ = "L" OR A$ = "S" GOTO 17: ON A$ = "C" GOTO 13: ON A$ = "P" GOTO 28: ON A$ = "V" GOTO 14: ON A$ = "N" GOTO 16: GOTO 9
13 TEXT : HOME : PRINT D$"CAT": GOSUB 27: PRINT "ANY KEY:";: GET A$: PRINT A$: POKE 49232,0: GOTO 9
14 CALL 3840 +3: GOTO 8
15 CALL 3840 +6: GOTO 8
16 POKE 49234,0: GOTO 9
17 POKE P,97:B$ = "SAVE": IF A$ = "L" THEN B$ = "LOAD"