analog/utilities/prodos/reactive.bas

7 lines
171 B
QBasic

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