home *** CD-ROM | disk | FTP | other *** search
/ The Glitch Apple Disk Collection / 2014.glitch.apple.collection.zip / indexed / 31B.DSK / HELLO.bas < prev    next >
BASIC Source File  |  2014-09-09  |  473b  |  11 lines
  1. 10  TEXT : HOME 
  2. 20  VTAB 5: PRINT "   [1] - STAR LEAGUE BASEBALL"
  3. 30  PRINT : PRINT "   [2] - DIG-DUG"
  4. 40  PRINT : PRINT "   [3] - DRAGON FIRE"
  5. 50  PRINT : PRINT "   [4] - TRON"
  6. 60  VTAB 3: PRINT "SELECT:";: POKE  -16368,0: GET A$: PRINT A$
  7. 70  IF A$ = "1"  THEN  PRINT "<CTRL-D>BRUNSTAR LEAGUE BASEBALL"
  8. 80  IF A$ = "2"  THEN  PRINT "<CTRL-D>BRUNDIG-DUG"
  9. 90  IF A$ = "3"  THEN  PRINT "<CTRL-D>BRUNDRAGON FIRE"
  10. 100  IF A$ = "4"  THEN  PRINT "<CTRL-D>BRUNTRON"
  11. 110  GOTO 60