home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / WAVY_NAV.DSK / HELLO.bas < prev    next >
BASIC Source File  |  2014-09-09  |  488b  |  7 lines
  1. 10  TEXT : HOME : INVERSE : PRINT "                GAMES                   ": NORMAL 
  2. 20 T$(1) = "JIGSAW":T$(2) = "WAVY NAVY":T$(3) = "C'EST LA VIE"
  3. 30  VTAB 6: FOR X = 1 TO 3: HTAB 14: PRINT X") "T$(X): PRINT : NEXT 
  4. 40  VTAB 17: HTAB 10: PRINT "PLEASE MAKE SELECTION:";: GET A$: PRINT A$: IF  VAL(A$) <1  OR  VAL(A$) >3  THEN 40
  5. 45  POKE 1012,255
  6. 46  IF A$ = "3"  THEN  VTAB 18: HTAB 12: PRINT "SEE NOTE (CATALOG)": PRINT  CHR$(4)"BRUNTURBO"
  7. 50  PRINT : PRINT  CHR$(4)"BRUN"T$( VAL(A$))