home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Set of Apple II Hard Drive Images
/
eric.hdv
/
TEST
/
HELLO.bas
< prev
next >
Wrap
BASIC Source File
|
2020-08-13
|
437b
|
9 lines
10 HOME : PRINT "TODAY'S MENU:": PRINT : PRINT "1) JOYSTICK CONTROLLER": PRINT : PRINT "2) DANCING NOTES": PRINT
15 PRINT "3) EDASM": PRINT
16 PRINT "4) BOOT HARD DISK": PRINT
20 INPUT "SELECT:";S
30 IF S <1 OR S >4 THEN 10
40 IF S = 2 THEN PRINT CHR$(4)"RUN DANCNOTE.BAS": END
50 IF S = 1 THEN PRINT CHR$(4)"RUN JOYCTRL.BAS": END
60 IF S = 3 THEN PRINT CHR$(4)"RUN EDASM"
70 IF S = 4 THEN PRINT CHR$(4)"PR#5"