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

7 lines
166 B
QBasic

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