home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Glitch Apple Disk Collection
/
2014.glitch.apple.collection.zip
/
indexed
/
26A.DSK
/
HELLO.bas
< prev
next >
Wrap
BASIC Source File
|
2014-09-09
|
441b
|
11 lines
10 TEXT : HOME
20 VTAB 5: PRINT " [1] - GOBBLER"
30 PRINT " [2] - ASTEROIDS"
40 PRINT " [3] - JAWBREAKER ]["
50 PRINT " [4] - DEFENDER"
60 VTAB 3: PRINT "SELECT:";: POKE -16368,0: GET A$: PRINT A$
70 IF A$ = "1" THEN PRINT "<CTRL-D>BRUN GOBBLER"
80 IF A$ = "2" THEN PRINT "<CTRL-D>RUN ASTEROIDS"
90 IF A$ = "3" THEN PRINT "<CTRL-D>BRUN JAWBREAKER ]["
100 IF A$ = "4" THEN PRINT "<CTRL-D>BRUNDEFENDER"
110 GOTO 60