home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib07.dsk / HELLO.bas < prev    next >
Encoding:
BASIC Source File  |  1990-01-01  |  809 b   |  20 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 "*              1981-1982               *";
  7. 55  PRINT "*                                      *";
  8. 60  FOR I = 0 TO 39: PRINT "*";: NEXT I
  9. 70  POKE 34,7
  10. 75  PRINT 
  11. 80  PRINT  CHR$(4);"BLOAD LOADER.OBJ0"
  12. 90  CALL 4096
  13. 100  HOME 
  14. 105  PRINT 
  15. 110  PRINT "This disk contains programs from Nibble"
  16. 120  PRINT "Magazine Volume 2, 1981, Nibble"
  17. 130  PRINT "Magazine, Volume 3, 1982, and Nibble": PRINT "Express, Volumes 2 and 3. Enjoy!"
  18. 140  PRINT : PRINT "Press RETURN to CATALOG the disk.": POKE  -16368,0: WAIT  -16384,128: GET Z$: TEXT : HOME 
  19. 150  PRINT : PRINT  CHR$(4);"CATALOG"
  20. 160  NEW