analog/utilities/prodos/iiplus.bas

7 lines
169 B
QBasic
Raw Normal View History

2023-01-07 07:15:21 +00:00
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"