home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Nibble Magazine
/
nib03.dsk
/
HELLO.bas
< prev
next >
Wrap
BASIC Source File
|
2023-02-26
|
806b
|
19 lines
10 HOME
20 FOR I = 0 TO 39: PRINT "*";: NEXT I
30 PRINT "* *";
40 PRINT "* Nibble Magazine Programs *";
45 PRINT "* *";
50 PRINT "* 1980-1981 *";
55 PRINT "* *";
60 FOR I = 0 TO 39: PRINT "*";: NEXT I
70 POKE 34,7
80 PRINT : PRINT CHR$(4);"BLOAD LOADER.OBJ0"
90 CALL 4096
100 HOME
105 PRINT
110 PRINT "This disk contains programs from Nibble"
120 PRINT "Magazine Volume 1, 1980, Nibble"
130 PRINT "Magazine, Volume 2, 1981, and Nibble": PRINT "Express, Volumes 1 and 2. Enjoy!"
140 PRINT : PRINT "Press RETURN to CATALOG the disk.": POKE -16368,0: WAIT -16384,128: GET Z$: TEXT : HOME
150 PRINT : PRINT CHR$(4);"CATALOG"
160 NEW