500 PRINT"[147]                                        ";
501 PRINT"          EXPLORING THE 6502            ";
502 PRINT"                                        "
505 PRINT"[144] 1) RUN OPCODES (NUMERICAL LISTING)
510 [153]" 2) RUN OPCODES (ALPHABETICAL LISTING)
515 PRINT" 3) RETURN TO FEATURES MENU
517 [153]" 4) QUIT
520 INPUT" SELECT A NUMBER";A
525 IF A>4THEN520
530 ON A GOTO 1000,2000, 3000,4000
750 PRINT"[147][146][155]LOAD[146]";CHR$(34);P$;CHR$(34);",8":PRINT"RUN"
760 POKE631,13:POKE632,13:POKE198,2:END
1000 P$="OPCODES.N":GOTO 750
2000 P$="OPCODES.A":GOTO750
3000 P$="MENU.FEATURE":GOTO750
4000 END