Compucolor.org – Virtual Media

Listing of file='PMENU.BAS;02' on disk='vmedia/chip_78-sector.ccvf'

100 REM               MENU FOR SUPERPATCH
110 REM
120 REM       SUPERPATCH IS A PROGRAM BY JIM CAMERON
130 REM
140 REM    THIS BASIC DOCUMENTATION AND DEMONSTRATION
150 REM  OF THE PROGRAM WAS DEVELOPED BY STEVE PERRIGO.
160 REM  JOHN NEWBY ALSO ASSISTED IN THE DEVELOPMENT AND
170 REM             DEBUGGING OF THE PATCH.
180 REM
190 REM
1000 PLOT 27,24,6,2,12,15,29,3,22,5:PRINT "SUPERPATCH MENU"
1010 PLOT 15,3,22,6:PRINT "eeeeeeeeeeeeeee"
1020 PLOT 3,10,10:PRINT "DEMONSTRATION PROGRAM......DEMO.BAS......1"
1030 PLOT 3,10,12:PRINT "INSTRUCTION PROGRAM........INSTRU.BAS....2"
1040 PLOT 3,10,14:PRINT "JOYSTICK DOODLING AND"
1050 PLOT 3,17,15:PRINT "SCROLLING PROGRAM...DOODLE.BAS....3"
1060 PLOT 3,10,17:PRINT "DUAL JOYSTICK DOODLER......JSDOOD.BAS....4"
1070 PLOT 3,24,23:PRINT "SELECT ONE":PLOT 3,64,0,6,0
1080 POKE 33278,0
1090 IF PEEK (33278)= 0GOTO 1090
1100 IF PEEK (33278)< 49OR PEEK (33278)> 52THEN PLOT 3,64,0:GOTO 1080
1110 ON PEEK (33278)- 48GOTO 2000,3000,4000,5000
1120 GOTO 1080
2000 LOAD "DEMO":RUN
3000 LOAD "INSTRU":RUN
4000 LOAD "DOODLE":RUN
5000 LOAD "JSDOOD":RUN