home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nibble Magazine
/
nib25a.dsk
/
STARTUP.bas
< prev
Wrap
BASIC Source File
|
2023-02-26
|
694b
|
17 lines
10 HOME
20 FOR I = 0 TO 39: PRINT "*";: NEXT I
30 PRINT "* *";
40 PRINT "* Nibble Magazine Programs *";
45 PRINT "* ProDOS *";
50 PRINT "* 1985 *";
55 PRINT "* *";
60 FOR I = 0 TO 39: PRINT "*";: NEXT I
70 POKE 34,7
100 HOME
105 PRINT
110 PRINT "This disk contains ProDOS programs"
120 PRINT "from Nibble Magazine Volume 6, 1985 and"
130 PRINT "Nibble Express, Volume 6. Enjoy!"
140 PRINT : PRINT "Press RETURN to CAT the disk.": POKE -16368,0: WAIT -16384,128: GET Z$: TEXT : HOME
150 PRINT : PRINT CHR$(4);"CAT"
160 NEW