Compucolor.org – Virtual Media

Listing of file='HELP.BAS;01' on disk='vmedia/isc_demos-sector.ccvf'

1200 REM KY HELP
1205 POKE 33284,0
1210 Z= 0:OUT 8,199:POKE 33278,0:GOTO 1380
1220 PLOT 27,88,3,63,31,6,6,31,46,15,3,64,0
1230 FOR I= 1TO 1000000:A= PEEK (33278):IF A= 13THEN OUT 8,199:PLOT 3,64,0:LOAD "MENU":RUN
1235 IF A= 32AND Z= 1THEN Z= 0:POKE 33278,0:GOTO 1560
1236 IF A= 32AND Z= 0THEN POKE 33278,0:Z= 1:GOTO 1380
1237 IF A= 72OR A= 104THEN PLOT 3,64,0:RUN
1240 NEXT I:IF A< > 13THEN GOTO 1560
1380 PLOT 6,6,12,14,29
1390 REM
1440 PRINT "  WITHIN  EACH PROGRAM THERE IS A BLINKING DOT '.' WHICH WILL"
1450 PRINT
1460 PRINT "  APPEAR IN THE LOWER RIGHT CORNER OF THE SCREEN.":PRINT
1470 PRINT "  WHEN  THIS APPEARS THE FOLLOWING INPUTS WILL BE EXECUTED:"
1480 PRINT
1490 PRINT "  PRESSING 'H' WILL LOAD THESE INSTRUCTIONS."
1495 PRINT
1500 PRINT "  PRESSING THE 'RETURN' KEY WILL RETURN TO THE MENU."
1510 PRINT
1515 PRINT "  PRESSING THE 'ATTN BREAK' WILL HALT PROGRAM EXECUTION."
1516 PRINT
1518 PRINT "  PRESSING 'SPACE BAR' AFTER 'ATTN BREAK' WILL CONTINUE PROGRAM."
1520 PRINT "      PRESS 'SPACE BAR' FOR PAGE TWO OF INSTRUCTIONS "
1540 OUT 8,207:POKE 33278,0:Z= 1:GOTO 1220
1560 OUT 8,199:PLOT 6,2,12,14
1570 PRINT "   SEVERAL COMMANDS ARE AVAILABLE WHEN THE MENU IS DISPLAYED:"
1580 PRINT
1590 PRINT TAB( 4);"TYPE '#' OF PROGRAM THEN 'RETURN' TO LOAD DESIRED PROGRAM."
1600 PRINT
1610 PRINT TAB( 4);"TYPE 'DIR' THEN 'RETURN' FOR A DISK DIRECTORY."
1640 PRINT
1660 PRINT TAB( 4);"TYPE 'ALL' THEN 'RETURN' FOR CONTINUOUS PROGRAM LOADING."
1670 PRINT
1705 PRINT TAB( 3);"PRESS 'RETURN' WITHOUT A PROGRAM # TO CHANGE DEMO MENU'S."
1720 PRINT :PRINT :OUT 8,207
1730 PRINT "       PRESS 'SPACE BAR' FOR PAGE ONE OF INSTRUCTIONS"
1750 GOTO 1220