10 POKE53280,0:POKE53281,0:PRINT"[147][154]THERE ARE FOUR FONTS INCLUDED ON"
20 PRINT"THIS DISK."
30 PRINT"THE FILENAMES ARE:"
40 PRINTTAB(12)"[159]CAPITAL.FONT"
50 PRINTTAB(12)"COMPUTER.FONT"
60 PRINTTAB(12)"STRANGE.FONT"
70 PRINTTAB(12)"ITALIC.FONT[154]"
80 PRINT"PRESS ANY KEY TO LOAD FONT PRINTER"
90 POKE198,0:WAIT198,1:GETDH$
100 PRINT"[144]NEW"
110 PRINT"L[207]"+CHR$(34)+"FONT PRINTER"+CHR$(34)+",8:"
120 PRINT"RUN:"
130 FORI=631TO633:POKEI,13:NEXT:POKE198,3