home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib22a.dsk / DECEMBER.1984 / AMPERGO.DEMO2.bas < prev    next >
BASIC Source File  |  2023-02-26  |  467b  |  12 lines
  1. 10  REM  ************************
  2. 20  REM  *    AMPERGO.DEMO2     *
  3. 30  REM  *  BY CORNELIS BONGERS *
  4. 40  REM  *  COPYRIGHT (C) 1984  *
  5. 50  REM  *  BY MICROSPARC, INC  *
  6. 60  REM  *  CONCORD, MA. 01742  *
  7. 70  REM  ************************
  8. 80  PRINT  CHR$(4)"BRUN AMPERGO"
  9. 90  REM  THIS PROGRAM FORCES CONTINUOUS LABEL SEARCHING
  10. 100  &  GOTO TEST1: REM  INIT LOC 255 TO 255
  11. 110  &  >TEST1: PRINT  PEEK(255): &  GOTO TEST2
  12. 120  &  >TEST2: PRINT  PEEK(255): &  GOTO TEST1