analog/utilities/prodos/iiplus.bas
2023-01-07 02:15:21 -05:00

7 lines
169 B
QBasic

10 HOME
20 POKE - 16206,0
30 POKE - 16207,0
40 PRINT CHR$ (4);"BLOAD IIPLUS.FONT"
50 PRINT CHR$ (4);"BRUN UPLOADFONT"
60 PRINT CHR$ (4);"-QUIT.SYSTEM"