home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib12.dsk / HELLO.bas < prev    next >
BASIC Source File  |  2023-02-26  |  756b  |  18 lines
  1. 10  HOME 
  2. 20  FOR I = 0 TO 39: PRINT "*";: NEXT I
  3. 30  PRINT "*                                      *";
  4. 40  PRINT "*       Nibble Magazine Programs       *";
  5. 45  PRINT "*                                      *";
  6. 50  PRINT "*              1982-1983               *";
  7. 55  PRINT "*                                      *";
  8. 60  FOR I = 0 TO 39: PRINT "*";: NEXT I
  9. 70  POKE 34,7
  10. 75  PRINT 
  11. 100  HOME 
  12. 105  PRINT 
  13. 110  PRINT "This disk contains programs from Nibble"
  14. 120  PRINT "Magazine Volume 3, 1982, Nibble"
  15. 130  PRINT "Magazine, Volume 4, 1983, and Nibble": PRINT "Express, Volumes 3 and 4. Enjoy!"
  16. 140  PRINT : PRINT "Press RETURN to CATALOG the disk.": POKE  -16368,0: WAIT  -16384,128: GET Z$: TEXT : HOME 
  17. 150  PRINT : PRINT  CHR$(4);"CATALOG"
  18. 160  NEW