Filter
Top Products
2846 F45F 5D5B
2847 F461
2848 F461 ;DISASSEMBLE INSTRUCTIONS AND SHOW REGS IS REGF SET
2849 F461 AD 0E A4 REGQ LDA REGF ;GET FLAG
2850 F464 F0 06 BEQ DISASM
2851 F466 20 32 E2 JSR REG1 ;SHOW THE SIX REGS
2852 F469 20 24 EA JSR CRCK ;<CR>
2853 F46C
2854 F46C 20 45 F5 DISASM JSR PRBL2
2855 F46F 20 3C F5 JSR PRPC ;OUTPUT PROG COUNTR
2856 F472 A0 00 LDY #0
2857 F474 20 56 EB JSR PCLLD
2858 F477 A8 TAY
2859 F478 4A LSR A
2860 F479 90 0B BCC IEVEN
2861 F47B 4A LSR A
2862 F47C B0 17 BCS ERR
2863 F47E C9 22 CMP #$22
2864 F480 F0 13 BEQ ERR
2865 F482 29 07 AND #7
2866 F484 09 80 ORA #$80
2867 F486 4A IEVEN LSR A
2868 F487 AA TAX
2869 F488 BD 5B F5 LDA MODE,X
2870 F48B B0 04 BCS RTMODE
2871 F48D 4A LSR A
2872 F48E 4A LSR A
2873 F48F 4A LSR A
2874 F490 4A LSR A
2875 F491 29 0F RTMODE AND #$F
2876 F493 D0 04 BNE GETFMT
2877 F495 A0 80 ERR LDY #$80
2878 F497 A9 00 LDA #0
2879 F499 AA GETFMT TAX
2880 F49A BD 9F F5 LDA MODE2,X
2881 F49D 8D 16 01 STA FORMA
2882 F4A0 29 03 AND #3
2883 F4A2 85 EA STA LENGTH
2884 F4A4 98 TYA ;OPCODE
2885 F4A5 29 8F AND #$8F
2886 F4A7 AA TAX
2887 F4A8 98 TYA ;OPCODE IN A AGAIN
2888 F4A9 A0 03 LDY #3
2889 F4AB E0 8A CPX #$8A
2890 F4AD F0 0B BEQ MNNDX3
2891 F4AF 4A MNNDX1 LSR A
2892 F4B0 90 08 BCC MNNDX3
2893 F4B2 4A LSR A
2894 F4B3 4A MNNDX2 LSR A
2895 F4B4 09 20 ORA #$20
2896 F4B6 88 DEY
2897 F4B7 D0 FA BNE MNNDX2
2898 F4B9 C8 INY
2899 F4BA 88 MNNDX3 DEY
2900 F4BB D0 F2 BNE MNNDX1
2901 F4BD 48 PHA ;SAVE MNEMONIC TABLE INDEX
2902 F4BE 20 56 EB JSR PCLLD
2903 F4C1 20 46 EA JSR NUMA
2904 F4C4 20 45 F5 JSR PRBL2 ;PRINT LAST BLANK
2905 F4C7 68 PLA
2906 F4C8 A8 TAY
2907 F4C9 B9 B9 F5 LDA MNEML,Y