URL
https://opencores.org/ocsvn/m65c02/m65c02/trunk
Subversion Repositories m65c02
[/] [m65c02/] [trunk/] [Src/] [M65C02-Test-Programs/] [Klaus2m5_Functional_Tests/] [65c02_ft.lst] - Rev 2
Go to most recent revision | Compare with Previous | Blame | View Log
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 1---------------------------------------------------------- 65c02_ft.a65 --------------------------------------------------------------------------------------------------------------------- Symbol Table -----------------------------------------------------------Symbol Value DecimalabsAN : $023f 575absANa : $024b 587absEO : $0243 579absEOa : $024f 591absflo : $0257 599absOR : $023b 571absORa : $0247 583absrlo : $0253 595abst : $0203 515abs1 : $0208 520abs7f : $020c 524ada2 : $0203 515adfc : $000c 12adiy2 : $0056 86adi2 : $0052 82adrf : $0011 17adrh : $0010 16adrl : $000f 15ad1 : $000d 13ad2 : $000e 14bin_test : $31b8 12728break : $0010 16brk_ret : $08b9 2233br1 : $05c9 1481br11 : $060d 1549br12 : $0612 1554br13 : $0617 1559br14 : $0628 1576br2 : $05ce 1486br3 : $05d3 1491br4 : $05e4 1508carry : $0001 1check_ram : <macro>chkadd : $3403 13315chkadi : $346e 13422 *chkdad : $32d2 13010chkdadi : $3325 13093 *chkdsbi : $333c 13116 *chksbi : $3485 13445 *ckad1 : $3418 13336cmp_flag : <macro>code_segment : $0400 1024 *data_bss : $0208 520data_bss_end : $025b 603data_segment : $0200 512 *decmode : $0008 8dec_test : $3220 12832eor_flag : <macro>fASL : $0221 545fai : $0034 52fao : $0030 48AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 2---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------far_ret : $07f7 2039fc : $0001 1fINC : $0236 566fLDx : $020d 525fLSR : $0229 553fn : $0080 128fnc : $0081 129fnv : $00c0 192fnz : $0082 130fnzc : $0083 131fROL : $0221 545fROLc : $0225 549fROR : $0229 553fRORc : $022d 557fv : $0040 64fvz : $0042 66fz : $0002 2fzc : $0003 3I_flag : $0003 3 *indAN : $003a 58indEO : $0042 66indOR : $004a 74indt : $0030 48ind1 : $0024 36ind_ret : $084c 2124intdis : $0004 4inwt : $0038 56inw1 : $002e 46irq_a : $000a 10irq_trap : $35fd 13821irq_x : $000b 11jsr_ret : $0882 2178 *load_data_direct : $0001 1 *load_flag : <macro>minus : $0080 128m8 : $00ff 255m8i : $00fb 251nbr1 : $05d8 1496nbr11 : $061c 1564nbr12 : $061f 1567nbr13 : $0622 1570nbr14 : $0625 1573nbr2 : $05db 1499nbr3 : $05de 1502nbr4 : $05e1 1505next_test : <macro>nmi_trap : $35f5 13813overfl : $0040 64ptr_ind_ret : $357e 13694ptr_tst_ind : $357c 13692ROM_vectors : $0001 1 *rASL : $0211 529ram_chksm : $0201 513ram_top : $ffff -1 *range_adr : $04a5 1189 *AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 3---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------range_end : $0531 1329range_fw : $041c 1052range_loop : $0414 1044range_ok : $052a 1322range_op : $04a4 1188reserv : $0020 32res_trap : $35f8 13816rINC : $0231 561rLSR : $0219 537rROL : $0211 529rROLc : $0215 533rROR : $0219 537rRORc : $021d 541sba2 : $0204 516sbiy2 : $0058 88sbi2 : $0054 84sb2 : $0012 18set_a : <macro>set_abs : <macro>set_absx : <macro>set_ax : <macro>set_ay : <macro>set_stat : <macro>set_x : <macro>set_y : <macro>set_z : <macro>set_zx : <macro>skip_bin_test : $0001 1 *skip_dec_test : $0001 1 *skip_part_1 : $0000 0 *start : $0400 1024success : $32cf 13007tadd : $31e6 12774tadd1 : $31f8 12792tand : $2be3 11235tandi1 : $2bf0 11248tandi2 : $2c11 11281tand1 : $2c04 11268tand10 : $2d1b 11547tand11 : $2d38 11576tand12 : $2d57 11607tand13 : $2d77 11639tand14 : $2d95 11669tand15 : $2db1 11697tand2 : $2c25 11301tand3 : $2c45 11333tand4 : $2c65 11365tand5 : $2c87 11399tand6 : $2ca9 11433tand7 : $2cc5 11461tand8 : $2ce1 11489tand9 : $2cfe 11518tasl : $2187 8583tasl1 : $21a1 8609tasl2 : $22cb 8907AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 4---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------tasl3 : $22ea 8938tasl4 : $244b 9291tasl5 : $246d 9325tasl6 : $25ef 9711tasl7 : $260e 9742tasl8 : $276f 10095tasl9 : $2791 10129tdad : $324c 12876tdad1 : $325e 12894tdad2 : $326e 12910tdad3 : $3270 12912tdad4 : $328a 12938tdad5 : $328f 12943tdad6 : $32b3 12979tdad7 : $32c7 12999tdec : $293d 10557tdec1 : $2960 10592tdec10 : $298c 10636tdec11 : $29af 10671tdec12 : $2a43 10819tdec13 : $2a69 10857tdec14 : $2af2 10994tdec15 : $2b17 11031tdec16 : $2bac 11180tdec17 : $2bd5 11221tdec2 : $29ec 10732tdec3 : $2a12 10770tdec4 : $2aa1 10913tdec5 : $2ac6 10950tdec6 : $2b53 11091tdec7 : $2b7c 11132teor : $2dd9 11737teori1 : $2de6 11750teori2 : $2e07 11783teor1 : $2dfa 11770teor10 : $2f11 12049teor11 : $2f2e 12078teor12 : $2f4d 12109teor13 : $2f6d 12141teor14 : $2f8b 12171teor15 : $2fa7 12199teor2 : $2e1b 11803teor3 : $2e3b 11835teor4 : $2e5b 11867teor5 : $2e7d 11901teor6 : $2e9f 11935teor7 : $2ebb 11963teor8 : $2ed7 11991teor9 : $2ef4 12020test_bne : $0544 1348test_case : $0200 512test_far : $354e 13646test_ind : $3585 13701test_jsr : $35b8 13752test_near : $081a 2074AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 5---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------test_num : $002a 42 *tinc : $2917 10519tinc1 : $2936 10550tinc10 : $2966 10598tinc11 : $2985 10629tinc12 : $2a19 10777tinc13 : $2a3b 10811tinc14 : $2aca 10954tinc15 : $2aeb 10987tinc16 : $2b80 11136tinc17 : $2ba5 11173tinc2 : $29c2 10690tinc3 : $29e4 10724tinc4 : $2a79 10873tinc5 : $2a9a 10906tinc6 : $2b27 11047tinc7 : $2b4c 11084tldax : $14fa 5370tldax1 : $151c 5404tldax2 : $153e 5438tldax3 : $155f 5471tldax4 : $165d 5725tldax5 : $1682 5762tldax6 : $16c6 5830tldax7 : $16d2 5842tlday : $15ab 5547tlday1 : $15cd 5581tlday2 : $1604 5636tlday3 : $1625 5669tlday4 : $16fb 5883tlday5 : $171c 5916tlday6 : $173d 5949tldx : $0d16 3350tldx1 : $0d39 3385tldx2 : $0d5c 3420tldx3 : $0d80 3456tldx4 : $0dd1 3537tldx5 : $0dde 3550tldy : $0e13 3603tldy1 : $0e36 3638tldy2 : $0e59 3673tldy3 : $0e7c 3708tldy4 : $0eca 3786tldy5 : $0ed7 3799tlsr : $21bb 8635tlsr1 : $21d5 8661tlsr2 : $2309 8969tlsr3 : $2328 9000tlsr4 : $248f 9359tlsr5 : $24b1 9393tlsr6 : $262d 9773tlsr7 : $264c 9804tlsr8 : $27b3 10163tlsr9 : $27d5 10197tora : $2fcf 12239AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 6---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------torai1 : $2fdc 12252torai2 : $2ffd 12285tora1 : $2ff0 12272tora10 : $3107 12551tora11 : $3124 12580tora12 : $3143 12611tora13 : $3163 12643tora14 : $3181 12673tora15 : $319d 12701tora2 : $3011 12305tora3 : $3031 12337tora4 : $3051 12369tora5 : $3073 12403tora6 : $3095 12437tora7 : $30b1 12465tora8 : $30cd 12493tora9 : $30ea 12522trap : <macro>trap_cc : <macro>trap_cs : <macro>trap_eq : <macro>trap_mi : <macro>trap_ne : <macro>trap_pl : <macro>trap_vc : <macro>trap_vs : <macro>trol : $21ef 8687trolc : $2223 8739trolc1 : $223d 8765trolc2 : $2385 9093trolc3 : $23a4 9124trolc4 : $2517 9495trolc5 : $2539 9529trolc6 : $26a9 9897trolc7 : $26c8 9928trolc8 : $283b 10299trolc9 : $285d 10333trol1 : $2209 8713trol2 : $2347 9031trol3 : $2366 9062trol4 : $24d3 9427trol5 : $24f5 9461trol6 : $266b 9835trol7 : $268a 9866trol8 : $27f7 10231trol9 : $2819 10265tror : $2257 8791trorc : $228b 8843trorc1 : $22a5 8869trorc2 : $2401 9217trorc3 : $2420 9248trorc4 : $259f 9631trorc5 : $25c1 9665trorc6 : $2725 10021trorc7 : $2744 10052AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 7---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trorc8 : $28c3 10435trorc9 : $28e5 10469tror1 : $2271 8817tror2 : $23c3 9155tror3 : $23e2 9186tror4 : $255b 9563tror5 : $257d 9597tror6 : $26e7 9959tror7 : $2706 9990tror8 : $287f 10367tror9 : $28a1 10401tstax : $1582 5506tstax1 : $16e0 5856tstay : $15f1 5617tstay1 : $1648 5704tstay2 : $16a7 5799tstay4 : $170b 5899tstay5 : $172a 5930tstay6 : $174c 5964tstx : $0da6 3494tstx1 : $0dec 3564tsty : $0ea1 3745tsty1 : $0ee5 3813tst_a : <macro>tst_abs : <macro>tst_absx : <macro>tst_ax : <macro>tst_ay : <macro>tst_stat : <macro>tst_x : <macro>tst_y : <macro>tst_z : <macro>tst_zx : <macro>zero : $0002 2zero_page : $000a 10 *zpAN : $001c 28zpEO : $0020 32zpOR : $0018 24zpt : $000c 12zp1 : $0013 19zp7f : $0017 23zp_bss : $0013 19zp_bss_end : $005a 90__65SC02__ : $0001 1336 labels used5633 lines read, no errors in pass 1.AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 8---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------;; 6 5 0 2 F U N C T I O N A L T E S T;; Copyright (C) 2012-2013 Klaus Dormann;; This program is free software: you can redistribute it and/or modify; it under the terms of the GNU General Public License as published by; the Free Software Foundation, either version 3 of the License, or; (at your option) any later version.;; This program is distributed in the hope that it will be useful,; but WITHOUT ANY WARRANTY; without even the implied warranty of; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the; GNU General Public License for more details.;; You should have received a copy of the GNU General Public License; along with this program. If not, see <http://www.gnu.org/licenses/>.; This program is designed to test all opcodes of a 6502 emulator using all; addressing modes with focus on propper setting of the processor status; register bits.;; version 23-jul-2013; contact info at http://2m5.de or email K@2m5.de;; assembled with AS65 from http://www.kingswood-consulting.co.uk/assemblers/; command line switches: -l -m -s2 -w -h0; | | | | no page headers in listing; | | | wide listing (133 char/col); | | write intel hex file instead of binary; | expand macros in listing; generate pass2 listing;; No IO - should be run from a monitor with access to registers.; To run load intel hex image with a load command, than alter PC to 400 hex; (code_segment) and enter a go command.; Loop on program counter determines error or successful completion of test.; Check listing for relevant traps (jump/branch *).; Please note that in early tests some instructions will have to be used before; they are actually tested!;; RESET, NMI or IRQ should not occur and will be trapped if vectors are enabled.; Tests documented behavior of the original NMOS 6502 only! No unofficial; opcodes. Additional opcodes of newer versions of the CPU (65C02, 65816) will; not be tested. Decimal ops will only be tested with valid BCD operands and; N V Z flags will be ignored.;; Debugging hints:; Most of the code is written sequentially. if you hit a trap, check the; immediately preceeding code for the instruction to be tested. Results are; tested first, flags are checked second by pushing them onto the stack and; pulling them to the accumulator after the result was checked. The "real"; flags are no longer valid for the tested instruction at this time!; If the tested instruction was indexed, the relevant index (X or Y) mustAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 9---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------; also be checked. Opposed to the flags, X and Y registers are still valid.;; versions:; 28-jul-2012 1st version distributed for testing; 29-jul-2012 fixed references to location 0, now #0; added license - GPLv3; 30-jul-2012 added configuration options; 01-aug-2012 added trap macro to allow user to change error handling; 01-dec-2012 fixed trap in branch field must be a branch; 02-mar-2013 fixed PLA flags not tested; 19-jul-2013 allowed ROM vectors to be loaded when load_data_direct = 0; added test sequence check to detect if tests jump their fence; 23-jul-2013 added RAM integrity check; C O N F I G U R A T I O N;;ROM_vectors writable (0=no, 1=yes);if ROM vectors can not be used interrupts will not be trapped;as a consequence BRK can not be tested but will be emulated to test RTI0001 = ROM_vectors = 1;load_data_direct (0=move from code segment, 1=load directly);loading directly is preferred but may not be supported by your platform;0 produces only consecutive object code, 1 is not suitable for a binary image0001 = load_data_direct = 1;I_flag behavior (0=force enabled, 1=force disabled, 2=prohibit change, 3=allow;change) 2 requires extra code and is not recommended. SEI & CLI can only be;tested if you allow changing the interrupt status (I_flag = 3)0003 = I_flag = 3;configure memory - try to stay away from memory used by the system;zero_page memory start address, $50 (80) consecutive Bytes required; add 2 if I_flag = 2000a = zero_page = $a;data_segment memory start address, $5B (91) consecutive Bytes required0200 = data_segment = $200if (data_segment & $ff) != 0ERROR ERROR ERROR low byte of data_segment MUST be $00 !!endif;code_segment memory start address, 13kB of consecutive space required; add 2.5 kB if I_flag = 2;parts of the code are self modifying and must reside in RAM0400 = code_segment = $400;RAM integrity test option. Checks for undesired RAM writes.;set lowest non RAM or RAM mirror address page (-1=disable, 0=64k, $40=16k);leave disabled if a monitor, OS or background interrupt is allowed to alter RAMffff = ram_top = -1;;Skip to ADC/SBC tests;0000 = skip_part_1 = 0;;Skip Binary or Decimal mode ADC/SBC instruction tests;0001 = skip_bin_test = 10001 = skip_dec_test = 1AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 10---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------noopt ;do not take shortcuts;macros for error & success traps to allow user modification;example:;trap macro; jsr my_error_handler; endm;trap_eq macro; bne skip\?; trap ;failed equal (zero);skip\?; endm;; my_error_handler should pop the calling address from the stack and report it.; putting larger portions of code (more than 3 bytes) inside the trap macro; may lead to branch range problems for some tests.trap macrojmp * ;failed anywayendmtrap_eq macrobeq * ;failed equal (zero)endmtrap_ne macrobne * ;failed not equal (non zero)endmtrap_cs macrobcs * ;failed carry setendmtrap_cc macrobcc * ;failed carry clearendmtrap_mi macrobmi * ;failed minus (bit 7 set)endmtrap_pl macrobpl * ;failed plus (bit 7 clear)endmtrap_vs macrobvs * ;failed overflow setendmtrap_vc macrobvc * ;failed overflow clearendmsuccess macrojmp * ;test passed, no errorsendm0001 = carry equ %00000001 ;flag bits in status0002 = zero equ %000000100004 = intdis equ %000001000008 = decmode equ %000010000010 = break equ %000100000020 = reserv equ %001000000040 = overfl equ %01000000AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 11---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0080 = minus equ %100000000001 = fc equ carry0002 = fz equ zero0003 = fzc equ carry+zero0040 = fv equ overfl0042 = fvz equ overfl+zero0080 = fn equ minus0081 = fnc equ minus+carry0082 = fnz equ minus+zero0083 = fnzc equ minus+zero+carry00c0 = fnv equ minus+overfl0030 = fao equ break+reserv ;bits always on after PHP, BRK0034 = fai equ fao+intdis ;+ forced interrupt disable00ff = m8 equ $ff ;8 bit mask00fb = m8i equ $ff&~intdis ;8 bit mask - interrupt disable;macros to allow masking of status bits.;masking of interrupt enable/disable on load and compare;masking of always on bits after PHP or BRK (unused & break) on compareif I_flag = 0load_flag macrolda #\1&m8i ;force enable interrupts (mask I)endmcmp_flag macrocmp #(\1|fao)&m8i ;I_flag is always enabled + always on bitsendmeor_flag macroeor #(\1&m8i|fao) ;mask I, invert expected flags + always on bitsendmendifif I_flag = 1load_flag macrolda #\1|intdis ;force disable interruptsendmcmp_flag macrocmp #(\1|fai)&m8 ;I_flag is always disabled + always on bitsendmeor_flag macroeor #(\1|fai) ;invert expected flags + always on bits + Iendmendifif I_flag = 2load_flag macrolda #\1ora flag_I_on ;restore I-flagand flag_I_offendmcmp_flag macroeor flag_I_on ;I_flag is never changedcmp #(\1|fao)&m8i ;expected flags + always on bits, mask Iendmeor_flag macroeor flag_I_on ;I_flag is never changedAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 12---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------eor #(\1&m8i|fao) ;mask I, invert expected flags + always on bitsendmendifif I_flag = 3load_flag macrolda #\1 ;allow test to change I-flag (no mask)endmcmp_flag macrocmp #(\1|fao)&m8 ;expected flags + always on bitsendmeor_flag macroeor #\1|fao ;invert expected flags + always on bitsendmendif;macros to set (register|memory|zeropage) & statusset_stat macro ;setting flags in the processor status registerload_flag \1pha ;use stack to load statusplpendmset_a macro ;precharging accu & statusload_flag \2pha ;use stack to load statuslda #\1 ;precharge accuplpendmset_x macro ;precharging index & statusload_flag \2pha ;use stack to load statusldx #\1 ;precharge index xplpendmset_y macro ;precharging index & statusload_flag \2pha ;use stack to load statusldy #\1 ;precharge index yplpendmset_ax macro ;precharging indexed accu & immediate statusload_flag \2pha ;use stack to load statuslda \1,x ;precharge accuplpendmset_ay macro ;precharging indexed accu & immediate statusload_flag \2pha ;use stack to load statuslda \1,y ;precharge accuplpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 13---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------endmset_z macro ;precharging indexed zp & immediate statusload_flag \2pha ;use stack to load statuslda \1,x ;load to zeropagesta zptplpendmset_zx macro ;precharging zp,x & immediate statusload_flag \2pha ;use stack to load statuslda \1,x ;load to indexed zeropagesta zpt,xplpendmset_abs macro ;precharging indexed memory & immediate statusload_flag \2pha ;use stack to load statuslda \1,x ;load to memorysta abstplpendmset_absx macro ;precharging abs,x & immediate statusload_flag \2pha ;use stack to load statuslda \1,x ;load to indexed memorysta abst,xplpendm;macros to test (register|memory|zeropage) & status & (mask)tst_stat macro ;testing flags in the processor status registerphp ;save statusphp ;use stack to retrieve statusplacmp_flag \1trap_neplp ;restore statusendmtst_a macro ;testing result in accu & flagsphp ;save flagsphpcmp #\1 ;test resulttrap_nepla ;load statuscmp_flag \2trap_neplp ;restore statusendmAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 14---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------tst_x macro ;testing result in x index & flagsphp ;save flagsphpcpx #\1 ;test resulttrap_nepla ;load statuscmp_flag \2trap_neplp ;restore statusendmtst_y macro ;testing result in y index & flagsphp ;save flagsphpcpy #\1 ;test resulttrap_nepla ;load statuscmp_flag \2trap_neplp ;restore statusendmtst_ax macro ;indexed testing result in accu & flagsphp ;save flagscmp \1,x ;test resulttrap_nepla ;load statuseor_flag \3cmp \2,x ;test flagstrap_ne ;endmtst_ay macro ;indexed testing result in accu & flagsphp ;save flagscmp \1,y ;test resulttrap_ne ;pla ;load statuseor_flag \3cmp \2,y ;test flagstrap_neendmtst_z macro ;indexed testing result in zp & flagsphp ;save flagslda zptcmp \1,x ;test resulttrap_nepla ;load statuseor_flag \3cmp \2,x ;test flagstrap_neendmtst_zx macro ;testing result in zp,x & flagsphp ;save flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 15---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------lda zpt,xcmp \1,x ;test resulttrap_nepla ;load statuseor_flag \3cmp \2,x ;test flagstrap_neendmtst_abs macro ;indexed testing result in memory & flagsphp ;save flagslda abstcmp \1,x ;test resulttrap_nepla ;load statuseor_flag \3cmp \2,x ;test flagstrap_neendmtst_absx macro ;testing result in abs,x & flagsphp ;save flagslda abst,xcmp \1,x ;test resulttrap_nepla ;load statuseor_flag \3cmp \2,x ;test flagstrap_neendm; RAM integrity test; verifies that none of the previous tests has altered RAM outside of the; designated write areas.; uses zpt word as indirect pointer, zpt+2 word as checksumif ram_top > -1check_ram macrocldlda #0sta zpt ;set low byte of indirect pointersta zpt+3 ;checksum high bytesta range_adr ;reset self modifying codesta tandi1sta tandi2sta teori1sta teori2sta torai1sta torai2sta chkdadista chkdsbista chkadista chksbiclcldx #zp_bss-zero_page ;zeropage - write test areaccs3\? adc zero_page,xAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 16---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------bcc ccs2\?inc zpt+3 ;carry to high byteclcccs2\? inxbne ccs3\?ldx #hi(data_segment) ;set high byte of indirect pointerstx zpt+1ldy #lo(data_bss) ;data after write test areaccs5\? adc (zpt),ybcc ccs4\?inc zpt+3 ;carry to high byteclcccs4\? inybne ccs5\?inx ;advance RAM high addressstx zpt+1cpx #ram_topbne ccs5\?sta zpt+2 ;checksum low iscmp ram_chksm ;checksum low expectedtrap_ne ;checksum mismatchlda zpt+3 ;checksum high iscmp ram_chksm+1 ;checksum high expectedtrap_ne ;checksum mismatchendmelsecheck_ram macro;RAM check disabled - RAM size not setendmendifnext_test macro ;make sure, tests don't jump the fencelda test_case ;previous testcmp #test_numtrap_ne ;test is out of sequencetest_num = test_num + 1lda #test_num ;*** this tests' numbersta test_case;check_ram ;uncomment to find altered RAM after each testendmif load_data_direct = 1dataelsebss ;uninitialized segment, copy of data at end of code!endif;; org zero_page0000 = org 00000 : 00000000000000.. ds zero_page;break test interrupt save000a : 00 irq_a ds 1 ;a register000b : 00 irq_x ds 1 ;x registerif I_flag = 2;masking for I bit in statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 17---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------flag_I_on ds 1 ;or mask to load flagsflag_I_off ds 1 ;and mask to load flagsendif000c : zpt ;5 bytes store/modify test area;add/subtract operand generation and result/flag prediction000c : 00 adfc ds 1 ;carry flag before op000d : 00 ad1 ds 1 ;operand 1 - accumulator000e : 00 ad2 ds 1 ;operand 2 - memory / immediate000f : 00 adrl ds 1 ;expected result bits 0-70010 : 00 adrh ds 1 ;expected result bit 8 (carry)0011 : 00 adrf ds 1 ;expected flags NV0000ZC (-V in decimal mode)0012 : 00 sb2 ds 1 ;operand 2 complemented for subtract0013 : zp_bss0013 : c3824100 zp1 db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSR0017 : 7f zp7f db $7f ;test pattern for compare;logical zeropage operands0018 : 001f7180 zpOR db 0,$1f,$71,$80 ;test pattern for OR001c : 0fff7f80 zpAN db $0f,$ff,$7f,$80 ;test pattern for AND0020 : ff0f8f8f zpEO db $ff,$0f,$8f,$8f ;test pattern for EOR;indirect addressing pointers0024 : 0802 ind1 dw abs1 ;indirect pointer to pattern in absolute memory0026 : 0902 dw abs1+10028 : 0a02 dw abs1+2002a : 0b02 dw abs1+3002c : 0c02 dw abs7f002e : 1001 inw1 dw abs1-$f8 ;indirect pointer for wrap-test pattern0030 : 0302 indt dw abst ;indirect pointer to store area in absolute memory0032 : 0402 dw abst+10034 : 0502 dw abst+20036 : 0602 dw abst+30038 : 0b01 inwt dw abst-$f8 ;indirect pointer for wrap-test store003a : 3f02 indAN dw absAN ;indirect pointer to AND pattern in absolute memory003c : 4002 dw absAN+1003e : 4102 dw absAN+20040 : 4202 dw absAN+30042 : 4302 indEO dw absEO ;indirect pointer to EOR pattern in absolute memory0044 : 4402 dw absEO+10046 : 4502 dw absEO+20048 : 4602 dw absEO+3004a : 3b02 indOR dw absOR ;indirect pointer to OR pattern in absolute memory004c : 3c02 dw absOR+1004e : 3d02 dw absOR+20050 : 3e02 dw absOR+3;add/subtract indirect pointers0052 : 0302 adi2 dw ada2 ;indirect pointer to operand 2 in absolute memory0054 : 0402 sbi2 dw sba2 ;indirect pointer to complemented operand 2 (SBC)0056 : 0401 adiy2 dw ada2-$ff ;with offset for indirect indexed0058 : 0501 sbiy2 dw sba2-$ff005a : zp_bss_end0200 = org data_segment0200 : 00 test_case ds 1 ;current test number0201 : 0000 ram_chksm ds 2 ;checksum for RAM integrity test;add/subtract operand copy - abs tests write area0203 : abst ;5 bytes store/modify test areaAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 18---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0203 : 00 ada2 ds 1 ;operand 20204 : 00 sba2 ds 1 ;operand 2 complemented for subtract0205 : 000000 ds 3 ;fill remaining bytes0208 : data_bss0208 : c3824100 abs1 db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSR020c : 7f abs7f db $7f ;test pattern for compare;loads020d : 80800002 fLDx db fn,fn,0,fz ;expected flags for load;shifts0211 : rASL ;expected result ASL & ROL -carry0211 : 86048200 rROL db $86,$04,$82,0 ; "0215 : 87058301 rROLc db $87,$05,$83,1 ;expected result ROL +carry0219 : rLSR ;expected result LSR & ROR -carry0219 : 61412000 rROR db $61,$41,$20,0 ; "021d : e1c1a080 rRORc db $e1,$c1,$a0,$80 ;expected result ROR +carry0221 : fASL ;expected flags for shifts0221 : 81018002 fROL db fnc,fc,fn,fz ;no carry in0225 : 81018000 fROLc db fnc,fc,fn,0 ;carry in0229 : fLSR0229 : 01000102 fROR db fc,0,fc,fz ;no carry in022d : 81808180 fRORc db fnc,fn,fnc,fn ;carry in;increments (decrements)0231 : 7f80ff0001 rINC db $7f,$80,$ff,0,1 ;expected result for INC/DEC0236 : 0080800200 fINC db 0,fn,fn,fz,0 ;expected flags for INC/DEC;logical memory operand023b : 001f7180 absOR db 0,$1f,$71,$80 ;test pattern for OR023f : 0fff7f80 absAN db $0f,$ff,$7f,$80 ;test pattern for AND0243 : ff0f8f8f absEO db $ff,$0f,$8f,$8f ;test pattern for EOR;logical accu operand0247 : 00f11f00 absORa db 0,$f1,$1f,0 ;test pattern for OR024b : f0ffffff absANa db $f0,$ff,$ff,$ff ;test pattern for AND024f : fff0f00f absEOa db $ff,$f0,$f0,$0f ;test pattern for EOR;logical results0253 : 00ff7f80 absrlo db 0,$ff,$7f,$800257 : 02800080 absflo db fz,fn,0,fn025b : data_bss_endcode0400 = org code_segment0400 : d8 [ 2] start cld0401 : a900 [ 2] lda #0 ;*** test 0 = initialize0403 : 8d0002 [ 4] sta test_case0000 = test_num = 0;stop interrupts before initializing BSSif I_flag = 1seiendif;initialize BSS segmentif load_data_direct != 1ldx #zp_end-zp_init-1ld_zp lda zp_init,xsta zp_bss,xAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 19---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------dexbpl ld_zpldx #data_end-data_init-1ld_data lda data_init,xsta data_bss,xdexbpl ld_dataif ROM_vectors = 1ldx #5ld_vect lda vec_init,xsta vec_bss,xdexbpl ld_vectendifendif;retain status of interrupt flagif I_flag = 2phpplaand #4 ;isolate flagsta flag_I_on ;or maskeor #lo(~4) ;reversesta flag_I_off ;and maskendif;generate checksum for RAM integrity testif ram_top > -1lda #0sta zpt ;set low byte of indirect pointersta ram_chksm+1 ;checksum high bytesta range_adr ;reset self modifying codesta tandi1sta tandi2sta teori1sta teori2sta torai1sta torai2sta chkdadista chkdsbista chkadista chksbiclcldx #zp_bss-zero_page ;zeropage - write test areagcs3 adc zero_page,xbcc gcs2inc ram_chksm+1 ;carry to high byteclcgcs2 inxbne gcs3ldx #hi(data_segment) ;set high byte of indirect pointerstx zpt+1ldy #lo(data_bss) ;data after write test areagcs5 adc (zpt),ybcc gcs4AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 20---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------inc ram_chksm+1 ;carry to high byteclcgcs4 inybne gcs5inx ;advance RAM high addressstx zpt+1cpx #ram_topbne gcs5sta ram_chksm ;checksum completeendifif skip_part_1 = 1jmp bin_testendifnext_test0406 : ad0002 [ 4]> lda test_case ;previous test0409 : c900 [ 2]> cmp #test_num> trap_ne ;test is out of sequence040b : d0fe [ 3]> bne * ;failed not equal (non zero)>0001 = >test_num = test_num + 1040d : a901 [ 2]> lda #test_num ;*** this tests' number040f : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test;testing relative addressing with BEQ0412 : a0fe [ 2] ldy #$fe ;testing maximum range, not -1/-2 (invalid/self adr)0414 : range_loop0414 : 88 [ 2] dey ;next relative address0415 : 98 [ 2] tya0416 : aa [ 2] tax ;precharge count to end of loop0417 : 1003 [ 3] bpl range_fw ;calculate relative address0419 : 18 [ 2] clc ;avoid branch self or to relative address of branch041a : 6902 [ 2] adc #2041c : range_fw041c : 497f [ 2] eor #$7f ;complement except sign041e : 8da504 [ 4] sta range_adr ;load into test target0421 : a900 [ 2] lda #0 ;should set zero flag in status register0423 : 4ca404 [ 3] jmp range_op;relative address target field with branch under test in the middle0426 : ca [ 2] dex ;-128 - max backward0427 : ca [ 2] dex0428 : ca [ 2] dex0429 : ca [ 2] dex042a : ca [ 2] dex042b : ca [ 2] dex042c : ca [ 2] dex042d : ca [ 2] dex042e : ca [ 2] dex ;-120042f : ca [ 2] dex0430 : ca [ 2] dex0431 : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 21---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0432 : ca [ 2] dex0433 : ca [ 2] dex0434 : ca [ 2] dex0435 : ca [ 2] dex0436 : ca [ 2] dex0437 : ca [ 2] dex0438 : ca [ 2] dex ;-1100439 : ca [ 2] dex043a : ca [ 2] dex043b : ca [ 2] dex043c : ca [ 2] dex043d : ca [ 2] dex043e : ca [ 2] dex043f : ca [ 2] dex0440 : ca [ 2] dex0441 : ca [ 2] dex0442 : ca [ 2] dex ;-1000443 : ca [ 2] dex0444 : ca [ 2] dex0445 : ca [ 2] dex0446 : ca [ 2] dex0447 : ca [ 2] dex0448 : ca [ 2] dex0449 : ca [ 2] dex044a : ca [ 2] dex044b : ca [ 2] dex044c : ca [ 2] dex ;-90044d : ca [ 2] dex044e : ca [ 2] dex044f : ca [ 2] dex0450 : ca [ 2] dex0451 : ca [ 2] dex0452 : ca [ 2] dex0453 : ca [ 2] dex0454 : ca [ 2] dex0455 : ca [ 2] dex0456 : ca [ 2] dex ;-800457 : ca [ 2] dex0458 : ca [ 2] dex0459 : ca [ 2] dex045a : ca [ 2] dex045b : ca [ 2] dex045c : ca [ 2] dex045d : ca [ 2] dex045e : ca [ 2] dex045f : ca [ 2] dex0460 : ca [ 2] dex ;-700461 : ca [ 2] dex0462 : ca [ 2] dex0463 : ca [ 2] dex0464 : ca [ 2] dex0465 : ca [ 2] dex0466 : ca [ 2] dex0467 : ca [ 2] dex0468 : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 22---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0469 : ca [ 2] dex046a : ca [ 2] dex ;-60046b : ca [ 2] dex046c : ca [ 2] dex046d : ca [ 2] dex046e : ca [ 2] dex046f : ca [ 2] dex0470 : ca [ 2] dex0471 : ca [ 2] dex0472 : ca [ 2] dex0473 : ca [ 2] dex0474 : ca [ 2] dex ;-500475 : ca [ 2] dex0476 : ca [ 2] dex0477 : ca [ 2] dex0478 : ca [ 2] dex0479 : ca [ 2] dex047a : ca [ 2] dex047b : ca [ 2] dex047c : ca [ 2] dex047d : ca [ 2] dex047e : ca [ 2] dex ;-40047f : ca [ 2] dex0480 : ca [ 2] dex0481 : ca [ 2] dex0482 : ca [ 2] dex0483 : ca [ 2] dex0484 : ca [ 2] dex0485 : ca [ 2] dex0486 : ca [ 2] dex0487 : ca [ 2] dex0488 : ca [ 2] dex ;-300489 : ca [ 2] dex048a : ca [ 2] dex048b : ca [ 2] dex048c : ca [ 2] dex048d : ca [ 2] dex048e : ca [ 2] dex048f : ca [ 2] dex0490 : ca [ 2] dex0491 : ca [ 2] dex0492 : ca [ 2] dex ;-200493 : ca [ 2] dex0494 : ca [ 2] dex0495 : ca [ 2] dex0496 : ca [ 2] dex0497 : ca [ 2] dex0498 : ca [ 2] dex0499 : ca [ 2] dex049a : ca [ 2] dex049b : ca [ 2] dex049c : ca [ 2] dex ;-10049d : ca [ 2] dex049e : ca [ 2] dex049f : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 23---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------04a0 : ca [ 2] dex04a1 : ca [ 2] dex04a2 : ca [ 2] dex04a3 : ca [ 2] dex ;-304a4 : range_op ;test target with zero flag=0, z=1 if previous dex04a5 = range_adr = *+1 ;modifiable relative address04a4 : f03e [ 3] beq *+64 ;if called without modification04a6 : ca [ 2] dex ;+004a7 : ca [ 2] dex04a8 : ca [ 2] dex04a9 : ca [ 2] dex04aa : ca [ 2] dex04ab : ca [ 2] dex04ac : ca [ 2] dex04ad : ca [ 2] dex04ae : ca [ 2] dex04af : ca [ 2] dex04b0 : ca [ 2] dex ;+1004b1 : ca [ 2] dex04b2 : ca [ 2] dex04b3 : ca [ 2] dex04b4 : ca [ 2] dex04b5 : ca [ 2] dex04b6 : ca [ 2] dex04b7 : ca [ 2] dex04b8 : ca [ 2] dex04b9 : ca [ 2] dex04ba : ca [ 2] dex ;+2004bb : ca [ 2] dex04bc : ca [ 2] dex04bd : ca [ 2] dex04be : ca [ 2] dex04bf : ca [ 2] dex04c0 : ca [ 2] dex04c1 : ca [ 2] dex04c2 : ca [ 2] dex04c3 : ca [ 2] dex04c4 : ca [ 2] dex ;+3004c5 : ca [ 2] dex04c6 : ca [ 2] dex04c7 : ca [ 2] dex04c8 : ca [ 2] dex04c9 : ca [ 2] dex04ca : ca [ 2] dex04cb : ca [ 2] dex04cc : ca [ 2] dex04cd : ca [ 2] dex04ce : ca [ 2] dex ;+4004cf : ca [ 2] dex04d0 : ca [ 2] dex04d1 : ca [ 2] dex04d2 : ca [ 2] dex04d3 : ca [ 2] dex04d4 : ca [ 2] dex04d5 : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 24---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------04d6 : ca [ 2] dex04d7 : ca [ 2] dex04d8 : ca [ 2] dex ;+5004d9 : ca [ 2] dex04da : ca [ 2] dex04db : ca [ 2] dex04dc : ca [ 2] dex04dd : ca [ 2] dex04de : ca [ 2] dex04df : ca [ 2] dex04e0 : ca [ 2] dex04e1 : ca [ 2] dex04e2 : ca [ 2] dex ;+6004e3 : ca [ 2] dex04e4 : ca [ 2] dex04e5 : ca [ 2] dex04e6 : ca [ 2] dex04e7 : ca [ 2] dex04e8 : ca [ 2] dex04e9 : ca [ 2] dex04ea : ca [ 2] dex04eb : ca [ 2] dex04ec : ca [ 2] dex ;+7004ed : ca [ 2] dex04ee : ca [ 2] dex04ef : ca [ 2] dex04f0 : ca [ 2] dex04f1 : ca [ 2] dex04f2 : ca [ 2] dex04f3 : ca [ 2] dex04f4 : ca [ 2] dex04f5 : ca [ 2] dex04f6 : ca [ 2] dex ;+8004f7 : ca [ 2] dex04f8 : ca [ 2] dex04f9 : ca [ 2] dex04fa : ca [ 2] dex04fb : ca [ 2] dex04fc : ca [ 2] dex04fd : ca [ 2] dex04fe : ca [ 2] dex04ff : ca [ 2] dex0500 : ca [ 2] dex ;+900501 : ca [ 2] dex0502 : ca [ 2] dex0503 : ca [ 2] dex0504 : ca [ 2] dex0505 : ca [ 2] dex0506 : ca [ 2] dex0507 : ca [ 2] dex0508 : ca [ 2] dex0509 : ca [ 2] dex050a : ca [ 2] dex ;+100050b : ca [ 2] dex050c : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 25---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------050d : ca [ 2] dex050e : ca [ 2] dex050f : ca [ 2] dex0510 : ca [ 2] dex0511 : ca [ 2] dex0512 : ca [ 2] dex0513 : ca [ 2] dex0514 : ca [ 2] dex ;+1100515 : ca [ 2] dex0516 : ca [ 2] dex0517 : ca [ 2] dex0518 : ca [ 2] dex0519 : ca [ 2] dex051a : ca [ 2] dex051b : ca [ 2] dex051c : ca [ 2] dex051d : ca [ 2] dex051e : ca [ 2] dex ;+120051f : ca [ 2] dex0520 : ca [ 2] dex0521 : ca [ 2] dex0522 : ca [ 2] dex0523 : ca [ 2] dex0524 : ca [ 2] dex0525 : f003 [ 3] beq range_ok ;+127 - max forwardtrap ; bad range0527 : 4c2705 [ 3]> jmp * ;failed anyway052a : range_ok052a : c000 [ 2] cpy #0052c : f003 [ 3] beq range_end052e : 4c1404 [ 3] jmp range_loop0531 : range_end ;range test successfulnext_test0531 : ad0002 [ 4]> lda test_case ;previous test0534 : c901 [ 2]> cmp #test_num> trap_ne ;test is out of sequence0536 : d0fe [ 3]> bne * ;failed not equal (non zero)>0002 = >test_num = test_num + 10538 : a902 [ 2]> lda #test_num ;*** this tests' number053a : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test;partial test BNE & CMP, CPX, CPY immediate053d : c001 [ 2] cpy #1 ;testing BNE true053f : d003 [ 3] bne test_bnetrap0541 : 4c4105 [ 3]> jmp * ;failed anyway0544 : test_bne0544 : a900 [ 2] lda #00546 : c900 [ 2] cmp #0 ;test compare immediatetrap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 26---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0548 : d0fe [ 3]> bne * ;failed not equal (non zero)trap_cc054a : 90fe [ 3]> bcc * ;failed carry cleartrap_mi054c : 30fe [ 3]> bmi * ;failed minus (bit 7 set)054e : c901 [ 2] cmp #1trap_eq0550 : f0fe [ 3]> beq * ;failed equal (zero)trap_cs0552 : b0fe [ 3]> bcs * ;failed carry settrap_pl0554 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)0556 : aa [ 2] tax0557 : e000 [ 2] cpx #0 ;test compare x immediatetrap_ne0559 : d0fe [ 3]> bne * ;failed not equal (non zero)trap_cc055b : 90fe [ 3]> bcc * ;failed carry cleartrap_mi055d : 30fe [ 3]> bmi * ;failed minus (bit 7 set)055f : e001 [ 2] cpx #1trap_eq0561 : f0fe [ 3]> beq * ;failed equal (zero)trap_cs0563 : b0fe [ 3]> bcs * ;failed carry settrap_pl0565 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)0567 : a8 [ 2] tay0568 : c000 [ 2] cpy #0 ;test compare y immediatetrap_ne056a : d0fe [ 3]> bne * ;failed not equal (non zero)trap_cc056c : 90fe [ 3]> bcc * ;failed carry cleartrap_mi056e : 30fe [ 3]> bmi * ;failed minus (bit 7 set)0570 : c001 [ 2] cpy #1trap_eq0572 : f0fe [ 3]> beq * ;failed equal (zero)trap_csAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 27---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0574 : b0fe [ 3]> bcs * ;failed carry settrap_pl0576 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)next_test0578 : ad0002 [ 4]> lda test_case ;previous test057b : c902 [ 2]> cmp #test_num> trap_ne ;test is out of sequence057d : d0fe [ 3]> bne * ;failed not equal (non zero)>0003 = >test_num = test_num + 1057f : a903 [ 2]> lda #test_num ;*** this tests' number0581 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test;testing stack operations PHA PHP PLA PLP0584 : a2ff [ 2] ldx #$ff ;initialize stack0586 : 9a [ 2] txs0587 : a955 [ 2] lda #$550589 : 48 [ 3] pha058a : a9aa [ 2] lda #$aa058c : 48 [ 3] pha058d : cdfe01 [ 4] cmp $1fe ;on stack ?trap_ne0590 : d0fe [ 3]> bne * ;failed not equal (non zero)0592 : ba [ 2] tsx0593 : 8a [ 2] txa ;overwrite accu0594 : c9fd [ 2] cmp #$fd ;sp decremented?trap_ne0596 : d0fe [ 3]> bne * ;failed not equal (non zero)0598 : 68 [ 4] pla0599 : c9aa [ 2] cmp #$aa ;successful retreived from stack?trap_ne059b : d0fe [ 3]> bne * ;failed not equal (non zero)059d : 68 [ 4] pla059e : c955 [ 2] cmp #$55trap_ne05a0 : d0fe [ 3]> bne * ;failed not equal (non zero)05a2 : cdff01 [ 4] cmp $1ff ;remains on stack?trap_ne05a5 : d0fe [ 3]> bne * ;failed not equal (non zero)05a7 : ba [ 2] tsx05a8 : e0ff [ 2] cpx #$ff ;sp incremented?trap_ne05aa : d0fe [ 3]> bne * ;failed not equal (non zero)next_test05ac : ad0002 [ 4]> lda test_case ;previous testAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 28---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------05af : c903 [ 2]> cmp #test_num> trap_ne ;test is out of sequence05b1 : d0fe [ 3]> bne * ;failed not equal (non zero)>0004 = >test_num = test_num + 105b3 : a904 [ 2]> lda #test_num ;*** this tests' number05b5 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test;testing branch decisions BPL BMI BVC BVS BCC BCS BNE BEQset_stat $ff ;all on> load_flag $ff05b8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>05ba : 48 [ 3]> pha ;use stack to load status05bb : 28 [ 4]> plp05bc : 101a [ 3] bpl nbr1 ;branches should not be taken05be : 501b [ 3] bvc nbr205c0 : 901c [ 3] bcc nbr305c2 : d01d [ 3] bne nbr405c4 : 3003 [ 3] bmi br1 ;branches should be takentrap05c6 : 4cc605 [ 3]> jmp * ;failed anyway05c9 : 7003 [ 3] br1 bvs br2trap05cb : 4ccb05 [ 3]> jmp * ;failed anyway05ce : b003 [ 3] br2 bcs br3trap05d0 : 4cd005 [ 3]> jmp * ;failed anyway05d3 : f00f [ 3] br3 beq br4trap05d5 : 4cd505 [ 3]> jmp * ;failed anyway05d8 : nbr1trap ;previous bpl taken05d8 : 4cd805 [ 3]> jmp * ;failed anyway05db : nbr2trap ;previous bvc taken05db : 4cdb05 [ 3]> jmp * ;failed anyway05de : nbr3trap ;previous bcc taken05de : 4cde05 [ 3]> jmp * ;failed anyway05e1 : nbr4trap ;previous bne taken05e1 : 4ce105 [ 3]> jmp * ;failed anyway05e4 : 08 [ 3] br4 phpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 29---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------05e5 : ba [ 2] tsx05e6 : e0fe [ 2] cpx #$fe ;sp after php?trap_ne05e8 : d0fe [ 3]> bne * ;failed not equal (non zero)05ea : 68 [ 4] placmp_flag $ff ;returned all flags on?05eb : c9ff [ 2]> cmp #($ff |fao)&m8 ;expected flags + always on bitstrap_ne05ed : d0fe [ 3]> bne * ;failed not equal (non zero)05ef : ba [ 2] tsx05f0 : e0ff [ 2] cpx #$ff ;sp after php?trap_ne05f2 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0 ;all off> load_flag 005f4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>05f6 : 48 [ 3]> pha ;use stack to load status05f7 : 28 [ 4]> plp05f8 : 3022 [ 4] bmi nbr11 ;branches should not be taken05fa : 7023 [ 4] bvs nbr1205fc : b024 [ 4] bcs nbr1305fe : f025 [ 4] beq nbr14trap_mi0600 : 30fe [ 3]> bmi * ;failed minus (bit 7 set)trap_vs0602 : 70fe [ 3]> bvs * ;failed overflow settrap_cs0604 : b0fe [ 3]> bcs * ;failed carry settrap_eq0606 : f0fe [ 3]> beq * ;failed equal (zero)0608 : 1003 [ 3] bpl br11 ;branches should be takentrap060a : 4c0a06 [ 3]> jmp * ;failed anyway060d : 5003 [ 3] br11 bvc br12trap060f : 4c0f06 [ 3]> jmp * ;failed anyway0612 : 9003 [ 3] br12 bcc br13trap0614 : 4c1406 [ 3]> jmp * ;failed anyway0617 : d00f [ 3] br13 bne br14trap0619 : 4c1906 [ 3]> jmp * ;failed anywayAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 30---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------061c : nbr11trap ;previous bmi taken061c : 4c1c06 [ 3]> jmp * ;failed anyway061f : nbr12trap ;previous bvs taken061f : 4c1f06 [ 3]> jmp * ;failed anyway0622 : nbr13trap ;previous bcs taken0622 : 4c2206 [ 3]> jmp * ;failed anyway0625 : nbr14trap ;previous beq taken0625 : 4c2506 [ 3]> jmp * ;failed anyway0628 : 08 [ 3] br14 php0629 : 68 [ 4] placmp_flag 0 ;flags off except break (pushed by sw) + reserved?062a : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bitstrap_ne062c : d0fe [ 3]> bne * ;failed not equal (non zero);crosscheck flagsset_stat carry> load_flag carry062e : a901 [ 2]> lda #carry ;allow test to change I-flag (no mask)>0630 : 48 [ 3]> pha ;use stack to load status0631 : 28 [ 4]> plptrap_cc0632 : 90fe [ 3]> bcc * ;failed carry clearset_stat zero> load_flag zero0634 : a902 [ 2]> lda #zero ;allow test to change I-flag (no mask)>0636 : 48 [ 3]> pha ;use stack to load status0637 : 28 [ 4]> plptrap_ne0638 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat overfl> load_flag overfl063a : a940 [ 2]> lda #overfl ;allow test to change I-flag (no mask)>063c : 48 [ 3]> pha ;use stack to load status063d : 28 [ 4]> plptrap_vc063e : 50fe [ 3]> bvc * ;failed overflow clearAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 31---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_stat minus> load_flag minus0640 : a980 [ 2]> lda #minus ;allow test to change I-flag (no mask)>0642 : 48 [ 3]> pha ;use stack to load status0643 : 28 [ 4]> plptrap_pl0644 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)set_stat $ff-carry> load_flag $ff-carry0646 : a9fe [ 2]> lda #$ff-carry ;allow test to change I-flag (no mask)>0648 : 48 [ 3]> pha ;use stack to load status0649 : 28 [ 4]> plptrap_cs064a : b0fe [ 3]> bcs * ;failed carry setset_stat $ff-zero> load_flag $ff-zero064c : a9fd [ 2]> lda #$ff-zero ;allow test to change I-flag (no mask)>064e : 48 [ 3]> pha ;use stack to load status064f : 28 [ 4]> plptrap_eq0650 : f0fe [ 3]> beq * ;failed equal (zero)set_stat $ff-overfl> load_flag $ff-overfl0652 : a9bf [ 2]> lda #$ff-overfl ;allow test to change I-flag (no mask)>0654 : 48 [ 3]> pha ;use stack to load status0655 : 28 [ 4]> plptrap_vs0656 : 70fe [ 3]> bvs * ;failed overflow setset_stat $ff-minus> load_flag $ff-minus0658 : a97f [ 2]> lda #$ff-minus ;allow test to change I-flag (no mask)>065a : 48 [ 3]> pha ;use stack to load status065b : 28 [ 4]> plptrap_mi065c : 30fe [ 3]> bmi * ;failed minus (bit 7 set)next_test065e : ad0002 [ 4]> lda test_case ;previous test0661 : c904 [ 2]> cmp #test_num> trap_ne ;test is out of sequenceAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 32---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0663 : d0fe [ 3]> bne * ;failed not equal (non zero)>0005 = >test_num = test_num + 10665 : a905 [ 2]> lda #test_num ;*** this tests' number0667 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; test PHA does not alter flags or accumulator but PLA does066a : a255 [ 2] ldx #$55 ;x & y protected066c : a0aa [ 2] ldy #$aaset_a 1,$ff ;push> load_flag $ff066e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0670 : 48 [ 3]> pha ;use stack to load status0671 : a901 [ 2]> lda #1 ;precharge accu0673 : 28 [ 4]> plp0674 : 48 [ 3] phatst_a 1,$ff0675 : 08 [ 3]> php ;save flags0676 : 08 [ 3]> php0677 : c901 [ 2]> cmp #1 ;test result> trap_ne0679 : d0fe [ 3]> bne * ;failed not equal (non zero)>067b : 68 [ 4]> pla ;load status> cmp_flag $ff067c : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits>> trap_ne067e : d0fe [ 3]> bne * ;failed not equal (non zero)>0680 : 28 [ 4]> plp ;restore statusset_a 0,0> load_flag 00681 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0683 : 48 [ 3]> pha ;use stack to load status0684 : a900 [ 2]> lda #0 ;precharge accu0686 : 28 [ 4]> plp0687 : 48 [ 3] phatst_a 0,00688 : 08 [ 3]> php ;save flags0689 : 08 [ 3]> php068a : c900 [ 2]> cmp #0 ;test result> trap_ne068c : d0fe [ 3]> bne * ;failed not equal (non zero)>068e : 68 [ 4]> pla ;load status> cmp_flag 0068f : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 33---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->> trap_ne0691 : d0fe [ 3]> bne * ;failed not equal (non zero)>0693 : 28 [ 4]> plp ;restore statusset_a $ff,$ff> load_flag $ff0694 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0696 : 48 [ 3]> pha ;use stack to load status0697 : a9ff [ 2]> lda #$ff ;precharge accu0699 : 28 [ 4]> plp069a : 48 [ 3] phatst_a $ff,$ff069b : 08 [ 3]> php ;save flags069c : 08 [ 3]> php069d : c9ff [ 2]> cmp #$ff ;test result> trap_ne069f : d0fe [ 3]> bne * ;failed not equal (non zero)>06a1 : 68 [ 4]> pla ;load status> cmp_flag $ff06a2 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits>> trap_ne06a4 : d0fe [ 3]> bne * ;failed not equal (non zero)>06a6 : 28 [ 4]> plp ;restore statusset_a 1,0> load_flag 006a7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>06a9 : 48 [ 3]> pha ;use stack to load status06aa : a901 [ 2]> lda #1 ;precharge accu06ac : 28 [ 4]> plp06ad : 48 [ 3] phatst_a 1,006ae : 08 [ 3]> php ;save flags06af : 08 [ 3]> php06b0 : c901 [ 2]> cmp #1 ;test result> trap_ne06b2 : d0fe [ 3]> bne * ;failed not equal (non zero)>06b4 : 68 [ 4]> pla ;load status> cmp_flag 006b5 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne06b7 : d0fe [ 3]> bne * ;failed not equal (non zero)>06b9 : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 34---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_a 0,$ff> load_flag $ff06ba : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>06bc : 48 [ 3]> pha ;use stack to load status06bd : a900 [ 2]> lda #0 ;precharge accu06bf : 28 [ 4]> plp06c0 : 48 [ 3] phatst_a 0,$ff06c1 : 08 [ 3]> php ;save flags06c2 : 08 [ 3]> php06c3 : c900 [ 2]> cmp #0 ;test result> trap_ne06c5 : d0fe [ 3]> bne * ;failed not equal (non zero)>06c7 : 68 [ 4]> pla ;load status> cmp_flag $ff06c8 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits>> trap_ne06ca : d0fe [ 3]> bne * ;failed not equal (non zero)>06cc : 28 [ 4]> plp ;restore statusset_a $ff,0> load_flag 006cd : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>06cf : 48 [ 3]> pha ;use stack to load status06d0 : a9ff [ 2]> lda #$ff ;precharge accu06d2 : 28 [ 4]> plp06d3 : 48 [ 3] phatst_a $ff,006d4 : 08 [ 3]> php ;save flags06d5 : 08 [ 3]> php06d6 : c9ff [ 2]> cmp #$ff ;test result> trap_ne06d8 : d0fe [ 3]> bne * ;failed not equal (non zero)>06da : 68 [ 4]> pla ;load status> cmp_flag 006db : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne06dd : d0fe [ 3]> bne * ;failed not equal (non zero)>06df : 28 [ 4]> plp ;restore statusset_a 0,$ff ;pull> load_flag $ff06e0 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 35---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------06e2 : 48 [ 3]> pha ;use stack to load status06e3 : a900 [ 2]> lda #0 ;precharge accu06e5 : 28 [ 4]> plp06e6 : 68 [ 4] platst_a $ff,$ff-zero06e7 : 08 [ 3]> php ;save flags06e8 : 08 [ 3]> php06e9 : c9ff [ 2]> cmp #$ff ;test result> trap_ne06eb : d0fe [ 3]> bne * ;failed not equal (non zero)>06ed : 68 [ 4]> pla ;load status> cmp_flag $ff-zero06ee : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne06f0 : d0fe [ 3]> bne * ;failed not equal (non zero)>06f2 : 28 [ 4]> plp ;restore statusset_a $ff,0> load_flag 006f3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>06f5 : 48 [ 3]> pha ;use stack to load status06f6 : a9ff [ 2]> lda #$ff ;precharge accu06f8 : 28 [ 4]> plp06f9 : 68 [ 4] platst_a 0,zero06fa : 08 [ 3]> php ;save flags06fb : 08 [ 3]> php06fc : c900 [ 2]> cmp #0 ;test result> trap_ne06fe : d0fe [ 3]> bne * ;failed not equal (non zero)>0700 : 68 [ 4]> pla ;load status> cmp_flag zero0701 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0703 : d0fe [ 3]> bne * ;failed not equal (non zero)>0705 : 28 [ 4]> plp ;restore statusset_a $fe,$ff> load_flag $ff0706 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0708 : 48 [ 3]> pha ;use stack to load status0709 : a9fe [ 2]> lda #$fe ;precharge accu070b : 28 [ 4]> plp070c : 68 [ 4] plaAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 36---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------tst_a 1,$ff-zero-minus070d : 08 [ 3]> php ;save flags070e : 08 [ 3]> php070f : c901 [ 2]> cmp #1 ;test result> trap_ne0711 : d0fe [ 3]> bne * ;failed not equal (non zero)>0713 : 68 [ 4]> pla ;load status> cmp_flag $ff-zero-minus0714 : c97d [ 2]> cmp #($ff-zero-minus|fao)&m8 ;expected flags + always on bits>> trap_ne0716 : d0fe [ 3]> bne * ;failed not equal (non zero)>0718 : 28 [ 4]> plp ;restore statusset_a 0,0> load_flag 00719 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>071b : 48 [ 3]> pha ;use stack to load status071c : a900 [ 2]> lda #0 ;precharge accu071e : 28 [ 4]> plp071f : 68 [ 4] platst_a $ff,minus0720 : 08 [ 3]> php ;save flags0721 : 08 [ 3]> php0722 : c9ff [ 2]> cmp #$ff ;test result> trap_ne0724 : d0fe [ 3]> bne * ;failed not equal (non zero)>0726 : 68 [ 4]> pla ;load status> cmp_flag minus0727 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne0729 : d0fe [ 3]> bne * ;failed not equal (non zero)>072b : 28 [ 4]> plp ;restore statusset_a $ff,$ff> load_flag $ff072c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>072e : 48 [ 3]> pha ;use stack to load status072f : a9ff [ 2]> lda #$ff ;precharge accu0731 : 28 [ 4]> plp0732 : 68 [ 4] platst_a 0,$ff-minus0733 : 08 [ 3]> php ;save flags0734 : 08 [ 3]> php0735 : c900 [ 2]> cmp #0 ;test result> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 37---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0737 : d0fe [ 3]> bne * ;failed not equal (non zero)>0739 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus073a : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne073c : d0fe [ 3]> bne * ;failed not equal (non zero)>073e : 28 [ 4]> plp ;restore statusset_a $fe,0> load_flag 0073f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0741 : 48 [ 3]> pha ;use stack to load status0742 : a9fe [ 2]> lda #$fe ;precharge accu0744 : 28 [ 4]> plp0745 : 68 [ 4] platst_a 1,00746 : 08 [ 3]> php ;save flags0747 : 08 [ 3]> php0748 : c901 [ 2]> cmp #1 ;test result> trap_ne074a : d0fe [ 3]> bne * ;failed not equal (non zero)>074c : 68 [ 4]> pla ;load status> cmp_flag 0074d : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne074f : d0fe [ 3]> bne * ;failed not equal (non zero)>0751 : 28 [ 4]> plp ;restore status0752 : e055 [ 2] cpx #$55 ;x & y unchanged?trap_ne0754 : d0fe [ 3]> bne * ;failed not equal (non zero)0756 : c0aa [ 2] cpy #$aatrap_ne0758 : d0fe [ 3]> bne * ;failed not equal (non zero)next_test075a : ad0002 [ 4]> lda test_case ;previous test075d : c905 [ 2]> cmp #test_num> trap_ne ;test is out of sequence075f : d0fe [ 3]> bne * ;failed not equal (non zero)>0006 = >test_num = test_num + 10761 : a906 [ 2]> lda #test_num ;*** this tests' number0763 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each testAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 38---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------; partial pretest EOR #set_a $3c,0> load_flag 00766 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0768 : 48 [ 3]> pha ;use stack to load status0769 : a93c [ 2]> lda #$3c ;precharge accu076b : 28 [ 4]> plp076c : 49c3 [ 2] eor #$c3tst_a $ff,fn076e : 08 [ 3]> php ;save flags076f : 08 [ 3]> php0770 : c9ff [ 2]> cmp #$ff ;test result> trap_ne0772 : d0fe [ 3]> bne * ;failed not equal (non zero)>0774 : 68 [ 4]> pla ;load status> cmp_flag fn0775 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne0777 : d0fe [ 3]> bne * ;failed not equal (non zero)>0779 : 28 [ 4]> plp ;restore statusset_a $c3,0> load_flag 0077a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>077c : 48 [ 3]> pha ;use stack to load status077d : a9c3 [ 2]> lda #$c3 ;precharge accu077f : 28 [ 4]> plp0780 : 49c3 [ 2] eor #$c3tst_a 0,fz0782 : 08 [ 3]> php ;save flags0783 : 08 [ 3]> php0784 : c900 [ 2]> cmp #0 ;test result> trap_ne0786 : d0fe [ 3]> bne * ;failed not equal (non zero)>0788 : 68 [ 4]> pla ;load status> cmp_flag fz0789 : c932 [ 2]> cmp #(fz|fao)&m8 ;expected flags + always on bits>> trap_ne078b : d0fe [ 3]> bne * ;failed not equal (non zero)>078d : 28 [ 4]> plp ;restore statusnext_test078e : ad0002 [ 4]> lda test_case ;previous test0791 : c906 [ 2]> cmp #test_numAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 39---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> trap_ne ;test is out of sequence0793 : d0fe [ 3]> bne * ;failed not equal (non zero)>0007 = >test_num = test_num + 10795 : a907 [ 2]> lda #test_num ;*** this tests' number0797 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; PC modifying instructions except branches (NOP, JMP, JSR, RTS, BRK, RTI); testing NOP079a : a224 [ 2] ldx #$24079c : a042 [ 2] ldy #$42set_a $18,0> load_flag 0079e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>07a0 : 48 [ 3]> pha ;use stack to load status07a1 : a918 [ 2]> lda #$18 ;precharge accu07a3 : 28 [ 4]> plp07a4 : ea [ 2] noptst_a $18,007a5 : 08 [ 3]> php ;save flags07a6 : 08 [ 3]> php07a7 : c918 [ 2]> cmp #$18 ;test result> trap_ne07a9 : d0fe [ 3]> bne * ;failed not equal (non zero)>07ab : 68 [ 4]> pla ;load status> cmp_flag 007ac : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne07ae : d0fe [ 3]> bne * ;failed not equal (non zero)>07b0 : 28 [ 4]> plp ;restore status07b1 : e024 [ 2] cpx #$24trap_ne07b3 : d0fe [ 3]> bne * ;failed not equal (non zero)07b5 : c042 [ 2] cpy #$42trap_ne07b7 : d0fe [ 3]> bne * ;failed not equal (non zero)07b9 : a2db [ 2] ldx #$db07bb : a0bd [ 2] ldy #$bdset_a $e7,$ff> load_flag $ff07bd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>07bf : 48 [ 3]> pha ;use stack to load status07c0 : a9e7 [ 2]> lda #$e7 ;precharge accu07c2 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 40---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------07c3 : ea [ 2] noptst_a $e7,$ff07c4 : 08 [ 3]> php ;save flags07c5 : 08 [ 3]> php07c6 : c9e7 [ 2]> cmp #$e7 ;test result> trap_ne07c8 : d0fe [ 3]> bne * ;failed not equal (non zero)>07ca : 68 [ 4]> pla ;load status> cmp_flag $ff07cb : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits>> trap_ne07cd : d0fe [ 3]> bne * ;failed not equal (non zero)>07cf : 28 [ 4]> plp ;restore status07d0 : e0db [ 2] cpx #$dbtrap_ne07d2 : d0fe [ 3]> bne * ;failed not equal (non zero)07d4 : c0bd [ 2] cpy #$bdtrap_ne07d6 : d0fe [ 3]> bne * ;failed not equal (non zero)next_test07d8 : ad0002 [ 4]> lda test_case ;previous test07db : c907 [ 2]> cmp #test_num> trap_ne ;test is out of sequence07dd : d0fe [ 3]> bne * ;failed not equal (non zero)>0008 = >test_num = test_num + 107df : a908 [ 2]> lda #test_num ;*** this tests' number07e1 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; jump absoluteset_stat $0> load_flag $007e4 : a900 [ 2]> lda #$0 ;allow test to change I-flag (no mask)>07e6 : 48 [ 3]> pha ;use stack to load status07e7 : 28 [ 4]> plp07e8 : a946 [ 2] lda #'F'07ea : a241 [ 2] ldx #'A'07ec : a052 [ 2] ldy #'R' ;N=0, V=0, Z=0, C=007ee : 4c4e35 [ 3] jmp test_far07f1 : ea [ 2] nop07f2 : ea [ 2] noptrap_ne ;runover protection07f3 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 41---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------07f5 : e8 [ 2] inx07f6 : e8 [ 2] inx07f7 : far_rettrap_eq ;returned flags OK?07f7 : f0fe [ 3]> beq * ;failed equal (zero)trap_pl07f9 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)trap_cc07fb : 90fe [ 3]> bcc * ;failed carry cleartrap_vc07fd : 50fe [ 3]> bvc * ;failed overflow clear07ff : c9ec [ 2] cmp #('F'^$aa) ;returned registers OK?trap_ne0801 : d0fe [ 3]> bne * ;failed not equal (non zero)0803 : e042 [ 2] cpx #('A'+1)trap_ne0805 : d0fe [ 3]> bne * ;failed not equal (non zero)0807 : c04f [ 2] cpy #('R'-3)trap_ne0809 : d0fe [ 3]> bne * ;failed not equal (non zero)080b : ca [ 2] dex080c : c8 [ 2] iny080d : c8 [ 2] iny080e : c8 [ 2] iny080f : 49aa [ 2] eor #$aa ;N=0, V=1, Z=0, C=10811 : 4c1a08 [ 3] jmp test_near0814 : ea [ 2] nop0815 : ea [ 2] noptrap_ne ;runover protection0816 : d0fe [ 3]> bne * ;failed not equal (non zero)0818 : e8 [ 2] inx0819 : e8 [ 2] inx081a : test_neartrap_eq ;passed flags OK?081a : f0fe [ 3]> beq * ;failed equal (zero)trap_mi081c : 30fe [ 3]> bmi * ;failed minus (bit 7 set)trap_cc081e : 90fe [ 3]> bcc * ;failed carry cleartrap_vc0820 : 50fe [ 3]> bvc * ;failed overflow clear0822 : c946 [ 2] cmp #'F' ;passed registers OK?trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 42---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0824 : d0fe [ 3]> bne * ;failed not equal (non zero)0826 : e041 [ 2] cpx #'A'trap_ne0828 : d0fe [ 3]> bne * ;failed not equal (non zero)082a : c052 [ 2] cpy #'R'trap_ne082c : d0fe [ 3]> bne * ;failed not equal (non zero)next_test082e : ad0002 [ 4]> lda test_case ;previous test0831 : c908 [ 2]> cmp #test_num> trap_ne ;test is out of sequence0833 : d0fe [ 3]> bne * ;failed not equal (non zero)>0009 = >test_num = test_num + 10835 : a909 [ 2]> lda #test_num ;*** this tests' number0837 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; jump indirectset_stat 0> load_flag 0083a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>083c : 48 [ 3]> pha ;use stack to load status083d : 28 [ 4]> plp083e : a949 [ 2] lda #'I'0840 : a24e [ 2] ldx #'N'0842 : a044 [ 2] ldy #'D' ;N=0, V=0, Z=0, C=00844 : 6c7c35 [ 6] jmp (ptr_tst_ind)0847 : ea [ 2] noptrap_ne ;runover protection0848 : d0fe [ 3]> bne * ;failed not equal (non zero)084a : 88 [ 2] dey084b : 88 [ 2] dey084c : ind_ret084c : 08 [ 3] php ;either SP or Y count will fail, if we do not hit084d : 88 [ 2] dey084e : 88 [ 2] dey084f : 88 [ 2] dey0850 : 28 [ 4] plptrap_eq ;returned flags OK?0851 : f0fe [ 3]> beq * ;failed equal (zero)trap_pl0853 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)trap_cc0855 : 90fe [ 3]> bcc * ;failed carry clearAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 43---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trap_vc0857 : 50fe [ 3]> bvc * ;failed overflow clear0859 : c9e3 [ 2] cmp #('I'^$aa) ;returned registers OK?trap_ne085b : d0fe [ 3]> bne * ;failed not equal (non zero)085d : e04f [ 2] cpx #('N'+1)trap_ne085f : d0fe [ 3]> bne * ;failed not equal (non zero)0861 : c03e [ 2] cpy #('D'-6)trap_ne0863 : d0fe [ 3]> bne * ;failed not equal (non zero)0865 : ba [ 2] tsx ;SP check0866 : e0ff [ 2] cpx #$fftrap_ne0868 : d0fe [ 3]> bne * ;failed not equal (non zero)next_test086a : ad0002 [ 4]> lda test_case ;previous test086d : c909 [ 2]> cmp #test_num> trap_ne ;test is out of sequence086f : d0fe [ 3]> bne * ;failed not equal (non zero)>000a = >test_num = test_num + 10871 : a90a [ 2]> lda #test_num ;*** this tests' number0873 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; jump subroutine & return from subroutineset_stat 0> load_flag 00876 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0878 : 48 [ 3]> pha ;use stack to load status0879 : 28 [ 4]> plp087a : a94a [ 2] lda #'J'087c : a253 [ 2] ldx #'S'087e : a052 [ 2] ldy #'R' ;N=0, V=0, Z=0, C=00880 : 20b835 [ 6] jsr test_jsr0882 = jsr_ret = *-1 ;last address of jsr = return address0883 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit0884 : 88 [ 2] dey0885 : 88 [ 2] dey0886 : 88 [ 2] dey0887 : 28 [ 4] plptrap_eq ;returned flags OK?0888 : f0fe [ 3]> beq * ;failed equal (zero)trap_pl088a : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 44---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trap_cc088c : 90fe [ 3]> bcc * ;failed carry cleartrap_vc088e : 50fe [ 3]> bvc * ;failed overflow clear0890 : c9e0 [ 2] cmp #('J'^$aa) ;returned registers OK?trap_ne0892 : d0fe [ 3]> bne * ;failed not equal (non zero)0894 : e054 [ 2] cpx #('S'+1)trap_ne0896 : d0fe [ 3]> bne * ;failed not equal (non zero)0898 : c04c [ 2] cpy #('R'-6)trap_ne089a : d0fe [ 3]> bne * ;failed not equal (non zero)089c : ba [ 2] tsx ;sp?089d : e0ff [ 2] cpx #$fftrap_ne089f : d0fe [ 3]> bne * ;failed not equal (non zero)next_test08a1 : ad0002 [ 4]> lda test_case ;previous test08a4 : c90a [ 2]> cmp #test_num> trap_ne ;test is out of sequence08a6 : d0fe [ 3]> bne * ;failed not equal (non zero)>000b = >test_num = test_num + 108a8 : a90b [ 2]> lda #test_num ;*** this tests' number08aa : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; break & return from interruptif ROM_vectors = 1set_stat 0> load_flag 008ad : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>08af : 48 [ 3]> pha ;use stack to load status08b0 : 28 [ 4]> plp08b1 : a942 [ 2] lda #'B'08b3 : a252 [ 2] ldx #'R'08b5 : a04b [ 2] ldy #'K' ;N=0, V=0, Z=0, C=008b7 : 00 [ 7] brkelselda #hi brk_ret ;emulated breakphalda #lo brk_retphalda #fao ;set break & unused on stackAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 45---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------phaset_stat intdislda #'B'ldx #'R'ldy #'K' ;N=0, V=0, Z=0, C=0jmp irq_trapendif08b8 : 88 [ 2] dey ;should not be executed08b9 : brk_ret ;address of break return08b9 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit08ba : 88 [ 2] dey08bb : 88 [ 2] dey08bc : 88 [ 2] dey08bd : c9e8 [ 2] cmp #('B'^$aa) ;returned registers OK?trap_ne08bf : d0fe [ 3]> bne * ;failed not equal (non zero)08c1 : e053 [ 2] cpx #('R'+1)trap_ne08c3 : d0fe [ 3]> bne * ;failed not equal (non zero)08c5 : c045 [ 2] cpy #('K'-6)trap_ne08c7 : d0fe [ 3]> bne * ;failed not equal (non zero)08c9 : 68 [ 4] pla ;returned flags OK (unchanged)?cmp_flag 008ca : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bitstrap_ne08cc : d0fe [ 3]> bne * ;failed not equal (non zero)08ce : ba [ 2] tsx ;sp?08cf : e0ff [ 2] cpx #$fftrap_ne08d1 : d0fe [ 3]> bne * ;failed not equal (non zero)next_test08d3 : ad0002 [ 4]> lda test_case ;previous test08d6 : c90b [ 2]> cmp #test_num> trap_ne ;test is out of sequence08d8 : d0fe [ 3]> bne * ;failed not equal (non zero)>000c = >test_num = test_num + 108da : a90c [ 2]> lda #test_num ;*** this tests' number08dc : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; test set and clear flags CLC CLI CLD CLV SEC SEI SEDset_stat $ff> load_flag $ff08df : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>08e1 : 48 [ 3]> pha ;use stack to load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 46---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------08e2 : 28 [ 4]> plp08e3 : 18 [ 2] clctst_stat $ff-carry08e4 : 08 [ 3]> php ;save status08e5 : 08 [ 3]> php ;use stack to retrieve status08e6 : 68 [ 4]> pla> cmp_flag $ff-carry08e7 : c9fe [ 2]> cmp #($ff-carry|fao)&m8 ;expected flags + always on bits>> trap_ne08e9 : d0fe [ 3]> bne * ;failed not equal (non zero)>08eb : 28 [ 4]> plp ;restore status08ec : 38 [ 2] sectst_stat $ff08ed : 08 [ 3]> php ;save status08ee : 08 [ 3]> php ;use stack to retrieve status08ef : 68 [ 4]> pla> cmp_flag $ff08f0 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits>> trap_ne08f2 : d0fe [ 3]> bne * ;failed not equal (non zero)>08f4 : 28 [ 4]> plp ;restore statusif I_flag = 308f5 : 58 [ 2] clitst_stat $ff-intdis08f6 : 08 [ 3]> php ;save status08f7 : 08 [ 3]> php ;use stack to retrieve status08f8 : 68 [ 4]> pla> cmp_flag $ff-intdis08f9 : c9fb [ 2]> cmp #($ff-intdis|fao)&m8 ;expected flags + always on bits>> trap_ne08fb : d0fe [ 3]> bne * ;failed not equal (non zero)>08fd : 28 [ 4]> plp ;restore status08fe : 78 [ 2] seitst_stat $ff08ff : 08 [ 3]> php ;save status0900 : 08 [ 3]> php ;use stack to retrieve status0901 : 68 [ 4]> pla> cmp_flag $ff0902 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits>> trap_ne0904 : d0fe [ 3]> bne * ;failed not equal (non zero)>0906 : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 47---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------endif0907 : d8 [ 2] cldtst_stat $ff-decmode0908 : 08 [ 3]> php ;save status0909 : 08 [ 3]> php ;use stack to retrieve status090a : 68 [ 4]> pla> cmp_flag $ff-decmode090b : c9f7 [ 2]> cmp #($ff-decmode|fao)&m8 ;expected flags + always on bits>> trap_ne090d : d0fe [ 3]> bne * ;failed not equal (non zero)>090f : 28 [ 4]> plp ;restore status0910 : f8 [ 2] sedtst_stat $ff0911 : 08 [ 3]> php ;save status0912 : 08 [ 3]> php ;use stack to retrieve status0913 : 68 [ 4]> pla> cmp_flag $ff0914 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits>> trap_ne0916 : d0fe [ 3]> bne * ;failed not equal (non zero)>0918 : 28 [ 4]> plp ;restore status0919 : b8 [ 2] clvtst_stat $ff-overfl091a : 08 [ 3]> php ;save status091b : 08 [ 3]> php ;use stack to retrieve status091c : 68 [ 4]> pla> cmp_flag $ff-overfl091d : c9bf [ 2]> cmp #($ff-overfl|fao)&m8 ;expected flags + always on bits>> trap_ne091f : d0fe [ 3]> bne * ;failed not equal (non zero)>0921 : 28 [ 4]> plp ;restore statusset_stat 0> load_flag 00922 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0924 : 48 [ 3]> pha ;use stack to load status0925 : 28 [ 4]> plptst_stat 00926 : 08 [ 3]> php ;save status0927 : 08 [ 3]> php ;use stack to retrieve status0928 : 68 [ 4]> pla> cmp_flag 00929 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 48---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------092b : d0fe [ 3]> bne * ;failed not equal (non zero)>092d : 28 [ 4]> plp ;restore status092e : 38 [ 2] sectst_stat carry092f : 08 [ 3]> php ;save status0930 : 08 [ 3]> php ;use stack to retrieve status0931 : 68 [ 4]> pla> cmp_flag carry0932 : c931 [ 2]> cmp #(carry|fao)&m8 ;expected flags + always on bits>> trap_ne0934 : d0fe [ 3]> bne * ;failed not equal (non zero)>0936 : 28 [ 4]> plp ;restore status0937 : 18 [ 2] clctst_stat 00938 : 08 [ 3]> php ;save status0939 : 08 [ 3]> php ;use stack to retrieve status093a : 68 [ 4]> pla> cmp_flag 0093b : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bits>> trap_ne093d : d0fe [ 3]> bne * ;failed not equal (non zero)>093f : 28 [ 4]> plp ;restore statusif I_flag = 30940 : 78 [ 2] seitst_stat intdis0941 : 08 [ 3]> php ;save status0942 : 08 [ 3]> php ;use stack to retrieve status0943 : 68 [ 4]> pla> cmp_flag intdis0944 : c934 [ 2]> cmp #(intdis|fao)&m8 ;expected flags + always on bits>> trap_ne0946 : d0fe [ 3]> bne * ;failed not equal (non zero)>0948 : 28 [ 4]> plp ;restore status0949 : 58 [ 2] clitst_stat 0094a : 08 [ 3]> php ;save status094b : 08 [ 3]> php ;use stack to retrieve status094c : 68 [ 4]> pla> cmp_flag 0094d : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne094f : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 49---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0951 : 28 [ 4]> plp ;restore statusendif0952 : f8 [ 2] sedtst_stat decmode0953 : 08 [ 3]> php ;save status0954 : 08 [ 3]> php ;use stack to retrieve status0955 : 68 [ 4]> pla> cmp_flag decmode0956 : c938 [ 2]> cmp #(decmode|fao)&m8 ;expected flags + always on bits>> trap_ne0958 : d0fe [ 3]> bne * ;failed not equal (non zero)>095a : 28 [ 4]> plp ;restore status095b : d8 [ 2] cldtst_stat 0095c : 08 [ 3]> php ;save status095d : 08 [ 3]> php ;use stack to retrieve status095e : 68 [ 4]> pla> cmp_flag 0095f : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bits>> trap_ne0961 : d0fe [ 3]> bne * ;failed not equal (non zero)>0963 : 28 [ 4]> plp ;restore statusset_stat overfl> load_flag overfl0964 : a940 [ 2]> lda #overfl ;allow test to change I-flag (no mask)>0966 : 48 [ 3]> pha ;use stack to load status0967 : 28 [ 4]> plptst_stat overfl0968 : 08 [ 3]> php ;save status0969 : 08 [ 3]> php ;use stack to retrieve status096a : 68 [ 4]> pla> cmp_flag overfl096b : c970 [ 2]> cmp #(overfl|fao)&m8 ;expected flags + always on bits>> trap_ne096d : d0fe [ 3]> bne * ;failed not equal (non zero)>096f : 28 [ 4]> plp ;restore status0970 : b8 [ 2] clvtst_stat 00971 : 08 [ 3]> php ;save status0972 : 08 [ 3]> php ;use stack to retrieve status0973 : 68 [ 4]> pla> cmp_flag 00974 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 50---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->> trap_ne0976 : d0fe [ 3]> bne * ;failed not equal (non zero)>0978 : 28 [ 4]> plp ;restore statusnext_test0979 : ad0002 [ 4]> lda test_case ;previous test097c : c90c [ 2]> cmp #test_num> trap_ne ;test is out of sequence097e : d0fe [ 3]> bne * ;failed not equal (non zero)>000d = >test_num = test_num + 10980 : a90d [ 2]> lda #test_num ;*** this tests' number0982 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; testing index register increment/decrement and transfer; INX INY DEX DEY TAX TXA TAY TYA0985 : a2fe [ 2] ldx #$feset_stat $ff> load_flag $ff0987 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0989 : 48 [ 3]> pha ;use stack to load status098a : 28 [ 4]> plp098b : e8 [ 2] inx ;fftst_x $ff,$ff-zero098c : 08 [ 3]> php ;save flags098d : 08 [ 3]> php098e : e0ff [ 2]> cpx #$ff ;test result> trap_ne0990 : d0fe [ 3]> bne * ;failed not equal (non zero)>0992 : 68 [ 4]> pla ;load status> cmp_flag $ff-zero0993 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0995 : d0fe [ 3]> bne * ;failed not equal (non zero)>0997 : 28 [ 4]> plp ;restore status0998 : e8 [ 2] inx ;00tst_x 0,$ff-minus0999 : 08 [ 3]> php ;save flags099a : 08 [ 3]> php099b : e000 [ 2]> cpx #0 ;test result> trap_ne099d : d0fe [ 3]> bne * ;failed not equal (non zero)>099f : 68 [ 4]> pla ;load status> cmp_flag $ff-minus09a0 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 51---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->> trap_ne09a2 : d0fe [ 3]> bne * ;failed not equal (non zero)>09a4 : 28 [ 4]> plp ;restore status09a5 : e8 [ 2] inx ;01tst_x 1,$ff-minus-zero09a6 : 08 [ 3]> php ;save flags09a7 : 08 [ 3]> php09a8 : e001 [ 2]> cpx #1 ;test result> trap_ne09aa : d0fe [ 3]> bne * ;failed not equal (non zero)>09ac : 68 [ 4]> pla ;load status> cmp_flag $ff-minus-zero09ad : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits>> trap_ne09af : d0fe [ 3]> bne * ;failed not equal (non zero)>09b1 : 28 [ 4]> plp ;restore status09b2 : ca [ 2] dex ;00tst_x 0,$ff-minus09b3 : 08 [ 3]> php ;save flags09b4 : 08 [ 3]> php09b5 : e000 [ 2]> cpx #0 ;test result> trap_ne09b7 : d0fe [ 3]> bne * ;failed not equal (non zero)>09b9 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus09ba : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne09bc : d0fe [ 3]> bne * ;failed not equal (non zero)>09be : 28 [ 4]> plp ;restore status09bf : ca [ 2] dex ;fftst_x $ff,$ff-zero09c0 : 08 [ 3]> php ;save flags09c1 : 08 [ 3]> php09c2 : e0ff [ 2]> cpx #$ff ;test result> trap_ne09c4 : d0fe [ 3]> bne * ;failed not equal (non zero)>09c6 : 68 [ 4]> pla ;load status> cmp_flag $ff-zero09c7 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne09c9 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 52---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------09cb : 28 [ 4]> plp ;restore status09cc : ca [ 2] dex ;feset_stat 0> load_flag 009cd : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>09cf : 48 [ 3]> pha ;use stack to load status09d0 : 28 [ 4]> plp09d1 : e8 [ 2] inx ;fftst_x $ff,minus09d2 : 08 [ 3]> php ;save flags09d3 : 08 [ 3]> php09d4 : e0ff [ 2]> cpx #$ff ;test result> trap_ne09d6 : d0fe [ 3]> bne * ;failed not equal (non zero)>09d8 : 68 [ 4]> pla ;load status> cmp_flag minus09d9 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne09db : d0fe [ 3]> bne * ;failed not equal (non zero)>09dd : 28 [ 4]> plp ;restore status09de : e8 [ 2] inx ;00tst_x 0,zero09df : 08 [ 3]> php ;save flags09e0 : 08 [ 3]> php09e1 : e000 [ 2]> cpx #0 ;test result> trap_ne09e3 : d0fe [ 3]> bne * ;failed not equal (non zero)>09e5 : 68 [ 4]> pla ;load status> cmp_flag zero09e6 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne09e8 : d0fe [ 3]> bne * ;failed not equal (non zero)>09ea : 28 [ 4]> plp ;restore status09eb : e8 [ 2] inx ;01tst_x 1,009ec : 08 [ 3]> php ;save flags09ed : 08 [ 3]> php09ee : e001 [ 2]> cpx #1 ;test result> trap_ne09f0 : d0fe [ 3]> bne * ;failed not equal (non zero)>09f2 : 68 [ 4]> pla ;load status> cmp_flag 009f3 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 53---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->> trap_ne09f5 : d0fe [ 3]> bne * ;failed not equal (non zero)>09f7 : 28 [ 4]> plp ;restore status09f8 : ca [ 2] dex ;00tst_x 0,zero09f9 : 08 [ 3]> php ;save flags09fa : 08 [ 3]> php09fb : e000 [ 2]> cpx #0 ;test result> trap_ne09fd : d0fe [ 3]> bne * ;failed not equal (non zero)>09ff : 68 [ 4]> pla ;load status> cmp_flag zero0a00 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0a02 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a04 : 28 [ 4]> plp ;restore status0a05 : ca [ 2] dex ;fftst_x $ff,minus0a06 : 08 [ 3]> php ;save flags0a07 : 08 [ 3]> php0a08 : e0ff [ 2]> cpx #$ff ;test result> trap_ne0a0a : d0fe [ 3]> bne * ;failed not equal (non zero)>0a0c : 68 [ 4]> pla ;load status> cmp_flag minus0a0d : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne0a0f : d0fe [ 3]> bne * ;failed not equal (non zero)>0a11 : 28 [ 4]> plp ;restore status0a12 : a0fe [ 2] ldy #$feset_stat $ff> load_flag $ff0a14 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0a16 : 48 [ 3]> pha ;use stack to load status0a17 : 28 [ 4]> plp0a18 : c8 [ 2] iny ;fftst_y $ff,$ff-zero0a19 : 08 [ 3]> php ;save flags0a1a : 08 [ 3]> php0a1b : c0ff [ 2]> cpy #$ff ;test result> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 54---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0a1d : d0fe [ 3]> bne * ;failed not equal (non zero)>0a1f : 68 [ 4]> pla ;load status> cmp_flag $ff-zero0a20 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0a22 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a24 : 28 [ 4]> plp ;restore status0a25 : c8 [ 2] iny ;00tst_y 0,$ff-minus0a26 : 08 [ 3]> php ;save flags0a27 : 08 [ 3]> php0a28 : c000 [ 2]> cpy #0 ;test result> trap_ne0a2a : d0fe [ 3]> bne * ;failed not equal (non zero)>0a2c : 68 [ 4]> pla ;load status> cmp_flag $ff-minus0a2d : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne0a2f : d0fe [ 3]> bne * ;failed not equal (non zero)>0a31 : 28 [ 4]> plp ;restore status0a32 : c8 [ 2] iny ;01tst_y 1,$ff-minus-zero0a33 : 08 [ 3]> php ;save flags0a34 : 08 [ 3]> php0a35 : c001 [ 2]> cpy #1 ;test result> trap_ne0a37 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a39 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus-zero0a3a : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0a3c : d0fe [ 3]> bne * ;failed not equal (non zero)>0a3e : 28 [ 4]> plp ;restore status0a3f : 88 [ 2] dey ;00tst_y 0,$ff-minus0a40 : 08 [ 3]> php ;save flags0a41 : 08 [ 3]> php0a42 : c000 [ 2]> cpy #0 ;test result> trap_ne0a44 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a46 : 68 [ 4]> pla ;load status> cmp_flag $ff-minusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 55---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0a47 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne0a49 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a4b : 28 [ 4]> plp ;restore status0a4c : 88 [ 2] dey ;fftst_y $ff,$ff-zero0a4d : 08 [ 3]> php ;save flags0a4e : 08 [ 3]> php0a4f : c0ff [ 2]> cpy #$ff ;test result> trap_ne0a51 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a53 : 68 [ 4]> pla ;load status> cmp_flag $ff-zero0a54 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0a56 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a58 : 28 [ 4]> plp ;restore status0a59 : 88 [ 2] dey ;feset_stat 0> load_flag 00a5a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0a5c : 48 [ 3]> pha ;use stack to load status0a5d : 28 [ 4]> plp0a5e : c8 [ 2] iny ;fftst_y $ff,0+minus0a5f : 08 [ 3]> php ;save flags0a60 : 08 [ 3]> php0a61 : c0ff [ 2]> cpy #$ff ;test result> trap_ne0a63 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a65 : 68 [ 4]> pla ;load status> cmp_flag 0+minus0a66 : c9b0 [ 2]> cmp #(0+minus|fao)&m8 ;expected flags + always on bits>> trap_ne0a68 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a6a : 28 [ 4]> plp ;restore status0a6b : c8 [ 2] iny ;00tst_y 0,zero0a6c : 08 [ 3]> php ;save flags0a6d : 08 [ 3]> php0a6e : c000 [ 2]> cpy #0 ;test result> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 56---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0a70 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a72 : 68 [ 4]> pla ;load status> cmp_flag zero0a73 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0a75 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a77 : 28 [ 4]> plp ;restore status0a78 : c8 [ 2] iny ;01tst_y 1,00a79 : 08 [ 3]> php ;save flags0a7a : 08 [ 3]> php0a7b : c001 [ 2]> cpy #1 ;test result> trap_ne0a7d : d0fe [ 3]> bne * ;failed not equal (non zero)>0a7f : 68 [ 4]> pla ;load status> cmp_flag 00a80 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne0a82 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a84 : 28 [ 4]> plp ;restore status0a85 : 88 [ 2] dey ;00tst_y 0,zero0a86 : 08 [ 3]> php ;save flags0a87 : 08 [ 3]> php0a88 : c000 [ 2]> cpy #0 ;test result> trap_ne0a8a : d0fe [ 3]> bne * ;failed not equal (non zero)>0a8c : 68 [ 4]> pla ;load status> cmp_flag zero0a8d : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0a8f : d0fe [ 3]> bne * ;failed not equal (non zero)>0a91 : 28 [ 4]> plp ;restore status0a92 : 88 [ 2] dey ;fftst_y $ff,minus0a93 : 08 [ 3]> php ;save flags0a94 : 08 [ 3]> php0a95 : c0ff [ 2]> cpy #$ff ;test result> trap_ne0a97 : d0fe [ 3]> bne * ;failed not equal (non zero)>0a99 : 68 [ 4]> pla ;load status> cmp_flag minusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 57---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0a9a : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne0a9c : d0fe [ 3]> bne * ;failed not equal (non zero)>0a9e : 28 [ 4]> plp ;restore status0a9f : a2ff [ 2] ldx #$ffset_stat $ff> load_flag $ff0aa1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0aa3 : 48 [ 3]> pha ;use stack to load status0aa4 : 28 [ 4]> plp0aa5 : 8a [ 2] txatst_a $ff,$ff-zero0aa6 : 08 [ 3]> php ;save flags0aa7 : 08 [ 3]> php0aa8 : c9ff [ 2]> cmp #$ff ;test result> trap_ne0aaa : d0fe [ 3]> bne * ;failed not equal (non zero)>0aac : 68 [ 4]> pla ;load status> cmp_flag $ff-zero0aad : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0aaf : d0fe [ 3]> bne * ;failed not equal (non zero)>0ab1 : 28 [ 4]> plp ;restore status0ab2 : 08 [ 3] php0ab3 : e8 [ 2] inx ;000ab4 : 28 [ 4] plp0ab5 : 8a [ 2] txatst_a 0,$ff-minus0ab6 : 08 [ 3]> php ;save flags0ab7 : 08 [ 3]> php0ab8 : c900 [ 2]> cmp #0 ;test result> trap_ne0aba : d0fe [ 3]> bne * ;failed not equal (non zero)>0abc : 68 [ 4]> pla ;load status> cmp_flag $ff-minus0abd : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne0abf : d0fe [ 3]> bne * ;failed not equal (non zero)>0ac1 : 28 [ 4]> plp ;restore status0ac2 : 08 [ 3] php0ac3 : e8 [ 2] inx ;01AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 58---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0ac4 : 28 [ 4] plp0ac5 : 8a [ 2] txatst_a 1,$ff-minus-zero0ac6 : 08 [ 3]> php ;save flags0ac7 : 08 [ 3]> php0ac8 : c901 [ 2]> cmp #1 ;test result> trap_ne0aca : d0fe [ 3]> bne * ;failed not equal (non zero)>0acc : 68 [ 4]> pla ;load status> cmp_flag $ff-minus-zero0acd : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0acf : d0fe [ 3]> bne * ;failed not equal (non zero)>0ad1 : 28 [ 4]> plp ;restore statusset_stat 0> load_flag 00ad2 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0ad4 : 48 [ 3]> pha ;use stack to load status0ad5 : 28 [ 4]> plp0ad6 : 8a [ 2] txatst_a 1,00ad7 : 08 [ 3]> php ;save flags0ad8 : 08 [ 3]> php0ad9 : c901 [ 2]> cmp #1 ;test result> trap_ne0adb : d0fe [ 3]> bne * ;failed not equal (non zero)>0add : 68 [ 4]> pla ;load status> cmp_flag 00ade : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne0ae0 : d0fe [ 3]> bne * ;failed not equal (non zero)>0ae2 : 28 [ 4]> plp ;restore status0ae3 : 08 [ 3] php0ae4 : ca [ 2] dex ;000ae5 : 28 [ 4] plp0ae6 : 8a [ 2] txatst_a 0,zero0ae7 : 08 [ 3]> php ;save flags0ae8 : 08 [ 3]> php0ae9 : c900 [ 2]> cmp #0 ;test result> trap_ne0aeb : d0fe [ 3]> bne * ;failed not equal (non zero)>0aed : 68 [ 4]> pla ;load status> cmp_flag zeroAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 59---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0aee : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0af0 : d0fe [ 3]> bne * ;failed not equal (non zero)>0af2 : 28 [ 4]> plp ;restore status0af3 : 08 [ 3] php0af4 : ca [ 2] dex ;ff0af5 : 28 [ 4] plp0af6 : 8a [ 2] txatst_a $ff,minus0af7 : 08 [ 3]> php ;save flags0af8 : 08 [ 3]> php0af9 : c9ff [ 2]> cmp #$ff ;test result> trap_ne0afb : d0fe [ 3]> bne * ;failed not equal (non zero)>0afd : 68 [ 4]> pla ;load status> cmp_flag minus0afe : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne0b00 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b02 : 28 [ 4]> plp ;restore status0b03 : a0ff [ 2] ldy #$ffset_stat $ff> load_flag $ff0b05 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0b07 : 48 [ 3]> pha ;use stack to load status0b08 : 28 [ 4]> plp0b09 : 98 [ 2] tyatst_a $ff,$ff-zero0b0a : 08 [ 3]> php ;save flags0b0b : 08 [ 3]> php0b0c : c9ff [ 2]> cmp #$ff ;test result> trap_ne0b0e : d0fe [ 3]> bne * ;failed not equal (non zero)>0b10 : 68 [ 4]> pla ;load status> cmp_flag $ff-zero0b11 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0b13 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b15 : 28 [ 4]> plp ;restore status0b16 : 08 [ 3] php0b17 : c8 [ 2] iny ;00AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 60---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0b18 : 28 [ 4] plp0b19 : 98 [ 2] tyatst_a 0,$ff-minus0b1a : 08 [ 3]> php ;save flags0b1b : 08 [ 3]> php0b1c : c900 [ 2]> cmp #0 ;test result> trap_ne0b1e : d0fe [ 3]> bne * ;failed not equal (non zero)>0b20 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus0b21 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne0b23 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b25 : 28 [ 4]> plp ;restore status0b26 : 08 [ 3] php0b27 : c8 [ 2] iny ;010b28 : 28 [ 4] plp0b29 : 98 [ 2] tyatst_a 1,$ff-minus-zero0b2a : 08 [ 3]> php ;save flags0b2b : 08 [ 3]> php0b2c : c901 [ 2]> cmp #1 ;test result> trap_ne0b2e : d0fe [ 3]> bne * ;failed not equal (non zero)>0b30 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus-zero0b31 : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0b33 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b35 : 28 [ 4]> plp ;restore statusset_stat 0> load_flag 00b36 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0b38 : 48 [ 3]> pha ;use stack to load status0b39 : 28 [ 4]> plp0b3a : 98 [ 2] tyatst_a 1,00b3b : 08 [ 3]> php ;save flags0b3c : 08 [ 3]> php0b3d : c901 [ 2]> cmp #1 ;test result> trap_ne0b3f : d0fe [ 3]> bne * ;failed not equal (non zero)>0b41 : 68 [ 4]> pla ;load status> cmp_flag 0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 61---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0b42 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne0b44 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b46 : 28 [ 4]> plp ;restore status0b47 : 08 [ 3] php0b48 : 88 [ 2] dey ;000b49 : 28 [ 4] plp0b4a : 98 [ 2] tyatst_a 0,zero0b4b : 08 [ 3]> php ;save flags0b4c : 08 [ 3]> php0b4d : c900 [ 2]> cmp #0 ;test result> trap_ne0b4f : d0fe [ 3]> bne * ;failed not equal (non zero)>0b51 : 68 [ 4]> pla ;load status> cmp_flag zero0b52 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0b54 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b56 : 28 [ 4]> plp ;restore status0b57 : 08 [ 3] php0b58 : 88 [ 2] dey ;ff0b59 : 28 [ 4] plp0b5a : 98 [ 2] tyatst_a $ff,minus0b5b : 08 [ 3]> php ;save flags0b5c : 08 [ 3]> php0b5d : c9ff [ 2]> cmp #$ff ;test result> trap_ne0b5f : d0fe [ 3]> bne * ;failed not equal (non zero)>0b61 : 68 [ 4]> pla ;load status> cmp_flag minus0b62 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne0b64 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b66 : 28 [ 4]> plp ;restore statusload_flag $ff0b67 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)0b69 : 48 [ 3] pha0b6a : a2ff [ 2] ldx #$ff ;ff0b6c : 8a [ 2] txa0b6d : 28 [ 4] plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 62---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0b6e : a8 [ 2] taytst_y $ff,$ff-zero0b6f : 08 [ 3]> php ;save flags0b70 : 08 [ 3]> php0b71 : c0ff [ 2]> cpy #$ff ;test result> trap_ne0b73 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b75 : 68 [ 4]> pla ;load status> cmp_flag $ff-zero0b76 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0b78 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b7a : 28 [ 4]> plp ;restore status0b7b : 08 [ 3] php0b7c : e8 [ 2] inx ;000b7d : 8a [ 2] txa0b7e : 28 [ 4] plp0b7f : a8 [ 2] taytst_y 0,$ff-minus0b80 : 08 [ 3]> php ;save flags0b81 : 08 [ 3]> php0b82 : c000 [ 2]> cpy #0 ;test result> trap_ne0b84 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b86 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus0b87 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne0b89 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b8b : 28 [ 4]> plp ;restore status0b8c : 08 [ 3] php0b8d : e8 [ 2] inx ;010b8e : 8a [ 2] txa0b8f : 28 [ 4] plp0b90 : a8 [ 2] taytst_y 1,$ff-minus-zero0b91 : 08 [ 3]> php ;save flags0b92 : 08 [ 3]> php0b93 : c001 [ 2]> cpy #1 ;test result> trap_ne0b95 : d0fe [ 3]> bne * ;failed not equal (non zero)>0b97 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus-zero0b98 : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits>> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 63---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0b9a : d0fe [ 3]> bne * ;failed not equal (non zero)>0b9c : 28 [ 4]> plp ;restore statusload_flag 00b9d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)0b9f : 48 [ 3] pha0ba0 : a900 [ 2] lda #00ba2 : 8a [ 2] txa0ba3 : 28 [ 4] plp0ba4 : a8 [ 2] taytst_y 1,00ba5 : 08 [ 3]> php ;save flags0ba6 : 08 [ 3]> php0ba7 : c001 [ 2]> cpy #1 ;test result> trap_ne0ba9 : d0fe [ 3]> bne * ;failed not equal (non zero)>0bab : 68 [ 4]> pla ;load status> cmp_flag 00bac : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne0bae : d0fe [ 3]> bne * ;failed not equal (non zero)>0bb0 : 28 [ 4]> plp ;restore status0bb1 : 08 [ 3] php0bb2 : ca [ 2] dex ;000bb3 : 8a [ 2] txa0bb4 : 28 [ 4] plp0bb5 : a8 [ 2] taytst_y 0,zero0bb6 : 08 [ 3]> php ;save flags0bb7 : 08 [ 3]> php0bb8 : c000 [ 2]> cpy #0 ;test result> trap_ne0bba : d0fe [ 3]> bne * ;failed not equal (non zero)>0bbc : 68 [ 4]> pla ;load status> cmp_flag zero0bbd : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0bbf : d0fe [ 3]> bne * ;failed not equal (non zero)>0bc1 : 28 [ 4]> plp ;restore status0bc2 : 08 [ 3] php0bc3 : ca [ 2] dex ;ff0bc4 : 8a [ 2] txa0bc5 : 28 [ 4] plp0bc6 : a8 [ 2] taytst_y $ff,minusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 64---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0bc7 : 08 [ 3]> php ;save flags0bc8 : 08 [ 3]> php0bc9 : c0ff [ 2]> cpy #$ff ;test result> trap_ne0bcb : d0fe [ 3]> bne * ;failed not equal (non zero)>0bcd : 68 [ 4]> pla ;load status> cmp_flag minus0bce : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne0bd0 : d0fe [ 3]> bne * ;failed not equal (non zero)>0bd2 : 28 [ 4]> plp ;restore statusload_flag $ff0bd3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)0bd5 : 48 [ 3] pha0bd6 : a0ff [ 2] ldy #$ff ;ff0bd8 : 98 [ 2] tya0bd9 : 28 [ 4] plp0bda : aa [ 2] taxtst_x $ff,$ff-zero0bdb : 08 [ 3]> php ;save flags0bdc : 08 [ 3]> php0bdd : e0ff [ 2]> cpx #$ff ;test result> trap_ne0bdf : d0fe [ 3]> bne * ;failed not equal (non zero)>0be1 : 68 [ 4]> pla ;load status> cmp_flag $ff-zero0be2 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0be4 : d0fe [ 3]> bne * ;failed not equal (non zero)>0be6 : 28 [ 4]> plp ;restore status0be7 : 08 [ 3] php0be8 : c8 [ 2] iny ;000be9 : 98 [ 2] tya0bea : 28 [ 4] plp0beb : aa [ 2] taxtst_x 0,$ff-minus0bec : 08 [ 3]> php ;save flags0bed : 08 [ 3]> php0bee : e000 [ 2]> cpx #0 ;test result> trap_ne0bf0 : d0fe [ 3]> bne * ;failed not equal (non zero)>0bf2 : 68 [ 4]> pla ;load status> cmp_flag $ff-minusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 65---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0bf3 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits>> trap_ne0bf5 : d0fe [ 3]> bne * ;failed not equal (non zero)>0bf7 : 28 [ 4]> plp ;restore status0bf8 : 08 [ 3] php0bf9 : c8 [ 2] iny ;010bfa : 98 [ 2] tya0bfb : 28 [ 4] plp0bfc : aa [ 2] taxtst_x 1,$ff-minus-zero0bfd : 08 [ 3]> php ;save flags0bfe : 08 [ 3]> php0bff : e001 [ 2]> cpx #1 ;test result> trap_ne0c01 : d0fe [ 3]> bne * ;failed not equal (non zero)>0c03 : 68 [ 4]> pla ;load status> cmp_flag $ff-minus-zero0c04 : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits>> trap_ne0c06 : d0fe [ 3]> bne * ;failed not equal (non zero)>0c08 : 28 [ 4]> plp ;restore statusload_flag 00c09 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)0c0b : 48 [ 3] pha0c0c : a900 [ 2] lda #0 ;preset status0c0e : 98 [ 2] tya0c0f : 28 [ 4] plp0c10 : aa [ 2] taxtst_x 1,00c11 : 08 [ 3]> php ;save flags0c12 : 08 [ 3]> php0c13 : e001 [ 2]> cpx #1 ;test result> trap_ne0c15 : d0fe [ 3]> bne * ;failed not equal (non zero)>0c17 : 68 [ 4]> pla ;load status> cmp_flag 00c18 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits>> trap_ne0c1a : d0fe [ 3]> bne * ;failed not equal (non zero)>0c1c : 28 [ 4]> plp ;restore status0c1d : 08 [ 3] php0c1e : 88 [ 2] dey ;000c1f : 98 [ 2] tyaAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 66---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0c20 : 28 [ 4] plp0c21 : aa [ 2] taxtst_x 0,zero0c22 : 08 [ 3]> php ;save flags0c23 : 08 [ 3]> php0c24 : e000 [ 2]> cpx #0 ;test result> trap_ne0c26 : d0fe [ 3]> bne * ;failed not equal (non zero)>0c28 : 68 [ 4]> pla ;load status> cmp_flag zero0c29 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits>> trap_ne0c2b : d0fe [ 3]> bne * ;failed not equal (non zero)>0c2d : 28 [ 4]> plp ;restore status0c2e : 08 [ 3] php0c2f : 88 [ 2] dey ;ff0c30 : 98 [ 2] tya0c31 : 28 [ 4] plp0c32 : aa [ 2] taxtst_x $ff,minus0c33 : 08 [ 3]> php ;save flags0c34 : 08 [ 3]> php0c35 : e0ff [ 2]> cpx #$ff ;test result> trap_ne0c37 : d0fe [ 3]> bne * ;failed not equal (non zero)>0c39 : 68 [ 4]> pla ;load status> cmp_flag minus0c3a : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits>> trap_ne0c3c : d0fe [ 3]> bne * ;failed not equal (non zero)>0c3e : 28 [ 4]> plp ;restore statusnext_test0c3f : ad0002 [ 4]> lda test_case ;previous test0c42 : c90d [ 2]> cmp #test_num> trap_ne ;test is out of sequence0c44 : d0fe [ 3]> bne * ;failed not equal (non zero)>000e = >test_num = test_num + 10c46 : a90e [ 2]> lda #test_num ;*** this tests' number0c48 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test;TSX sets NZ - TXS does not0c4b : a201 [ 2] ldx #1 ;01set_stat $ff> load_flag $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 67---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0c4d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0c4f : 48 [ 3]> pha ;use stack to load status0c50 : 28 [ 4]> plp0c51 : 9a [ 2] txs0c52 : 08 [ 3] php0c53 : ad0101 [ 4] lda $101cmp_flag $ff0c56 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bitstrap_ne0c58 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00c5a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0c5c : 48 [ 3]> pha ;use stack to load status0c5d : 28 [ 4]> plp0c5e : 9a [ 2] txs0c5f : 08 [ 3] php0c60 : ad0101 [ 4] lda $101cmp_flag 00c63 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bitstrap_ne0c65 : d0fe [ 3]> bne * ;failed not equal (non zero)0c67 : ca [ 2] dex ;00set_stat $ff> load_flag $ff0c68 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0c6a : 48 [ 3]> pha ;use stack to load status0c6b : 28 [ 4]> plp0c6c : 9a [ 2] txs0c6d : 08 [ 3] php0c6e : ad0001 [ 4] lda $100cmp_flag $ff0c71 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bitstrap_ne0c73 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00c75 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0c77 : 48 [ 3]> pha ;use stack to load status0c78 : 28 [ 4]> plp0c79 : 9a [ 2] txsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 68---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0c7a : 08 [ 3] php0c7b : ad0001 [ 4] lda $100cmp_flag 00c7e : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bitstrap_ne0c80 : d0fe [ 3]> bne * ;failed not equal (non zero)0c82 : ca [ 2] dex ;ffset_stat $ff> load_flag $ff0c83 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0c85 : 48 [ 3]> pha ;use stack to load status0c86 : 28 [ 4]> plp0c87 : 9a [ 2] txs0c88 : 08 [ 3] php0c89 : adff01 [ 4] lda $1ffcmp_flag $ff0c8c : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bitstrap_ne0c8e : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00c90 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0c92 : 48 [ 3]> pha ;use stack to load status0c93 : 28 [ 4]> plp0c94 : 9a [ 2] txs0c95 : 08 [ 3] php0c96 : adff01 [ 4] lda $1ffcmp_flag 00c99 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits0c9b : a201 [ 2] ldx #10c9d : 9a [ 2] txs ;sp=01set_stat $ff> load_flag $ff0c9e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0ca0 : 48 [ 3]> pha ;use stack to load status0ca1 : 28 [ 4]> plp0ca2 : ba [ 2] tsx ;clears Z, N0ca3 : 08 [ 3] php ;sp=000ca4 : e001 [ 2] cpx #1trap_ne0ca6 : d0fe [ 3]> bne * ;failed not equal (non zero)0ca8 : ad0101 [ 4] lda $101AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 69---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------cmp_flag $ff-minus-zero0cab : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bitstrap_ne0cad : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff0caf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0cb1 : 48 [ 3]> pha ;use stack to load status0cb2 : 28 [ 4]> plp0cb3 : ba [ 2] tsx ;clears N, sets Z0cb4 : 08 [ 3] php ;sp=ff0cb5 : e000 [ 2] cpx #0trap_ne0cb7 : d0fe [ 3]> bne * ;failed not equal (non zero)0cb9 : ad0001 [ 4] lda $100cmp_flag $ff-minus0cbc : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bitstrap_ne0cbe : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff0cc0 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0cc2 : 48 [ 3]> pha ;use stack to load status0cc3 : 28 [ 4]> plp0cc4 : ba [ 2] tsx ;clears N, sets Z0cc5 : 08 [ 3] php ;sp=fe0cc6 : e0ff [ 2] cpx #$fftrap_ne0cc8 : d0fe [ 3]> bne * ;failed not equal (non zero)0cca : adff01 [ 4] lda $1ffcmp_flag $ff-zero0ccd : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bitstrap_ne0ccf : d0fe [ 3]> bne * ;failed not equal (non zero)0cd1 : a201 [ 2] ldx #10cd3 : 9a [ 2] txs ;sp=01set_stat 0> load_flag 00cd4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0cd6 : 48 [ 3]> pha ;use stack to load status0cd7 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 70---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0cd8 : ba [ 2] tsx ;clears Z, N0cd9 : 08 [ 3] php ;sp=000cda : e001 [ 2] cpx #1trap_ne0cdc : d0fe [ 3]> bne * ;failed not equal (non zero)0cde : ad0101 [ 4] lda $101cmp_flag 00ce1 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bitstrap_ne0ce3 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00ce5 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0ce7 : 48 [ 3]> pha ;use stack to load status0ce8 : 28 [ 4]> plp0ce9 : ba [ 2] tsx ;clears N, sets Z0cea : 08 [ 3] php ;sp=ff0ceb : e000 [ 2] cpx #0trap_ne0ced : d0fe [ 3]> bne * ;failed not equal (non zero)0cef : ad0001 [ 4] lda $100cmp_flag zero0cf2 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bitstrap_ne0cf4 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00cf6 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0cf8 : 48 [ 3]> pha ;use stack to load status0cf9 : 28 [ 4]> plp0cfa : ba [ 2] tsx ;clears N, sets Z0cfb : 08 [ 3] php ;sp=fe0cfc : e0ff [ 2] cpx #$fftrap_ne0cfe : d0fe [ 3]> bne * ;failed not equal (non zero)0d00 : adff01 [ 4] lda $1ffcmp_flag minus0d03 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bitstrap_ne0d05 : d0fe [ 3]> bne * ;failed not equal (non zero)0d07 : 68 [ 4] pla ;sp=ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 71---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------next_test0d08 : ad0002 [ 4]> lda test_case ;previous test0d0b : c90e [ 2]> cmp #test_num> trap_ne ;test is out of sequence0d0d : d0fe [ 3]> bne * ;failed not equal (non zero)>000f = >test_num = test_num + 10d0f : a90f [ 2]> lda #test_num ;*** this tests' number0d11 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; testing index register load & store LDY LDX STY STX all addressing modes; LDX / STX - zp,y / abs,y0d14 : a003 [ 2] ldy #30d16 : tldxset_stat 0> load_flag 00d16 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0d18 : 48 [ 3]> pha ;use stack to load status0d19 : 28 [ 4]> plp0d1a : b613 [ 4] ldx zp1,y0d1c : 08 [ 3] php ;test stores do not alter flags0d1d : 8a [ 2] txa0d1e : 49c3 [ 2] eor #$c30d20 : 28 [ 4] plp0d21 : 990302 [ 5] sta abst,y0d24 : 08 [ 3] php ;flags after load/store sequence0d25 : 49c3 [ 2] eor #$c30d27 : d90802 [ 4] cmp abs1,y ;test resulttrap_ne0d2a : d0fe [ 3]> bne * ;failed not equal (non zero)0d2c : 68 [ 4] pla ;load statuseor_flag 00d2d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0d2f : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne0d32 : d0fe [ 3]> bne * ;failed not equal (non zero)0d34 : 88 [ 2] dey0d35 : 10df [ 3] bpl tldx0d37 : a003 [ 2] ldy #30d39 : tldx1set_stat $ff> load_flag $ff0d39 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0d3b : 48 [ 3]> pha ;use stack to load status0d3c : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 72---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0d3d : b613 [ 4] ldx zp1,y0d3f : 08 [ 3] php ;test stores do not alter flags0d40 : 8a [ 2] txa0d41 : 49c3 [ 2] eor #$c30d43 : 28 [ 4] plp0d44 : 990302 [ 5] sta abst,y0d47 : 08 [ 3] php ;flags after load/store sequence0d48 : 49c3 [ 2] eor #$c30d4a : d90802 [ 4] cmp abs1,y ;test resulttrap_ne0d4d : d0fe [ 3]> bne * ;failed not equal (non zero)0d4f : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0d50 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits0d52 : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne0d55 : d0fe [ 3]> bne * ;failed not equal (non zero)0d57 : 88 [ 2] dey0d58 : 10df [ 3] bpl tldx10d5a : a003 [ 2] ldy #30d5c : tldx2set_stat 0> load_flag 00d5c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0d5e : 48 [ 3]> pha ;use stack to load status0d5f : 28 [ 4]> plp0d60 : be0802 [ 4] ldx abs1,y0d63 : 08 [ 3] php ;test stores do not alter flags0d64 : 8a [ 2] txa0d65 : 49c3 [ 2] eor #$c30d67 : aa [ 2] tax0d68 : 28 [ 4] plp0d69 : 960c [ 4] stx zpt,y0d6b : 08 [ 3] php ;flags after load/store sequence0d6c : 49c3 [ 2] eor #$c30d6e : d91300 [ 4] cmp zp1,y ;test resulttrap_ne0d71 : d0fe [ 3]> bne * ;failed not equal (non zero)0d73 : 68 [ 4] pla ;load statuseor_flag 00d74 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0d76 : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne0d79 : d0fe [ 3]> bne * ;failed not equal (non zero)0d7b : 88 [ 2] dey0d7c : 10de [ 3] bpl tldx2AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 73---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0d7e : a003 [ 2] ldy #30d80 : tldx3set_stat $ff> load_flag $ff0d80 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0d82 : 48 [ 3]> pha ;use stack to load status0d83 : 28 [ 4]> plp0d84 : be0802 [ 4] ldx abs1,y0d87 : 08 [ 3] php ;test stores do not alter flags0d88 : 8a [ 2] txa0d89 : 49c3 [ 2] eor #$c30d8b : aa [ 2] tax0d8c : 28 [ 4] plp0d8d : 960c [ 4] stx zpt,y0d8f : 08 [ 3] php ;flags after load/store sequence0d90 : 49c3 [ 2] eor #$c30d92 : d91300 [ 4] cmp zp1,y ;test resulttrap_ne0d95 : d0fe [ 3]> bne * ;failed not equal (non zero)0d97 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0d98 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits0d9a : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne0d9d : d0fe [ 3]> bne * ;failed not equal (non zero)0d9f : 88 [ 2] dey0da0 : 10de [ 3] bpl tldx30da2 : a003 [ 2] ldy #3 ;testing store result0da4 : a200 [ 2] ldx #00da6 : b90c00 [ 4] tstx lda zpt,y0da9 : 49c3 [ 2] eor #$c30dab : d91300 [ 4] cmp zp1,ytrap_ne ;store to zp data0dae : d0fe [ 3]> bne * ;failed not equal (non zero)0db0 : 960c [ 4] stx zpt,y ;clear0db2 : b90302 [ 4] lda abst,y0db5 : 49c3 [ 2] eor #$c30db7 : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data0dba : d0fe [ 3]> bne * ;failed not equal (non zero)0dbc : 8a [ 2] txa0dbd : 990302 [ 5] sta abst,y ;clear0dc0 : 88 [ 2] dey0dc1 : 10e3 [ 3] bpl tstxnext_test0dc3 : ad0002 [ 4]> lda test_case ;previous testAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 74---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0dc6 : c90f [ 2]> cmp #test_num> trap_ne ;test is out of sequence0dc8 : d0fe [ 3]> bne * ;failed not equal (non zero)>0010 = >test_num = test_num + 10dca : a910 [ 2]> lda #test_num ;*** this tests' number0dcc : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; indexed wraparound test (only zp should wrap)0dcf : a0fd [ 2] ldy #3+$fa0dd1 : b619 [ 4] tldx4 ldx zp1-$fa&$ff,y ;wrap on indexed zp0dd3 : 8a [ 2] txa0dd4 : 990901 [ 5] sta abst-$fa,y ;no STX abs,y!0dd7 : 88 [ 2] dey0dd8 : c0fa [ 2] cpy #$fa0dda : b0f5 [ 3] bcs tldx40ddc : a0fd [ 2] ldy #3+$fa0dde : be0e01 [ 4] tldx5 ldx abs1-$fa,y ;no wrap on indexed abs0de1 : 9612 [ 4] stx zpt-$fa&$ff,y0de3 : 88 [ 2] dey0de4 : c0fa [ 2] cpy #$fa0de6 : b0f6 [ 3] bcs tldx50de8 : a003 [ 2] ldy #3 ;testing wraparound result0dea : a200 [ 2] ldx #00dec : b90c00 [ 4] tstx1 lda zpt,y0def : d91300 [ 4] cmp zp1,ytrap_ne ;store to zp data0df2 : d0fe [ 3]> bne * ;failed not equal (non zero)0df4 : 960c [ 4] stx zpt,y ;clear0df6 : b90302 [ 4] lda abst,y0df9 : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data0dfc : d0fe [ 3]> bne * ;failed not equal (non zero)0dfe : 8a [ 2] txa0dff : 990302 [ 5] sta abst,y ;clear0e02 : 88 [ 2] dey0e03 : 10e7 [ 4] bpl tstx1next_test0e05 : ad0002 [ 4]> lda test_case ;previous test0e08 : c910 [ 2]> cmp #test_num> trap_ne ;test is out of sequence0e0a : d0fe [ 3]> bne * ;failed not equal (non zero)>0011 = >test_num = test_num + 10e0c : a911 [ 2]> lda #test_num ;*** this tests' number0e0e : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; LDY / STY - zp,x / abs,x0e11 : a203 [ 2] ldx #3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 75---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0e13 : tldyset_stat 0> load_flag 00e13 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0e15 : 48 [ 3]> pha ;use stack to load status0e16 : 28 [ 4]> plp0e17 : b413 [ 4] ldy zp1,x0e19 : 08 [ 3] php ;test stores do not alter flags0e1a : 98 [ 2] tya0e1b : 49c3 [ 2] eor #$c30e1d : 28 [ 4] plp0e1e : 9d0302 [ 5] sta abst,x0e21 : 08 [ 3] php ;flags after load/store sequence0e22 : 49c3 [ 2] eor #$c30e24 : dd0802 [ 4] cmp abs1,x ;test resulttrap_ne0e27 : d0fe [ 3]> bne * ;failed not equal (non zero)0e29 : 68 [ 4] pla ;load statuseor_flag 00e2a : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0e2c : dd0d02 [ 4] cmp fLDx,x ;test flagstrap_ne0e2f : d0fe [ 3]> bne * ;failed not equal (non zero)0e31 : ca [ 2] dex0e32 : 10df [ 3] bpl tldy0e34 : a203 [ 2] ldx #30e36 : tldy1set_stat $ff> load_flag $ff0e36 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0e38 : 48 [ 3]> pha ;use stack to load status0e39 : 28 [ 4]> plp0e3a : b413 [ 4] ldy zp1,x0e3c : 08 [ 3] php ;test stores do not alter flags0e3d : 98 [ 2] tya0e3e : 49c3 [ 2] eor #$c30e40 : 28 [ 4] plp0e41 : 9d0302 [ 5] sta abst,x0e44 : 08 [ 3] php ;flags after load/store sequence0e45 : 49c3 [ 2] eor #$c30e47 : dd0802 [ 4] cmp abs1,x ;test resulttrap_ne0e4a : d0fe [ 3]> bne * ;failed not equal (non zero)0e4c : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0e4d : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 76---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0e4f : dd0d02 [ 4] cmp fLDx,x ;test flagstrap_ne0e52 : d0fe [ 3]> bne * ;failed not equal (non zero)0e54 : ca [ 2] dex0e55 : 10df [ 3] bpl tldy10e57 : a203 [ 2] ldx #30e59 : tldy2set_stat 0> load_flag 00e59 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0e5b : 48 [ 3]> pha ;use stack to load status0e5c : 28 [ 4]> plp0e5d : bc0802 [ 4] ldy abs1,x0e60 : 08 [ 3] php ;test stores do not alter flags0e61 : 98 [ 2] tya0e62 : 49c3 [ 2] eor #$c30e64 : a8 [ 2] tay0e65 : 28 [ 4] plp0e66 : 940c [ 4] sty zpt,x0e68 : 08 [ 3] php ;flags after load/store sequence0e69 : 49c3 [ 2] eor #$c30e6b : d513 [ 4] cmp zp1,x ;test resulttrap_ne0e6d : d0fe [ 3]> bne * ;failed not equal (non zero)0e6f : 68 [ 4] pla ;load statuseor_flag 00e70 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0e72 : dd0d02 [ 4] cmp fLDx,x ;test flagstrap_ne0e75 : d0fe [ 3]> bne * ;failed not equal (non zero)0e77 : ca [ 2] dex0e78 : 10df [ 3] bpl tldy20e7a : a203 [ 2] ldx #30e7c : tldy3set_stat $ff> load_flag $ff0e7c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0e7e : 48 [ 3]> pha ;use stack to load status0e7f : 28 [ 4]> plp0e80 : bc0802 [ 4] ldy abs1,x0e83 : 08 [ 3] php ;test stores do not alter flags0e84 : 98 [ 2] tya0e85 : 49c3 [ 2] eor #$c30e87 : a8 [ 2] tayAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 77---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0e88 : 28 [ 4] plp0e89 : 940c [ 4] sty zpt,x0e8b : 08 [ 3] php ;flags after load/store sequence0e8c : 49c3 [ 2] eor #$c30e8e : d513 [ 4] cmp zp1,x ;test resulttrap_ne0e90 : d0fe [ 3]> bne * ;failed not equal (non zero)0e92 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0e93 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits0e95 : dd0d02 [ 4] cmp fLDx,x ;test flagstrap_ne0e98 : d0fe [ 3]> bne * ;failed not equal (non zero)0e9a : ca [ 2] dex0e9b : 10df [ 3] bpl tldy30e9d : a203 [ 2] ldx #3 ;testing store result0e9f : a000 [ 2] ldy #00ea1 : b50c [ 4] tsty lda zpt,x0ea3 : 49c3 [ 2] eor #$c30ea5 : d513 [ 4] cmp zp1,xtrap_ne ;store to zp,x data0ea7 : d0fe [ 3]> bne * ;failed not equal (non zero)0ea9 : 940c [ 4] sty zpt,x ;clear0eab : bd0302 [ 4] lda abst,x0eae : 49c3 [ 2] eor #$c30eb0 : dd0802 [ 4] cmp abs1,xtrap_ne ;store to abs,x data0eb3 : d0fe [ 3]> bne * ;failed not equal (non zero)0eb5 : 8a [ 2] txa0eb6 : 9d0302 [ 5] sta abst,x ;clear0eb9 : ca [ 2] dex0eba : 10e5 [ 3] bpl tstynext_test0ebc : ad0002 [ 4]> lda test_case ;previous test0ebf : c911 [ 2]> cmp #test_num> trap_ne ;test is out of sequence0ec1 : d0fe [ 3]> bne * ;failed not equal (non zero)>0012 = >test_num = test_num + 10ec3 : a912 [ 2]> lda #test_num ;*** this tests' number0ec5 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; indexed wraparound test (only zp should wrap)0ec8 : a2fd [ 2] ldx #3+$fa0eca : b419 [ 4] tldy4 ldy zp1-$fa&$ff,x ;wrap on indexed zp0ecc : 98 [ 2] tya0ecd : 9d0901 [ 5] sta abst-$fa,x ;no STX abs,x!AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 78---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0ed0 : ca [ 2] dex0ed1 : e0fa [ 2] cpx #$fa0ed3 : b0f5 [ 3] bcs tldy40ed5 : a2fd [ 2] ldx #3+$fa0ed7 : bc0e01 [ 4] tldy5 ldy abs1-$fa,x ;no wrap on indexed abs0eda : 9412 [ 4] sty zpt-$fa&$ff,x0edc : ca [ 2] dex0edd : e0fa [ 2] cpx #$fa0edf : b0f6 [ 3] bcs tldy50ee1 : a203 [ 2] ldx #3 ;testing wraparound result0ee3 : a000 [ 2] ldy #00ee5 : b50c [ 4] tsty1 lda zpt,x0ee7 : d513 [ 4] cmp zp1,xtrap_ne ;store to zp,x data0ee9 : d0fe [ 3]> bne * ;failed not equal (non zero)0eeb : 940c [ 4] sty zpt,x ;clear0eed : bd0302 [ 4] lda abst,x0ef0 : dd0802 [ 4] cmp abs1,xtrap_ne ;store to abs,x data0ef3 : d0fe [ 3]> bne * ;failed not equal (non zero)0ef5 : 8a [ 2] txa0ef6 : 9d0302 [ 5] sta abst,x ;clear0ef9 : ca [ 2] dex0efa : 10e9 [ 3] bpl tsty1next_test0efc : ad0002 [ 4]> lda test_case ;previous test0eff : c912 [ 2]> cmp #test_num> trap_ne ;test is out of sequence0f01 : d0fe [ 3]> bne * ;failed not equal (non zero)>0013 = >test_num = test_num + 10f03 : a913 [ 2]> lda #test_num ;*** this tests' number0f05 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; LDX / STX - zp / abs / #set_stat 0> load_flag 00f08 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0f0a : 48 [ 3]> pha ;use stack to load status0f0b : 28 [ 4]> plp0f0c : a613 [ 3] ldx zp10f0e : 08 [ 3] php ;test stores do not alter flags0f0f : 8a [ 2] txa0f10 : 49c3 [ 2] eor #$c30f12 : aa [ 2] tax0f13 : 28 [ 4] plp0f14 : 8e0302 [ 4] stx abst0f17 : 08 [ 3] php ;flags after load/store sequence0f18 : 49c3 [ 2] eor #$c3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 79---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0f1a : aa [ 2] tax0f1b : e0c3 [ 2] cpx #$c3 ;test resulttrap_ne0f1d : d0fe [ 3]> bne * ;failed not equal (non zero)0f1f : 68 [ 4] pla ;load statuseor_flag 00f20 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0f22 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne0f25 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00f27 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0f29 : 48 [ 3]> pha ;use stack to load status0f2a : 28 [ 4]> plp0f2b : a614 [ 3] ldx zp1+10f2d : 08 [ 3] php ;test stores do not alter flags0f2e : 8a [ 2] txa0f2f : 49c3 [ 2] eor #$c30f31 : aa [ 2] tax0f32 : 28 [ 4] plp0f33 : 8e0402 [ 4] stx abst+10f36 : 08 [ 3] php ;flags after load/store sequence0f37 : 49c3 [ 2] eor #$c30f39 : aa [ 2] tax0f3a : e082 [ 2] cpx #$82 ;test resulttrap_ne0f3c : d0fe [ 3]> bne * ;failed not equal (non zero)0f3e : 68 [ 4] pla ;load statuseor_flag 00f3f : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0f41 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne0f44 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00f46 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0f48 : 48 [ 3]> pha ;use stack to load status0f49 : 28 [ 4]> plp0f4a : a615 [ 3] ldx zp1+20f4c : 08 [ 3] php ;test stores do not alter flags0f4d : 8a [ 2] txa0f4e : 49c3 [ 2] eor #$c30f50 : aa [ 2] tax0f51 : 28 [ 4] plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 80---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0f52 : 8e0502 [ 4] stx abst+20f55 : 08 [ 3] php ;flags after load/store sequence0f56 : 49c3 [ 2] eor #$c30f58 : aa [ 2] tax0f59 : e041 [ 2] cpx #$41 ;test resulttrap_ne0f5b : d0fe [ 3]> bne * ;failed not equal (non zero)0f5d : 68 [ 4] pla ;load statuseor_flag 00f5e : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0f60 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne0f63 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 00f65 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>0f67 : 48 [ 3]> pha ;use stack to load status0f68 : 28 [ 4]> plp0f69 : a616 [ 3] ldx zp1+30f6b : 08 [ 3] php ;test stores do not alter flags0f6c : 8a [ 2] txa0f6d : 49c3 [ 2] eor #$c30f6f : aa [ 2] tax0f70 : 28 [ 4] plp0f71 : 8e0602 [ 4] stx abst+30f74 : 08 [ 3] php ;flags after load/store sequence0f75 : 49c3 [ 2] eor #$c30f77 : aa [ 2] tax0f78 : e000 [ 2] cpx #0 ;test resulttrap_ne0f7a : d0fe [ 3]> bne * ;failed not equal (non zero)0f7c : 68 [ 4] pla ;load statuseor_flag 00f7d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits0f7f : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne0f82 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff0f84 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0f86 : 48 [ 3]> pha ;use stack to load status0f87 : 28 [ 4]> plp0f88 : a613 [ 3] ldx zp10f8a : 08 [ 3] php ;test stores do not alter flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 81---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0f8b : 8a [ 2] txa0f8c : 49c3 [ 2] eor #$c30f8e : aa [ 2] tax0f8f : 28 [ 4] plp0f90 : 8e0302 [ 4] stx abst0f93 : 08 [ 3] php ;flags after load/store sequence0f94 : 49c3 [ 2] eor #$c30f96 : aa [ 2] tax0f97 : e0c3 [ 2] cpx #$c3 ;test resulttrap_ne ;0f99 : d0fe [ 3]> bne * ;failed not equal (non zero)0f9b : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0f9c : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits0f9e : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne0fa1 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff0fa3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0fa5 : 48 [ 3]> pha ;use stack to load status0fa6 : 28 [ 4]> plp0fa7 : a614 [ 3] ldx zp1+10fa9 : 08 [ 3] php ;test stores do not alter flags0faa : 8a [ 2] txa0fab : 49c3 [ 2] eor #$c30fad : aa [ 2] tax0fae : 28 [ 4] plp0faf : 8e0402 [ 4] stx abst+10fb2 : 08 [ 3] php ;flags after load/store sequence0fb3 : 49c3 [ 2] eor #$c30fb5 : aa [ 2] tax0fb6 : e082 [ 2] cpx #$82 ;test resulttrap_ne0fb8 : d0fe [ 3]> bne * ;failed not equal (non zero)0fba : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0fbb : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits0fbd : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne0fc0 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff0fc2 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0fc4 : 48 [ 3]> pha ;use stack to load status0fc5 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 82---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------0fc6 : a615 [ 3] ldx zp1+20fc8 : 08 [ 3] php ;test stores do not alter flags0fc9 : 8a [ 2] txa0fca : 49c3 [ 2] eor #$c30fcc : aa [ 2] tax0fcd : 28 [ 4] plp0fce : 8e0502 [ 4] stx abst+20fd1 : 08 [ 3] php ;flags after load/store sequence0fd2 : 49c3 [ 2] eor #$c30fd4 : aa [ 2] tax0fd5 : e041 [ 2] cpx #$41 ;test resulttrap_ne ;0fd7 : d0fe [ 3]> bne * ;failed not equal (non zero)0fd9 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0fda : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits0fdc : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne0fdf : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff0fe1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>0fe3 : 48 [ 3]> pha ;use stack to load status0fe4 : 28 [ 4]> plp0fe5 : a616 [ 3] ldx zp1+30fe7 : 08 [ 3] php ;test stores do not alter flags0fe8 : 8a [ 2] txa0fe9 : 49c3 [ 2] eor #$c30feb : aa [ 2] tax0fec : 28 [ 4] plp0fed : 8e0602 [ 4] stx abst+30ff0 : 08 [ 3] php ;flags after load/store sequence0ff1 : 49c3 [ 2] eor #$c30ff3 : aa [ 2] tax0ff4 : e000 [ 2] cpx #0 ;test resulttrap_ne0ff6 : d0fe [ 3]> bne * ;failed not equal (non zero)0ff8 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered0ff9 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits0ffb : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne0ffe : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 83---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1000 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1002 : 48 [ 3]> pha ;use stack to load status1003 : 28 [ 4]> plp1004 : ae0802 [ 4] ldx abs11007 : 08 [ 3] php ;test stores do not alter flags1008 : 8a [ 2] txa1009 : 49c3 [ 2] eor #$c3100b : aa [ 2] tax100c : 28 [ 4] plp100d : 860c [ 3] stx zpt100f : 08 [ 3] php ;flags after load/store sequence1010 : 49c3 [ 2] eor #$c31012 : c513 [ 3] cmp zp1 ;test resulttrap_ne1014 : d0fe [ 3]> bne * ;failed not equal (non zero)1016 : 68 [ 4] pla ;load statuseor_flag 01017 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1019 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne101c : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0101e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1020 : 48 [ 3]> pha ;use stack to load status1021 : 28 [ 4]> plp1022 : ae0902 [ 4] ldx abs1+11025 : 08 [ 3] php ;test stores do not alter flags1026 : 8a [ 2] txa1027 : 49c3 [ 2] eor #$c31029 : aa [ 2] tax102a : 28 [ 4] plp102b : 860d [ 3] stx zpt+1102d : 08 [ 3] php ;flags after load/store sequence102e : 49c3 [ 2] eor #$c31030 : c514 [ 3] cmp zp1+1 ;test resulttrap_ne1032 : d0fe [ 3]> bne * ;failed not equal (non zero)1034 : 68 [ 4] pla ;load statuseor_flag 01035 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1037 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne103a : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 84---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag 0103c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>103e : 48 [ 3]> pha ;use stack to load status103f : 28 [ 4]> plp1040 : ae0a02 [ 4] ldx abs1+21043 : 08 [ 3] php ;test stores do not alter flags1044 : 8a [ 2] txa1045 : 49c3 [ 2] eor #$c31047 : aa [ 2] tax1048 : 28 [ 4] plp1049 : 860e [ 3] stx zpt+2104b : 08 [ 3] php ;flags after load/store sequence104c : 49c3 [ 2] eor #$c3104e : c515 [ 3] cmp zp1+2 ;test resulttrap_ne1050 : d0fe [ 3]> bne * ;failed not equal (non zero)1052 : 68 [ 4] pla ;load statuseor_flag 01053 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1055 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1058 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0105a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>105c : 48 [ 3]> pha ;use stack to load status105d : 28 [ 4]> plp105e : ae0b02 [ 4] ldx abs1+31061 : 08 [ 3] php ;test stores do not alter flags1062 : 8a [ 2] txa1063 : 49c3 [ 2] eor #$c31065 : aa [ 2] tax1066 : 28 [ 4] plp1067 : 860f [ 3] stx zpt+31069 : 08 [ 3] php ;flags after load/store sequence106a : 49c3 [ 2] eor #$c3106c : c516 [ 3] cmp zp1+3 ;test resulttrap_ne106e : d0fe [ 3]> bne * ;failed not equal (non zero)1070 : 68 [ 4] pla ;load statuseor_flag 01071 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1073 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1076 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 85---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_stat $ff> load_flag $ff1078 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>107a : 48 [ 3]> pha ;use stack to load status107b : 28 [ 4]> plp107c : ae0802 [ 4] ldx abs1107f : 08 [ 3] php ;test stores do not alter flags1080 : 8a [ 2] txa1081 : 49c3 [ 2] eor #$c31083 : aa [ 2] tax1084 : 28 [ 4] plp1085 : 860c [ 3] stx zpt1087 : 08 [ 3] php ;flags after load/store sequence1088 : 49c3 [ 2] eor #$c3108a : aa [ 2] tax108b : e413 [ 3] cpx zp1 ;test resulttrap_ne108d : d0fe [ 3]> bne * ;failed not equal (non zero)108f : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1090 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1092 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1095 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1097 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1099 : 48 [ 3]> pha ;use stack to load status109a : 28 [ 4]> plp109b : ae0902 [ 4] ldx abs1+1109e : 08 [ 3] php ;test stores do not alter flags109f : 8a [ 2] txa10a0 : 49c3 [ 2] eor #$c310a2 : aa [ 2] tax10a3 : 28 [ 4] plp10a4 : 860d [ 3] stx zpt+110a6 : 08 [ 3] php ;flags after load/store sequence10a7 : 49c3 [ 2] eor #$c310a9 : aa [ 2] tax10aa : e414 [ 3] cpx zp1+1 ;test resulttrap_ne10ac : d0fe [ 3]> bne * ;failed not equal (non zero)10ae : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered10af : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 86---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------10b1 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne10b4 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff10b6 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>10b8 : 48 [ 3]> pha ;use stack to load status10b9 : 28 [ 4]> plp10ba : ae0a02 [ 4] ldx abs1+210bd : 08 [ 3] php ;test stores do not alter flags10be : 8a [ 2] txa10bf : 49c3 [ 2] eor #$c310c1 : aa [ 2] tax10c2 : 28 [ 4] plp10c3 : 860e [ 3] stx zpt+210c5 : 08 [ 3] php ;flags after load/store sequence10c6 : 49c3 [ 2] eor #$c310c8 : aa [ 2] tax10c9 : e415 [ 3] cpx zp1+2 ;test resulttrap_ne10cb : d0fe [ 3]> bne * ;failed not equal (non zero)10cd : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered10ce : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits10d0 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne10d3 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff10d5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>10d7 : 48 [ 3]> pha ;use stack to load status10d8 : 28 [ 4]> plp10d9 : ae0b02 [ 4] ldx abs1+310dc : 08 [ 3] php ;test stores do not alter flags10dd : 8a [ 2] txa10de : 49c3 [ 2] eor #$c310e0 : aa [ 2] tax10e1 : 28 [ 4] plp10e2 : 860f [ 3] stx zpt+310e4 : 08 [ 3] php ;flags after load/store sequence10e5 : 49c3 [ 2] eor #$c310e7 : aa [ 2] tax10e8 : e416 [ 3] cpx zp1+3 ;test resulttrap_ne10ea : d0fe [ 3]> bne * ;failed not equal (non zero)10ec : 68 [ 4] pla ;load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 87---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------eor_flag lo~fnz ;mask bits not altered10ed : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits10ef : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne10f2 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 010f4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>10f6 : 48 [ 3]> pha ;use stack to load status10f7 : 28 [ 4]> plp10f8 : a2c3 [ 2] ldx #$c310fa : 08 [ 3] php10fb : ec0802 [ 4] cpx abs1 ;test resulttrap_ne10fe : d0fe [ 3]> bne * ;failed not equal (non zero)1100 : 68 [ 4] pla ;load statuseor_flag 01101 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1103 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1106 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01108 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>110a : 48 [ 3]> pha ;use stack to load status110b : 28 [ 4]> plp110c : a282 [ 2] ldx #$82110e : 08 [ 3] php110f : ec0902 [ 4] cpx abs1+1 ;test resulttrap_ne1112 : d0fe [ 3]> bne * ;failed not equal (non zero)1114 : 68 [ 4] pla ;load statuseor_flag 01115 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1117 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne111a : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0111c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>111e : 48 [ 3]> pha ;use stack to load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 88---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------111f : 28 [ 4]> plp1120 : a241 [ 2] ldx #$411122 : 08 [ 3] php1123 : ec0a02 [ 4] cpx abs1+2 ;test resulttrap_ne1126 : d0fe [ 3]> bne * ;failed not equal (non zero)1128 : 68 [ 4] pla ;load statuseor_flag 01129 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits112b : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne112e : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01130 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1132 : 48 [ 3]> pha ;use stack to load status1133 : 28 [ 4]> plp1134 : a200 [ 2] ldx #01136 : 08 [ 3] php1137 : ec0b02 [ 4] cpx abs1+3 ;test resulttrap_ne113a : d0fe [ 3]> bne * ;failed not equal (non zero)113c : 68 [ 4] pla ;load statuseor_flag 0113d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits113f : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1142 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1144 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1146 : 48 [ 3]> pha ;use stack to load status1147 : 28 [ 4]> plp1148 : a2c3 [ 2] ldx #$c3114a : 08 [ 3] php114b : ec0802 [ 4] cpx abs1 ;test resulttrap_ne114e : d0fe [ 3]> bne * ;failed not equal (non zero)1150 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1151 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 89---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1153 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1156 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1158 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>115a : 48 [ 3]> pha ;use stack to load status115b : 28 [ 4]> plp115c : a282 [ 2] ldx #$82115e : 08 [ 3] php115f : ec0902 [ 4] cpx abs1+1 ;test resulttrap_ne1162 : d0fe [ 3]> bne * ;failed not equal (non zero)1164 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1165 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1167 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne116a : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff116c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>116e : 48 [ 3]> pha ;use stack to load status116f : 28 [ 4]> plp1170 : a241 [ 2] ldx #$411172 : 08 [ 3] php1173 : ec0a02 [ 4] cpx abs1+2 ;test resulttrap_ne1176 : d0fe [ 3]> bne * ;failed not equal (non zero)1178 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1179 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits117b : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne117e : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1180 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1182 : 48 [ 3]> pha ;use stack to load status1183 : 28 [ 4]> plp1184 : a200 [ 2] ldx #01186 : 08 [ 3] phpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 90---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1187 : ec0b02 [ 4] cpx abs1+3 ;test resulttrap_ne118a : d0fe [ 3]> bne * ;failed not equal (non zero)118c : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered118d : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits118f : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1192 : d0fe [ 3]> bne * ;failed not equal (non zero)1194 : a200 [ 2] ldx #01196 : a50c [ 3] lda zpt1198 : 49c3 [ 2] eor #$c3119a : c513 [ 3] cmp zp1trap_ne ;store to zp data119c : d0fe [ 3]> bne * ;failed not equal (non zero)119e : 860c [ 3] stx zpt ;clear11a0 : ad0302 [ 4] lda abst11a3 : 49c3 [ 2] eor #$c311a5 : cd0802 [ 4] cmp abs1trap_ne ;store to abs data11a8 : d0fe [ 3]> bne * ;failed not equal (non zero)11aa : 8e0302 [ 4] stx abst ;clear11ad : a50d [ 3] lda zpt+111af : 49c3 [ 2] eor #$c311b1 : c514 [ 3] cmp zp1+1trap_ne ;store to zp data11b3 : d0fe [ 3]> bne * ;failed not equal (non zero)11b5 : 860d [ 3] stx zpt+1 ;clear11b7 : ad0402 [ 4] lda abst+111ba : 49c3 [ 2] eor #$c311bc : cd0902 [ 4] cmp abs1+1trap_ne ;store to abs data11bf : d0fe [ 3]> bne * ;failed not equal (non zero)11c1 : 8e0402 [ 4] stx abst+1 ;clear11c4 : a50e [ 3] lda zpt+211c6 : 49c3 [ 2] eor #$c311c8 : c515 [ 3] cmp zp1+2trap_ne ;store to zp data11ca : d0fe [ 3]> bne * ;failed not equal (non zero)11cc : 860e [ 3] stx zpt+2 ;clear11ce : ad0502 [ 4] lda abst+211d1 : 49c3 [ 2] eor #$c311d3 : cd0a02 [ 4] cmp abs1+2trap_ne ;store to abs data11d6 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 91---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------11d8 : 8e0502 [ 4] stx abst+2 ;clear11db : a50f [ 3] lda zpt+311dd : 49c3 [ 2] eor #$c311df : c516 [ 3] cmp zp1+3trap_ne ;store to zp data11e1 : d0fe [ 3]> bne * ;failed not equal (non zero)11e3 : 860f [ 3] stx zpt+3 ;clear11e5 : ad0602 [ 4] lda abst+311e8 : 49c3 [ 2] eor #$c311ea : cd0b02 [ 4] cmp abs1+3trap_ne ;store to abs data11ed : d0fe [ 3]> bne * ;failed not equal (non zero)11ef : 8e0602 [ 4] stx abst+3 ;clearnext_test11f2 : ad0002 [ 4]> lda test_case ;previous test11f5 : c913 [ 2]> cmp #test_num> trap_ne ;test is out of sequence11f7 : d0fe [ 3]> bne * ;failed not equal (non zero)>0014 = >test_num = test_num + 111f9 : a914 [ 2]> lda #test_num ;*** this tests' number11fb : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; LDY / STY - zp / abs / #set_stat 0> load_flag 011fe : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1200 : 48 [ 3]> pha ;use stack to load status1201 : 28 [ 4]> plp1202 : a413 [ 3] ldy zp11204 : 08 [ 3] php ;test stores do not alter flags1205 : 98 [ 2] tya1206 : 49c3 [ 2] eor #$c31208 : a8 [ 2] tay1209 : 28 [ 4] plp120a : 8c0302 [ 4] sty abst120d : 08 [ 3] php ;flags after load/store sequence120e : 49c3 [ 2] eor #$c31210 : a8 [ 2] tay1211 : c0c3 [ 2] cpy #$c3 ;test resulttrap_ne1213 : d0fe [ 3]> bne * ;failed not equal (non zero)1215 : 68 [ 4] pla ;load statuseor_flag 01216 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1218 : cd0d02 [ 4] cmp fLDx ;test flagstrap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 92---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------121b : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0121d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>121f : 48 [ 3]> pha ;use stack to load status1220 : 28 [ 4]> plp1221 : a414 [ 3] ldy zp1+11223 : 08 [ 3] php ;test stores do not alter flags1224 : 98 [ 2] tya1225 : 49c3 [ 2] eor #$c31227 : a8 [ 2] tay1228 : 28 [ 4] plp1229 : 8c0402 [ 4] sty abst+1122c : 08 [ 3] php ;flags after load/store sequence122d : 49c3 [ 2] eor #$c3122f : a8 [ 2] tay1230 : c082 [ 2] cpy #$82 ;test resulttrap_ne1232 : d0fe [ 3]> bne * ;failed not equal (non zero)1234 : 68 [ 4] pla ;load statuseor_flag 01235 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1237 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne123a : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0123c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>123e : 48 [ 3]> pha ;use stack to load status123f : 28 [ 4]> plp1240 : a415 [ 3] ldy zp1+21242 : 08 [ 3] php ;test stores do not alter flags1243 : 98 [ 2] tya1244 : 49c3 [ 2] eor #$c31246 : a8 [ 2] tay1247 : 28 [ 4] plp1248 : 8c0502 [ 4] sty abst+2124b : 08 [ 3] php ;flags after load/store sequence124c : 49c3 [ 2] eor #$c3124e : a8 [ 2] tay124f : c041 [ 2] cpy #$41 ;test resulttrap_ne1251 : d0fe [ 3]> bne * ;failed not equal (non zero)1253 : 68 [ 4] pla ;load statuseor_flag 01254 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 93---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1256 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1259 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0125b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>125d : 48 [ 3]> pha ;use stack to load status125e : 28 [ 4]> plp125f : a416 [ 3] ldy zp1+31261 : 08 [ 3] php ;test stores do not alter flags1262 : 98 [ 2] tya1263 : 49c3 [ 2] eor #$c31265 : a8 [ 2] tay1266 : 28 [ 4] plp1267 : 8c0602 [ 4] sty abst+3126a : 08 [ 3] php ;flags after load/store sequence126b : 49c3 [ 2] eor #$c3126d : a8 [ 2] tay126e : c000 [ 2] cpy #0 ;test resulttrap_ne1270 : d0fe [ 3]> bne * ;failed not equal (non zero)1272 : 68 [ 4] pla ;load statuseor_flag 01273 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1275 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1278 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff127a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>127c : 48 [ 3]> pha ;use stack to load status127d : 28 [ 4]> plp127e : a413 [ 3] ldy zp11280 : 08 [ 3] php ;test stores do not alter flags1281 : 98 [ 2] tya1282 : 49c3 [ 2] eor #$c31284 : a8 [ 2] tay1285 : 28 [ 4] plp1286 : 8c0302 [ 4] sty abst1289 : 08 [ 3] php ;flags after load/store sequence128a : 49c3 [ 2] eor #$c3128c : a8 [ 2] tay128d : c0c3 [ 2] cpy #$c3 ;test resulttrap_ne128f : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 94---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1291 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1292 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1294 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1297 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1299 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>129b : 48 [ 3]> pha ;use stack to load status129c : 28 [ 4]> plp129d : a414 [ 3] ldy zp1+1129f : 08 [ 3] php ;test stores do not alter flags12a0 : 98 [ 2] tya12a1 : 49c3 [ 2] eor #$c312a3 : a8 [ 2] tay12a4 : 28 [ 4] plp12a5 : 8c0402 [ 4] sty abst+112a8 : 08 [ 3] php ;flags after load/store sequence12a9 : 49c3 [ 2] eor #$c312ab : a8 [ 2] tay12ac : c082 [ 2] cpy #$82 ;test resulttrap_ne12ae : d0fe [ 3]> bne * ;failed not equal (non zero)12b0 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered12b1 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits12b3 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne12b6 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff12b8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>12ba : 48 [ 3]> pha ;use stack to load status12bb : 28 [ 4]> plp12bc : a415 [ 3] ldy zp1+212be : 08 [ 3] php ;test stores do not alter flags12bf : 98 [ 2] tya12c0 : 49c3 [ 2] eor #$c312c2 : a8 [ 2] tay12c3 : 28 [ 4] plp12c4 : 8c0502 [ 4] sty abst+212c7 : 08 [ 3] php ;flags after load/store sequence12c8 : 49c3 [ 2] eor #$c312ca : a8 [ 2] tayAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 95---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------12cb : c041 [ 2] cpy #$41 ;test resulttrap_ne12cd : d0fe [ 3]> bne * ;failed not equal (non zero)12cf : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered12d0 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits12d2 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne12d5 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff12d7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>12d9 : 48 [ 3]> pha ;use stack to load status12da : 28 [ 4]> plp12db : a416 [ 3] ldy zp1+312dd : 08 [ 3] php ;test stores do not alter flags12de : 98 [ 2] tya12df : 49c3 [ 2] eor #$c312e1 : a8 [ 2] tay12e2 : 28 [ 4] plp12e3 : 8c0602 [ 4] sty abst+312e6 : 08 [ 3] php ;flags after load/store sequence12e7 : 49c3 [ 2] eor #$c312e9 : a8 [ 2] tay12ea : c000 [ 2] cpy #0 ;test resulttrap_ne12ec : d0fe [ 3]> bne * ;failed not equal (non zero)12ee : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered12ef : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits12f1 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne12f4 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 012f6 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>12f8 : 48 [ 3]> pha ;use stack to load status12f9 : 28 [ 4]> plp12fa : ac0802 [ 4] ldy abs112fd : 08 [ 3] php ;test stores do not alter flags12fe : 98 [ 2] tya12ff : 49c3 [ 2] eor #$c31301 : a8 [ 2] tay1302 : 28 [ 4] plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 96---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1303 : 840c [ 3] sty zpt1305 : 08 [ 3] php ;flags after load/store sequence1306 : 49c3 [ 2] eor #$c31308 : a8 [ 2] tay1309 : c413 [ 3] cpy zp1 ;test resulttrap_ne130b : d0fe [ 3]> bne * ;failed not equal (non zero)130d : 68 [ 4] pla ;load statuseor_flag 0130e : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1310 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1313 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01315 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1317 : 48 [ 3]> pha ;use stack to load status1318 : 28 [ 4]> plp1319 : ac0902 [ 4] ldy abs1+1131c : 08 [ 3] php ;test stores do not alter flags131d : 98 [ 2] tya131e : 49c3 [ 2] eor #$c31320 : a8 [ 2] tay1321 : 28 [ 4] plp1322 : 840d [ 3] sty zpt+11324 : 08 [ 3] php ;flags after load/store sequence1325 : 49c3 [ 2] eor #$c31327 : a8 [ 2] tay1328 : c414 [ 3] cpy zp1+1 ;test resulttrap_ne132a : d0fe [ 3]> bne * ;failed not equal (non zero)132c : 68 [ 4] pla ;load statuseor_flag 0132d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits132f : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne1332 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01334 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1336 : 48 [ 3]> pha ;use stack to load status1337 : 28 [ 4]> plp1338 : ac0a02 [ 4] ldy abs1+2133b : 08 [ 3] php ;test stores do not alter flags133c : 98 [ 2] tyaAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 97---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------133d : 49c3 [ 2] eor #$c3133f : a8 [ 2] tay1340 : 28 [ 4] plp1341 : 840e [ 3] sty zpt+21343 : 08 [ 3] php ;flags after load/store sequence1344 : 49c3 [ 2] eor #$c31346 : a8 [ 2] tay1347 : c415 [ 3] cpy zp1+2 ;test resulttrap_ne1349 : d0fe [ 3]> bne * ;failed not equal (non zero)134b : 68 [ 4] pla ;load statuseor_flag 0134c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits134e : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1351 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01353 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1355 : 48 [ 3]> pha ;use stack to load status1356 : 28 [ 4]> plp1357 : ac0b02 [ 4] ldy abs1+3135a : 08 [ 3] php ;test stores do not alter flags135b : 98 [ 2] tya135c : 49c3 [ 2] eor #$c3135e : a8 [ 2] tay135f : 28 [ 4] plp1360 : 840f [ 3] sty zpt+31362 : 08 [ 3] php ;flags after load/store sequence1363 : 49c3 [ 2] eor #$c31365 : a8 [ 2] tay1366 : c416 [ 3] cpy zp1+3 ;test resulttrap_ne1368 : d0fe [ 3]> bne * ;failed not equal (non zero)136a : 68 [ 4] pla ;load statuseor_flag 0136b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits136d : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1370 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1372 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1374 : 48 [ 3]> pha ;use stack to load status1375 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 98---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1376 : ac0802 [ 4] ldy abs11379 : 08 [ 3] php ;test stores do not alter flags137a : 98 [ 2] tya137b : 49c3 [ 2] eor #$c3137d : a8 [ 2] tay137e : 28 [ 4] plp137f : 840c [ 3] sty zpt1381 : 08 [ 3] php ;flags after load/store sequence1382 : 49c3 [ 2] eor #$c31384 : a8 [ 2] tay1385 : c513 [ 3] cmp zp1 ;test resulttrap_ne1387 : d0fe [ 3]> bne * ;failed not equal (non zero)1389 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered138a : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits138c : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne138f : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1391 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1393 : 48 [ 3]> pha ;use stack to load status1394 : 28 [ 4]> plp1395 : ac0902 [ 4] ldy abs1+11398 : 08 [ 3] php ;test stores do not alter flags1399 : 98 [ 2] tya139a : 49c3 [ 2] eor #$c3139c : a8 [ 2] tay139d : 28 [ 4] plp139e : 840d [ 3] sty zpt+113a0 : 08 [ 3] php ;flags after load/store sequence13a1 : 49c3 [ 2] eor #$c313a3 : a8 [ 2] tay13a4 : c514 [ 3] cmp zp1+1 ;test resulttrap_ne13a6 : d0fe [ 3]> bne * ;failed not equal (non zero)13a8 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered13a9 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits13ab : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne13ae : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff13b0 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 99---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->13b2 : 48 [ 3]> pha ;use stack to load status13b3 : 28 [ 4]> plp13b4 : ac0a02 [ 4] ldy abs1+213b7 : 08 [ 3] php ;test stores do not alter flags13b8 : 98 [ 2] tya13b9 : 49c3 [ 2] eor #$c313bb : a8 [ 2] tay13bc : 28 [ 4] plp13bd : 840e [ 3] sty zpt+213bf : 08 [ 3] php ;flags after load/store sequence13c0 : 49c3 [ 2] eor #$c313c2 : a8 [ 2] tay13c3 : c515 [ 3] cmp zp1+2 ;test resulttrap_ne13c5 : d0fe [ 3]> bne * ;failed not equal (non zero)13c7 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered13c8 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits13ca : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne13cd : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff13cf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>13d1 : 48 [ 3]> pha ;use stack to load status13d2 : 28 [ 4]> plp13d3 : ac0b02 [ 4] ldy abs1+313d6 : 08 [ 3] php ;test stores do not alter flags13d7 : 98 [ 2] tya13d8 : 49c3 [ 2] eor #$c313da : a8 [ 2] tay13db : 28 [ 4] plp13dc : 840f [ 3] sty zpt+313de : 08 [ 3] php ;flags after load/store sequence13df : 49c3 [ 2] eor #$c313e1 : a8 [ 2] tay13e2 : c516 [ 3] cmp zp1+3 ;test resulttrap_ne13e4 : d0fe [ 3]> bne * ;failed not equal (non zero)13e6 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered13e7 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits13e9 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne13ec : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 100---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_stat 0> load_flag 013ee : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>13f0 : 48 [ 3]> pha ;use stack to load status13f1 : 28 [ 4]> plp13f2 : a0c3 [ 2] ldy #$c313f4 : 08 [ 3] php13f5 : cc0802 [ 4] cpy abs1 ;test resulttrap_ne13f8 : d0fe [ 3]> bne * ;failed not equal (non zero)13fa : 68 [ 4] pla ;load statuseor_flag 013fb : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits13fd : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1400 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01402 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1404 : 48 [ 3]> pha ;use stack to load status1405 : 28 [ 4]> plp1406 : a082 [ 2] ldy #$821408 : 08 [ 3] php1409 : cc0902 [ 4] cpy abs1+1 ;test resulttrap_ne140c : d0fe [ 3]> bne * ;failed not equal (non zero)140e : 68 [ 4] pla ;load statuseor_flag 0140f : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1411 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne1414 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01416 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1418 : 48 [ 3]> pha ;use stack to load status1419 : 28 [ 4]> plp141a : a041 [ 2] ldy #$41141c : 08 [ 3] php141d : cc0a02 [ 4] cpy abs1+2 ;test resulttrap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 101---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1420 : d0fe [ 3]> bne * ;failed not equal (non zero)1422 : 68 [ 4] pla ;load statuseor_flag 01423 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1425 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1428 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0142a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>142c : 48 [ 3]> pha ;use stack to load status142d : 28 [ 4]> plp142e : a000 [ 2] ldy #01430 : 08 [ 3] php1431 : cc0b02 [ 4] cpy abs1+3 ;test resulttrap_ne1434 : d0fe [ 3]> bne * ;failed not equal (non zero)1436 : 68 [ 4] pla ;load statuseor_flag 01437 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1439 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne143c : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff143e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1440 : 48 [ 3]> pha ;use stack to load status1441 : 28 [ 4]> plp1442 : a0c3 [ 2] ldy #$c31444 : 08 [ 3] php1445 : cc0802 [ 4] cpy abs1 ;test resulttrap_ne1448 : d0fe [ 3]> bne * ;failed not equal (non zero)144a : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered144b : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits144d : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1450 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 102---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1452 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1454 : 48 [ 3]> pha ;use stack to load status1455 : 28 [ 4]> plp1456 : a082 [ 2] ldy #$821458 : 08 [ 3] php1459 : cc0902 [ 4] cpy abs1+1 ;test resulttrap_ne145c : d0fe [ 3]> bne * ;failed not equal (non zero)145e : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered145f : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1461 : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne1464 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1466 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1468 : 48 [ 3]> pha ;use stack to load status1469 : 28 [ 4]> plp146a : a041 [ 2] ldy #$41146c : 08 [ 3] php146d : cc0a02 [ 4] cpy abs1+2 ;test resulttrap_ne1470 : d0fe [ 3]> bne * ;failed not equal (non zero)1472 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1473 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1475 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1478 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff147a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>147c : 48 [ 3]> pha ;use stack to load status147d : 28 [ 4]> plp147e : a000 [ 2] ldy #01480 : 08 [ 3] php1481 : cc0b02 [ 4] cpy abs1+3 ;test resulttrap_ne1484 : d0fe [ 3]> bne * ;failed not equal (non zero)1486 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not alteredAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 103---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1487 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1489 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne148c : d0fe [ 3]> bne * ;failed not equal (non zero)148e : a000 [ 2] ldy #01490 : a50c [ 3] lda zpt1492 : 49c3 [ 2] eor #$c31494 : c513 [ 3] cmp zp1trap_ne ;store to zp data1496 : d0fe [ 3]> bne * ;failed not equal (non zero)1498 : 840c [ 3] sty zpt ;clear149a : ad0302 [ 4] lda abst149d : 49c3 [ 2] eor #$c3149f : cd0802 [ 4] cmp abs1trap_ne ;store to abs data14a2 : d0fe [ 3]> bne * ;failed not equal (non zero)14a4 : 8c0302 [ 4] sty abst ;clear14a7 : a50d [ 3] lda zpt+114a9 : 49c3 [ 2] eor #$c314ab : c514 [ 3] cmp zp1+1trap_ne ;store to zp+1 data14ad : d0fe [ 3]> bne * ;failed not equal (non zero)14af : 840d [ 3] sty zpt+1 ;clear14b1 : ad0402 [ 4] lda abst+114b4 : 49c3 [ 2] eor #$c314b6 : cd0902 [ 4] cmp abs1+1trap_ne ;store to abs+1 data14b9 : d0fe [ 3]> bne * ;failed not equal (non zero)14bb : 8c0402 [ 4] sty abst+1 ;clear14be : a50e [ 3] lda zpt+214c0 : 49c3 [ 2] eor #$c314c2 : c515 [ 3] cmp zp1+2trap_ne ;store to zp+2 data14c4 : d0fe [ 3]> bne * ;failed not equal (non zero)14c6 : 840e [ 3] sty zpt+2 ;clear14c8 : ad0502 [ 4] lda abst+214cb : 49c3 [ 2] eor #$c314cd : cd0a02 [ 4] cmp abs1+2trap_ne ;store to abs+2 data14d0 : d0fe [ 3]> bne * ;failed not equal (non zero)14d2 : 8c0502 [ 4] sty abst+2 ;clear14d5 : a50f [ 3] lda zpt+314d7 : 49c3 [ 2] eor #$c314d9 : c516 [ 3] cmp zp1+3trap_ne ;store to zp+3 data14db : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 104---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------14dd : 840f [ 3] sty zpt+3 ;clear14df : ad0602 [ 4] lda abst+314e2 : 49c3 [ 2] eor #$c314e4 : cd0b02 [ 4] cmp abs1+3trap_ne ;store to abs+3 data14e7 : d0fe [ 3]> bne * ;failed not equal (non zero)14e9 : 8c0602 [ 4] sty abst+3 ;clearnext_test14ec : ad0002 [ 4]> lda test_case ;previous test14ef : c914 [ 2]> cmp #test_num> trap_ne ;test is out of sequence14f1 : d0fe [ 3]> bne * ;failed not equal (non zero)>0015 = >test_num = test_num + 114f3 : a915 [ 2]> lda #test_num ;*** this tests' number14f5 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; testing load / store accumulator LDA / STA all addressing modes; LDA / STA - zp,x / abs,x14f8 : a203 [ 2] ldx #314fa : tldaxset_stat 0> load_flag 014fa : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>14fc : 48 [ 3]> pha ;use stack to load status14fd : 28 [ 4]> plp14fe : b513 [ 4] lda zp1,x1500 : 08 [ 3] php ;test stores do not alter flags1501 : 49c3 [ 2] eor #$c31503 : 28 [ 4] plp1504 : 9d0302 [ 5] sta abst,x1507 : 08 [ 3] php ;flags after load/store sequence1508 : 49c3 [ 2] eor #$c3150a : dd0802 [ 4] cmp abs1,x ;test resulttrap_ne150d : d0fe [ 3]> bne * ;failed not equal (non zero)150f : 68 [ 4] pla ;load statuseor_flag 01510 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1512 : dd0d02 [ 4] cmp fLDx,x ;test flagstrap_ne1515 : d0fe [ 3]> bne * ;failed not equal (non zero)1517 : ca [ 2] dex1518 : 10e0 [ 4] bpl tldax151a : a203 [ 2] ldx #3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 105---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------151c : tldax1set_stat $ff> load_flag $ff151c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>151e : 48 [ 3]> pha ;use stack to load status151f : 28 [ 4]> plp1520 : b513 [ 4] lda zp1,x1522 : 08 [ 3] php ;test stores do not alter flags1523 : 49c3 [ 2] eor #$c31525 : 28 [ 4] plp1526 : 9d0302 [ 5] sta abst,x1529 : 08 [ 3] php ;flags after load/store sequence152a : 49c3 [ 2] eor #$c3152c : dd0802 [ 4] cmp abs1,x ;test resulttrap_ne152f : d0fe [ 3]> bne * ;failed not equal (non zero)1531 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1532 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1534 : dd0d02 [ 4] cmp fLDx,x ;test flagstrap_ne1537 : d0fe [ 3]> bne * ;failed not equal (non zero)1539 : ca [ 2] dex153a : 10e0 [ 3] bpl tldax1153c : a203 [ 2] ldx #3153e : tldax2set_stat 0> load_flag 0153e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1540 : 48 [ 3]> pha ;use stack to load status1541 : 28 [ 4]> plp1542 : bd0802 [ 4] lda abs1,x1545 : 08 [ 3] php ;test stores do not alter flags1546 : 49c3 [ 2] eor #$c31548 : 28 [ 4] plp1549 : 950c [ 4] sta zpt,x154b : 08 [ 3] php ;flags after load/store sequence154c : 49c3 [ 2] eor #$c3154e : d513 [ 4] cmp zp1,x ;test resulttrap_ne1550 : d0fe [ 3]> bne * ;failed not equal (non zero)1552 : 68 [ 4] pla ;load statuseor_flag 01553 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1555 : dd0d02 [ 4] cmp fLDx,x ;test flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 106---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trap_ne1558 : d0fe [ 3]> bne * ;failed not equal (non zero)155a : ca [ 2] dex155b : 10e1 [ 3] bpl tldax2155d : a203 [ 2] ldx #3155f : tldax3set_stat $ff> load_flag $ff155f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1561 : 48 [ 3]> pha ;use stack to load status1562 : 28 [ 4]> plp1563 : bd0802 [ 4] lda abs1,x1566 : 08 [ 3] php ;test stores do not alter flags1567 : 49c3 [ 2] eor #$c31569 : 28 [ 4] plp156a : 950c [ 4] sta zpt,x156c : 08 [ 3] php ;flags after load/store sequence156d : 49c3 [ 2] eor #$c3156f : d513 [ 4] cmp zp1,x ;test resulttrap_ne1571 : d0fe [ 3]> bne * ;failed not equal (non zero)1573 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1574 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1576 : dd0d02 [ 4] cmp fLDx,x ;test flagstrap_ne1579 : d0fe [ 3]> bne * ;failed not equal (non zero)157b : ca [ 2] dex157c : 10e1 [ 3] bpl tldax3157e : a203 [ 2] ldx #3 ;testing store result1580 : a000 [ 2] ldy #01582 : b50c [ 4] tstax lda zpt,x1584 : 49c3 [ 2] eor #$c31586 : d513 [ 4] cmp zp1,xtrap_ne ;store to zp,x data1588 : d0fe [ 3]> bne * ;failed not equal (non zero)158a : 940c [ 4] sty zpt,x ;clear158c : bd0302 [ 4] lda abst,x158f : 49c3 [ 2] eor #$c31591 : dd0802 [ 4] cmp abs1,xtrap_ne ;store to abs,x data1594 : d0fe [ 3]> bne * ;failed not equal (non zero)1596 : 8a [ 2] txa1597 : 9d0302 [ 5] sta abst,x ;clear159a : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 107---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------159b : 10e5 [ 3] bpl tstaxnext_test159d : ad0002 [ 4]> lda test_case ;previous test15a0 : c915 [ 2]> cmp #test_num> trap_ne ;test is out of sequence15a2 : d0fe [ 3]> bne * ;failed not equal (non zero)>0016 = >test_num = test_num + 115a4 : a916 [ 2]> lda #test_num ;*** this tests' number15a6 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; LDA / STA - (zp),y / abs,y / (zp,x)15a9 : a003 [ 2] ldy #315ab : tldayset_stat 0> load_flag 015ab : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>15ad : 48 [ 3]> pha ;use stack to load status15ae : 28 [ 4]> plp15af : b124 [ 5] lda (ind1),y15b1 : 08 [ 3] php ;test stores do not alter flags15b2 : 49c3 [ 2] eor #$c315b4 : 28 [ 4] plp15b5 : 990302 [ 5] sta abst,y15b8 : 08 [ 3] php ;flags after load/store sequence15b9 : 49c3 [ 2] eor #$c315bb : d90802 [ 4] cmp abs1,y ;test resulttrap_ne15be : d0fe [ 3]> bne * ;failed not equal (non zero)15c0 : 68 [ 4] pla ;load statuseor_flag 015c1 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits15c3 : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne15c6 : d0fe [ 3]> bne * ;failed not equal (non zero)15c8 : 88 [ 2] dey15c9 : 10e0 [ 3] bpl tlday15cb : a003 [ 2] ldy #315cd : tlday1set_stat $ff> load_flag $ff15cd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>15cf : 48 [ 3]> pha ;use stack to load status15d0 : 28 [ 4]> plp15d1 : b124 [ 5] lda (ind1),yAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 108---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------15d3 : 08 [ 3] php ;test stores do not alter flags15d4 : 49c3 [ 2] eor #$c315d6 : 28 [ 4] plp15d7 : 990302 [ 5] sta abst,y15da : 08 [ 3] php ;flags after load/store sequence15db : 49c3 [ 2] eor #$c315dd : d90802 [ 4] cmp abs1,y ;test resulttrap_ne15e0 : d0fe [ 3]> bne * ;failed not equal (non zero)15e2 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered15e3 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits15e5 : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne15e8 : d0fe [ 3]> bne * ;failed not equal (non zero)15ea : 88 [ 2] dey15eb : 10e0 [ 3] bpl tlday115ed : a003 [ 2] ldy #3 ;testing store result15ef : a200 [ 2] ldx #015f1 : b90302 [ 4] tstay lda abst,y15f4 : 49c3 [ 2] eor #$c315f6 : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data15f9 : d0fe [ 3]> bne * ;failed not equal (non zero)15fb : 8a [ 2] txa15fc : 990302 [ 5] sta abst,y ;clear15ff : 88 [ 2] dey1600 : 10ef [ 4] bpl tstay1602 : a003 [ 2] ldy #31604 : tlday2set_stat 0> load_flag 01604 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1606 : 48 [ 3]> pha ;use stack to load status1607 : 28 [ 4]> plp1608 : b90802 [ 4] lda abs1,y160b : 08 [ 3] php ;test stores do not alter flags160c : 49c3 [ 2] eor #$c3160e : 28 [ 4] plp160f : 9130 [ 5] sta (indt),y1611 : 08 [ 3] php ;flags after load/store sequence1612 : 49c3 [ 2] eor #$c31614 : d124 [ 5] cmp (ind1),y ;test resulttrap_ne1616 : d0fe [ 3]> bne * ;failed not equal (non zero)1618 : 68 [ 4] pla ;load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 109---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------eor_flag 01619 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits161b : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne161e : d0fe [ 3]> bne * ;failed not equal (non zero)1620 : 88 [ 2] dey1621 : 10e1 [ 3] bpl tlday21623 : a003 [ 2] ldy #31625 : tlday3set_stat $ff> load_flag $ff1625 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1627 : 48 [ 3]> pha ;use stack to load status1628 : 28 [ 4]> plp1629 : b90802 [ 4] lda abs1,y162c : 08 [ 3] php ;test stores do not alter flags162d : 49c3 [ 2] eor #$c3162f : 28 [ 4] plp1630 : 9130 [ 5] sta (indt),y1632 : 08 [ 3] php ;flags after load/store sequence1633 : 49c3 [ 2] eor #$c31635 : d124 [ 5] cmp (ind1),y ;test resulttrap_ne1637 : d0fe [ 3]> bne * ;failed not equal (non zero)1639 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered163a : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits163c : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne163f : d0fe [ 3]> bne * ;failed not equal (non zero)1641 : 88 [ 2] dey1642 : 10e1 [ 3] bpl tlday31644 : a003 [ 2] ldy #3 ;testing store result1646 : a200 [ 2] ldx #01648 : b90302 [ 4] tstay1 lda abst,y164b : 49c3 [ 2] eor #$c3164d : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data1650 : d0fe [ 3]> bne * ;failed not equal (non zero)1652 : 8a [ 2] txa1653 : 990302 [ 5] sta abst,y ;clear1656 : 88 [ 2] dey1657 : 10ef [ 3] bpl tstay11659 : a206 [ 2] ldx #6AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 110---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------165b : a003 [ 2] ldy #3165d : tldax4set_stat 0> load_flag 0165d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>165f : 48 [ 3]> pha ;use stack to load status1660 : 28 [ 4]> plp1661 : a124 [ 6] lda (ind1,x)1663 : 08 [ 3] php ;test stores do not alter flags1664 : 49c3 [ 2] eor #$c31666 : 28 [ 4] plp1667 : 8130 [ 6] sta (indt,x)1669 : 08 [ 3] php ;flags after load/store sequence166a : 49c3 [ 2] eor #$c3166c : d90802 [ 4] cmp abs1,y ;test resulttrap_ne166f : d0fe [ 3]> bne * ;failed not equal (non zero)1671 : 68 [ 4] pla ;load statuseor_flag 01672 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1674 : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne1677 : d0fe [ 3]> bne * ;failed not equal (non zero)1679 : ca [ 2] dex167a : ca [ 2] dex167b : 88 [ 2] dey167c : 10df [ 3] bpl tldax4167e : a206 [ 2] ldx #61680 : a003 [ 2] ldy #31682 : tldax5set_stat $ff> load_flag $ff1682 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1684 : 48 [ 3]> pha ;use stack to load status1685 : 28 [ 4]> plp1686 : a124 [ 6] lda (ind1,x)1688 : 08 [ 3] php ;test stores do not alter flags1689 : 49c3 [ 2] eor #$c3168b : 28 [ 4] plp168c : 8130 [ 6] sta (indt,x)168e : 08 [ 3] php ;flags after load/store sequence168f : 49c3 [ 2] eor #$c31691 : d90802 [ 4] cmp abs1,y ;test resulttrap_ne1694 : d0fe [ 3]> bne * ;failed not equal (non zero)1696 : 68 [ 4] pla ;load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 111---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------eor_flag lo~fnz ;mask bits not altered1697 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1699 : d90d02 [ 4] cmp fLDx,y ;test flagstrap_ne169c : d0fe [ 3]> bne * ;failed not equal (non zero)169e : ca [ 2] dex169f : ca [ 2] dex16a0 : 88 [ 2] dey16a1 : 10df [ 3] bpl tldax516a3 : a003 [ 2] ldy #3 ;testing store result16a5 : a200 [ 2] ldx #016a7 : b90302 [ 4] tstay2 lda abst,y16aa : 49c3 [ 2] eor #$c316ac : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data16af : d0fe [ 3]> bne * ;failed not equal (non zero)16b1 : 8a [ 2] txa16b2 : 990302 [ 5] sta abst,y ;clear16b5 : 88 [ 2] dey16b6 : 10ef [ 3] bpl tstay2next_test16b8 : ad0002 [ 4]> lda test_case ;previous test16bb : c916 [ 2]> cmp #test_num> trap_ne ;test is out of sequence16bd : d0fe [ 3]> bne * ;failed not equal (non zero)>0017 = >test_num = test_num + 116bf : a917 [ 2]> lda #test_num ;*** this tests' number16c1 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; indexed wraparound test (only zp should wrap)16c4 : a2fd [ 2] ldx #3+$fa16c6 : b519 [ 4] tldax6 lda zp1-$fa&$ff,x ;wrap on indexed zp16c8 : 9d0901 [ 5] sta abst-$fa,x ;no STX abs,x!16cb : ca [ 2] dex16cc : e0fa [ 2] cpx #$fa16ce : b0f6 [ 3] bcs tldax616d0 : a2fd [ 2] ldx #3+$fa16d2 : bd0e01 [ 4] tldax7 lda abs1-$fa,x ;no wrap on indexed abs16d5 : 9512 [ 4] sta zpt-$fa&$ff,x16d7 : ca [ 2] dex16d8 : e0fa [ 2] cpx #$fa16da : b0f6 [ 3] bcs tldax716dc : a203 [ 2] ldx #3 ;testing wraparound result16de : a000 [ 2] ldy #016e0 : b50c [ 4] tstax1 lda zpt,x16e2 : d513 [ 4] cmp zp1,xtrap_ne ;store to zp,x dataAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 112---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------16e4 : d0fe [ 3]> bne * ;failed not equal (non zero)16e6 : 940c [ 4] sty zpt,x ;clear16e8 : bd0302 [ 4] lda abst,x16eb : dd0802 [ 4] cmp abs1,xtrap_ne ;store to abs,x data16ee : d0fe [ 3]> bne * ;failed not equal (non zero)16f0 : 8a [ 2] txa16f1 : 9d0302 [ 5] sta abst,x ;clear16f4 : ca [ 2] dex16f5 : 10e9 [ 3] bpl tstax116f7 : a0fb [ 2] ldy #3+$f816f9 : a2fe [ 2] ldx #6+$f816fb : a12c [ 6] tlday4 lda (ind1-$f8&$ff,x) ;wrap on indexed zp indirect16fd : 990b01 [ 5] sta abst-$f8,y1700 : ca [ 2] dex1701 : ca [ 2] dex1702 : 88 [ 2] dey1703 : c0f8 [ 2] cpy #$f81705 : b0f4 [ 4] bcs tlday41707 : a003 [ 2] ldy #3 ;testing wraparound result1709 : a200 [ 2] ldx #0170b : b90302 [ 4] tstay4 lda abst,y170e : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data1711 : d0fe [ 3]> bne * ;failed not equal (non zero)1713 : 8a [ 2] txa1714 : 990302 [ 5] sta abst,y ;clear1717 : 88 [ 2] dey1718 : 10f1 [ 3] bpl tstay4171a : a0fb [ 2] ldy #3+$f8171c : b91001 [ 4] tlday5 lda abs1-$f8,y ;no wrap on indexed abs171f : 9138 [ 5] sta (inwt),y1721 : 88 [ 2] dey1722 : c0f8 [ 2] cpy #$f81724 : b0f6 [ 3] bcs tlday51726 : a003 [ 2] ldy #3 ;testing wraparound result1728 : a200 [ 2] ldx #0172a : b90302 [ 4] tstay5 lda abst,y172d : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data1730 : d0fe [ 3]> bne * ;failed not equal (non zero)1732 : 8a [ 2] txa1733 : 990302 [ 5] sta abst,y ;clear1736 : 88 [ 2] dey1737 : 10f1 [ 3] bpl tstay51739 : a0fb [ 2] ldy #3+$f8173b : a2fe [ 2] ldx #6+$f8173d : b12e [ 5] tlday6 lda (inw1),y ;no wrap on zp indirect indexedAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 113---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------173f : 8138 [ 6] sta (indt-$f8&$ff,x)1741 : ca [ 2] dex1742 : ca [ 2] dex1743 : 88 [ 2] dey1744 : c0f8 [ 2] cpy #$f81746 : b0f5 [ 3] bcs tlday61748 : a003 [ 2] ldy #3 ;testing wraparound result174a : a200 [ 2] ldx #0174c : b90302 [ 4] tstay6 lda abst,y174f : d90802 [ 4] cmp abs1,ytrap_ne ;store to abs data1752 : d0fe [ 3]> bne * ;failed not equal (non zero)1754 : 8a [ 2] txa1755 : 990302 [ 5] sta abst,y ;clear1758 : 88 [ 2] dey1759 : 10f1 [ 3] bpl tstay6next_test175b : ad0002 [ 4]> lda test_case ;previous test175e : c917 [ 2]> cmp #test_num> trap_ne ;test is out of sequence1760 : d0fe [ 3]> bne * ;failed not equal (non zero)>0018 = >test_num = test_num + 11762 : a918 [ 2]> lda #test_num ;*** this tests' number1764 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; LDA / STA - zp / abs / #set_stat 0> load_flag 01767 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1769 : 48 [ 3]> pha ;use stack to load status176a : 28 [ 4]> plp176b : a513 [ 3] lda zp1176d : 08 [ 3] php ;test stores do not alter flags176e : 49c3 [ 2] eor #$c31770 : 28 [ 4] plp1771 : 8d0302 [ 4] sta abst1774 : 08 [ 3] php ;flags after load/store sequence1775 : 49c3 [ 2] eor #$c31777 : c9c3 [ 2] cmp #$c3 ;test resulttrap_ne1779 : d0fe [ 3]> bne * ;failed not equal (non zero)177b : 68 [ 4] pla ;load statuseor_flag 0177c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits177e : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1781 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 114---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_stat 0> load_flag 01783 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1785 : 48 [ 3]> pha ;use stack to load status1786 : 28 [ 4]> plp1787 : a514 [ 3] lda zp1+11789 : 08 [ 3] php ;test stores do not alter flags178a : 49c3 [ 2] eor #$c3178c : 28 [ 4] plp178d : 8d0402 [ 4] sta abst+11790 : 08 [ 3] php ;flags after load/store sequence1791 : 49c3 [ 2] eor #$c31793 : c982 [ 2] cmp #$82 ;test resulttrap_ne1795 : d0fe [ 3]> bne * ;failed not equal (non zero)1797 : 68 [ 4] pla ;load statuseor_flag 01798 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits179a : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne179d : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0179f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>17a1 : 48 [ 3]> pha ;use stack to load status17a2 : 28 [ 4]> plp17a3 : a515 [ 3] lda zp1+217a5 : 08 [ 3] php ;test stores do not alter flags17a6 : 49c3 [ 2] eor #$c317a8 : 28 [ 4] plp17a9 : 8d0502 [ 4] sta abst+217ac : 08 [ 3] php ;flags after load/store sequence17ad : 49c3 [ 2] eor #$c317af : c941 [ 2] cmp #$41 ;test resulttrap_ne17b1 : d0fe [ 3]> bne * ;failed not equal (non zero)17b3 : 68 [ 4] pla ;load statuseor_flag 017b4 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits17b6 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne17b9 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 115---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------17bb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>17bd : 48 [ 3]> pha ;use stack to load status17be : 28 [ 4]> plp17bf : a516 [ 3] lda zp1+317c1 : 08 [ 3] php ;test stores do not alter flags17c2 : 49c3 [ 2] eor #$c317c4 : 28 [ 4] plp17c5 : 8d0602 [ 4] sta abst+317c8 : 08 [ 3] php ;flags after load/store sequence17c9 : 49c3 [ 2] eor #$c317cb : c900 [ 2] cmp #0 ;test resulttrap_ne17cd : d0fe [ 3]> bne * ;failed not equal (non zero)17cf : 68 [ 4] pla ;load statuseor_flag 017d0 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits17d2 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne17d5 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff17d7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>17d9 : 48 [ 3]> pha ;use stack to load status17da : 28 [ 4]> plp17db : a513 [ 3] lda zp117dd : 08 [ 3] php ;test stores do not alter flags17de : 49c3 [ 2] eor #$c317e0 : 28 [ 4] plp17e1 : 8d0302 [ 4] sta abst17e4 : 08 [ 3] php ;flags after load/store sequence17e5 : 49c3 [ 2] eor #$c317e7 : c9c3 [ 2] cmp #$c3 ;test resulttrap_ne17e9 : d0fe [ 3]> bne * ;failed not equal (non zero)17eb : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered17ec : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits17ee : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne17f1 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff17f3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>17f5 : 48 [ 3]> pha ;use stack to load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 116---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------17f6 : 28 [ 4]> plp17f7 : a514 [ 3] lda zp1+117f9 : 08 [ 3] php ;test stores do not alter flags17fa : 49c3 [ 2] eor #$c317fc : 28 [ 4] plp17fd : 8d0402 [ 4] sta abst+11800 : 08 [ 3] php ;flags after load/store sequence1801 : 49c3 [ 2] eor #$c31803 : c982 [ 2] cmp #$82 ;test resulttrap_ne1805 : d0fe [ 3]> bne * ;failed not equal (non zero)1807 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1808 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits180a : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne180d : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff180f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1811 : 48 [ 3]> pha ;use stack to load status1812 : 28 [ 4]> plp1813 : a515 [ 3] lda zp1+21815 : 08 [ 3] php ;test stores do not alter flags1816 : 49c3 [ 2] eor #$c31818 : 28 [ 4] plp1819 : 8d0502 [ 4] sta abst+2181c : 08 [ 3] php ;flags after load/store sequence181d : 49c3 [ 2] eor #$c3181f : c941 [ 2] cmp #$41 ;test resulttrap_ne1821 : d0fe [ 3]> bne * ;failed not equal (non zero)1823 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1824 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1826 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1829 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff182b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>182d : 48 [ 3]> pha ;use stack to load status182e : 28 [ 4]> plp182f : a516 [ 3] lda zp1+3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 117---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1831 : 08 [ 3] php ;test stores do not alter flags1832 : 49c3 [ 2] eor #$c31834 : 28 [ 4] plp1835 : 8d0602 [ 4] sta abst+31838 : 08 [ 3] php ;flags after load/store sequence1839 : 49c3 [ 2] eor #$c3183b : c900 [ 2] cmp #0 ;test resulttrap_ne183d : d0fe [ 3]> bne * ;failed not equal (non zero)183f : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1840 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1842 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1845 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01847 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1849 : 48 [ 3]> pha ;use stack to load status184a : 28 [ 4]> plp184b : ad0802 [ 4] lda abs1184e : 08 [ 3] php ;test stores do not alter flags184f : 49c3 [ 2] eor #$c31851 : 28 [ 4] plp1852 : 850c [ 3] sta zpt1854 : 08 [ 3] php ;flags after load/store sequence1855 : 49c3 [ 2] eor #$c31857 : c513 [ 3] cmp zp1 ;test resulttrap_ne1859 : d0fe [ 3]> bne * ;failed not equal (non zero)185b : 68 [ 4] pla ;load statuseor_flag 0185c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits185e : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1861 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01863 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1865 : 48 [ 3]> pha ;use stack to load status1866 : 28 [ 4]> plp1867 : ad0902 [ 4] lda abs1+1186a : 08 [ 3] php ;test stores do not alter flags186b : 49c3 [ 2] eor #$c3186d : 28 [ 4] plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 118---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------186e : 850d [ 3] sta zpt+11870 : 08 [ 3] php ;flags after load/store sequence1871 : 49c3 [ 2] eor #$c31873 : c514 [ 3] cmp zp1+1 ;test resulttrap_ne1875 : d0fe [ 3]> bne * ;failed not equal (non zero)1877 : 68 [ 4] pla ;load statuseor_flag 01878 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits187a : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne187d : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0187f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1881 : 48 [ 3]> pha ;use stack to load status1882 : 28 [ 4]> plp1883 : ad0a02 [ 4] lda abs1+21886 : 08 [ 3] php ;test stores do not alter flags1887 : 49c3 [ 2] eor #$c31889 : 28 [ 4] plp188a : 850e [ 3] sta zpt+2188c : 08 [ 3] php ;flags after load/store sequence188d : 49c3 [ 2] eor #$c3188f : c515 [ 3] cmp zp1+2 ;test resulttrap_ne1891 : d0fe [ 3]> bne * ;failed not equal (non zero)1893 : 68 [ 4] pla ;load statuseor_flag 01894 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1896 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1899 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0189b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>189d : 48 [ 3]> pha ;use stack to load status189e : 28 [ 4]> plp189f : ad0b02 [ 4] lda abs1+318a2 : 08 [ 3] php ;test stores do not alter flags18a3 : 49c3 [ 2] eor #$c318a5 : 28 [ 4] plp18a6 : 850f [ 3] sta zpt+318a8 : 08 [ 3] php ;flags after load/store sequence18a9 : 49c3 [ 2] eor #$c3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 119---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------18ab : c516 [ 3] cmp zp1+3 ;test resulttrap_ne18ad : d0fe [ 3]> bne * ;failed not equal (non zero)18af : 68 [ 4] pla ;load statuseor_flag 018b0 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits18b2 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne18b5 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff18b7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>18b9 : 48 [ 3]> pha ;use stack to load status18ba : 28 [ 4]> plp18bb : ad0802 [ 4] lda abs118be : 08 [ 3] php ;test stores do not alter flags18bf : 49c3 [ 2] eor #$c318c1 : 28 [ 4] plp18c2 : 850c [ 3] sta zpt18c4 : 08 [ 3] php ;flags after load/store sequence18c5 : 49c3 [ 2] eor #$c318c7 : c513 [ 3] cmp zp1 ;test resulttrap_ne18c9 : d0fe [ 3]> bne * ;failed not equal (non zero)18cb : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered18cc : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits18ce : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne18d1 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff18d3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>18d5 : 48 [ 3]> pha ;use stack to load status18d6 : 28 [ 4]> plp18d7 : ad0902 [ 4] lda abs1+118da : 08 [ 3] php ;test stores do not alter flags18db : 49c3 [ 2] eor #$c318dd : 28 [ 4] plp18de : 850d [ 3] sta zpt+118e0 : 08 [ 3] php ;flags after load/store sequence18e1 : 49c3 [ 2] eor #$c318e3 : c514 [ 3] cmp zp1+1 ;test resulttrap_ne18e5 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 120---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------18e7 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered18e8 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits18ea : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne18ed : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff18ef : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>18f1 : 48 [ 3]> pha ;use stack to load status18f2 : 28 [ 4]> plp18f3 : ad0a02 [ 4] lda abs1+218f6 : 08 [ 3] php ;test stores do not alter flags18f7 : 49c3 [ 2] eor #$c318f9 : 28 [ 4] plp18fa : 850e [ 3] sta zpt+218fc : 08 [ 3] php ;flags after load/store sequence18fd : 49c3 [ 2] eor #$c318ff : c515 [ 3] cmp zp1+2 ;test resulttrap_ne1901 : d0fe [ 3]> bne * ;failed not equal (non zero)1903 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1904 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1906 : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1909 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff190b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>190d : 48 [ 3]> pha ;use stack to load status190e : 28 [ 4]> plp190f : ad0b02 [ 4] lda abs1+31912 : 08 [ 3] php ;test stores do not alter flags1913 : 49c3 [ 2] eor #$c31915 : 28 [ 4] plp1916 : 850f [ 3] sta zpt+31918 : 08 [ 3] php ;flags after load/store sequence1919 : 49c3 [ 2] eor #$c3191b : c516 [ 3] cmp zp1+3 ;test resulttrap_ne191d : d0fe [ 3]> bne * ;failed not equal (non zero)191f : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not alteredAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 121---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1920 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1922 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1925 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01927 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1929 : 48 [ 3]> pha ;use stack to load status192a : 28 [ 4]> plp192b : a9c3 [ 2] lda #$c3192d : 08 [ 3] php192e : cd0802 [ 4] cmp abs1 ;test resulttrap_ne1931 : d0fe [ 3]> bne * ;failed not equal (non zero)1933 : 68 [ 4] pla ;load statuseor_flag 01934 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1936 : cd0d02 [ 4] cmp fLDx ;test flagstrap_ne1939 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0193b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>193d : 48 [ 3]> pha ;use stack to load status193e : 28 [ 4]> plp193f : a982 [ 2] lda #$821941 : 08 [ 3] php1942 : cd0902 [ 4] cmp abs1+1 ;test resulttrap_ne1945 : d0fe [ 3]> bne * ;failed not equal (non zero)1947 : 68 [ 4] pla ;load statuseor_flag 01948 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits194a : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne194d : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 0194f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1951 : 48 [ 3]> pha ;use stack to load status1952 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 122---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1953 : a941 [ 2] lda #$411955 : 08 [ 3] php1956 : cd0a02 [ 4] cmp abs1+2 ;test resulttrap_ne1959 : d0fe [ 3]> bne * ;failed not equal (non zero)195b : 68 [ 4] pla ;load statuseor_flag 0195c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits195e : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne1961 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat 0> load_flag 01963 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1965 : 48 [ 3]> pha ;use stack to load status1966 : 28 [ 4]> plp1967 : a900 [ 2] lda #01969 : 08 [ 3] php196a : cd0b02 [ 4] cmp abs1+3 ;test resulttrap_ne196d : d0fe [ 3]> bne * ;failed not equal (non zero)196f : 68 [ 4] pla ;load statuseor_flag 01970 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits1972 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne1975 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff1977 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1979 : 48 [ 3]> pha ;use stack to load status197a : 28 [ 4]> plp197b : a9c3 [ 2] lda #$c3197d : 08 [ 3] php197e : cd0802 [ 4] cmp abs1 ;test resulttrap_ne1981 : d0fe [ 3]> bne * ;failed not equal (non zero)1983 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1984 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits1986 : cd0d02 [ 4] cmp fLDx ;test flagstrap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 123---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1989 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff198b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>198d : 48 [ 3]> pha ;use stack to load status198e : 28 [ 4]> plp198f : a982 [ 2] lda #$821991 : 08 [ 3] php1992 : cd0902 [ 4] cmp abs1+1 ;test resulttrap_ne1995 : d0fe [ 3]> bne * ;failed not equal (non zero)1997 : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered1998 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits199a : cd0e02 [ 4] cmp fLDx+1 ;test flagstrap_ne199d : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff199f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>19a1 : 48 [ 3]> pha ;use stack to load status19a2 : 28 [ 4]> plp19a3 : a941 [ 2] lda #$4119a5 : 08 [ 3] php19a6 : cd0a02 [ 4] cmp abs1+2 ;test resulttrap_ne19a9 : d0fe [ 3]> bne * ;failed not equal (non zero)19ab : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered19ac : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits19ae : cd0f02 [ 4] cmp fLDx+2 ;test flagstrap_ne19b1 : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff19b3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>19b5 : 48 [ 3]> pha ;use stack to load status19b6 : 28 [ 4]> plp19b7 : a900 [ 2] lda #019b9 : 08 [ 3] php19ba : cd0b02 [ 4] cmp abs1+3 ;test resulttrap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 124---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------19bd : d0fe [ 3]> bne * ;failed not equal (non zero)19bf : 68 [ 4] pla ;load statuseor_flag lo~fnz ;mask bits not altered19c0 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits19c2 : cd1002 [ 4] cmp fLDx+3 ;test flagstrap_ne19c5 : d0fe [ 3]> bne * ;failed not equal (non zero)19c7 : a200 [ 2] ldx #019c9 : a50c [ 3] lda zpt19cb : 49c3 [ 2] eor #$c319cd : c513 [ 3] cmp zp1trap_ne ;store to zp data19cf : d0fe [ 3]> bne * ;failed not equal (non zero)19d1 : 860c [ 3] stx zpt ;clear19d3 : ad0302 [ 4] lda abst19d6 : 49c3 [ 2] eor #$c319d8 : cd0802 [ 4] cmp abs1trap_ne ;store to abs data19db : d0fe [ 3]> bne * ;failed not equal (non zero)19dd : 8e0302 [ 4] stx abst ;clear19e0 : a50d [ 3] lda zpt+119e2 : 49c3 [ 2] eor #$c319e4 : c514 [ 3] cmp zp1+1trap_ne ;store to zp data19e6 : d0fe [ 3]> bne * ;failed not equal (non zero)19e8 : 860d [ 3] stx zpt+1 ;clear19ea : ad0402 [ 4] lda abst+119ed : 49c3 [ 2] eor #$c319ef : cd0902 [ 4] cmp abs1+1trap_ne ;store to abs data19f2 : d0fe [ 3]> bne * ;failed not equal (non zero)19f4 : 8e0402 [ 4] stx abst+1 ;clear19f7 : a50e [ 3] lda zpt+219f9 : 49c3 [ 2] eor #$c319fb : c515 [ 3] cmp zp1+2trap_ne ;store to zp data19fd : d0fe [ 3]> bne * ;failed not equal (non zero)19ff : 860e [ 3] stx zpt+2 ;clear1a01 : ad0502 [ 4] lda abst+21a04 : 49c3 [ 2] eor #$c31a06 : cd0a02 [ 4] cmp abs1+2trap_ne ;store to abs data1a09 : d0fe [ 3]> bne * ;failed not equal (non zero)1a0b : 8e0502 [ 4] stx abst+2 ;clear1a0e : a50f [ 3] lda zpt+3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 125---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1a10 : 49c3 [ 2] eor #$c31a12 : c516 [ 3] cmp zp1+3trap_ne ;store to zp data1a14 : d0fe [ 3]> bne * ;failed not equal (non zero)1a16 : 860f [ 3] stx zpt+3 ;clear1a18 : ad0602 [ 4] lda abst+31a1b : 49c3 [ 2] eor #$c31a1d : cd0b02 [ 4] cmp abs1+3trap_ne ;store to abs data1a20 : d0fe [ 3]> bne * ;failed not equal (non zero)1a22 : 8e0602 [ 4] stx abst+3 ;clearnext_test1a25 : ad0002 [ 4]> lda test_case ;previous test1a28 : c918 [ 2]> cmp #test_num> trap_ne ;test is out of sequence1a2a : d0fe [ 3]> bne * ;failed not equal (non zero)>0019 = >test_num = test_num + 11a2c : a919 [ 2]> lda #test_num ;*** this tests' number1a2e : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; testing bit test & compares BIT CPX CPY CMP all addressing modes; BIT - zp / absset_a $ff,0> load_flag 01a31 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1a33 : 48 [ 3]> pha ;use stack to load status1a34 : a9ff [ 2]> lda #$ff ;precharge accu1a36 : 28 [ 4]> plp1a37 : 2416 [ 3] bit zp1+3 ;00 - should set Z / clear NVtst_a $ff,fz1a39 : 08 [ 3]> php ;save flags1a3a : 08 [ 3]> php1a3b : c9ff [ 2]> cmp #$ff ;test result> trap_ne1a3d : d0fe [ 3]> bne * ;failed not equal (non zero)>1a3f : 68 [ 4]> pla ;load status> cmp_flag fz1a40 : c932 [ 2]> cmp #(fz |fao)&m8 ;expected flags + always on bits>> trap_ne1a42 : d0fe [ 3]> bne * ;failed not equal (non zero)>1a44 : 28 [ 4]> plp ;restore statusset_a 1,0> load_flag 01a45 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 126---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->1a47 : 48 [ 3]> pha ;use stack to load status1a48 : a901 [ 2]> lda #1 ;precharge accu1a4a : 28 [ 4]> plp1a4b : 2415 [ 3] bit zp1+2 ;41 - should set V (M6) / clear NZtst_a 1,fv1a4d : 08 [ 3]> php ;save flags1a4e : 08 [ 3]> php1a4f : c901 [ 2]> cmp #1 ;test result> trap_ne1a51 : d0fe [ 3]> bne * ;failed not equal (non zero)>1a53 : 68 [ 4]> pla ;load status> cmp_flag fv1a54 : c970 [ 2]> cmp #(fv|fao)&m8 ;expected flags + always on bits>> trap_ne1a56 : d0fe [ 3]> bne * ;failed not equal (non zero)>1a58 : 28 [ 4]> plp ;restore statusset_a 1,0> load_flag 01a59 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1a5b : 48 [ 3]> pha ;use stack to load status1a5c : a901 [ 2]> lda #1 ;precharge accu1a5e : 28 [ 4]> plp1a5f : 2414 [ 3] bit zp1+1 ;82 - should set N (M7) & Z / clear Vtst_a 1,fnz1a61 : 08 [ 3]> php ;save flags1a62 : 08 [ 3]> php1a63 : c901 [ 2]> cmp #1 ;test result> trap_ne1a65 : d0fe [ 3]> bne * ;failed not equal (non zero)>1a67 : 68 [ 4]> pla ;load status> cmp_flag fnz1a68 : c9b2 [ 2]> cmp #(fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1a6a : d0fe [ 3]> bne * ;failed not equal (non zero)>1a6c : 28 [ 4]> plp ;restore statusset_a 1,0> load_flag 01a6d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1a6f : 48 [ 3]> pha ;use stack to load status1a70 : a901 [ 2]> lda #1 ;precharge accu1a72 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 127---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1a73 : 2413 [ 3] bit zp1 ;c3 - should set N (M7) & V (M6) / clear Ztst_a 1,fnv1a75 : 08 [ 3]> php ;save flags1a76 : 08 [ 3]> php1a77 : c901 [ 2]> cmp #1 ;test result> trap_ne1a79 : d0fe [ 3]> bne * ;failed not equal (non zero)>1a7b : 68 [ 4]> pla ;load status> cmp_flag fnv1a7c : c9f0 [ 2]> cmp #(fnv|fao)&m8 ;expected flags + always on bits>> trap_ne1a7e : d0fe [ 3]> bne * ;failed not equal (non zero)>1a80 : 28 [ 4]> plp ;restore statusset_a $ff,$ff> load_flag $ff1a81 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1a83 : 48 [ 3]> pha ;use stack to load status1a84 : a9ff [ 2]> lda #$ff ;precharge accu1a86 : 28 [ 4]> plp1a87 : 2416 [ 3] bit zp1+3 ;00 - should set Z / clear NVtst_a $ff,~fnv1a89 : 08 [ 3]> php ;save flags1a8a : 08 [ 3]> php1a8b : c9ff [ 2]> cmp #$ff ;test result> trap_ne1a8d : d0fe [ 3]> bne * ;failed not equal (non zero)>1a8f : 68 [ 4]> pla ;load status> cmp_flag ~fnv1a90 : c93f [ 2]> cmp #(~fnv |fao)&m8 ;expected flags + always on bits>> trap_ne1a92 : d0fe [ 3]> bne * ;failed not equal (non zero)>1a94 : 28 [ 4]> plp ;restore statusset_a 1,$ff> load_flag $ff1a95 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1a97 : 48 [ 3]> pha ;use stack to load status1a98 : a901 [ 2]> lda #1 ;precharge accu1a9a : 28 [ 4]> plp1a9b : 2415 [ 3] bit zp1+2 ;41 - should set V (M6) / clear NZtst_a 1,~fnz1a9d : 08 [ 3]> php ;save flags1a9e : 08 [ 3]> phpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 128---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1a9f : c901 [ 2]> cmp #1 ;test result> trap_ne1aa1 : d0fe [ 3]> bne * ;failed not equal (non zero)>1aa3 : 68 [ 4]> pla ;load status> cmp_flag ~fnz1aa4 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1aa6 : d0fe [ 3]> bne * ;failed not equal (non zero)>1aa8 : 28 [ 4]> plp ;restore statusset_a 1,$ff> load_flag $ff1aa9 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1aab : 48 [ 3]> pha ;use stack to load status1aac : a901 [ 2]> lda #1 ;precharge accu1aae : 28 [ 4]> plp1aaf : 2414 [ 3] bit zp1+1 ;82 - should set N (M7) & Z / clear Vtst_a 1,~fv1ab1 : 08 [ 3]> php ;save flags1ab2 : 08 [ 3]> php1ab3 : c901 [ 2]> cmp #1 ;test result> trap_ne1ab5 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ab7 : 68 [ 4]> pla ;load status> cmp_flag ~fv1ab8 : c9bf [ 2]> cmp #(~fv|fao)&m8 ;expected flags + always on bits>> trap_ne1aba : d0fe [ 3]> bne * ;failed not equal (non zero)>1abc : 28 [ 4]> plp ;restore statusset_a 1,$ff> load_flag $ff1abd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1abf : 48 [ 3]> pha ;use stack to load status1ac0 : a901 [ 2]> lda #1 ;precharge accu1ac2 : 28 [ 4]> plp1ac3 : 2413 [ 3] bit zp1 ;c3 - should set N (M7) & V (M6) / clear Ztst_a 1,~fz1ac5 : 08 [ 3]> php ;save flags1ac6 : 08 [ 3]> php1ac7 : c901 [ 2]> cmp #1 ;test result> trap_ne1ac9 : d0fe [ 3]> bne * ;failed not equal (non zero)>1acb : 68 [ 4]> pla ;load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 129---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> cmp_flag ~fz1acc : c9fd [ 2]> cmp #(~fz|fao)&m8 ;expected flags + always on bits>> trap_ne1ace : d0fe [ 3]> bne * ;failed not equal (non zero)>1ad0 : 28 [ 4]> plp ;restore statusset_a $ff,0> load_flag 01ad1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1ad3 : 48 [ 3]> pha ;use stack to load status1ad4 : a9ff [ 2]> lda #$ff ;precharge accu1ad6 : 28 [ 4]> plp1ad7 : 2c0b02 [ 4] bit abs1+3 ;00 - should set Z / clear NVtst_a $ff,fz1ada : 08 [ 3]> php ;save flags1adb : 08 [ 3]> php1adc : c9ff [ 2]> cmp #$ff ;test result> trap_ne1ade : d0fe [ 3]> bne * ;failed not equal (non zero)>1ae0 : 68 [ 4]> pla ;load status> cmp_flag fz1ae1 : c932 [ 2]> cmp #(fz |fao)&m8 ;expected flags + always on bits>> trap_ne1ae3 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ae5 : 28 [ 4]> plp ;restore statusset_a 1,0> load_flag 01ae6 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1ae8 : 48 [ 3]> pha ;use stack to load status1ae9 : a901 [ 2]> lda #1 ;precharge accu1aeb : 28 [ 4]> plp1aec : 2c0a02 [ 4] bit abs1+2 ;41 - should set V (M6) / clear NZtst_a 1,fv1aef : 08 [ 3]> php ;save flags1af0 : 08 [ 3]> php1af1 : c901 [ 2]> cmp #1 ;test result> trap_ne1af3 : d0fe [ 3]> bne * ;failed not equal (non zero)>1af5 : 68 [ 4]> pla ;load status> cmp_flag fv1af6 : c970 [ 2]> cmp #(fv|fao)&m8 ;expected flags + always on bits>> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 130---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1af8 : d0fe [ 3]> bne * ;failed not equal (non zero)>1afa : 28 [ 4]> plp ;restore statusset_a 1,0> load_flag 01afb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1afd : 48 [ 3]> pha ;use stack to load status1afe : a901 [ 2]> lda #1 ;precharge accu1b00 : 28 [ 4]> plp1b01 : 2c0902 [ 4] bit abs1+1 ;82 - should set N (M7) & Z / clear Vtst_a 1,fnz1b04 : 08 [ 3]> php ;save flags1b05 : 08 [ 3]> php1b06 : c901 [ 2]> cmp #1 ;test result> trap_ne1b08 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b0a : 68 [ 4]> pla ;load status> cmp_flag fnz1b0b : c9b2 [ 2]> cmp #(fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1b0d : d0fe [ 3]> bne * ;failed not equal (non zero)>1b0f : 28 [ 4]> plp ;restore statusset_a 1,0> load_flag 01b10 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1b12 : 48 [ 3]> pha ;use stack to load status1b13 : a901 [ 2]> lda #1 ;precharge accu1b15 : 28 [ 4]> plp1b16 : 2c0802 [ 4] bit abs1 ;c3 - should set N (M7) & V (M6) / clear Ztst_a 1,fnv1b19 : 08 [ 3]> php ;save flags1b1a : 08 [ 3]> php1b1b : c901 [ 2]> cmp #1 ;test result> trap_ne1b1d : d0fe [ 3]> bne * ;failed not equal (non zero)>1b1f : 68 [ 4]> pla ;load status> cmp_flag fnv1b20 : c9f0 [ 2]> cmp #(fnv|fao)&m8 ;expected flags + always on bits>> trap_ne1b22 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b24 : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 131---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_a $ff,$ff> load_flag $ff1b25 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1b27 : 48 [ 3]> pha ;use stack to load status1b28 : a9ff [ 2]> lda #$ff ;precharge accu1b2a : 28 [ 4]> plp1b2b : 2c0b02 [ 4] bit abs1+3 ;00 - should set Z / clear NVtst_a $ff,~fnv1b2e : 08 [ 3]> php ;save flags1b2f : 08 [ 3]> php1b30 : c9ff [ 2]> cmp #$ff ;test result> trap_ne1b32 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b34 : 68 [ 4]> pla ;load status> cmp_flag ~fnv1b35 : c93f [ 2]> cmp #(~fnv |fao)&m8 ;expected flags + always on bits>> trap_ne1b37 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b39 : 28 [ 4]> plp ;restore statusset_a 1,$ff> load_flag $ff1b3a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1b3c : 48 [ 3]> pha ;use stack to load status1b3d : a901 [ 2]> lda #1 ;precharge accu1b3f : 28 [ 4]> plp1b40 : 2c0a02 [ 4] bit abs1+2 ;41 - should set V (M6) / clear NZtst_a 1,~fnz1b43 : 08 [ 3]> php ;save flags1b44 : 08 [ 3]> php1b45 : c901 [ 2]> cmp #1 ;test result> trap_ne1b47 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b49 : 68 [ 4]> pla ;load status> cmp_flag ~fnz1b4a : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1b4c : d0fe [ 3]> bne * ;failed not equal (non zero)>1b4e : 28 [ 4]> plp ;restore statusset_a 1,$ff> load_flag $ff1b4f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1b51 : 48 [ 3]> pha ;use stack to load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 132---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1b52 : a901 [ 2]> lda #1 ;precharge accu1b54 : 28 [ 4]> plp1b55 : 2c0902 [ 4] bit abs1+1 ;82 - should set N (M7) & Z / clear Vtst_a 1,~fv1b58 : 08 [ 3]> php ;save flags1b59 : 08 [ 3]> php1b5a : c901 [ 2]> cmp #1 ;test result> trap_ne1b5c : d0fe [ 3]> bne * ;failed not equal (non zero)>1b5e : 68 [ 4]> pla ;load status> cmp_flag ~fv1b5f : c9bf [ 2]> cmp #(~fv|fao)&m8 ;expected flags + always on bits>> trap_ne1b61 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b63 : 28 [ 4]> plp ;restore statusset_a 1,$ff> load_flag $ff1b64 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1b66 : 48 [ 3]> pha ;use stack to load status1b67 : a901 [ 2]> lda #1 ;precharge accu1b69 : 28 [ 4]> plp1b6a : 2c0802 [ 4] bit abs1 ;c3 - should set N (M7) & V (M6) / clear Ztst_a 1,~fz1b6d : 08 [ 3]> php ;save flags1b6e : 08 [ 3]> php1b6f : c901 [ 2]> cmp #1 ;test result> trap_ne1b71 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b73 : 68 [ 4]> pla ;load status> cmp_flag ~fz1b74 : c9fd [ 2]> cmp #(~fz|fao)&m8 ;expected flags + always on bits>> trap_ne1b76 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b78 : 28 [ 4]> plp ;restore statusnext_test1b79 : ad0002 [ 4]> lda test_case ;previous test1b7c : c919 [ 2]> cmp #test_num> trap_ne ;test is out of sequence1b7e : d0fe [ 3]> bne * ;failed not equal (non zero)>001a = >test_num = test_num + 11b80 : a91a [ 2]> lda #test_num ;*** this tests' number1b82 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each testAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 133---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------; CPX - zp / abs / #set_x $80,0> load_flag 01b85 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1b87 : 48 [ 3]> pha ;use stack to load status1b88 : a280 [ 2]> ldx #$80 ;precharge index x1b8a : 28 [ 4]> plp1b8b : e417 [ 3] cpx zp7ftst_stat fc1b8d : 08 [ 3]> php ;save status1b8e : 08 [ 3]> php ;use stack to retrieve status1b8f : 68 [ 4]> pla> cmp_flag fc1b90 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1b92 : d0fe [ 3]> bne * ;failed not equal (non zero)>1b94 : 28 [ 4]> plp ;restore status1b95 : ca [ 2] dex1b96 : e417 [ 3] cpx zp7ftst_stat fzc1b98 : 08 [ 3]> php ;save status1b99 : 08 [ 3]> php ;use stack to retrieve status1b9a : 68 [ 4]> pla> cmp_flag fzc1b9b : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1b9d : d0fe [ 3]> bne * ;failed not equal (non zero)>1b9f : 28 [ 4]> plp ;restore status1ba0 : ca [ 2] dex1ba1 : e417 [ 3] cpx zp7ftst_x $7e,fn1ba3 : 08 [ 3]> php ;save flags1ba4 : 08 [ 3]> php1ba5 : e07e [ 2]> cpx #$7e ;test result> trap_ne1ba7 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ba9 : 68 [ 4]> pla ;load status> cmp_flag fn1baa : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1bac : d0fe [ 3]> bne * ;failed not equal (non zero)>1bae : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 134---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_x $80,$ff> load_flag $ff1baf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1bb1 : 48 [ 3]> pha ;use stack to load status1bb2 : a280 [ 2]> ldx #$80 ;precharge index x1bb4 : 28 [ 4]> plp1bb5 : e417 [ 3] cpx zp7ftst_stat ~fnz1bb7 : 08 [ 3]> php ;save status1bb8 : 08 [ 3]> php ;use stack to retrieve status1bb9 : 68 [ 4]> pla> cmp_flag ~fnz1bba : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1bbc : d0fe [ 3]> bne * ;failed not equal (non zero)>1bbe : 28 [ 4]> plp ;restore status1bbf : ca [ 2] dex1bc0 : e417 [ 3] cpx zp7ftst_stat ~fn1bc2 : 08 [ 3]> php ;save status1bc3 : 08 [ 3]> php ;use stack to retrieve status1bc4 : 68 [ 4]> pla> cmp_flag ~fn1bc5 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1bc7 : d0fe [ 3]> bne * ;failed not equal (non zero)>1bc9 : 28 [ 4]> plp ;restore status1bca : ca [ 2] dex1bcb : e417 [ 3] cpx zp7ftst_x $7e,~fzc1bcd : 08 [ 3]> php ;save flags1bce : 08 [ 3]> php1bcf : e07e [ 2]> cpx #$7e ;test result> trap_ne1bd1 : d0fe [ 3]> bne * ;failed not equal (non zero)>1bd3 : 68 [ 4]> pla ;load status> cmp_flag ~fzc1bd4 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1bd6 : d0fe [ 3]> bne * ;failed not equal (non zero)>1bd8 : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 135---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_x $80,0> load_flag 01bd9 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1bdb : 48 [ 3]> pha ;use stack to load status1bdc : a280 [ 2]> ldx #$80 ;precharge index x1bde : 28 [ 4]> plp1bdf : ec0c02 [ 4] cpx abs7ftst_stat fc1be2 : 08 [ 3]> php ;save status1be3 : 08 [ 3]> php ;use stack to retrieve status1be4 : 68 [ 4]> pla> cmp_flag fc1be5 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1be7 : d0fe [ 3]> bne * ;failed not equal (non zero)>1be9 : 28 [ 4]> plp ;restore status1bea : ca [ 2] dex1beb : ec0c02 [ 4] cpx abs7ftst_stat fzc1bee : 08 [ 3]> php ;save status1bef : 08 [ 3]> php ;use stack to retrieve status1bf0 : 68 [ 4]> pla> cmp_flag fzc1bf1 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1bf3 : d0fe [ 3]> bne * ;failed not equal (non zero)>1bf5 : 28 [ 4]> plp ;restore status1bf6 : ca [ 2] dex1bf7 : ec0c02 [ 4] cpx abs7ftst_x $7e,fn1bfa : 08 [ 3]> php ;save flags1bfb : 08 [ 3]> php1bfc : e07e [ 2]> cpx #$7e ;test result> trap_ne1bfe : d0fe [ 3]> bne * ;failed not equal (non zero)>1c00 : 68 [ 4]> pla ;load status> cmp_flag fn1c01 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1c03 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c05 : 28 [ 4]> plp ;restore statusset_x $80,$ff> load_flag $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 136---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1c06 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1c08 : 48 [ 3]> pha ;use stack to load status1c09 : a280 [ 2]> ldx #$80 ;precharge index x1c0b : 28 [ 4]> plp1c0c : ec0c02 [ 4] cpx abs7ftst_stat ~fnz1c0f : 08 [ 3]> php ;save status1c10 : 08 [ 3]> php ;use stack to retrieve status1c11 : 68 [ 4]> pla> cmp_flag ~fnz1c12 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1c14 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c16 : 28 [ 4]> plp ;restore status1c17 : ca [ 2] dex1c18 : ec0c02 [ 4] cpx abs7ftst_stat ~fn1c1b : 08 [ 3]> php ;save status1c1c : 08 [ 3]> php ;use stack to retrieve status1c1d : 68 [ 4]> pla> cmp_flag ~fn1c1e : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1c20 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c22 : 28 [ 4]> plp ;restore status1c23 : ca [ 2] dex1c24 : ec0c02 [ 4] cpx abs7ftst_x $7e,~fzc1c27 : 08 [ 3]> php ;save flags1c28 : 08 [ 3]> php1c29 : e07e [ 2]> cpx #$7e ;test result> trap_ne1c2b : d0fe [ 3]> bne * ;failed not equal (non zero)>1c2d : 68 [ 4]> pla ;load status> cmp_flag ~fzc1c2e : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1c30 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c32 : 28 [ 4]> plp ;restore statusset_x $80,0> load_flag 01c33 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 137---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->1c35 : 48 [ 3]> pha ;use stack to load status1c36 : a280 [ 2]> ldx #$80 ;precharge index x1c38 : 28 [ 4]> plp1c39 : e07f [ 2] cpx #$7ftst_stat fc1c3b : 08 [ 3]> php ;save status1c3c : 08 [ 3]> php ;use stack to retrieve status1c3d : 68 [ 4]> pla> cmp_flag fc1c3e : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1c40 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c42 : 28 [ 4]> plp ;restore status1c43 : ca [ 2] dex1c44 : e07f [ 2] cpx #$7ftst_stat fzc1c46 : 08 [ 3]> php ;save status1c47 : 08 [ 3]> php ;use stack to retrieve status1c48 : 68 [ 4]> pla> cmp_flag fzc1c49 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1c4b : d0fe [ 3]> bne * ;failed not equal (non zero)>1c4d : 28 [ 4]> plp ;restore status1c4e : ca [ 2] dex1c4f : e07f [ 2] cpx #$7ftst_x $7e,fn1c51 : 08 [ 3]> php ;save flags1c52 : 08 [ 3]> php1c53 : e07e [ 2]> cpx #$7e ;test result> trap_ne1c55 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c57 : 68 [ 4]> pla ;load status> cmp_flag fn1c58 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1c5a : d0fe [ 3]> bne * ;failed not equal (non zero)>1c5c : 28 [ 4]> plp ;restore statusset_x $80,$ff> load_flag $ff1c5d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1c5f : 48 [ 3]> pha ;use stack to load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 138---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1c60 : a280 [ 2]> ldx #$80 ;precharge index x1c62 : 28 [ 4]> plp1c63 : e07f [ 2] cpx #$7ftst_stat ~fnz1c65 : 08 [ 3]> php ;save status1c66 : 08 [ 3]> php ;use stack to retrieve status1c67 : 68 [ 4]> pla> cmp_flag ~fnz1c68 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1c6a : d0fe [ 3]> bne * ;failed not equal (non zero)>1c6c : 28 [ 4]> plp ;restore status1c6d : ca [ 2] dex1c6e : e07f [ 2] cpx #$7ftst_stat ~fn1c70 : 08 [ 3]> php ;save status1c71 : 08 [ 3]> php ;use stack to retrieve status1c72 : 68 [ 4]> pla> cmp_flag ~fn1c73 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1c75 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c77 : 28 [ 4]> plp ;restore status1c78 : ca [ 2] dex1c79 : e07f [ 2] cpx #$7ftst_x $7e,~fzc1c7b : 08 [ 3]> php ;save flags1c7c : 08 [ 3]> php1c7d : e07e [ 2]> cpx #$7e ;test result> trap_ne1c7f : d0fe [ 3]> bne * ;failed not equal (non zero)>1c81 : 68 [ 4]> pla ;load status> cmp_flag ~fzc1c82 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1c84 : d0fe [ 3]> bne * ;failed not equal (non zero)>1c86 : 28 [ 4]> plp ;restore statusnext_test1c87 : ad0002 [ 4]> lda test_case ;previous test1c8a : c91a [ 2]> cmp #test_num> trap_ne ;test is out of sequence1c8c : d0fe [ 3]> bne * ;failed not equal (non zero)>001b = >test_num = test_num + 1AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 139---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1c8e : a91b [ 2]> lda #test_num ;*** this tests' number1c90 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; CPY - zp / abs / #set_y $80,0> load_flag 01c93 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1c95 : 48 [ 3]> pha ;use stack to load status1c96 : a080 [ 2]> ldy #$80 ;precharge index y1c98 : 28 [ 4]> plp1c99 : c417 [ 3] cpy zp7ftst_stat fc1c9b : 08 [ 3]> php ;save status1c9c : 08 [ 3]> php ;use stack to retrieve status1c9d : 68 [ 4]> pla> cmp_flag fc1c9e : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1ca0 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ca2 : 28 [ 4]> plp ;restore status1ca3 : 88 [ 2] dey1ca4 : c417 [ 3] cpy zp7ftst_stat fzc1ca6 : 08 [ 3]> php ;save status1ca7 : 08 [ 3]> php ;use stack to retrieve status1ca8 : 68 [ 4]> pla> cmp_flag fzc1ca9 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1cab : d0fe [ 3]> bne * ;failed not equal (non zero)>1cad : 28 [ 4]> plp ;restore status1cae : 88 [ 2] dey1caf : c417 [ 3] cpy zp7ftst_y $7e,fn1cb1 : 08 [ 3]> php ;save flags1cb2 : 08 [ 3]> php1cb3 : c07e [ 2]> cpy #$7e ;test result> trap_ne1cb5 : d0fe [ 3]> bne * ;failed not equal (non zero)>1cb7 : 68 [ 4]> pla ;load status> cmp_flag fn1cb8 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 140---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1cba : d0fe [ 3]> bne * ;failed not equal (non zero)>1cbc : 28 [ 4]> plp ;restore statusset_y $80,$ff> load_flag $ff1cbd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1cbf : 48 [ 3]> pha ;use stack to load status1cc0 : a080 [ 2]> ldy #$80 ;precharge index y1cc2 : 28 [ 4]> plp1cc3 : c417 [ 3] cpy zp7ftst_stat ~fnz1cc5 : 08 [ 3]> php ;save status1cc6 : 08 [ 3]> php ;use stack to retrieve status1cc7 : 68 [ 4]> pla> cmp_flag ~fnz1cc8 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1cca : d0fe [ 3]> bne * ;failed not equal (non zero)>1ccc : 28 [ 4]> plp ;restore status1ccd : 88 [ 2] dey1cce : c417 [ 3] cpy zp7ftst_stat ~fn1cd0 : 08 [ 3]> php ;save status1cd1 : 08 [ 3]> php ;use stack to retrieve status1cd2 : 68 [ 4]> pla> cmp_flag ~fn1cd3 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1cd5 : d0fe [ 3]> bne * ;failed not equal (non zero)>1cd7 : 28 [ 4]> plp ;restore status1cd8 : 88 [ 2] dey1cd9 : c417 [ 3] cpy zp7ftst_y $7e,~fzc1cdb : 08 [ 3]> php ;save flags1cdc : 08 [ 3]> php1cdd : c07e [ 2]> cpy #$7e ;test result> trap_ne1cdf : d0fe [ 3]> bne * ;failed not equal (non zero)>1ce1 : 68 [ 4]> pla ;load status> cmp_flag ~fzc1ce2 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1ce4 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 141---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1ce6 : 28 [ 4]> plp ;restore statusset_y $80,0> load_flag 01ce7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1ce9 : 48 [ 3]> pha ;use stack to load status1cea : a080 [ 2]> ldy #$80 ;precharge index y1cec : 28 [ 4]> plp1ced : cc0c02 [ 4] cpy abs7ftst_stat fc1cf0 : 08 [ 3]> php ;save status1cf1 : 08 [ 3]> php ;use stack to retrieve status1cf2 : 68 [ 4]> pla> cmp_flag fc1cf3 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1cf5 : d0fe [ 3]> bne * ;failed not equal (non zero)>1cf7 : 28 [ 4]> plp ;restore status1cf8 : 88 [ 2] dey1cf9 : cc0c02 [ 4] cpy abs7ftst_stat fzc1cfc : 08 [ 3]> php ;save status1cfd : 08 [ 3]> php ;use stack to retrieve status1cfe : 68 [ 4]> pla> cmp_flag fzc1cff : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1d01 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d03 : 28 [ 4]> plp ;restore status1d04 : 88 [ 2] dey1d05 : cc0c02 [ 4] cpy abs7ftst_y $7e,fn1d08 : 08 [ 3]> php ;save flags1d09 : 08 [ 3]> php1d0a : c07e [ 2]> cpy #$7e ;test result> trap_ne1d0c : d0fe [ 3]> bne * ;failed not equal (non zero)>1d0e : 68 [ 4]> pla ;load status> cmp_flag fn1d0f : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1d11 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d13 : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 142---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_y $80,$ff> load_flag $ff1d14 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1d16 : 48 [ 3]> pha ;use stack to load status1d17 : a080 [ 2]> ldy #$80 ;precharge index y1d19 : 28 [ 4]> plp1d1a : cc0c02 [ 4] cpy abs7ftst_stat ~fnz1d1d : 08 [ 3]> php ;save status1d1e : 08 [ 3]> php ;use stack to retrieve status1d1f : 68 [ 4]> pla> cmp_flag ~fnz1d20 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1d22 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d24 : 28 [ 4]> plp ;restore status1d25 : 88 [ 2] dey1d26 : cc0c02 [ 4] cpy abs7ftst_stat ~fn1d29 : 08 [ 3]> php ;save status1d2a : 08 [ 3]> php ;use stack to retrieve status1d2b : 68 [ 4]> pla> cmp_flag ~fn1d2c : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1d2e : d0fe [ 3]> bne * ;failed not equal (non zero)>1d30 : 28 [ 4]> plp ;restore status1d31 : 88 [ 2] dey1d32 : cc0c02 [ 4] cpy abs7ftst_y $7e,~fzc1d35 : 08 [ 3]> php ;save flags1d36 : 08 [ 3]> php1d37 : c07e [ 2]> cpy #$7e ;test result> trap_ne1d39 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d3b : 68 [ 4]> pla ;load status> cmp_flag ~fzc1d3c : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1d3e : d0fe [ 3]> bne * ;failed not equal (non zero)>1d40 : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 143---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_y $80,0> load_flag 01d41 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1d43 : 48 [ 3]> pha ;use stack to load status1d44 : a080 [ 2]> ldy #$80 ;precharge index y1d46 : 28 [ 4]> plp1d47 : c07f [ 2] cpy #$7ftst_stat fc1d49 : 08 [ 3]> php ;save status1d4a : 08 [ 3]> php ;use stack to retrieve status1d4b : 68 [ 4]> pla> cmp_flag fc1d4c : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1d4e : d0fe [ 3]> bne * ;failed not equal (non zero)>1d50 : 28 [ 4]> plp ;restore status1d51 : 88 [ 2] dey1d52 : c07f [ 2] cpy #$7ftst_stat fzc1d54 : 08 [ 3]> php ;save status1d55 : 08 [ 3]> php ;use stack to retrieve status1d56 : 68 [ 4]> pla> cmp_flag fzc1d57 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1d59 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d5b : 28 [ 4]> plp ;restore status1d5c : 88 [ 2] dey1d5d : c07f [ 2] cpy #$7ftst_y $7e,fn1d5f : 08 [ 3]> php ;save flags1d60 : 08 [ 3]> php1d61 : c07e [ 2]> cpy #$7e ;test result> trap_ne1d63 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d65 : 68 [ 4]> pla ;load status> cmp_flag fn1d66 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1d68 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d6a : 28 [ 4]> plp ;restore statusset_y $80,$ff> load_flag $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 144---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1d6b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1d6d : 48 [ 3]> pha ;use stack to load status1d6e : a080 [ 2]> ldy #$80 ;precharge index y1d70 : 28 [ 4]> plp1d71 : c07f [ 2] cpy #$7ftst_stat ~fnz1d73 : 08 [ 3]> php ;save status1d74 : 08 [ 3]> php ;use stack to retrieve status1d75 : 68 [ 4]> pla> cmp_flag ~fnz1d76 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1d78 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d7a : 28 [ 4]> plp ;restore status1d7b : 88 [ 2] dey1d7c : c07f [ 2] cpy #$7ftst_stat ~fn1d7e : 08 [ 3]> php ;save status1d7f : 08 [ 3]> php ;use stack to retrieve status1d80 : 68 [ 4]> pla> cmp_flag ~fn1d81 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1d83 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d85 : 28 [ 4]> plp ;restore status1d86 : 88 [ 2] dey1d87 : c07f [ 2] cpy #$7ftst_y $7e,~fzc1d89 : 08 [ 3]> php ;save flags1d8a : 08 [ 3]> php1d8b : c07e [ 2]> cpy #$7e ;test result> trap_ne1d8d : d0fe [ 3]> bne * ;failed not equal (non zero)>1d8f : 68 [ 4]> pla ;load status> cmp_flag ~fzc1d90 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1d92 : d0fe [ 3]> bne * ;failed not equal (non zero)>1d94 : 28 [ 4]> plp ;restore statusnext_test1d95 : ad0002 [ 4]> lda test_case ;previous test1d98 : c91b [ 2]> cmp #test_num> trap_ne ;test is out of sequenceAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 145---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1d9a : d0fe [ 3]> bne * ;failed not equal (non zero)>001c = >test_num = test_num + 11d9c : a91c [ 2]> lda #test_num ;*** this tests' number1d9e : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; CMP - zp / abs / #set_a $80,0> load_flag 01da1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1da3 : 48 [ 3]> pha ;use stack to load status1da4 : a980 [ 2]> lda #$80 ;precharge accu1da6 : 28 [ 4]> plp1da7 : c517 [ 3] cmp zp7ftst_a $80,fc1da9 : 08 [ 3]> php ;save flags1daa : 08 [ 3]> php1dab : c980 [ 2]> cmp #$80 ;test result> trap_ne1dad : d0fe [ 3]> bne * ;failed not equal (non zero)>1daf : 68 [ 4]> pla ;load status> cmp_flag fc1db0 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1db2 : d0fe [ 3]> bne * ;failed not equal (non zero)>1db4 : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 01db5 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1db7 : 48 [ 3]> pha ;use stack to load status1db8 : a97f [ 2]> lda #$7f ;precharge accu1dba : 28 [ 4]> plp1dbb : c517 [ 3] cmp zp7ftst_a $7f,fzc1dbd : 08 [ 3]> php ;save flags1dbe : 08 [ 3]> php1dbf : c97f [ 2]> cmp #$7f ;test result> trap_ne1dc1 : d0fe [ 3]> bne * ;failed not equal (non zero)>1dc3 : 68 [ 4]> pla ;load status> cmp_flag fzc1dc4 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 146---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1dc6 : d0fe [ 3]> bne * ;failed not equal (non zero)>1dc8 : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 01dc9 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1dcb : 48 [ 3]> pha ;use stack to load status1dcc : a97e [ 2]> lda #$7e ;precharge accu1dce : 28 [ 4]> plp1dcf : c517 [ 3] cmp zp7ftst_a $7e,fn1dd1 : 08 [ 3]> php ;save flags1dd2 : 08 [ 3]> php1dd3 : c97e [ 2]> cmp #$7e ;test result> trap_ne1dd5 : d0fe [ 3]> bne * ;failed not equal (non zero)>1dd7 : 68 [ 4]> pla ;load status> cmp_flag fn1dd8 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1dda : d0fe [ 3]> bne * ;failed not equal (non zero)>1ddc : 28 [ 4]> plp ;restore statusset_a $80,$ff> load_flag $ff1ddd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1ddf : 48 [ 3]> pha ;use stack to load status1de0 : a980 [ 2]> lda #$80 ;precharge accu1de2 : 28 [ 4]> plp1de3 : c517 [ 3] cmp zp7ftst_a $80,~fnz1de5 : 08 [ 3]> php ;save flags1de6 : 08 [ 3]> php1de7 : c980 [ 2]> cmp #$80 ;test result> trap_ne1de9 : d0fe [ 3]> bne * ;failed not equal (non zero)>1deb : 68 [ 4]> pla ;load status> cmp_flag ~fnz1dec : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1dee : d0fe [ 3]> bne * ;failed not equal (non zero)>1df0 : 28 [ 4]> plp ;restore statusset_a $7f,$ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 147---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag $ff1df1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1df3 : 48 [ 3]> pha ;use stack to load status1df4 : a97f [ 2]> lda #$7f ;precharge accu1df6 : 28 [ 4]> plp1df7 : c517 [ 3] cmp zp7ftst_a $7f,~fn1df9 : 08 [ 3]> php ;save flags1dfa : 08 [ 3]> php1dfb : c97f [ 2]> cmp #$7f ;test result> trap_ne1dfd : d0fe [ 3]> bne * ;failed not equal (non zero)>1dff : 68 [ 4]> pla ;load status> cmp_flag ~fn1e00 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1e02 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e04 : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ff1e05 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1e07 : 48 [ 3]> pha ;use stack to load status1e08 : a97e [ 2]> lda #$7e ;precharge accu1e0a : 28 [ 4]> plp1e0b : c517 [ 3] cmp zp7ftst_a $7e,~fzc1e0d : 08 [ 3]> php ;save flags1e0e : 08 [ 3]> php1e0f : c97e [ 2]> cmp #$7e ;test result> trap_ne1e11 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e13 : 68 [ 4]> pla ;load status> cmp_flag ~fzc1e14 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1e16 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e18 : 28 [ 4]> plp ;restore statusset_a $80,0> load_flag 01e19 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1e1b : 48 [ 3]> pha ;use stack to load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 148---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1e1c : a980 [ 2]> lda #$80 ;precharge accu1e1e : 28 [ 4]> plp1e1f : cd0c02 [ 4] cmp abs7ftst_a $80,fc1e22 : 08 [ 3]> php ;save flags1e23 : 08 [ 3]> php1e24 : c980 [ 2]> cmp #$80 ;test result> trap_ne1e26 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e28 : 68 [ 4]> pla ;load status> cmp_flag fc1e29 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1e2b : d0fe [ 3]> bne * ;failed not equal (non zero)>1e2d : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 01e2e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1e30 : 48 [ 3]> pha ;use stack to load status1e31 : a97f [ 2]> lda #$7f ;precharge accu1e33 : 28 [ 4]> plp1e34 : cd0c02 [ 4] cmp abs7ftst_a $7f,fzc1e37 : 08 [ 3]> php ;save flags1e38 : 08 [ 3]> php1e39 : c97f [ 2]> cmp #$7f ;test result> trap_ne1e3b : d0fe [ 3]> bne * ;failed not equal (non zero)>1e3d : 68 [ 4]> pla ;load status> cmp_flag fzc1e3e : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1e40 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e42 : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 01e43 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1e45 : 48 [ 3]> pha ;use stack to load status1e46 : a97e [ 2]> lda #$7e ;precharge accu1e48 : 28 [ 4]> plp1e49 : cd0c02 [ 4] cmp abs7ftst_a $7e,fnAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 149---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1e4c : 08 [ 3]> php ;save flags1e4d : 08 [ 3]> php1e4e : c97e [ 2]> cmp #$7e ;test result> trap_ne1e50 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e52 : 68 [ 4]> pla ;load status> cmp_flag fn1e53 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1e55 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e57 : 28 [ 4]> plp ;restore statusset_a $80,$ff> load_flag $ff1e58 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1e5a : 48 [ 3]> pha ;use stack to load status1e5b : a980 [ 2]> lda #$80 ;precharge accu1e5d : 28 [ 4]> plp1e5e : cd0c02 [ 4] cmp abs7ftst_a $80,~fnz1e61 : 08 [ 3]> php ;save flags1e62 : 08 [ 3]> php1e63 : c980 [ 2]> cmp #$80 ;test result> trap_ne1e65 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e67 : 68 [ 4]> pla ;load status> cmp_flag ~fnz1e68 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1e6a : d0fe [ 3]> bne * ;failed not equal (non zero)>1e6c : 28 [ 4]> plp ;restore statusset_a $7f,$ff> load_flag $ff1e6d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1e6f : 48 [ 3]> pha ;use stack to load status1e70 : a97f [ 2]> lda #$7f ;precharge accu1e72 : 28 [ 4]> plp1e73 : cd0c02 [ 4] cmp abs7ftst_a $7f,~fn1e76 : 08 [ 3]> php ;save flags1e77 : 08 [ 3]> php1e78 : c97f [ 2]> cmp #$7f ;test result> trap_ne1e7a : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 150---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->1e7c : 68 [ 4]> pla ;load status> cmp_flag ~fn1e7d : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1e7f : d0fe [ 3]> bne * ;failed not equal (non zero)>1e81 : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ff1e82 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1e84 : 48 [ 3]> pha ;use stack to load status1e85 : a97e [ 2]> lda #$7e ;precharge accu1e87 : 28 [ 4]> plp1e88 : cd0c02 [ 4] cmp abs7ftst_a $7e,~fzc1e8b : 08 [ 3]> php ;save flags1e8c : 08 [ 3]> php1e8d : c97e [ 2]> cmp #$7e ;test result> trap_ne1e8f : d0fe [ 3]> bne * ;failed not equal (non zero)>1e91 : 68 [ 4]> pla ;load status> cmp_flag ~fzc1e92 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1e94 : d0fe [ 3]> bne * ;failed not equal (non zero)>1e96 : 28 [ 4]> plp ;restore statusset_a $80,0> load_flag 01e97 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1e99 : 48 [ 3]> pha ;use stack to load status1e9a : a980 [ 2]> lda #$80 ;precharge accu1e9c : 28 [ 4]> plp1e9d : c97f [ 2] cmp #$7ftst_a $80,fc1e9f : 08 [ 3]> php ;save flags1ea0 : 08 [ 3]> php1ea1 : c980 [ 2]> cmp #$80 ;test result> trap_ne1ea3 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ea5 : 68 [ 4]> pla ;load status> cmp_flag fc1ea6 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 151---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->> trap_ne1ea8 : d0fe [ 3]> bne * ;failed not equal (non zero)>1eaa : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 01eab : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1ead : 48 [ 3]> pha ;use stack to load status1eae : a97f [ 2]> lda #$7f ;precharge accu1eb0 : 28 [ 4]> plp1eb1 : c97f [ 2] cmp #$7ftst_a $7f,fzc1eb3 : 08 [ 3]> php ;save flags1eb4 : 08 [ 3]> php1eb5 : c97f [ 2]> cmp #$7f ;test result> trap_ne1eb7 : d0fe [ 3]> bne * ;failed not equal (non zero)>1eb9 : 68 [ 4]> pla ;load status> cmp_flag fzc1eba : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1ebc : d0fe [ 3]> bne * ;failed not equal (non zero)>1ebe : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 01ebf : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1ec1 : 48 [ 3]> pha ;use stack to load status1ec2 : a97e [ 2]> lda #$7e ;precharge accu1ec4 : 28 [ 4]> plp1ec5 : c97f [ 2] cmp #$7ftst_a $7e,fn1ec7 : 08 [ 3]> php ;save flags1ec8 : 08 [ 3]> php1ec9 : c97e [ 2]> cmp #$7e ;test result> trap_ne1ecb : d0fe [ 3]> bne * ;failed not equal (non zero)>1ecd : 68 [ 4]> pla ;load status> cmp_flag fn1ece : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1ed0 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ed2 : 28 [ 4]> plp ;restore statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 152---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_a $80,$ff> load_flag $ff1ed3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1ed5 : 48 [ 3]> pha ;use stack to load status1ed6 : a980 [ 2]> lda #$80 ;precharge accu1ed8 : 28 [ 4]> plp1ed9 : c97f [ 2] cmp #$7ftst_a $80,~fnz1edb : 08 [ 3]> php ;save flags1edc : 08 [ 3]> php1edd : c980 [ 2]> cmp #$80 ;test result> trap_ne1edf : d0fe [ 3]> bne * ;failed not equal (non zero)>1ee1 : 68 [ 4]> pla ;load status> cmp_flag ~fnz1ee2 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1ee4 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ee6 : 28 [ 4]> plp ;restore statusset_a $7f,$ff> load_flag $ff1ee7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1ee9 : 48 [ 3]> pha ;use stack to load status1eea : a97f [ 2]> lda #$7f ;precharge accu1eec : 28 [ 4]> plp1eed : c97f [ 2] cmp #$7ftst_a $7f,~fn1eef : 08 [ 3]> php ;save flags1ef0 : 08 [ 3]> php1ef1 : c97f [ 2]> cmp #$7f ;test result> trap_ne1ef3 : d0fe [ 3]> bne * ;failed not equal (non zero)>1ef5 : 68 [ 4]> pla ;load status> cmp_flag ~fn1ef6 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1ef8 : d0fe [ 3]> bne * ;failed not equal (non zero)>1efa : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ff1efb : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 153---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1efd : 48 [ 3]> pha ;use stack to load status1efe : a97e [ 2]> lda #$7e ;precharge accu1f00 : 28 [ 4]> plp1f01 : c97f [ 2] cmp #$7ftst_a $7e,~fzc1f03 : 08 [ 3]> php ;save flags1f04 : 08 [ 3]> php1f05 : c97e [ 2]> cmp #$7e ;test result> trap_ne1f07 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f09 : 68 [ 4]> pla ;load status> cmp_flag ~fzc1f0a : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1f0c : d0fe [ 3]> bne * ;failed not equal (non zero)>1f0e : 28 [ 4]> plp ;restore status1f0f : a204 [ 2] ldx #4 ;with indexing by Xset_a $80,0> load_flag 01f11 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1f13 : 48 [ 3]> pha ;use stack to load status1f14 : a980 [ 2]> lda #$80 ;precharge accu1f16 : 28 [ 4]> plp1f17 : d513 [ 4] cmp zp1,xtst_a $80,fc1f19 : 08 [ 3]> php ;save flags1f1a : 08 [ 3]> php1f1b : c980 [ 2]> cmp #$80 ;test result> trap_ne1f1d : d0fe [ 3]> bne * ;failed not equal (non zero)>1f1f : 68 [ 4]> pla ;load status> cmp_flag fc1f20 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1f22 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f24 : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 01f25 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1f27 : 48 [ 3]> pha ;use stack to load status1f28 : a97f [ 2]> lda #$7f ;precharge accu1f2a : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 154---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1f2b : d513 [ 4] cmp zp1,xtst_a $7f,fzc1f2d : 08 [ 3]> php ;save flags1f2e : 08 [ 3]> php1f2f : c97f [ 2]> cmp #$7f ;test result> trap_ne1f31 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f33 : 68 [ 4]> pla ;load status> cmp_flag fzc1f34 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1f36 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f38 : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 01f39 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1f3b : 48 [ 3]> pha ;use stack to load status1f3c : a97e [ 2]> lda #$7e ;precharge accu1f3e : 28 [ 4]> plp1f3f : d513 [ 4] cmp zp1,xtst_a $7e,fn1f41 : 08 [ 3]> php ;save flags1f42 : 08 [ 3]> php1f43 : c97e [ 2]> cmp #$7e ;test result> trap_ne1f45 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f47 : 68 [ 4]> pla ;load status> cmp_flag fn1f48 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1f4a : d0fe [ 3]> bne * ;failed not equal (non zero)>1f4c : 28 [ 4]> plp ;restore statusset_a $80,$ff> load_flag $ff1f4d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1f4f : 48 [ 3]> pha ;use stack to load status1f50 : a980 [ 2]> lda #$80 ;precharge accu1f52 : 28 [ 4]> plp1f53 : d513 [ 4] cmp zp1,xtst_a $80,~fnz1f55 : 08 [ 3]> php ;save flags1f56 : 08 [ 3]> phpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 155---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1f57 : c980 [ 2]> cmp #$80 ;test result> trap_ne1f59 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f5b : 68 [ 4]> pla ;load status> cmp_flag ~fnz1f5c : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1f5e : d0fe [ 3]> bne * ;failed not equal (non zero)>1f60 : 28 [ 4]> plp ;restore statusset_a $7f,$ff> load_flag $ff1f61 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1f63 : 48 [ 3]> pha ;use stack to load status1f64 : a97f [ 2]> lda #$7f ;precharge accu1f66 : 28 [ 4]> plp1f67 : d513 [ 4] cmp zp1,xtst_a $7f,~fn1f69 : 08 [ 3]> php ;save flags1f6a : 08 [ 3]> php1f6b : c97f [ 2]> cmp #$7f ;test result> trap_ne1f6d : d0fe [ 3]> bne * ;failed not equal (non zero)>1f6f : 68 [ 4]> pla ;load status> cmp_flag ~fn1f70 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1f72 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f74 : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ff1f75 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1f77 : 48 [ 3]> pha ;use stack to load status1f78 : a97e [ 2]> lda #$7e ;precharge accu1f7a : 28 [ 4]> plp1f7b : d513 [ 4] cmp zp1,xtst_a $7e,~fzc1f7d : 08 [ 3]> php ;save flags1f7e : 08 [ 3]> php1f7f : c97e [ 2]> cmp #$7e ;test result> trap_ne1f81 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f83 : 68 [ 4]> pla ;load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 156---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> cmp_flag ~fzc1f84 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne1f86 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f88 : 28 [ 4]> plp ;restore statusset_a $80,0> load_flag 01f89 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1f8b : 48 [ 3]> pha ;use stack to load status1f8c : a980 [ 2]> lda #$80 ;precharge accu1f8e : 28 [ 4]> plp1f8f : dd0802 [ 4] cmp abs1,xtst_a $80,fc1f92 : 08 [ 3]> php ;save flags1f93 : 08 [ 3]> php1f94 : c980 [ 2]> cmp #$80 ;test result> trap_ne1f96 : d0fe [ 3]> bne * ;failed not equal (non zero)>1f98 : 68 [ 4]> pla ;load status> cmp_flag fc1f99 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne1f9b : d0fe [ 3]> bne * ;failed not equal (non zero)>1f9d : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 01f9e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1fa0 : 48 [ 3]> pha ;use stack to load status1fa1 : a97f [ 2]> lda #$7f ;precharge accu1fa3 : 28 [ 4]> plp1fa4 : dd0802 [ 4] cmp abs1,xtst_a $7f,fzc1fa7 : 08 [ 3]> php ;save flags1fa8 : 08 [ 3]> php1fa9 : c97f [ 2]> cmp #$7f ;test result> trap_ne1fab : d0fe [ 3]> bne * ;failed not equal (non zero)>1fad : 68 [ 4]> pla ;load status> cmp_flag fzc1fae : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 157---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------1fb0 : d0fe [ 3]> bne * ;failed not equal (non zero)>1fb2 : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 01fb3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>1fb5 : 48 [ 3]> pha ;use stack to load status1fb6 : a97e [ 2]> lda #$7e ;precharge accu1fb8 : 28 [ 4]> plp1fb9 : dd0802 [ 4] cmp abs1,xtst_a $7e,fn1fbc : 08 [ 3]> php ;save flags1fbd : 08 [ 3]> php1fbe : c97e [ 2]> cmp #$7e ;test result> trap_ne1fc0 : d0fe [ 3]> bne * ;failed not equal (non zero)>1fc2 : 68 [ 4]> pla ;load status> cmp_flag fn1fc3 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne1fc5 : d0fe [ 3]> bne * ;failed not equal (non zero)>1fc7 : 28 [ 4]> plp ;restore statusset_a $80,$ff> load_flag $ff1fc8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1fca : 48 [ 3]> pha ;use stack to load status1fcb : a980 [ 2]> lda #$80 ;precharge accu1fcd : 28 [ 4]> plp1fce : dd0802 [ 4] cmp abs1,xtst_a $80,~fnz1fd1 : 08 [ 3]> php ;save flags1fd2 : 08 [ 3]> php1fd3 : c980 [ 2]> cmp #$80 ;test result> trap_ne1fd5 : d0fe [ 3]> bne * ;failed not equal (non zero)>1fd7 : 68 [ 4]> pla ;load status> cmp_flag ~fnz1fd8 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne1fda : d0fe [ 3]> bne * ;failed not equal (non zero)>1fdc : 28 [ 4]> plp ;restore statusset_a $7f,$ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 158---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag $ff1fdd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1fdf : 48 [ 3]> pha ;use stack to load status1fe0 : a97f [ 2]> lda #$7f ;precharge accu1fe2 : 28 [ 4]> plp1fe3 : dd0802 [ 4] cmp abs1,xtst_a $7f,~fn1fe6 : 08 [ 3]> php ;save flags1fe7 : 08 [ 3]> php1fe8 : c97f [ 2]> cmp #$7f ;test result> trap_ne1fea : d0fe [ 3]> bne * ;failed not equal (non zero)>1fec : 68 [ 4]> pla ;load status> cmp_flag ~fn1fed : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne1fef : d0fe [ 3]> bne * ;failed not equal (non zero)>1ff1 : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ff1ff2 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>1ff4 : 48 [ 3]> pha ;use stack to load status1ff5 : a97e [ 2]> lda #$7e ;precharge accu1ff7 : 28 [ 4]> plp1ff8 : dd0802 [ 4] cmp abs1,xtst_a $7e,~fzc1ffb : 08 [ 3]> php ;save flags1ffc : 08 [ 3]> php1ffd : c97e [ 2]> cmp #$7e ;test result> trap_ne1fff : d0fe [ 3]> bne * ;failed not equal (non zero)>2001 : 68 [ 4]> pla ;load status> cmp_flag ~fzc2002 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne2004 : d0fe [ 3]> bne * ;failed not equal (non zero)>2006 : 28 [ 4]> plp ;restore status2007 : a004 [ 2] ldy #4 ;with indexing by Y2009 : a208 [ 2] ldx #8 ;with indexed indirectset_a $80,0> load_flag 0200b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 159---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->200d : 48 [ 3]> pha ;use stack to load status200e : a980 [ 2]> lda #$80 ;precharge accu2010 : 28 [ 4]> plp2011 : d90802 [ 4] cmp abs1,ytst_a $80,fc2014 : 08 [ 3]> php ;save flags2015 : 08 [ 3]> php2016 : c980 [ 2]> cmp #$80 ;test result> trap_ne2018 : d0fe [ 3]> bne * ;failed not equal (non zero)>201a : 68 [ 4]> pla ;load status> cmp_flag fc201b : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne201d : d0fe [ 3]> bne * ;failed not equal (non zero)>201f : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 02020 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2022 : 48 [ 3]> pha ;use stack to load status2023 : a97f [ 2]> lda #$7f ;precharge accu2025 : 28 [ 4]> plp2026 : d90802 [ 4] cmp abs1,ytst_a $7f,fzc2029 : 08 [ 3]> php ;save flags202a : 08 [ 3]> php202b : c97f [ 2]> cmp #$7f ;test result> trap_ne202d : d0fe [ 3]> bne * ;failed not equal (non zero)>202f : 68 [ 4]> pla ;load status> cmp_flag fzc2030 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne2032 : d0fe [ 3]> bne * ;failed not equal (non zero)>2034 : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 02035 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2037 : 48 [ 3]> pha ;use stack to load status2038 : a97e [ 2]> lda #$7e ;precharge accu203a : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 160---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------203b : d90802 [ 4] cmp abs1,ytst_a $7e,fn203e : 08 [ 3]> php ;save flags203f : 08 [ 3]> php2040 : c97e [ 2]> cmp #$7e ;test result> trap_ne2042 : d0fe [ 3]> bne * ;failed not equal (non zero)>2044 : 68 [ 4]> pla ;load status> cmp_flag fn2045 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne2047 : d0fe [ 3]> bne * ;failed not equal (non zero)>2049 : 28 [ 4]> plp ;restore statusset_a $80,$ff> load_flag $ff204a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>204c : 48 [ 3]> pha ;use stack to load status204d : a980 [ 2]> lda #$80 ;precharge accu204f : 28 [ 4]> plp2050 : d90802 [ 4] cmp abs1,ytst_a $80,~fnz2053 : 08 [ 3]> php ;save flags2054 : 08 [ 3]> php2055 : c980 [ 2]> cmp #$80 ;test result> trap_ne2057 : d0fe [ 3]> bne * ;failed not equal (non zero)>2059 : 68 [ 4]> pla ;load status> cmp_flag ~fnz205a : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne205c : d0fe [ 3]> bne * ;failed not equal (non zero)>205e : 28 [ 4]> plp ;restore statusset_a $7f,$ff> load_flag $ff205f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2061 : 48 [ 3]> pha ;use stack to load status2062 : a97f [ 2]> lda #$7f ;precharge accu2064 : 28 [ 4]> plp2065 : d90802 [ 4] cmp abs1,ytst_a $7f,~fn2068 : 08 [ 3]> php ;save flags2069 : 08 [ 3]> php206a : c97f [ 2]> cmp #$7f ;test resultAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 161---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> trap_ne206c : d0fe [ 3]> bne * ;failed not equal (non zero)>206e : 68 [ 4]> pla ;load status> cmp_flag ~fn206f : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne2071 : d0fe [ 3]> bne * ;failed not equal (non zero)>2073 : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ff2074 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2076 : 48 [ 3]> pha ;use stack to load status2077 : a97e [ 2]> lda #$7e ;precharge accu2079 : 28 [ 4]> plp207a : d90802 [ 4] cmp abs1,ytst_a $7e,~fzc207d : 08 [ 3]> php ;save flags207e : 08 [ 3]> php207f : c97e [ 2]> cmp #$7e ;test result> trap_ne2081 : d0fe [ 3]> bne * ;failed not equal (non zero)>2083 : 68 [ 4]> pla ;load status> cmp_flag ~fzc2084 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne2086 : d0fe [ 3]> bne * ;failed not equal (non zero)>2088 : 28 [ 4]> plp ;restore statusset_a $80,0> load_flag 02089 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>208b : 48 [ 3]> pha ;use stack to load status208c : a980 [ 2]> lda #$80 ;precharge accu208e : 28 [ 4]> plp208f : c124 [ 6] cmp (ind1,x)tst_a $80,fc2091 : 08 [ 3]> php ;save flags2092 : 08 [ 3]> php2093 : c980 [ 2]> cmp #$80 ;test result> trap_ne2095 : d0fe [ 3]> bne * ;failed not equal (non zero)>2097 : 68 [ 4]> pla ;load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 162---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> cmp_flag fc2098 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne209a : d0fe [ 3]> bne * ;failed not equal (non zero)>209c : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 0209d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>209f : 48 [ 3]> pha ;use stack to load status20a0 : a97f [ 2]> lda #$7f ;precharge accu20a2 : 28 [ 4]> plp20a3 : c124 [ 6] cmp (ind1,x)tst_a $7f,fzc20a5 : 08 [ 3]> php ;save flags20a6 : 08 [ 3]> php20a7 : c97f [ 2]> cmp #$7f ;test result> trap_ne20a9 : d0fe [ 3]> bne * ;failed not equal (non zero)>20ab : 68 [ 4]> pla ;load status> cmp_flag fzc20ac : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne20ae : d0fe [ 3]> bne * ;failed not equal (non zero)>20b0 : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 020b1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>20b3 : 48 [ 3]> pha ;use stack to load status20b4 : a97e [ 2]> lda #$7e ;precharge accu20b6 : 28 [ 4]> plp20b7 : c124 [ 6] cmp (ind1,x)tst_a $7e,fn20b9 : 08 [ 3]> php ;save flags20ba : 08 [ 3]> php20bb : c97e [ 2]> cmp #$7e ;test result> trap_ne20bd : d0fe [ 3]> bne * ;failed not equal (non zero)>20bf : 68 [ 4]> pla ;load status> cmp_flag fn20c0 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne20c2 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 163---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->20c4 : 28 [ 4]> plp ;restore statusset_a $80,$ff> load_flag $ff20c5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>20c7 : 48 [ 3]> pha ;use stack to load status20c8 : a980 [ 2]> lda #$80 ;precharge accu20ca : 28 [ 4]> plp20cb : c124 [ 6] cmp (ind1,x)tst_a $80,~fnz20cd : 08 [ 3]> php ;save flags20ce : 08 [ 3]> php20cf : c980 [ 2]> cmp #$80 ;test result> trap_ne20d1 : d0fe [ 3]> bne * ;failed not equal (non zero)>20d3 : 68 [ 4]> pla ;load status> cmp_flag ~fnz20d4 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne20d6 : d0fe [ 3]> bne * ;failed not equal (non zero)>20d8 : 28 [ 4]> plp ;restore statusset_a $7f,$ff> load_flag $ff20d9 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>20db : 48 [ 3]> pha ;use stack to load status20dc : a97f [ 2]> lda #$7f ;precharge accu20de : 28 [ 4]> plp20df : c124 [ 6] cmp (ind1,x)tst_a $7f,~fn20e1 : 08 [ 3]> php ;save flags20e2 : 08 [ 3]> php20e3 : c97f [ 2]> cmp #$7f ;test result> trap_ne20e5 : d0fe [ 3]> bne * ;failed not equal (non zero)>20e7 : 68 [ 4]> pla ;load status> cmp_flag ~fn20e8 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne20ea : d0fe [ 3]> bne * ;failed not equal (non zero)>20ec : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 164---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------20ed : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>20ef : 48 [ 3]> pha ;use stack to load status20f0 : a97e [ 2]> lda #$7e ;precharge accu20f2 : 28 [ 4]> plp20f3 : c124 [ 6] cmp (ind1,x)tst_a $7e,~fzc20f5 : 08 [ 3]> php ;save flags20f6 : 08 [ 3]> php20f7 : c97e [ 2]> cmp #$7e ;test result> trap_ne20f9 : d0fe [ 3]> bne * ;failed not equal (non zero)>20fb : 68 [ 4]> pla ;load status> cmp_flag ~fzc20fc : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne20fe : d0fe [ 3]> bne * ;failed not equal (non zero)>2100 : 28 [ 4]> plp ;restore statusset_a $80,0> load_flag 02101 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2103 : 48 [ 3]> pha ;use stack to load status2104 : a980 [ 2]> lda #$80 ;precharge accu2106 : 28 [ 4]> plp2107 : d124 [ 5] cmp (ind1),ytst_a $80,fc2109 : 08 [ 3]> php ;save flags210a : 08 [ 3]> php210b : c980 [ 2]> cmp #$80 ;test result> trap_ne210d : d0fe [ 3]> bne * ;failed not equal (non zero)>210f : 68 [ 4]> pla ;load status> cmp_flag fc2110 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits>> trap_ne2112 : d0fe [ 3]> bne * ;failed not equal (non zero)>2114 : 28 [ 4]> plp ;restore statusset_a $7f,0> load_flag 02115 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2117 : 48 [ 3]> pha ;use stack to load status2118 : a97f [ 2]> lda #$7f ;precharge accuAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 165---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------211a : 28 [ 4]> plp211b : d124 [ 5] cmp (ind1),ytst_a $7f,fzc211d : 08 [ 3]> php ;save flags211e : 08 [ 3]> php211f : c97f [ 2]> cmp #$7f ;test result> trap_ne2121 : d0fe [ 3]> bne * ;failed not equal (non zero)>2123 : 68 [ 4]> pla ;load status> cmp_flag fzc2124 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits>> trap_ne2126 : d0fe [ 3]> bne * ;failed not equal (non zero)>2128 : 28 [ 4]> plp ;restore statusset_a $7e,0> load_flag 02129 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>212b : 48 [ 3]> pha ;use stack to load status212c : a97e [ 2]> lda #$7e ;precharge accu212e : 28 [ 4]> plp212f : d124 [ 5] cmp (ind1),ytst_a $7e,fn2131 : 08 [ 3]> php ;save flags2132 : 08 [ 3]> php2133 : c97e [ 2]> cmp #$7e ;test result> trap_ne2135 : d0fe [ 3]> bne * ;failed not equal (non zero)>2137 : 68 [ 4]> pla ;load status> cmp_flag fn2138 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits>> trap_ne213a : d0fe [ 3]> bne * ;failed not equal (non zero)>213c : 28 [ 4]> plp ;restore statusset_a $80,$ff> load_flag $ff213d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>213f : 48 [ 3]> pha ;use stack to load status2140 : a980 [ 2]> lda #$80 ;precharge accu2142 : 28 [ 4]> plp2143 : d124 [ 5] cmp (ind1),ytst_a $80,~fnz2145 : 08 [ 3]> php ;save flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 166---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2146 : 08 [ 3]> php2147 : c980 [ 2]> cmp #$80 ;test result> trap_ne2149 : d0fe [ 3]> bne * ;failed not equal (non zero)>214b : 68 [ 4]> pla ;load status> cmp_flag ~fnz214c : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits>> trap_ne214e : d0fe [ 3]> bne * ;failed not equal (non zero)>2150 : 28 [ 4]> plp ;restore statusset_a $7f,$ff> load_flag $ff2151 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2153 : 48 [ 3]> pha ;use stack to load status2154 : a97f [ 2]> lda #$7f ;precharge accu2156 : 28 [ 4]> plp2157 : d124 [ 5] cmp (ind1),ytst_a $7f,~fn2159 : 08 [ 3]> php ;save flags215a : 08 [ 3]> php215b : c97f [ 2]> cmp #$7f ;test result> trap_ne215d : d0fe [ 3]> bne * ;failed not equal (non zero)>215f : 68 [ 4]> pla ;load status> cmp_flag ~fn2160 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits>> trap_ne2162 : d0fe [ 3]> bne * ;failed not equal (non zero)>2164 : 28 [ 4]> plp ;restore statusset_a $7e,$ff> load_flag $ff2165 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2167 : 48 [ 3]> pha ;use stack to load status2168 : a97e [ 2]> lda #$7e ;precharge accu216a : 28 [ 4]> plp216b : d124 [ 5] cmp (ind1),ytst_a $7e,~fzc216d : 08 [ 3]> php ;save flags216e : 08 [ 3]> php216f : c97e [ 2]> cmp #$7e ;test result> trap_ne2171 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 167---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2173 : 68 [ 4]> pla ;load status> cmp_flag ~fzc2174 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits>> trap_ne2176 : d0fe [ 3]> bne * ;failed not equal (non zero)>2178 : 28 [ 4]> plp ;restore statusnext_test2179 : ad0002 [ 4]> lda test_case ;previous test217c : c91c [ 2]> cmp #test_num> trap_ne ;test is out of sequence217e : d0fe [ 3]> bne * ;failed not equal (non zero)>001d = >test_num = test_num + 12180 : a91d [ 2]> lda #test_num ;*** this tests' number2182 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; testing shifts - ASL LSR ROL ROR all addressing modes; shifts - accumulator2185 : a203 [ 2] ldx #32187 : taslset_ax zp1,0> load_flag 02187 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2189 : 48 [ 3]> pha ;use stack to load status218a : b513 [ 4]> lda zp1,x ;precharge accu218c : 28 [ 4]> plp218d : 0a [ 2] asl atst_ax rASL,fASL,0218e : 08 [ 3]> php ;save flags218f : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne2192 : d0fe [ 3]> bne * ;failed not equal (non zero)>2194 : 68 [ 4]> pla ;load status> eor_flag 02195 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2197 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne ;219a : d0fe [ 3]> bne * ;failed not equal (non zero)>219c : ca [ 2] dex219d : 10e8 [ 3] bpl tasl219f : a203 [ 2] ldx #321a1 : tasl1set_ax zp1,$ff> load_flag $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 168---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------21a1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>21a3 : 48 [ 3]> pha ;use stack to load status21a4 : b513 [ 4]> lda zp1,x ;precharge accu21a6 : 28 [ 4]> plp21a7 : 0a [ 2] asl atst_ax rASL,fASL,$ff-fnzc21a8 : 08 [ 3]> php ;save flags21a9 : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne21ac : d0fe [ 3]> bne * ;failed not equal (non zero)>21ae : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc21af : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>21b1 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne ;21b4 : d0fe [ 3]> bne * ;failed not equal (non zero)>21b6 : ca [ 2] dex21b7 : 10e8 [ 3] bpl tasl121b9 : a203 [ 2] ldx #321bb : tlsrset_ax zp1,0> load_flag 021bb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>21bd : 48 [ 3]> pha ;use stack to load status21be : b513 [ 4]> lda zp1,x ;precharge accu21c0 : 28 [ 4]> plp21c1 : 4a [ 2] lsr atst_ax rLSR,fLSR,021c2 : 08 [ 3]> php ;save flags21c3 : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne21c6 : d0fe [ 3]> bne * ;failed not equal (non zero)>21c8 : 68 [ 4]> pla ;load status> eor_flag 021c9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>21cb : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne ;21ce : d0fe [ 3]> bne * ;failed not equal (non zero)>21d0 : ca [ 2] dex21d1 : 10e8 [ 3] bpl tlsr21d3 : a203 [ 2] ldx #321d5 : tlsr1AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 169---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_ax zp1,$ff> load_flag $ff21d5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>21d7 : 48 [ 3]> pha ;use stack to load status21d8 : b513 [ 4]> lda zp1,x ;precharge accu21da : 28 [ 4]> plp21db : 4a [ 2] lsr atst_ax rLSR,fLSR,$ff-fnzc21dc : 08 [ 3]> php ;save flags21dd : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne21e0 : d0fe [ 3]> bne * ;failed not equal (non zero)>21e2 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc21e3 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>21e5 : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne ;21e8 : d0fe [ 3]> bne * ;failed not equal (non zero)>21ea : ca [ 2] dex21eb : 10e8 [ 3] bpl tlsr121ed : a203 [ 2] ldx #321ef : trolset_ax zp1,0> load_flag 021ef : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>21f1 : 48 [ 3]> pha ;use stack to load status21f2 : b513 [ 4]> lda zp1,x ;precharge accu21f4 : 28 [ 4]> plp21f5 : 2a [ 2] rol atst_ax rROL,fROL,021f6 : 08 [ 3]> php ;save flags21f7 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne21fa : d0fe [ 3]> bne * ;failed not equal (non zero)>21fc : 68 [ 4]> pla ;load status> eor_flag 021fd : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>21ff : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne ;2202 : d0fe [ 3]> bne * ;failed not equal (non zero)>2204 : ca [ 2] dex2205 : 10e8 [ 4] bpl trolAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 170---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2207 : a203 [ 2] ldx #32209 : trol1set_ax zp1,$ff-fc> load_flag $ff-fc2209 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>220b : 48 [ 3]> pha ;use stack to load status220c : b513 [ 4]> lda zp1,x ;precharge accu220e : 28 [ 4]> plp220f : 2a [ 2] rol atst_ax rROL,fROL,$ff-fnzc2210 : 08 [ 3]> php ;save flags2211 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne2214 : d0fe [ 3]> bne * ;failed not equal (non zero)>2216 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2217 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2219 : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne ;221c : d0fe [ 3]> bne * ;failed not equal (non zero)>221e : ca [ 2] dex221f : 10e8 [ 3] bpl trol12221 : a203 [ 2] ldx #32223 : trolcset_ax zp1,fc> load_flag fc2223 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>2225 : 48 [ 3]> pha ;use stack to load status2226 : b513 [ 4]> lda zp1,x ;precharge accu2228 : 28 [ 4]> plp2229 : 2a [ 2] rol atst_ax rROLc,fROLc,0222a : 08 [ 3]> php ;save flags222b : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne222e : d0fe [ 3]> bne * ;failed not equal (non zero)>2230 : 68 [ 4]> pla ;load status> eor_flag 02231 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2233 : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne ;2236 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 171---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2238 : ca [ 2] dex2239 : 10e8 [ 3] bpl trolc223b : a203 [ 2] ldx #3223d : trolc1set_ax zp1,$ff> load_flag $ff223d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>223f : 48 [ 3]> pha ;use stack to load status2240 : b513 [ 4]> lda zp1,x ;precharge accu2242 : 28 [ 4]> plp2243 : 2a [ 2] rol atst_ax rROLc,fROLc,$ff-fnzc2244 : 08 [ 3]> php ;save flags2245 : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne2248 : d0fe [ 3]> bne * ;failed not equal (non zero)>224a : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc224b : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>224d : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne ;2250 : d0fe [ 3]> bne * ;failed not equal (non zero)>2252 : ca [ 2] dex2253 : 10e8 [ 3] bpl trolc12255 : a203 [ 2] ldx #32257 : trorset_ax zp1,0> load_flag 02257 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2259 : 48 [ 3]> pha ;use stack to load status225a : b513 [ 4]> lda zp1,x ;precharge accu225c : 28 [ 4]> plp225d : 6a [ 2] ror atst_ax rROR,fROR,0225e : 08 [ 3]> php ;save flags225f : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne2262 : d0fe [ 3]> bne * ;failed not equal (non zero)>2264 : 68 [ 4]> pla ;load status> eor_flag 02265 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2267 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne ;226a : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 172---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->226c : ca [ 2] dex226d : 10e8 [ 3] bpl tror226f : a203 [ 2] ldx #32271 : tror1set_ax zp1,$ff-fc> load_flag $ff-fc2271 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>2273 : 48 [ 3]> pha ;use stack to load status2274 : b513 [ 4]> lda zp1,x ;precharge accu2276 : 28 [ 4]> plp2277 : 6a [ 2] ror atst_ax rROR,fROR,$ff-fnzc2278 : 08 [ 3]> php ;save flags2279 : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne227c : d0fe [ 3]> bne * ;failed not equal (non zero)>227e : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc227f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2281 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne ;2284 : d0fe [ 3]> bne * ;failed not equal (non zero)>2286 : ca [ 2] dex2287 : 10e8 [ 3] bpl tror12289 : a203 [ 2] ldx #3228b : trorcset_ax zp1,fc> load_flag fc228b : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>228d : 48 [ 3]> pha ;use stack to load status228e : b513 [ 4]> lda zp1,x ;precharge accu2290 : 28 [ 4]> plp2291 : 6a [ 2] ror atst_ax rRORc,fRORc,02292 : 08 [ 3]> php ;save flags2293 : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne2296 : d0fe [ 3]> bne * ;failed not equal (non zero)>2298 : 68 [ 4]> pla ;load status> eor_flag 02299 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>229b : dd2d02 [ 4]> cmp fRORc,x ;test flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 173---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> trap_ne ;229e : d0fe [ 3]> bne * ;failed not equal (non zero)>22a0 : ca [ 2] dex22a1 : 10e8 [ 3] bpl trorc22a3 : a203 [ 2] ldx #322a5 : trorc1set_ax zp1,$ff> load_flag $ff22a5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>22a7 : 48 [ 3]> pha ;use stack to load status22a8 : b513 [ 4]> lda zp1,x ;precharge accu22aa : 28 [ 4]> plp22ab : 6a [ 2] ror atst_ax rRORc,fRORc,$ff-fnzc22ac : 08 [ 3]> php ;save flags22ad : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne22b0 : d0fe [ 3]> bne * ;failed not equal (non zero)>22b2 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc22b3 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>22b5 : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne ;22b8 : d0fe [ 3]> bne * ;failed not equal (non zero)>22ba : ca [ 2] dex22bb : 10e8 [ 3] bpl trorc1next_test22bd : ad0002 [ 4]> lda test_case ;previous test22c0 : c91d [ 2]> cmp #test_num> trap_ne ;test is out of sequence22c2 : d0fe [ 3]> bne * ;failed not equal (non zero)>001e = >test_num = test_num + 122c4 : a91e [ 2]> lda #test_num ;*** this tests' number22c6 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; shifts - zeropage22c9 : a203 [ 2] ldx #322cb : tasl2set_z zp1,0> load_flag 022cb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>22cd : 48 [ 3]> pha ;use stack to load status22ce : b513 [ 4]> lda zp1,x ;load to zeropageAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 174---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------22d0 : 850c [ 3]> sta zpt22d2 : 28 [ 4]> plp22d3 : 060c [ 5] asl zpttst_z rASL,fASL,022d5 : 08 [ 3]> php ;save flags22d6 : a50c [ 3]> lda zpt22d8 : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne22db : d0fe [ 3]> bne * ;failed not equal (non zero)>22dd : 68 [ 4]> pla ;load status> eor_flag 022de : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>22e0 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne22e3 : d0fe [ 3]> bne * ;failed not equal (non zero)>22e5 : ca [ 2] dex22e6 : 10e3 [ 3] bpl tasl222e8 : a203 [ 2] ldx #322ea : tasl3set_z zp1,$ff> load_flag $ff22ea : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>22ec : 48 [ 3]> pha ;use stack to load status22ed : b513 [ 4]> lda zp1,x ;load to zeropage22ef : 850c [ 3]> sta zpt22f1 : 28 [ 4]> plp22f2 : 060c [ 5] asl zpttst_z rASL,fASL,$ff-fnzc22f4 : 08 [ 3]> php ;save flags22f5 : a50c [ 3]> lda zpt22f7 : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne22fa : d0fe [ 3]> bne * ;failed not equal (non zero)>22fc : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc22fd : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>22ff : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne2302 : d0fe [ 3]> bne * ;failed not equal (non zero)>2304 : ca [ 2] dex2305 : 10e3 [ 4] bpl tasl32307 : a203 [ 2] ldx #32309 : tlsr2AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 175---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_z zp1,0> load_flag 02309 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>230b : 48 [ 3]> pha ;use stack to load status230c : b513 [ 4]> lda zp1,x ;load to zeropage230e : 850c [ 3]> sta zpt2310 : 28 [ 4]> plp2311 : 460c [ 5] lsr zpttst_z rLSR,fLSR,02313 : 08 [ 3]> php ;save flags2314 : a50c [ 3]> lda zpt2316 : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne2319 : d0fe [ 3]> bne * ;failed not equal (non zero)>231b : 68 [ 4]> pla ;load status> eor_flag 0231c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>231e : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne2321 : d0fe [ 3]> bne * ;failed not equal (non zero)>2323 : ca [ 2] dex2324 : 10e3 [ 3] bpl tlsr22326 : a203 [ 2] ldx #32328 : tlsr3set_z zp1,$ff> load_flag $ff2328 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>232a : 48 [ 3]> pha ;use stack to load status232b : b513 [ 4]> lda zp1,x ;load to zeropage232d : 850c [ 3]> sta zpt232f : 28 [ 4]> plp2330 : 460c [ 5] lsr zpttst_z rLSR,fLSR,$ff-fnzc2332 : 08 [ 3]> php ;save flags2333 : a50c [ 3]> lda zpt2335 : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne2338 : d0fe [ 3]> bne * ;failed not equal (non zero)>233a : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc233b : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>233d : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne2340 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 176---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2342 : ca [ 2] dex2343 : 10e3 [ 3] bpl tlsr32345 : a203 [ 2] ldx #32347 : trol2set_z zp1,0> load_flag 02347 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2349 : 48 [ 3]> pha ;use stack to load status234a : b513 [ 4]> lda zp1,x ;load to zeropage234c : 850c [ 3]> sta zpt234e : 28 [ 4]> plp234f : 260c [ 5] rol zpttst_z rROL,fROL,02351 : 08 [ 3]> php ;save flags2352 : a50c [ 3]> lda zpt2354 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne2357 : d0fe [ 3]> bne * ;failed not equal (non zero)>2359 : 68 [ 4]> pla ;load status> eor_flag 0235a : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>235c : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne235f : d0fe [ 3]> bne * ;failed not equal (non zero)>2361 : ca [ 2] dex2362 : 10e3 [ 3] bpl trol22364 : a203 [ 2] ldx #32366 : trol3set_z zp1,$ff-fc> load_flag $ff-fc2366 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>2368 : 48 [ 3]> pha ;use stack to load status2369 : b513 [ 4]> lda zp1,x ;load to zeropage236b : 850c [ 3]> sta zpt236d : 28 [ 4]> plp236e : 260c [ 5] rol zpttst_z rROL,fROL,$ff-fnzc2370 : 08 [ 3]> php ;save flags2371 : a50c [ 3]> lda zpt2373 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne2376 : d0fe [ 3]> bne * ;failed not equal (non zero)>2378 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzcAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 177---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2379 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>237b : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne237e : d0fe [ 3]> bne * ;failed not equal (non zero)>2380 : ca [ 2] dex2381 : 10e3 [ 3] bpl trol32383 : a203 [ 2] ldx #32385 : trolc2set_z zp1,fc> load_flag fc2385 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>2387 : 48 [ 3]> pha ;use stack to load status2388 : b513 [ 4]> lda zp1,x ;load to zeropage238a : 850c [ 3]> sta zpt238c : 28 [ 4]> plp238d : 260c [ 5] rol zpttst_z rROLc,fROLc,0238f : 08 [ 3]> php ;save flags2390 : a50c [ 3]> lda zpt2392 : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne2395 : d0fe [ 3]> bne * ;failed not equal (non zero)>2397 : 68 [ 4]> pla ;load status> eor_flag 02398 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>239a : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne239d : d0fe [ 3]> bne * ;failed not equal (non zero)>239f : ca [ 2] dex23a0 : 10e3 [ 3] bpl trolc223a2 : a203 [ 2] ldx #323a4 : trolc3set_z zp1,$ff> load_flag $ff23a4 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>23a6 : 48 [ 3]> pha ;use stack to load status23a7 : b513 [ 4]> lda zp1,x ;load to zeropage23a9 : 850c [ 3]> sta zpt23ab : 28 [ 4]> plp23ac : 260c [ 5] rol zpttst_z rROLc,fROLc,$ff-fnzc23ae : 08 [ 3]> php ;save flags23af : a50c [ 3]> lda zptAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 178---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------23b1 : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne23b4 : d0fe [ 3]> bne * ;failed not equal (non zero)>23b6 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc23b7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>23b9 : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne23bc : d0fe [ 3]> bne * ;failed not equal (non zero)>23be : ca [ 2] dex23bf : 10e3 [ 3] bpl trolc323c1 : a203 [ 2] ldx #323c3 : tror2set_z zp1,0> load_flag 023c3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>23c5 : 48 [ 3]> pha ;use stack to load status23c6 : b513 [ 4]> lda zp1,x ;load to zeropage23c8 : 850c [ 3]> sta zpt23ca : 28 [ 4]> plp23cb : 660c [ 5] ror zpttst_z rROR,fROR,023cd : 08 [ 3]> php ;save flags23ce : a50c [ 3]> lda zpt23d0 : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne23d3 : d0fe [ 3]> bne * ;failed not equal (non zero)>23d5 : 68 [ 4]> pla ;load status> eor_flag 023d6 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>23d8 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne23db : d0fe [ 3]> bne * ;failed not equal (non zero)>23dd : ca [ 2] dex23de : 10e3 [ 3] bpl tror223e0 : a203 [ 2] ldx #323e2 : tror3set_z zp1,$ff-fc> load_flag $ff-fc23e2 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>23e4 : 48 [ 3]> pha ;use stack to load status23e5 : b513 [ 4]> lda zp1,x ;load to zeropage23e7 : 850c [ 3]> sta zptAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 179---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------23e9 : 28 [ 4]> plp23ea : 660c [ 5] ror zpttst_z rROR,fROR,$ff-fnzc23ec : 08 [ 3]> php ;save flags23ed : a50c [ 3]> lda zpt23ef : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne23f2 : d0fe [ 3]> bne * ;failed not equal (non zero)>23f4 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc23f5 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>23f7 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne23fa : d0fe [ 3]> bne * ;failed not equal (non zero)>23fc : ca [ 2] dex23fd : 10e3 [ 3] bpl tror323ff : a203 [ 2] ldx #32401 : trorc2set_z zp1,fc> load_flag fc2401 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>2403 : 48 [ 3]> pha ;use stack to load status2404 : b513 [ 4]> lda zp1,x ;load to zeropage2406 : 850c [ 3]> sta zpt2408 : 28 [ 4]> plp2409 : 660c [ 5] ror zpttst_z rRORc,fRORc,0240b : 08 [ 3]> php ;save flags240c : a50c [ 3]> lda zpt240e : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne2411 : d0fe [ 3]> bne * ;failed not equal (non zero)>2413 : 68 [ 4]> pla ;load status> eor_flag 02414 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2416 : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne2419 : d0fe [ 3]> bne * ;failed not equal (non zero)>241b : ca [ 2] dex241c : 10e3 [ 3] bpl trorc2241e : a203 [ 2] ldx #32420 : trorc3set_z zp1,$ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 180---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag $ff2420 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2422 : 48 [ 3]> pha ;use stack to load status2423 : b513 [ 4]> lda zp1,x ;load to zeropage2425 : 850c [ 3]> sta zpt2427 : 28 [ 4]> plp2428 : 660c [ 5] ror zpttst_z rRORc,fRORc,$ff-fnzc242a : 08 [ 3]> php ;save flags242b : a50c [ 3]> lda zpt242d : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne2430 : d0fe [ 3]> bne * ;failed not equal (non zero)>2432 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2433 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2435 : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne2438 : d0fe [ 3]> bne * ;failed not equal (non zero)>243a : ca [ 2] dex243b : 10e3 [ 3] bpl trorc3next_test243d : ad0002 [ 4]> lda test_case ;previous test2440 : c91e [ 2]> cmp #test_num> trap_ne ;test is out of sequence2442 : d0fe [ 3]> bne * ;failed not equal (non zero)>001f = >test_num = test_num + 12444 : a91f [ 2]> lda #test_num ;*** this tests' number2446 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; shifts - absolute2449 : a203 [ 2] ldx #3244b : tasl4set_abs zp1,0> load_flag 0244b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>244d : 48 [ 3]> pha ;use stack to load status244e : b513 [ 4]> lda zp1,x ;load to memory2450 : 8d0302 [ 4]> sta abst2453 : 28 [ 4]> plp2454 : 0e0302 [ 6] asl absttst_abs rASL,fASL,02457 : 08 [ 3]> php ;save flags2458 : ad0302 [ 4]> lda abstAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 181---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------245b : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne245e : d0fe [ 3]> bne * ;failed not equal (non zero)>2460 : 68 [ 4]> pla ;load status> eor_flag 02461 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2463 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne2466 : d0fe [ 3]> bne * ;failed not equal (non zero)>2468 : ca [ 2] dex2469 : 10e0 [ 3] bpl tasl4246b : a203 [ 2] ldx #3246d : tasl5set_abs zp1,$ff> load_flag $ff246d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>246f : 48 [ 3]> pha ;use stack to load status2470 : b513 [ 4]> lda zp1,x ;load to memory2472 : 8d0302 [ 4]> sta abst2475 : 28 [ 4]> plp2476 : 0e0302 [ 6] asl absttst_abs rASL,fASL,$ff-fnzc2479 : 08 [ 3]> php ;save flags247a : ad0302 [ 4]> lda abst247d : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne2480 : d0fe [ 3]> bne * ;failed not equal (non zero)>2482 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2483 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2485 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne2488 : d0fe [ 3]> bne * ;failed not equal (non zero)>248a : ca [ 2] dex248b : 10e0 [ 3] bpl tasl5248d : a203 [ 2] ldx #3248f : tlsr4set_abs zp1,0> load_flag 0248f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2491 : 48 [ 3]> pha ;use stack to load status2492 : b513 [ 4]> lda zp1,x ;load to memory2494 : 8d0302 [ 4]> sta abstAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 182---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2497 : 28 [ 4]> plp2498 : 4e0302 [ 6] lsr absttst_abs rLSR,fLSR,0249b : 08 [ 3]> php ;save flags249c : ad0302 [ 4]> lda abst249f : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne24a2 : d0fe [ 3]> bne * ;failed not equal (non zero)>24a4 : 68 [ 4]> pla ;load status> eor_flag 024a5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>24a7 : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne24aa : d0fe [ 3]> bne * ;failed not equal (non zero)>24ac : ca [ 2] dex24ad : 10e0 [ 3] bpl tlsr424af : a203 [ 2] ldx #324b1 : tlsr5set_abs zp1,$ff> load_flag $ff24b1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>24b3 : 48 [ 3]> pha ;use stack to load status24b4 : b513 [ 4]> lda zp1,x ;load to memory24b6 : 8d0302 [ 4]> sta abst24b9 : 28 [ 4]> plp24ba : 4e0302 [ 6] lsr absttst_abs rLSR,fLSR,$ff-fnzc24bd : 08 [ 3]> php ;save flags24be : ad0302 [ 4]> lda abst24c1 : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne24c4 : d0fe [ 3]> bne * ;failed not equal (non zero)>24c6 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc24c7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>24c9 : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne24cc : d0fe [ 3]> bne * ;failed not equal (non zero)>24ce : ca [ 2] dex24cf : 10e0 [ 3] bpl tlsr524d1 : a203 [ 2] ldx #324d3 : trol4set_abs zp1,0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 183---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag 024d3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>24d5 : 48 [ 3]> pha ;use stack to load status24d6 : b513 [ 4]> lda zp1,x ;load to memory24d8 : 8d0302 [ 4]> sta abst24db : 28 [ 4]> plp24dc : 2e0302 [ 6] rol absttst_abs rROL,fROL,024df : 08 [ 3]> php ;save flags24e0 : ad0302 [ 4]> lda abst24e3 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne24e6 : d0fe [ 3]> bne * ;failed not equal (non zero)>24e8 : 68 [ 4]> pla ;load status> eor_flag 024e9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>24eb : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne24ee : d0fe [ 3]> bne * ;failed not equal (non zero)>24f0 : ca [ 2] dex24f1 : 10e0 [ 3] bpl trol424f3 : a203 [ 2] ldx #324f5 : trol5set_abs zp1,$ff-fc> load_flag $ff-fc24f5 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>24f7 : 48 [ 3]> pha ;use stack to load status24f8 : b513 [ 4]> lda zp1,x ;load to memory24fa : 8d0302 [ 4]> sta abst24fd : 28 [ 4]> plp24fe : 2e0302 [ 6] rol absttst_abs rROL,fROL,$ff-fnzc2501 : 08 [ 3]> php ;save flags2502 : ad0302 [ 4]> lda abst2505 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne2508 : d0fe [ 3]> bne * ;failed not equal (non zero)>250a : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc250b : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>250d : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne2510 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 184---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2512 : ca [ 2] dex2513 : 10e0 [ 4] bpl trol52515 : a203 [ 2] ldx #32517 : trolc4set_abs zp1,fc> load_flag fc2517 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>2519 : 48 [ 3]> pha ;use stack to load status251a : b513 [ 4]> lda zp1,x ;load to memory251c : 8d0302 [ 4]> sta abst251f : 28 [ 4]> plp2520 : 2e0302 [ 6] rol absttst_abs rROLc,fROLc,02523 : 08 [ 3]> php ;save flags2524 : ad0302 [ 4]> lda abst2527 : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne252a : d0fe [ 3]> bne * ;failed not equal (non zero)>252c : 68 [ 4]> pla ;load status> eor_flag 0252d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>252f : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne2532 : d0fe [ 3]> bne * ;failed not equal (non zero)>2534 : ca [ 2] dex2535 : 10e0 [ 3] bpl trolc42537 : a203 [ 2] ldx #32539 : trolc5set_abs zp1,$ff> load_flag $ff2539 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>253b : 48 [ 3]> pha ;use stack to load status253c : b513 [ 4]> lda zp1,x ;load to memory253e : 8d0302 [ 4]> sta abst2541 : 28 [ 4]> plp2542 : 2e0302 [ 6] rol absttst_abs rROLc,fROLc,$ff-fnzc2545 : 08 [ 3]> php ;save flags2546 : ad0302 [ 4]> lda abst2549 : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne254c : d0fe [ 3]> bne * ;failed not equal (non zero)>254e : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc254f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 185---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2551 : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne2554 : d0fe [ 3]> bne * ;failed not equal (non zero)>2556 : ca [ 2] dex2557 : 10e0 [ 3] bpl trolc52559 : a203 [ 2] ldx #3255b : tror4set_abs zp1,0> load_flag 0255b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>255d : 48 [ 3]> pha ;use stack to load status255e : b513 [ 4]> lda zp1,x ;load to memory2560 : 8d0302 [ 4]> sta abst2563 : 28 [ 4]> plp2564 : 6e0302 [ 6] ror absttst_abs rROR,fROR,02567 : 08 [ 3]> php ;save flags2568 : ad0302 [ 4]> lda abst256b : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne256e : d0fe [ 3]> bne * ;failed not equal (non zero)>2570 : 68 [ 4]> pla ;load status> eor_flag 02571 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2573 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne2576 : d0fe [ 3]> bne * ;failed not equal (non zero)>2578 : ca [ 2] dex2579 : 10e0 [ 3] bpl tror4257b : a203 [ 2] ldx #3257d : tror5set_abs zp1,$ff-fc> load_flag $ff-fc257d : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>257f : 48 [ 3]> pha ;use stack to load status2580 : b513 [ 4]> lda zp1,x ;load to memory2582 : 8d0302 [ 4]> sta abst2585 : 28 [ 4]> plp2586 : 6e0302 [ 6] ror absttst_abs rROR,fROR,$ff-fnzc2589 : 08 [ 3]> php ;save flags258a : ad0302 [ 4]> lda abst258d : dd1902 [ 4]> cmp rROR,x ;test resultAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 186---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> trap_ne2590 : d0fe [ 3]> bne * ;failed not equal (non zero)>2592 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2593 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2595 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne2598 : d0fe [ 3]> bne * ;failed not equal (non zero)>259a : ca [ 2] dex259b : 10e0 [ 3] bpl tror5259d : a203 [ 2] ldx #3259f : trorc4set_abs zp1,fc> load_flag fc259f : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>25a1 : 48 [ 3]> pha ;use stack to load status25a2 : b513 [ 4]> lda zp1,x ;load to memory25a4 : 8d0302 [ 4]> sta abst25a7 : 28 [ 4]> plp25a8 : 6e0302 [ 6] ror absttst_abs rRORc,fRORc,025ab : 08 [ 3]> php ;save flags25ac : ad0302 [ 4]> lda abst25af : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne25b2 : d0fe [ 3]> bne * ;failed not equal (non zero)>25b4 : 68 [ 4]> pla ;load status> eor_flag 025b5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>25b7 : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne25ba : d0fe [ 3]> bne * ;failed not equal (non zero)>25bc : ca [ 2] dex25bd : 10e0 [ 3] bpl trorc425bf : a203 [ 2] ldx #325c1 : trorc5set_abs zp1,$ff> load_flag $ff25c1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>25c3 : 48 [ 3]> pha ;use stack to load status25c4 : b513 [ 4]> lda zp1,x ;load to memory25c6 : 8d0302 [ 4]> sta abst25c9 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 187---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------25ca : 6e0302 [ 6] ror absttst_abs rRORc,fRORc,$ff-fnzc25cd : 08 [ 3]> php ;save flags25ce : ad0302 [ 4]> lda abst25d1 : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne25d4 : d0fe [ 3]> bne * ;failed not equal (non zero)>25d6 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc25d7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>25d9 : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne25dc : d0fe [ 3]> bne * ;failed not equal (non zero)>25de : ca [ 2] dex25df : 10e0 [ 3] bpl trorc5next_test25e1 : ad0002 [ 4]> lda test_case ;previous test25e4 : c91f [ 2]> cmp #test_num> trap_ne ;test is out of sequence25e6 : d0fe [ 3]> bne * ;failed not equal (non zero)>0020 = >test_num = test_num + 125e8 : a920 [ 2]> lda #test_num ;*** this tests' number25ea : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; shifts - zp indexed25ed : a203 [ 2] ldx #325ef : tasl6set_zx zp1,0> load_flag 025ef : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>25f1 : 48 [ 3]> pha ;use stack to load status25f2 : b513 [ 4]> lda zp1,x ;load to indexed zeropage25f4 : 950c [ 4]> sta zpt,x25f6 : 28 [ 4]> plp25f7 : 160c [ 6] asl zpt,xtst_zx rASL,fASL,025f9 : 08 [ 3]> php ;save flags25fa : b50c [ 4]> lda zpt,x25fc : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne25ff : d0fe [ 3]> bne * ;failed not equal (non zero)>2601 : 68 [ 4]> pla ;load status> eor_flag 02602 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 188---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2604 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne2607 : d0fe [ 3]> bne * ;failed not equal (non zero)>2609 : ca [ 2] dex260a : 10e3 [ 4] bpl tasl6260c : a203 [ 2] ldx #3260e : tasl7set_zx zp1,$ff> load_flag $ff260e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2610 : 48 [ 3]> pha ;use stack to load status2611 : b513 [ 4]> lda zp1,x ;load to indexed zeropage2613 : 950c [ 4]> sta zpt,x2615 : 28 [ 4]> plp2616 : 160c [ 6] asl zpt,xtst_zx rASL,fASL,$ff-fnzc2618 : 08 [ 3]> php ;save flags2619 : b50c [ 4]> lda zpt,x261b : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne261e : d0fe [ 3]> bne * ;failed not equal (non zero)>2620 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2621 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2623 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne2626 : d0fe [ 3]> bne * ;failed not equal (non zero)>2628 : ca [ 2] dex2629 : 10e3 [ 3] bpl tasl7262b : a203 [ 2] ldx #3262d : tlsr6set_zx zp1,0> load_flag 0262d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>262f : 48 [ 3]> pha ;use stack to load status2630 : b513 [ 4]> lda zp1,x ;load to indexed zeropage2632 : 950c [ 4]> sta zpt,x2634 : 28 [ 4]> plp2635 : 560c [ 6] lsr zpt,xtst_zx rLSR,fLSR,02637 : 08 [ 3]> php ;save flags2638 : b50c [ 4]> lda zpt,x263a : dd1902 [ 4]> cmp rLSR,x ;test resultAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 189---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> trap_ne263d : d0fe [ 3]> bne * ;failed not equal (non zero)>263f : 68 [ 4]> pla ;load status> eor_flag 02640 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2642 : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne2645 : d0fe [ 3]> bne * ;failed not equal (non zero)>2647 : ca [ 2] dex2648 : 10e3 [ 3] bpl tlsr6264a : a203 [ 2] ldx #3264c : tlsr7set_zx zp1,$ff> load_flag $ff264c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>264e : 48 [ 3]> pha ;use stack to load status264f : b513 [ 4]> lda zp1,x ;load to indexed zeropage2651 : 950c [ 4]> sta zpt,x2653 : 28 [ 4]> plp2654 : 560c [ 6] lsr zpt,xtst_zx rLSR,fLSR,$ff-fnzc2656 : 08 [ 3]> php ;save flags2657 : b50c [ 4]> lda zpt,x2659 : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne265c : d0fe [ 3]> bne * ;failed not equal (non zero)>265e : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc265f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2661 : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne2664 : d0fe [ 3]> bne * ;failed not equal (non zero)>2666 : ca [ 2] dex2667 : 10e3 [ 3] bpl tlsr72669 : a203 [ 2] ldx #3266b : trol6set_zx zp1,0> load_flag 0266b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>266d : 48 [ 3]> pha ;use stack to load status266e : b513 [ 4]> lda zp1,x ;load to indexed zeropage2670 : 950c [ 4]> sta zpt,x2672 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 190---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2673 : 360c [ 6] rol zpt,xtst_zx rROL,fROL,02675 : 08 [ 3]> php ;save flags2676 : b50c [ 4]> lda zpt,x2678 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne267b : d0fe [ 3]> bne * ;failed not equal (non zero)>267d : 68 [ 4]> pla ;load status> eor_flag 0267e : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2680 : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne2683 : d0fe [ 3]> bne * ;failed not equal (non zero)>2685 : ca [ 2] dex2686 : 10e3 [ 3] bpl trol62688 : a203 [ 2] ldx #3268a : trol7set_zx zp1,$ff-fc> load_flag $ff-fc268a : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>268c : 48 [ 3]> pha ;use stack to load status268d : b513 [ 4]> lda zp1,x ;load to indexed zeropage268f : 950c [ 4]> sta zpt,x2691 : 28 [ 4]> plp2692 : 360c [ 6] rol zpt,xtst_zx rROL,fROL,$ff-fnzc2694 : 08 [ 3]> php ;save flags2695 : b50c [ 4]> lda zpt,x2697 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne269a : d0fe [ 3]> bne * ;failed not equal (non zero)>269c : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc269d : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>269f : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne26a2 : d0fe [ 3]> bne * ;failed not equal (non zero)>26a4 : ca [ 2] dex26a5 : 10e3 [ 3] bpl trol726a7 : a203 [ 2] ldx #326a9 : trolc6set_zx zp1,fc> load_flag fcAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 191---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------26a9 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>26ab : 48 [ 3]> pha ;use stack to load status26ac : b513 [ 4]> lda zp1,x ;load to indexed zeropage26ae : 950c [ 4]> sta zpt,x26b0 : 28 [ 4]> plp26b1 : 360c [ 6] rol zpt,xtst_zx rROLc,fROLc,026b3 : 08 [ 3]> php ;save flags26b4 : b50c [ 4]> lda zpt,x26b6 : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne26b9 : d0fe [ 3]> bne * ;failed not equal (non zero)>26bb : 68 [ 4]> pla ;load status> eor_flag 026bc : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>26be : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne26c1 : d0fe [ 3]> bne * ;failed not equal (non zero)>26c3 : ca [ 2] dex26c4 : 10e3 [ 3] bpl trolc626c6 : a203 [ 2] ldx #326c8 : trolc7set_zx zp1,$ff> load_flag $ff26c8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>26ca : 48 [ 3]> pha ;use stack to load status26cb : b513 [ 4]> lda zp1,x ;load to indexed zeropage26cd : 950c [ 4]> sta zpt,x26cf : 28 [ 4]> plp26d0 : 360c [ 6] rol zpt,xtst_zx rROLc,fROLc,$ff-fnzc26d2 : 08 [ 3]> php ;save flags26d3 : b50c [ 4]> lda zpt,x26d5 : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne26d8 : d0fe [ 3]> bne * ;failed not equal (non zero)>26da : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc26db : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>26dd : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne26e0 : d0fe [ 3]> bne * ;failed not equal (non zero)>26e2 : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 192---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------26e3 : 10e3 [ 3] bpl trolc726e5 : a203 [ 2] ldx #326e7 : tror6set_zx zp1,0> load_flag 026e7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>26e9 : 48 [ 3]> pha ;use stack to load status26ea : b513 [ 4]> lda zp1,x ;load to indexed zeropage26ec : 950c [ 4]> sta zpt,x26ee : 28 [ 4]> plp26ef : 760c [ 6] ror zpt,xtst_zx rROR,fROR,026f1 : 08 [ 3]> php ;save flags26f2 : b50c [ 4]> lda zpt,x26f4 : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne26f7 : d0fe [ 3]> bne * ;failed not equal (non zero)>26f9 : 68 [ 4]> pla ;load status> eor_flag 026fa : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>26fc : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne26ff : d0fe [ 3]> bne * ;failed not equal (non zero)>2701 : ca [ 2] dex2702 : 10e3 [ 4] bpl tror62704 : a203 [ 2] ldx #32706 : tror7set_zx zp1,$ff-fc> load_flag $ff-fc2706 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>2708 : 48 [ 3]> pha ;use stack to load status2709 : b513 [ 4]> lda zp1,x ;load to indexed zeropage270b : 950c [ 4]> sta zpt,x270d : 28 [ 4]> plp270e : 760c [ 6] ror zpt,xtst_zx rROR,fROR,$ff-fnzc2710 : 08 [ 3]> php ;save flags2711 : b50c [ 4]> lda zpt,x2713 : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne2716 : d0fe [ 3]> bne * ;failed not equal (non zero)>2718 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2719 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 193---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------271b : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne271e : d0fe [ 3]> bne * ;failed not equal (non zero)>2720 : ca [ 2] dex2721 : 10e3 [ 3] bpl tror72723 : a203 [ 2] ldx #32725 : trorc6set_zx zp1,fc> load_flag fc2725 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>2727 : 48 [ 3]> pha ;use stack to load status2728 : b513 [ 4]> lda zp1,x ;load to indexed zeropage272a : 950c [ 4]> sta zpt,x272c : 28 [ 4]> plp272d : 760c [ 6] ror zpt,xtst_zx rRORc,fRORc,0272f : 08 [ 3]> php ;save flags2730 : b50c [ 4]> lda zpt,x2732 : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne2735 : d0fe [ 3]> bne * ;failed not equal (non zero)>2737 : 68 [ 4]> pla ;load status> eor_flag 02738 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>273a : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne273d : d0fe [ 3]> bne * ;failed not equal (non zero)>273f : ca [ 2] dex2740 : 10e3 [ 3] bpl trorc62742 : a203 [ 2] ldx #32744 : trorc7set_zx zp1,$ff> load_flag $ff2744 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2746 : 48 [ 3]> pha ;use stack to load status2747 : b513 [ 4]> lda zp1,x ;load to indexed zeropage2749 : 950c [ 4]> sta zpt,x274b : 28 [ 4]> plp274c : 760c [ 6] ror zpt,xtst_zx rRORc,fRORc,$ff-fnzc274e : 08 [ 3]> php ;save flags274f : b50c [ 4]> lda zpt,x2751 : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 194---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2754 : d0fe [ 3]> bne * ;failed not equal (non zero)>2756 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2757 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2759 : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne275c : d0fe [ 3]> bne * ;failed not equal (non zero)>275e : ca [ 2] dex275f : 10e3 [ 3] bpl trorc7next_test2761 : ad0002 [ 4]> lda test_case ;previous test2764 : c920 [ 2]> cmp #test_num> trap_ne ;test is out of sequence2766 : d0fe [ 3]> bne * ;failed not equal (non zero)>0021 = >test_num = test_num + 12768 : a921 [ 2]> lda #test_num ;*** this tests' number276a : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; shifts - abs indexed276d : a203 [ 2] ldx #3276f : tasl8set_absx zp1,0> load_flag 0276f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2771 : 48 [ 3]> pha ;use stack to load status2772 : b513 [ 4]> lda zp1,x ;load to indexed memory2774 : 9d0302 [ 5]> sta abst,x2777 : 28 [ 4]> plp2778 : 1e0302 [ 6] asl abst,xtst_absx rASL,fASL,0277b : 08 [ 3]> php ;save flags277c : bd0302 [ 4]> lda abst,x277f : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne2782 : d0fe [ 3]> bne * ;failed not equal (non zero)>2784 : 68 [ 4]> pla ;load status> eor_flag 02785 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2787 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne278a : d0fe [ 3]> bne * ;failed not equal (non zero)>278c : ca [ 2] dexAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 195---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------278d : 10e0 [ 3] bpl tasl8278f : a203 [ 2] ldx #32791 : tasl9set_absx zp1,$ff> load_flag $ff2791 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2793 : 48 [ 3]> pha ;use stack to load status2794 : b513 [ 4]> lda zp1,x ;load to indexed memory2796 : 9d0302 [ 5]> sta abst,x2799 : 28 [ 4]> plp279a : 1e0302 [ 6] asl abst,xtst_absx rASL,fASL,$ff-fnzc279d : 08 [ 3]> php ;save flags279e : bd0302 [ 4]> lda abst,x27a1 : dd1102 [ 4]> cmp rASL,x ;test result> trap_ne27a4 : d0fe [ 3]> bne * ;failed not equal (non zero)>27a6 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc27a7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>27a9 : dd2102 [ 4]> cmp fASL,x ;test flags> trap_ne27ac : d0fe [ 3]> bne * ;failed not equal (non zero)>27ae : ca [ 2] dex27af : 10e0 [ 3] bpl tasl927b1 : a203 [ 2] ldx #327b3 : tlsr8set_absx zp1,0> load_flag 027b3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>27b5 : 48 [ 3]> pha ;use stack to load status27b6 : b513 [ 4]> lda zp1,x ;load to indexed memory27b8 : 9d0302 [ 5]> sta abst,x27bb : 28 [ 4]> plp27bc : 5e0302 [ 6] lsr abst,xtst_absx rLSR,fLSR,027bf : 08 [ 3]> php ;save flags27c0 : bd0302 [ 4]> lda abst,x27c3 : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne27c6 : d0fe [ 3]> bne * ;failed not equal (non zero)>27c8 : 68 [ 4]> pla ;load status> eor_flag 027c9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 196---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------27cb : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne27ce : d0fe [ 3]> bne * ;failed not equal (non zero)>27d0 : ca [ 2] dex27d1 : 10e0 [ 3] bpl tlsr827d3 : a203 [ 2] ldx #327d5 : tlsr9set_absx zp1,$ff> load_flag $ff27d5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>27d7 : 48 [ 3]> pha ;use stack to load status27d8 : b513 [ 4]> lda zp1,x ;load to indexed memory27da : 9d0302 [ 5]> sta abst,x27dd : 28 [ 4]> plp27de : 5e0302 [ 6] lsr abst,xtst_absx rLSR,fLSR,$ff-fnzc27e1 : 08 [ 3]> php ;save flags27e2 : bd0302 [ 4]> lda abst,x27e5 : dd1902 [ 4]> cmp rLSR,x ;test result> trap_ne27e8 : d0fe [ 3]> bne * ;failed not equal (non zero)>27ea : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc27eb : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>27ed : dd2902 [ 4]> cmp fLSR,x ;test flags> trap_ne27f0 : d0fe [ 3]> bne * ;failed not equal (non zero)>27f2 : ca [ 2] dex27f3 : 10e0 [ 3] bpl tlsr927f5 : a203 [ 2] ldx #327f7 : trol8set_absx zp1,0> load_flag 027f7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>27f9 : 48 [ 3]> pha ;use stack to load status27fa : b513 [ 4]> lda zp1,x ;load to indexed memory27fc : 9d0302 [ 5]> sta abst,x27ff : 28 [ 4]> plp2800 : 3e0302 [ 6] rol abst,xtst_absx rROL,fROL,02803 : 08 [ 3]> php ;save flags2804 : bd0302 [ 4]> lda abst,x2807 : dd1102 [ 4]> cmp rROL,x ;test result> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 197---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------280a : d0fe [ 3]> bne * ;failed not equal (non zero)>280c : 68 [ 4]> pla ;load status> eor_flag 0280d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>280f : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne2812 : d0fe [ 3]> bne * ;failed not equal (non zero)>2814 : ca [ 2] dex2815 : 10e0 [ 4] bpl trol82817 : a203 [ 2] ldx #32819 : trol9set_absx zp1,$ff-fc> load_flag $ff-fc2819 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>281b : 48 [ 3]> pha ;use stack to load status281c : b513 [ 4]> lda zp1,x ;load to indexed memory281e : 9d0302 [ 5]> sta abst,x2821 : 28 [ 4]> plp2822 : 3e0302 [ 6] rol abst,xtst_absx rROL,fROL,$ff-fnzc2825 : 08 [ 3]> php ;save flags2826 : bd0302 [ 4]> lda abst,x2829 : dd1102 [ 4]> cmp rROL,x ;test result> trap_ne282c : d0fe [ 3]> bne * ;failed not equal (non zero)>282e : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc282f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2831 : dd2102 [ 4]> cmp fROL,x ;test flags> trap_ne2834 : d0fe [ 3]> bne * ;failed not equal (non zero)>2836 : ca [ 2] dex2837 : 10e0 [ 3] bpl trol92839 : a203 [ 2] ldx #3283b : trolc8set_absx zp1,fc> load_flag fc283b : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>283d : 48 [ 3]> pha ;use stack to load status283e : b513 [ 4]> lda zp1,x ;load to indexed memory2840 : 9d0302 [ 5]> sta abst,x2843 : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 198---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2844 : 3e0302 [ 6] rol abst,xtst_absx rROLc,fROLc,02847 : 08 [ 3]> php ;save flags2848 : bd0302 [ 4]> lda abst,x284b : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne284e : d0fe [ 3]> bne * ;failed not equal (non zero)>2850 : 68 [ 4]> pla ;load status> eor_flag 02851 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2853 : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne2856 : d0fe [ 3]> bne * ;failed not equal (non zero)>2858 : ca [ 2] dex2859 : 10e0 [ 3] bpl trolc8285b : a203 [ 2] ldx #3285d : trolc9set_absx zp1,$ff> load_flag $ff285d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>285f : 48 [ 3]> pha ;use stack to load status2860 : b513 [ 4]> lda zp1,x ;load to indexed memory2862 : 9d0302 [ 5]> sta abst,x2865 : 28 [ 4]> plp2866 : 3e0302 [ 6] rol abst,xtst_absx rROLc,fROLc,$ff-fnzc2869 : 08 [ 3]> php ;save flags286a : bd0302 [ 4]> lda abst,x286d : dd1502 [ 4]> cmp rROLc,x ;test result> trap_ne2870 : d0fe [ 3]> bne * ;failed not equal (non zero)>2872 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc2873 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>2875 : dd2502 [ 4]> cmp fROLc,x ;test flags> trap_ne2878 : d0fe [ 3]> bne * ;failed not equal (non zero)>287a : ca [ 2] dex287b : 10e0 [ 3] bpl trolc9287d : a203 [ 2] ldx #3287f : tror8set_absx zp1,0> load_flag 0287f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 199---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2881 : 48 [ 3]> pha ;use stack to load status2882 : b513 [ 4]> lda zp1,x ;load to indexed memory2884 : 9d0302 [ 5]> sta abst,x2887 : 28 [ 4]> plp2888 : 7e0302 [ 6] ror abst,xtst_absx rROR,fROR,0288b : 08 [ 3]> php ;save flags288c : bd0302 [ 4]> lda abst,x288f : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne2892 : d0fe [ 3]> bne * ;failed not equal (non zero)>2894 : 68 [ 4]> pla ;load status> eor_flag 02895 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2897 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne289a : d0fe [ 3]> bne * ;failed not equal (non zero)>289c : ca [ 2] dex289d : 10e0 [ 3] bpl tror8289f : a203 [ 2] ldx #328a1 : tror9set_absx zp1,$ff-fc> load_flag $ff-fc28a1 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)>28a3 : 48 [ 3]> pha ;use stack to load status28a4 : b513 [ 4]> lda zp1,x ;load to indexed memory28a6 : 9d0302 [ 5]> sta abst,x28a9 : 28 [ 4]> plp28aa : 7e0302 [ 6] ror abst,xtst_absx rROR,fROR,$ff-fnzc28ad : 08 [ 3]> php ;save flags28ae : bd0302 [ 4]> lda abst,x28b1 : dd1902 [ 4]> cmp rROR,x ;test result> trap_ne28b4 : d0fe [ 3]> bne * ;failed not equal (non zero)>28b6 : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc28b7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>28b9 : dd2902 [ 4]> cmp fROR,x ;test flags> trap_ne28bc : d0fe [ 3]> bne * ;failed not equal (non zero)>28be : ca [ 2] dex28bf : 10e0 [ 3] bpl tror9AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 200---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------28c1 : a203 [ 2] ldx #328c3 : trorc8set_absx zp1,fc> load_flag fc28c3 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)>28c5 : 48 [ 3]> pha ;use stack to load status28c6 : b513 [ 4]> lda zp1,x ;load to indexed memory28c8 : 9d0302 [ 5]> sta abst,x28cb : 28 [ 4]> plp28cc : 7e0302 [ 6] ror abst,xtst_absx rRORc,fRORc,028cf : 08 [ 3]> php ;save flags28d0 : bd0302 [ 4]> lda abst,x28d3 : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne28d6 : d0fe [ 3]> bne * ;failed not equal (non zero)>28d8 : 68 [ 4]> pla ;load status> eor_flag 028d9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>28db : dd2d02 [ 4]> cmp fRORc,x ;test flags> trap_ne28de : d0fe [ 3]> bne * ;failed not equal (non zero)>28e0 : ca [ 2] dex28e1 : 10e0 [ 3] bpl trorc828e3 : a203 [ 2] ldx #328e5 : trorc9set_absx zp1,$ff> load_flag $ff28e5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>28e7 : 48 [ 3]> pha ;use stack to load status28e8 : b513 [ 4]> lda zp1,x ;load to indexed memory28ea : 9d0302 [ 5]> sta abst,x28ed : 28 [ 4]> plp28ee : 7e0302 [ 6] ror abst,xtst_absx rRORc,fRORc,$ff-fnzc28f1 : 08 [ 3]> php ;save flags28f2 : bd0302 [ 4]> lda abst,x28f5 : dd1d02 [ 4]> cmp rRORc,x ;test result> trap_ne28f8 : d0fe [ 3]> bne * ;failed not equal (non zero)>28fa : 68 [ 4]> pla ;load status> eor_flag $ff-fnzc28fb : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits>28fd : dd2d02 [ 4]> cmp fRORc,x ;test flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 201---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> trap_ne2900 : d0fe [ 3]> bne * ;failed not equal (non zero)>2902 : ca [ 2] dex2903 : 10e0 [ 4] bpl trorc9next_test2905 : ad0002 [ 4]> lda test_case ;previous test2908 : c921 [ 2]> cmp #test_num> trap_ne ;test is out of sequence290a : d0fe [ 3]> bne * ;failed not equal (non zero)>0022 = >test_num = test_num + 1290c : a922 [ 2]> lda #test_num ;*** this tests' number290e : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; testing memory increment/decrement - INC DEC all addressing modes; zeropage2911 : a200 [ 2] ldx #02913 : a97e [ 2] lda #$7e2915 : 850c [ 3] sta zpt2917 : tincset_stat 0> load_flag 02917 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2919 : 48 [ 3]> pha ;use stack to load status291a : 28 [ 4]> plp291b : e60c [ 5] inc zpttst_z rINC,fINC,0291d : 08 [ 3]> php ;save flags291e : a50c [ 3]> lda zpt2920 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2923 : d0fe [ 3]> bne * ;failed not equal (non zero)>2925 : 68 [ 4]> pla ;load status> eor_flag 02926 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2928 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne292b : d0fe [ 3]> bne * ;failed not equal (non zero)>292d : e8 [ 2] inx292e : e002 [ 2] cpx #22930 : d004 [ 3] bne tinc12932 : a9fe [ 2] lda #$fe2934 : 850c [ 3] sta zpt2936 : e005 [ 2] tinc1 cpx #52938 : d0dd [ 3] bne tincAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 202---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------293a : ca [ 2] dex293b : e60c [ 5] inc zpt293d : tdecset_stat 0> load_flag 0293d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>293f : 48 [ 3]> pha ;use stack to load status2940 : 28 [ 4]> plp2941 : c60c [ 5] dec zpttst_z rINC,fINC,02943 : 08 [ 3]> php ;save flags2944 : a50c [ 3]> lda zpt2946 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2949 : d0fe [ 3]> bne * ;failed not equal (non zero)>294b : 68 [ 4]> pla ;load status> eor_flag 0294c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>294e : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2951 : d0fe [ 3]> bne * ;failed not equal (non zero)>2953 : ca [ 2] dex2954 : 300a [ 3] bmi tdec12956 : e001 [ 2] cpx #12958 : d0e3 [ 3] bne tdec295a : a981 [ 2] lda #$81295c : 850c [ 3] sta zpt295e : d0dd [ 3] bne tdec2960 : tdec12960 : a200 [ 2] ldx #02962 : a97e [ 2] lda #$7e2964 : 850c [ 3] sta zpt2966 : tinc10set_stat $ff> load_flag $ff2966 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2968 : 48 [ 3]> pha ;use stack to load status2969 : 28 [ 4]> plp296a : e60c [ 5] inc zpttst_z rINC,fINC,$ff-fnz296c : 08 [ 3]> php ;save flags296d : a50c [ 3]> lda zpt296f : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2972 : d0fe [ 3]> bne * ;failed not equal (non zero)>2974 : 68 [ 4]> pla ;load statusAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 203---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> eor_flag $ff-fnz2975 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2977 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne297a : d0fe [ 3]> bne * ;failed not equal (non zero)>297c : e8 [ 2] inx297d : e002 [ 2] cpx #2297f : d004 [ 3] bne tinc112981 : a9fe [ 2] lda #$fe2983 : 850c [ 3] sta zpt2985 : e005 [ 2] tinc11 cpx #52987 : d0dd [ 3] bne tinc102989 : ca [ 2] dex298a : e60c [ 5] inc zpt298c : tdec10set_stat $ff> load_flag $ff298c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>298e : 48 [ 3]> pha ;use stack to load status298f : 28 [ 4]> plp2990 : c60c [ 5] dec zpttst_z rINC,fINC,$ff-fnz2992 : 08 [ 3]> php ;save flags2993 : a50c [ 3]> lda zpt2995 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2998 : d0fe [ 3]> bne * ;failed not equal (non zero)>299a : 68 [ 4]> pla ;load status> eor_flag $ff-fnz299b : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>299d : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne29a0 : d0fe [ 3]> bne * ;failed not equal (non zero)>29a2 : ca [ 2] dex29a3 : 300a [ 3] bmi tdec1129a5 : e001 [ 2] cpx #129a7 : d0e3 [ 3] bne tdec1029a9 : a981 [ 2] lda #$8129ab : 850c [ 3] sta zpt29ad : d0dd [ 3] bne tdec1029af : tdec11next_test29af : ad0002 [ 4]> lda test_case ;previous test29b2 : c922 [ 2]> cmp #test_num> trap_ne ;test is out of sequence29b4 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 204---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->0023 = >test_num = test_num + 129b6 : a923 [ 2]> lda #test_num ;*** this tests' number29b8 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; absolute memory29bb : a200 [ 2] ldx #029bd : a97e [ 2] lda #$7e29bf : 8d0302 [ 4] sta abst29c2 : tinc2set_stat 0> load_flag 029c2 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>29c4 : 48 [ 3]> pha ;use stack to load status29c5 : 28 [ 4]> plp29c6 : ee0302 [ 6] inc absttst_abs rINC,fINC,029c9 : 08 [ 3]> php ;save flags29ca : ad0302 [ 4]> lda abst29cd : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne29d0 : d0fe [ 3]> bne * ;failed not equal (non zero)>29d2 : 68 [ 4]> pla ;load status> eor_flag 029d3 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>29d5 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne29d8 : d0fe [ 3]> bne * ;failed not equal (non zero)>29da : e8 [ 2] inx29db : e002 [ 2] cpx #229dd : d005 [ 3] bne tinc329df : a9fe [ 2] lda #$fe29e1 : 8d0302 [ 4] sta abst29e4 : e005 [ 2] tinc3 cpx #529e6 : d0da [ 3] bne tinc229e8 : ca [ 2] dex29e9 : ee0302 [ 6] inc abst29ec : tdec2set_stat 0> load_flag 029ec : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>29ee : 48 [ 3]> pha ;use stack to load status29ef : 28 [ 4]> plp29f0 : ce0302 [ 6] dec absttst_abs rINC,fINC,0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 205---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------29f3 : 08 [ 3]> php ;save flags29f4 : ad0302 [ 4]> lda abst29f7 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne29fa : d0fe [ 3]> bne * ;failed not equal (non zero)>29fc : 68 [ 4]> pla ;load status> eor_flag 029fd : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>29ff : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2a02 : d0fe [ 3]> bne * ;failed not equal (non zero)>2a04 : ca [ 2] dex2a05 : 300b [ 3] bmi tdec32a07 : e001 [ 2] cpx #12a09 : d0e1 [ 4] bne tdec22a0b : a981 [ 2] lda #$812a0d : 8d0302 [ 4] sta abst2a10 : d0da [ 4] bne tdec22a12 : tdec32a12 : a200 [ 2] ldx #02a14 : a97e [ 2] lda #$7e2a16 : 8d0302 [ 4] sta abst2a19 : tinc12set_stat $ff> load_flag $ff2a19 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2a1b : 48 [ 3]> pha ;use stack to load status2a1c : 28 [ 4]> plp2a1d : ee0302 [ 6] inc absttst_abs rINC,fINC,$ff-fnz2a20 : 08 [ 3]> php ;save flags2a21 : ad0302 [ 4]> lda abst2a24 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2a27 : d0fe [ 3]> bne * ;failed not equal (non zero)>2a29 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2a2a : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2a2c : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2a2f : d0fe [ 3]> bne * ;failed not equal (non zero)>2a31 : e8 [ 2] inx2a32 : e002 [ 2] cpx #22a34 : d005 [ 3] bne tinc132a36 : a9fe [ 2] lda #$feAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 206---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2a38 : 8d0302 [ 4] sta abst2a3b : e005 [ 2] tinc13 cpx #52a3d : d0da [ 3] bne tinc122a3f : ca [ 2] dex2a40 : ee0302 [ 6] inc abst2a43 : tdec12set_stat $ff> load_flag $ff2a43 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2a45 : 48 [ 3]> pha ;use stack to load status2a46 : 28 [ 4]> plp2a47 : ce0302 [ 6] dec absttst_abs rINC,fINC,$ff-fnz2a4a : 08 [ 3]> php ;save flags2a4b : ad0302 [ 4]> lda abst2a4e : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2a51 : d0fe [ 3]> bne * ;failed not equal (non zero)>2a53 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2a54 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2a56 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2a59 : d0fe [ 3]> bne * ;failed not equal (non zero)>2a5b : ca [ 2] dex2a5c : 300b [ 3] bmi tdec132a5e : e001 [ 2] cpx #12a60 : d0e1 [ 3] bne tdec122a62 : a981 [ 2] lda #$812a64 : 8d0302 [ 4] sta abst2a67 : d0da [ 3] bne tdec122a69 : tdec13next_test2a69 : ad0002 [ 4]> lda test_case ;previous test2a6c : c923 [ 2]> cmp #test_num> trap_ne ;test is out of sequence2a6e : d0fe [ 3]> bne * ;failed not equal (non zero)>0024 = >test_num = test_num + 12a70 : a924 [ 2]> lda #test_num ;*** this tests' number2a72 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; zeropage indexed2a75 : a200 [ 2] ldx #02a77 : a97e [ 2] lda #$7e2a79 : 950c [ 4] tinc4 sta zpt,xset_stat 0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 207---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag 02a7b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2a7d : 48 [ 3]> pha ;use stack to load status2a7e : 28 [ 4]> plp2a7f : f60c [ 6] inc zpt,xtst_zx rINC,fINC,02a81 : 08 [ 3]> php ;save flags2a82 : b50c [ 4]> lda zpt,x2a84 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2a87 : d0fe [ 3]> bne * ;failed not equal (non zero)>2a89 : 68 [ 4]> pla ;load status> eor_flag 02a8a : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2a8c : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2a8f : d0fe [ 3]> bne * ;failed not equal (non zero)>2a91 : b50c [ 4] lda zpt,x2a93 : e8 [ 2] inx2a94 : e002 [ 2] cpx #22a96 : d002 [ 3] bne tinc52a98 : a9fe [ 2] lda #$fe2a9a : e005 [ 2] tinc5 cpx #52a9c : d0db [ 3] bne tinc42a9e : ca [ 2] dex2a9f : a902 [ 2] lda #22aa1 : 950c [ 4] tdec4 sta zpt,xset_stat 0> load_flag 02aa3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2aa5 : 48 [ 3]> pha ;use stack to load status2aa6 : 28 [ 4]> plp2aa7 : d60c [ 6] dec zpt,xtst_zx rINC,fINC,02aa9 : 08 [ 3]> php ;save flags2aaa : b50c [ 4]> lda zpt,x2aac : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2aaf : d0fe [ 3]> bne * ;failed not equal (non zero)>2ab1 : 68 [ 4]> pla ;load status> eor_flag 02ab2 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2ab4 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2ab7 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 208---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2ab9 : b50c [ 4] lda zpt,x2abb : ca [ 2] dex2abc : 3008 [ 3] bmi tdec52abe : e001 [ 2] cpx #12ac0 : d0df [ 3] bne tdec42ac2 : a981 [ 2] lda #$812ac4 : d0db [ 3] bne tdec42ac6 : tdec52ac6 : a200 [ 2] ldx #02ac8 : a97e [ 2] lda #$7e2aca : 950c [ 4] tinc14 sta zpt,xset_stat $ff> load_flag $ff2acc : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2ace : 48 [ 3]> pha ;use stack to load status2acf : 28 [ 4]> plp2ad0 : f60c [ 6] inc zpt,xtst_zx rINC,fINC,$ff-fnz2ad2 : 08 [ 3]> php ;save flags2ad3 : b50c [ 4]> lda zpt,x2ad5 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2ad8 : d0fe [ 3]> bne * ;failed not equal (non zero)>2ada : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2adb : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2add : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2ae0 : d0fe [ 3]> bne * ;failed not equal (non zero)>2ae2 : b50c [ 4] lda zpt,x2ae4 : e8 [ 2] inx2ae5 : e002 [ 2] cpx #22ae7 : d002 [ 3] bne tinc152ae9 : a9fe [ 2] lda #$fe2aeb : e005 [ 2] tinc15 cpx #52aed : d0db [ 3] bne tinc142aef : ca [ 2] dex2af0 : a902 [ 2] lda #22af2 : 950c [ 4] tdec14 sta zpt,xset_stat $ff> load_flag $ff2af4 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2af6 : 48 [ 3]> pha ;use stack to load status2af7 : 28 [ 4]> plp2af8 : d60c [ 6] dec zpt,xAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 209---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------tst_zx rINC,fINC,$ff-fnz2afa : 08 [ 3]> php ;save flags2afb : b50c [ 4]> lda zpt,x2afd : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2b00 : d0fe [ 3]> bne * ;failed not equal (non zero)>2b02 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2b03 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2b05 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2b08 : d0fe [ 3]> bne * ;failed not equal (non zero)>2b0a : b50c [ 4] lda zpt,x2b0c : ca [ 2] dex2b0d : 3008 [ 3] bmi tdec152b0f : e001 [ 2] cpx #12b11 : d0df [ 4] bne tdec142b13 : a981 [ 2] lda #$812b15 : d0db [ 4] bne tdec142b17 : tdec15next_test2b17 : ad0002 [ 4]> lda test_case ;previous test2b1a : c924 [ 2]> cmp #test_num> trap_ne ;test is out of sequence2b1c : d0fe [ 3]> bne * ;failed not equal (non zero)>0025 = >test_num = test_num + 12b1e : a925 [ 2]> lda #test_num ;*** this tests' number2b20 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; memory indexed2b23 : a200 [ 2] ldx #02b25 : a97e [ 2] lda #$7e2b27 : 9d0302 [ 5] tinc6 sta abst,xset_stat 0> load_flag 02b2a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2b2c : 48 [ 3]> pha ;use stack to load status2b2d : 28 [ 4]> plp2b2e : fe0302 [ 6] inc abst,xtst_absx rINC,fINC,02b31 : 08 [ 3]> php ;save flags2b32 : bd0302 [ 4]> lda abst,x2b35 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2b38 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 210---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2b3a : 68 [ 4]> pla ;load status> eor_flag 02b3b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2b3d : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2b40 : d0fe [ 3]> bne * ;failed not equal (non zero)>2b42 : bd0302 [ 4] lda abst,x2b45 : e8 [ 2] inx2b46 : e002 [ 2] cpx #22b48 : d002 [ 3] bne tinc72b4a : a9fe [ 2] lda #$fe2b4c : e005 [ 2] tinc7 cpx #52b4e : d0d7 [ 3] bne tinc62b50 : ca [ 2] dex2b51 : a902 [ 2] lda #22b53 : 9d0302 [ 5] tdec6 sta abst,xset_stat 0> load_flag 02b56 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2b58 : 48 [ 3]> pha ;use stack to load status2b59 : 28 [ 4]> plp2b5a : de0302 [ 6] dec abst,xtst_absx rINC,fINC,02b5d : 08 [ 3]> php ;save flags2b5e : bd0302 [ 4]> lda abst,x2b61 : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2b64 : d0fe [ 3]> bne * ;failed not equal (non zero)>2b66 : 68 [ 4]> pla ;load status> eor_flag 02b67 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2b69 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2b6c : d0fe [ 3]> bne * ;failed not equal (non zero)>2b6e : bd0302 [ 4] lda abst,x2b71 : ca [ 2] dex2b72 : 3008 [ 3] bmi tdec72b74 : e001 [ 2] cpx #12b76 : d0db [ 3] bne tdec62b78 : a981 [ 2] lda #$812b7a : d0d7 [ 3] bne tdec62b7c : tdec72b7c : a200 [ 2] ldx #02b7e : a97e [ 2] lda #$7e2b80 : 9d0302 [ 5] tinc16 sta abst,xset_stat $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 211---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag $ff2b83 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2b85 : 48 [ 3]> pha ;use stack to load status2b86 : 28 [ 4]> plp2b87 : fe0302 [ 6] inc abst,xtst_absx rINC,fINC,$ff-fnz2b8a : 08 [ 3]> php ;save flags2b8b : bd0302 [ 4]> lda abst,x2b8e : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2b91 : d0fe [ 3]> bne * ;failed not equal (non zero)>2b93 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2b94 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2b96 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2b99 : d0fe [ 3]> bne * ;failed not equal (non zero)>2b9b : bd0302 [ 4] lda abst,x2b9e : e8 [ 2] inx2b9f : e002 [ 2] cpx #22ba1 : d002 [ 3] bne tinc172ba3 : a9fe [ 2] lda #$fe2ba5 : e005 [ 2] tinc17 cpx #52ba7 : d0d7 [ 3] bne tinc162ba9 : ca [ 2] dex2baa : a902 [ 2] lda #22bac : 9d0302 [ 5] tdec16 sta abst,xset_stat $ff> load_flag $ff2baf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2bb1 : 48 [ 3]> pha ;use stack to load status2bb2 : 28 [ 4]> plp2bb3 : de0302 [ 6] dec abst,xtst_absx rINC,fINC,$ff-fnz2bb6 : 08 [ 3]> php ;save flags2bb7 : bd0302 [ 4]> lda abst,x2bba : dd3102 [ 4]> cmp rINC,x ;test result> trap_ne2bbd : d0fe [ 3]> bne * ;failed not equal (non zero)>2bbf : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2bc0 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2bc2 : dd3602 [ 4]> cmp fINC,x ;test flags> trap_ne2bc5 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 212---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2bc7 : bd0302 [ 4] lda abst,x2bca : ca [ 2] dex2bcb : 3008 [ 3] bmi tdec172bcd : e001 [ 2] cpx #12bcf : d0db [ 3] bne tdec162bd1 : a981 [ 2] lda #$812bd3 : d0d7 [ 3] bne tdec162bd5 : tdec17next_test2bd5 : ad0002 [ 4]> lda test_case ;previous test2bd8 : c925 [ 2]> cmp #test_num> trap_ne ;test is out of sequence2bda : d0fe [ 3]> bne * ;failed not equal (non zero)>0026 = >test_num = test_num + 12bdc : a926 [ 2]> lda #test_num ;*** this tests' number2bde : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; testing logical instructions - AND EOR ORA all addressing modes; AND2be1 : a203 [ 2] ldx #3 ;immediate - self modifying code2be3 : b51c [ 4] tand lda zpAN,x2be5 : 8df02b [ 4] sta tandi1set_ax absANa,0> load_flag 02be8 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2bea : 48 [ 3]> pha ;use stack to load status2beb : bd4b02 [ 4]> lda absANa,x ;precharge accu2bee : 28 [ 4]> plp2bf0 = tandi1 equ *+1 ;target for immediate operand2bef : 2963 [ 2] and #99tst_ax absrlo,absflo,02bf1 : 08 [ 3]> php ;save flags2bf2 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2bf5 : d0fe [ 3]> bne * ;failed not equal (non zero)>2bf7 : 68 [ 4]> pla ;load status> eor_flag 02bf8 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2bfa : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2bfd : d0fe [ 3]> bne * ;failed not equal (non zero)>2bff : ca [ 2] dex2c00 : 10e1 [ 4] bpl tand2c02 : a203 [ 2] ldx #3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 213---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2c04 : b51c [ 4] tand1 lda zpAN,x2c06 : 8d112c [ 4] sta tandi2set_ax absANa,$ff> load_flag $ff2c09 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2c0b : 48 [ 3]> pha ;use stack to load status2c0c : bd4b02 [ 4]> lda absANa,x ;precharge accu2c0f : 28 [ 4]> plp2c11 = tandi2 equ *+1 ;target for immediate operand2c10 : 2963 [ 2] and #99tst_ax absrlo,absflo,$ff-fnz2c12 : 08 [ 3]> php ;save flags2c13 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2c16 : d0fe [ 3]> bne * ;failed not equal (non zero)>2c18 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2c19 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2c1b : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2c1e : d0fe [ 3]> bne * ;failed not equal (non zero)>2c20 : ca [ 2] dex2c21 : 10e1 [ 3] bpl tand12c23 : a203 [ 2] ldx #3 ;zp2c25 : b51c [ 4] tand2 lda zpAN,x2c27 : 850c [ 3] sta zptset_ax absANa,0> load_flag 02c29 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2c2b : 48 [ 3]> pha ;use stack to load status2c2c : bd4b02 [ 4]> lda absANa,x ;precharge accu2c2f : 28 [ 4]> plp2c30 : 250c [ 3] and zpttst_ax absrlo,absflo,02c32 : 08 [ 3]> php ;save flags2c33 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2c36 : d0fe [ 3]> bne * ;failed not equal (non zero)>2c38 : 68 [ 4]> pla ;load status> eor_flag 02c39 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2c3b : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2c3e : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 214---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2c40 : ca [ 2] dex2c41 : 10e2 [ 3] bpl tand22c43 : a203 [ 2] ldx #32c45 : b51c [ 4] tand3 lda zpAN,x2c47 : 850c [ 3] sta zptset_ax absANa,$ff> load_flag $ff2c49 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2c4b : 48 [ 3]> pha ;use stack to load status2c4c : bd4b02 [ 4]> lda absANa,x ;precharge accu2c4f : 28 [ 4]> plp2c50 : 250c [ 3] and zpttst_ax absrlo,absflo,$ff-fnz2c52 : 08 [ 3]> php ;save flags2c53 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2c56 : d0fe [ 3]> bne * ;failed not equal (non zero)>2c58 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2c59 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2c5b : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2c5e : d0fe [ 3]> bne * ;failed not equal (non zero)>2c60 : ca [ 2] dex2c61 : 10e2 [ 3] bpl tand32c63 : a203 [ 2] ldx #3 ;abs2c65 : b51c [ 4] tand4 lda zpAN,x2c67 : 8d0302 [ 4] sta abstset_ax absANa,0> load_flag 02c6a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2c6c : 48 [ 3]> pha ;use stack to load status2c6d : bd4b02 [ 4]> lda absANa,x ;precharge accu2c70 : 28 [ 4]> plp2c71 : 2d0302 [ 4] and absttst_ax absrlo,absflo,02c74 : 08 [ 3]> php ;save flags2c75 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2c78 : d0fe [ 3]> bne * ;failed not equal (non zero)>2c7a : 68 [ 4]> pla ;load status> eor_flag 02c7b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 215---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2c7d : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2c80 : d0fe [ 3]> bne * ;failed not equal (non zero)>2c82 : ca [ 2] dex2c83 : 10e0 [ 3] bpl tand42c85 : a203 [ 2] ldx #32c87 : b51c [ 4] tand5 lda zpAN,x2c89 : 8d0302 [ 4] sta abstset_ax absANa,$ff> load_flag $ff2c8c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2c8e : 48 [ 3]> pha ;use stack to load status2c8f : bd4b02 [ 4]> lda absANa,x ;precharge accu2c92 : 28 [ 4]> plp2c93 : 2d0302 [ 4] and absttst_ax absrlo,absflo,$ff-fnz2c96 : 08 [ 3]> php ;save flags2c97 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2c9a : d0fe [ 3]> bne * ;failed not equal (non zero)>2c9c : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2c9d : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2c9f : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2ca2 : d0fe [ 3]> bne * ;failed not equal (non zero)>2ca4 : ca [ 2] dex2ca5 : 1002 [ 3] bpl tand62ca7 : a203 [ 2] ldx #3 ;zp,x2ca9 : tand6set_ax absANa,0> load_flag 02ca9 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2cab : 48 [ 3]> pha ;use stack to load status2cac : bd4b02 [ 4]> lda absANa,x ;precharge accu2caf : 28 [ 4]> plp2cb0 : 351c [ 4] and zpAN,xtst_ax absrlo,absflo,02cb2 : 08 [ 3]> php ;save flags2cb3 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2cb6 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 216---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2cb8 : 68 [ 4]> pla ;load status> eor_flag 02cb9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2cbb : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2cbe : d0fe [ 3]> bne * ;failed not equal (non zero)>2cc0 : ca [ 2] dex2cc1 : 10e6 [ 3] bpl tand62cc3 : a203 [ 2] ldx #32cc5 : tand7set_ax absANa,$ff> load_flag $ff2cc5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2cc7 : 48 [ 3]> pha ;use stack to load status2cc8 : bd4b02 [ 4]> lda absANa,x ;precharge accu2ccb : 28 [ 4]> plp2ccc : 351c [ 4] and zpAN,xtst_ax absrlo,absflo,$ff-fnz2cce : 08 [ 3]> php ;save flags2ccf : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2cd2 : d0fe [ 3]> bne * ;failed not equal (non zero)>2cd4 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2cd5 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2cd7 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2cda : d0fe [ 3]> bne * ;failed not equal (non zero)>2cdc : ca [ 2] dex2cdd : 10e6 [ 3] bpl tand72cdf : a203 [ 2] ldx #3 ;abs,x2ce1 : tand8set_ax absANa,0> load_flag 02ce1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2ce3 : 48 [ 3]> pha ;use stack to load status2ce4 : bd4b02 [ 4]> lda absANa,x ;precharge accu2ce7 : 28 [ 4]> plp2ce8 : 3d3f02 [ 4] and absAN,xtst_ax absrlo,absflo,02ceb : 08 [ 3]> php ;save flags2cec : dd5302 [ 4]> cmp absrlo,x ;test result> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 217---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2cef : d0fe [ 3]> bne * ;failed not equal (non zero)>2cf1 : 68 [ 4]> pla ;load status> eor_flag 02cf2 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2cf4 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2cf7 : d0fe [ 3]> bne * ;failed not equal (non zero)>2cf9 : ca [ 2] dex2cfa : 10e5 [ 3] bpl tand82cfc : a203 [ 2] ldx #32cfe : tand9set_ax absANa,$ff> load_flag $ff2cfe : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2d00 : 48 [ 3]> pha ;use stack to load status2d01 : bd4b02 [ 4]> lda absANa,x ;precharge accu2d04 : 28 [ 4]> plp2d05 : 3d3f02 [ 4] and absAN,xtst_ax absrlo,absflo,$ff-fnz2d08 : 08 [ 3]> php ;save flags2d09 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2d0c : d0fe [ 3]> bne * ;failed not equal (non zero)>2d0e : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2d0f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2d11 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2d14 : d0fe [ 3]> bne * ;failed not equal (non zero)>2d16 : ca [ 2] dex2d17 : 10e5 [ 4] bpl tand92d19 : a003 [ 2] ldy #3 ;abs,y2d1b : tand10set_ay absANa,0> load_flag 02d1b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2d1d : 48 [ 3]> pha ;use stack to load status2d1e : b94b02 [ 4]> lda absANa,y ;precharge accu2d21 : 28 [ 4]> plp2d22 : 393f02 [ 4] and absAN,ytst_ay absrlo,absflo,02d25 : 08 [ 3]> php ;save flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 218---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2d26 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2d29 : d0fe [ 3]> bne * ;failed not equal (non zero)>2d2b : 68 [ 4]> pla ;load status> eor_flag 02d2c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2d2e : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2d31 : d0fe [ 3]> bne * ;failed not equal (non zero)>2d33 : 88 [ 2] dey2d34 : 10e5 [ 3] bpl tand102d36 : a003 [ 2] ldy #32d38 : tand11set_ay absANa,$ff> load_flag $ff2d38 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2d3a : 48 [ 3]> pha ;use stack to load status2d3b : b94b02 [ 4]> lda absANa,y ;precharge accu2d3e : 28 [ 4]> plp2d3f : 393f02 [ 4] and absAN,ytst_ay absrlo,absflo,$ff-fnz2d42 : 08 [ 3]> php ;save flags2d43 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2d46 : d0fe [ 3]> bne * ;failed not equal (non zero)>2d48 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2d49 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2d4b : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2d4e : d0fe [ 3]> bne * ;failed not equal (non zero)>2d50 : 88 [ 2] dey2d51 : 10e5 [ 3] bpl tand112d53 : a206 [ 2] ldx #6 ;(zp,x)2d55 : a003 [ 2] ldy #32d57 : tand12set_ay absANa,0> load_flag 02d57 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2d59 : 48 [ 3]> pha ;use stack to load status2d5a : b94b02 [ 4]> lda absANa,y ;precharge accu2d5d : 28 [ 4]> plpAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 219---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2d5e : 213a [ 6] and (indAN,x)tst_ay absrlo,absflo,02d60 : 08 [ 3]> php ;save flags2d61 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2d64 : d0fe [ 3]> bne * ;failed not equal (non zero)>2d66 : 68 [ 4]> pla ;load status> eor_flag 02d67 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2d69 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2d6c : d0fe [ 3]> bne * ;failed not equal (non zero)>2d6e : ca [ 2] dex2d6f : ca [ 2] dex2d70 : 88 [ 2] dey2d71 : 10e4 [ 3] bpl tand122d73 : a206 [ 2] ldx #62d75 : a003 [ 2] ldy #32d77 : tand13set_ay absANa,$ff> load_flag $ff2d77 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2d79 : 48 [ 3]> pha ;use stack to load status2d7a : b94b02 [ 4]> lda absANa,y ;precharge accu2d7d : 28 [ 4]> plp2d7e : 213a [ 6] and (indAN,x)tst_ay absrlo,absflo,$ff-fnz2d80 : 08 [ 3]> php ;save flags2d81 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2d84 : d0fe [ 3]> bne * ;failed not equal (non zero)>2d86 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2d87 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2d89 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2d8c : d0fe [ 3]> bne * ;failed not equal (non zero)>2d8e : ca [ 2] dex2d8f : ca [ 2] dex2d90 : 88 [ 2] dey2d91 : 10e4 [ 3] bpl tand132d93 : a003 [ 2] ldy #3 ;(zp),y2d95 : tand14set_ay absANa,0AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 220---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------> load_flag 02d95 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2d97 : 48 [ 3]> pha ;use stack to load status2d98 : b94b02 [ 4]> lda absANa,y ;precharge accu2d9b : 28 [ 4]> plp2d9c : 313a [ 5] and (indAN),ytst_ay absrlo,absflo,02d9e : 08 [ 3]> php ;save flags2d9f : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2da2 : d0fe [ 3]> bne * ;failed not equal (non zero)>2da4 : 68 [ 4]> pla ;load status> eor_flag 02da5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2da7 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2daa : d0fe [ 3]> bne * ;failed not equal (non zero)>2dac : 88 [ 2] dey2dad : 10e6 [ 3] bpl tand142daf : a003 [ 2] ldy #32db1 : tand15set_ay absANa,$ff> load_flag $ff2db1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2db3 : 48 [ 3]> pha ;use stack to load status2db4 : b94b02 [ 4]> lda absANa,y ;precharge accu2db7 : 28 [ 4]> plp2db8 : 313a [ 5] and (indAN),ytst_ay absrlo,absflo,$ff-fnz2dba : 08 [ 3]> php ;save flags2dbb : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2dbe : d0fe [ 3]> bne * ;failed not equal (non zero)>2dc0 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2dc1 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2dc3 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2dc6 : d0fe [ 3]> bne * ;failed not equal (non zero)>2dc8 : 88 [ 2] dey2dc9 : 10e6 [ 3] bpl tand15next_test2dcb : ad0002 [ 4]> lda test_case ;previous testAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 221---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2dce : c926 [ 2]> cmp #test_num> trap_ne ;test is out of sequence2dd0 : d0fe [ 3]> bne * ;failed not equal (non zero)>0027 = >test_num = test_num + 12dd2 : a927 [ 2]> lda #test_num ;*** this tests' number2dd4 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; EOR2dd7 : a203 [ 2] ldx #3 ;immediate - self modifying code2dd9 : b520 [ 4] teor lda zpEO,x2ddb : 8de62d [ 4] sta teori1set_ax absEOa,0> load_flag 02dde : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2de0 : 48 [ 3]> pha ;use stack to load status2de1 : bd4f02 [ 4]> lda absEOa,x ;precharge accu2de4 : 28 [ 4]> plp2de6 = teori1 equ *+1 ;target for immediate operand2de5 : 4963 [ 2] eor #99tst_ax absrlo,absflo,02de7 : 08 [ 3]> php ;save flags2de8 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2deb : d0fe [ 3]> bne * ;failed not equal (non zero)>2ded : 68 [ 4]> pla ;load status> eor_flag 02dee : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2df0 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2df3 : d0fe [ 3]> bne * ;failed not equal (non zero)>2df5 : ca [ 2] dex2df6 : 10e1 [ 3] bpl teor2df8 : a203 [ 2] ldx #32dfa : b520 [ 4] teor1 lda zpEO,x2dfc : 8d072e [ 4] sta teori2set_ax absEOa,$ff> load_flag $ff2dff : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2e01 : 48 [ 3]> pha ;use stack to load status2e02 : bd4f02 [ 4]> lda absEOa,x ;precharge accu2e05 : 28 [ 4]> plp2e07 = teori2 equ *+1 ;target for immediate operand2e06 : 4963 [ 2] eor #99tst_ax absrlo,absflo,$ff-fnzAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 222---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2e08 : 08 [ 3]> php ;save flags2e09 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2e0c : d0fe [ 3]> bne * ;failed not equal (non zero)>2e0e : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2e0f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2e11 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2e14 : d0fe [ 3]> bne * ;failed not equal (non zero)>2e16 : ca [ 2] dex2e17 : 10e1 [ 4] bpl teor12e19 : a203 [ 2] ldx #3 ;zp2e1b : b520 [ 4] teor2 lda zpEO,x2e1d : 850c [ 3] sta zptset_ax absEOa,0> load_flag 02e1f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2e21 : 48 [ 3]> pha ;use stack to load status2e22 : bd4f02 [ 4]> lda absEOa,x ;precharge accu2e25 : 28 [ 4]> plp2e26 : 450c [ 3] eor zpttst_ax absrlo,absflo,02e28 : 08 [ 3]> php ;save flags2e29 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2e2c : d0fe [ 3]> bne * ;failed not equal (non zero)>2e2e : 68 [ 4]> pla ;load status> eor_flag 02e2f : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2e31 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2e34 : d0fe [ 3]> bne * ;failed not equal (non zero)>2e36 : ca [ 2] dex2e37 : 10e2 [ 3] bpl teor22e39 : a203 [ 2] ldx #32e3b : b520 [ 4] teor3 lda zpEO,x2e3d : 850c [ 3] sta zptset_ax absEOa,$ff> load_flag $ff2e3f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2e41 : 48 [ 3]> pha ;use stack to load status2e42 : bd4f02 [ 4]> lda absEOa,x ;precharge accuAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 223---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2e45 : 28 [ 4]> plp2e46 : 450c [ 3] eor zpttst_ax absrlo,absflo,$ff-fnz2e48 : 08 [ 3]> php ;save flags2e49 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2e4c : d0fe [ 3]> bne * ;failed not equal (non zero)>2e4e : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2e4f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2e51 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2e54 : d0fe [ 3]> bne * ;failed not equal (non zero)>2e56 : ca [ 2] dex2e57 : 10e2 [ 3] bpl teor32e59 : a203 [ 2] ldx #3 ;abs2e5b : b520 [ 4] teor4 lda zpEO,x2e5d : 8d0302 [ 4] sta abstset_ax absEOa,0> load_flag 02e60 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2e62 : 48 [ 3]> pha ;use stack to load status2e63 : bd4f02 [ 4]> lda absEOa,x ;precharge accu2e66 : 28 [ 4]> plp2e67 : 4d0302 [ 4] eor absttst_ax absrlo,absflo,02e6a : 08 [ 3]> php ;save flags2e6b : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2e6e : d0fe [ 3]> bne * ;failed not equal (non zero)>2e70 : 68 [ 4]> pla ;load status> eor_flag 02e71 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2e73 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2e76 : d0fe [ 3]> bne * ;failed not equal (non zero)>2e78 : ca [ 2] dex2e79 : 10e0 [ 3] bpl teor42e7b : a203 [ 2] ldx #32e7d : b520 [ 4] teor5 lda zpEO,x2e7f : 8d0302 [ 4] sta abstset_ax absEOa,$ff> load_flag $ffAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 224---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2e82 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2e84 : 48 [ 3]> pha ;use stack to load status2e85 : bd4f02 [ 4]> lda absEOa,x ;precharge accu2e88 : 28 [ 4]> plp2e89 : 4d0302 [ 4] eor absttst_ax absrlo,absflo,$ff-fnz2e8c : 08 [ 3]> php ;save flags2e8d : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2e90 : d0fe [ 3]> bne * ;failed not equal (non zero)>2e92 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2e93 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2e95 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2e98 : d0fe [ 3]> bne * ;failed not equal (non zero)>2e9a : ca [ 2] dex2e9b : 1002 [ 3] bpl teor62e9d : a203 [ 2] ldx #3 ;zp,x2e9f : teor6set_ax absEOa,0> load_flag 02e9f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2ea1 : 48 [ 3]> pha ;use stack to load status2ea2 : bd4f02 [ 4]> lda absEOa,x ;precharge accu2ea5 : 28 [ 4]> plp2ea6 : 5520 [ 4] eor zpEO,xtst_ax absrlo,absflo,02ea8 : 08 [ 3]> php ;save flags2ea9 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2eac : d0fe [ 3]> bne * ;failed not equal (non zero)>2eae : 68 [ 4]> pla ;load status> eor_flag 02eaf : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2eb1 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2eb4 : d0fe [ 3]> bne * ;failed not equal (non zero)>2eb6 : ca [ 2] dex2eb7 : 10e6 [ 3] bpl teor62eb9 : a203 [ 2] ldx #32ebb : teor7AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 225---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_ax absEOa,$ff> load_flag $ff2ebb : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2ebd : 48 [ 3]> pha ;use stack to load status2ebe : bd4f02 [ 4]> lda absEOa,x ;precharge accu2ec1 : 28 [ 4]> plp2ec2 : 5520 [ 4] eor zpEO,xtst_ax absrlo,absflo,$ff-fnz2ec4 : 08 [ 3]> php ;save flags2ec5 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2ec8 : d0fe [ 3]> bne * ;failed not equal (non zero)>2eca : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2ecb : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2ecd : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2ed0 : d0fe [ 3]> bne * ;failed not equal (non zero)>2ed2 : ca [ 2] dex2ed3 : 10e6 [ 3] bpl teor72ed5 : a203 [ 2] ldx #3 ;abs,x2ed7 : teor8set_ax absEOa,0> load_flag 02ed7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2ed9 : 48 [ 3]> pha ;use stack to load status2eda : bd4f02 [ 4]> lda absEOa,x ;precharge accu2edd : 28 [ 4]> plp2ede : 5d4302 [ 4] eor absEO,xtst_ax absrlo,absflo,02ee1 : 08 [ 3]> php ;save flags2ee2 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2ee5 : d0fe [ 3]> bne * ;failed not equal (non zero)>2ee7 : 68 [ 4]> pla ;load status> eor_flag 02ee8 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2eea : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2eed : d0fe [ 3]> bne * ;failed not equal (non zero)>2eef : ca [ 2] dex2ef0 : 10e5 [ 3] bpl teor8AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 226---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2ef2 : a203 [ 2] ldx #32ef4 : teor9set_ax absEOa,$ff> load_flag $ff2ef4 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2ef6 : 48 [ 3]> pha ;use stack to load status2ef7 : bd4f02 [ 4]> lda absEOa,x ;precharge accu2efa : 28 [ 4]> plp2efb : 5d4302 [ 4] eor absEO,xtst_ax absrlo,absflo,$ff-fnz2efe : 08 [ 3]> php ;save flags2eff : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2f02 : d0fe [ 3]> bne * ;failed not equal (non zero)>2f04 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2f05 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2f07 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2f0a : d0fe [ 3]> bne * ;failed not equal (non zero)>2f0c : ca [ 2] dex2f0d : 10e5 [ 4] bpl teor92f0f : a003 [ 2] ldy #3 ;abs,y2f11 : teor10set_ay absEOa,0> load_flag 02f11 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2f13 : 48 [ 3]> pha ;use stack to load status2f14 : b94f02 [ 4]> lda absEOa,y ;precharge accu2f17 : 28 [ 4]> plp2f18 : 594302 [ 4] eor absEO,ytst_ay absrlo,absflo,02f1b : 08 [ 3]> php ;save flags2f1c : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2f1f : d0fe [ 3]> bne * ;failed not equal (non zero)>2f21 : 68 [ 4]> pla ;load status> eor_flag 02f22 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2f24 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2f27 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 227---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2f29 : 88 [ 2] dey2f2a : 10e5 [ 3] bpl teor102f2c : a003 [ 2] ldy #32f2e : teor11set_ay absEOa,$ff> load_flag $ff2f2e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2f30 : 48 [ 3]> pha ;use stack to load status2f31 : b94f02 [ 4]> lda absEOa,y ;precharge accu2f34 : 28 [ 4]> plp2f35 : 594302 [ 4] eor absEO,ytst_ay absrlo,absflo,$ff-fnz2f38 : 08 [ 3]> php ;save flags2f39 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2f3c : d0fe [ 3]> bne * ;failed not equal (non zero)>2f3e : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2f3f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2f41 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2f44 : d0fe [ 3]> bne * ;failed not equal (non zero)>2f46 : 88 [ 2] dey2f47 : 10e5 [ 3] bpl teor112f49 : a206 [ 2] ldx #6 ;(zp,x)2f4b : a003 [ 2] ldy #32f4d : teor12set_ay absEOa,0> load_flag 02f4d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2f4f : 48 [ 3]> pha ;use stack to load status2f50 : b94f02 [ 4]> lda absEOa,y ;precharge accu2f53 : 28 [ 4]> plp2f54 : 4142 [ 6] eor (indEO,x)tst_ay absrlo,absflo,02f56 : 08 [ 3]> php ;save flags2f57 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2f5a : d0fe [ 3]> bne * ;failed not equal (non zero)>2f5c : 68 [ 4]> pla ;load status> eor_flag 02f5d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2f5f : d95702 [ 4]> cmp absflo,y ;test flags> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 228---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2f62 : d0fe [ 3]> bne * ;failed not equal (non zero)>2f64 : ca [ 2] dex2f65 : ca [ 2] dex2f66 : 88 [ 2] dey2f67 : 10e4 [ 3] bpl teor122f69 : a206 [ 2] ldx #62f6b : a003 [ 2] ldy #32f6d : teor13set_ay absEOa,$ff> load_flag $ff2f6d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2f6f : 48 [ 3]> pha ;use stack to load status2f70 : b94f02 [ 4]> lda absEOa,y ;precharge accu2f73 : 28 [ 4]> plp2f74 : 4142 [ 6] eor (indEO,x)tst_ay absrlo,absflo,$ff-fnz2f76 : 08 [ 3]> php ;save flags2f77 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2f7a : d0fe [ 3]> bne * ;failed not equal (non zero)>2f7c : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2f7d : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2f7f : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2f82 : d0fe [ 3]> bne * ;failed not equal (non zero)>2f84 : ca [ 2] dex2f85 : ca [ 2] dex2f86 : 88 [ 2] dey2f87 : 10e4 [ 3] bpl teor132f89 : a003 [ 2] ldy #3 ;(zp),y2f8b : teor14set_ay absEOa,0> load_flag 02f8b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2f8d : 48 [ 3]> pha ;use stack to load status2f8e : b94f02 [ 4]> lda absEOa,y ;precharge accu2f91 : 28 [ 4]> plp2f92 : 5142 [ 5] eor (indEO),ytst_ay absrlo,absflo,02f94 : 08 [ 3]> php ;save flags2f95 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2f98 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 229---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->2f9a : 68 [ 4]> pla ;load status> eor_flag 02f9b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2f9d : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2fa0 : d0fe [ 3]> bne * ;failed not equal (non zero)>2fa2 : 88 [ 2] dey2fa3 : 10e6 [ 3] bpl teor142fa5 : a003 [ 2] ldy #32fa7 : teor15set_ay absEOa,$ff> load_flag $ff2fa7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2fa9 : 48 [ 3]> pha ;use stack to load status2faa : b94f02 [ 4]> lda absEOa,y ;precharge accu2fad : 28 [ 4]> plp2fae : 5142 [ 5] eor (indEO),ytst_ay absrlo,absflo,$ff-fnz2fb0 : 08 [ 3]> php ;save flags2fb1 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;2fb4 : d0fe [ 3]> bne * ;failed not equal (non zero)>2fb6 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz2fb7 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>2fb9 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne2fbc : d0fe [ 3]> bne * ;failed not equal (non zero)>2fbe : 88 [ 2] dey2fbf : 10e6 [ 3] bpl teor15next_test2fc1 : ad0002 [ 4]> lda test_case ;previous test2fc4 : c927 [ 2]> cmp #test_num> trap_ne ;test is out of sequence2fc6 : d0fe [ 3]> bne * ;failed not equal (non zero)>0028 = >test_num = test_num + 12fc8 : a928 [ 2]> lda #test_num ;*** this tests' number2fca : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; OR2fcd : a203 [ 2] ldx #3 ;immediate - self modifying code2fcf : b518 [ 4] tora lda zpOR,xAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 230---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------2fd1 : 8ddc2f [ 4] sta torai1set_ax absORa,0> load_flag 02fd4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>2fd6 : 48 [ 3]> pha ;use stack to load status2fd7 : bd4702 [ 4]> lda absORa,x ;precharge accu2fda : 28 [ 4]> plp2fdc = torai1 equ *+1 ;target for immediate operand2fdb : 0963 [ 2] ora #99tst_ax absrlo,absflo,02fdd : 08 [ 3]> php ;save flags2fde : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne2fe1 : d0fe [ 3]> bne * ;failed not equal (non zero)>2fe3 : 68 [ 4]> pla ;load status> eor_flag 02fe4 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>2fe6 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;2fe9 : d0fe [ 3]> bne * ;failed not equal (non zero)>2feb : ca [ 2] dex2fec : 10e1 [ 3] bpl tora2fee : a203 [ 2] ldx #32ff0 : b518 [ 4] tora1 lda zpOR,x2ff2 : 8dfd2f [ 4] sta torai2set_ax absORa,$ff> load_flag $ff2ff5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>2ff7 : 48 [ 3]> pha ;use stack to load status2ff8 : bd4702 [ 4]> lda absORa,x ;precharge accu2ffb : 28 [ 4]> plp2ffd = torai2 equ *+1 ;target for immediate operand2ffc : 0963 [ 2] ora #99tst_ax absrlo,absflo,$ff-fnz2ffe : 08 [ 3]> php ;save flags2fff : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne3002 : d0fe [ 3]> bne * ;failed not equal (non zero)>3004 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz3005 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>3007 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;300a : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 231---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------300c : ca [ 2] dex300d : 10e1 [ 4] bpl tora1300f : a203 [ 2] ldx #3 ;zp3011 : b518 [ 4] tora2 lda zpOR,x3013 : 850c [ 3] sta zptset_ax absORa,0> load_flag 03015 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>3017 : 48 [ 3]> pha ;use stack to load status3018 : bd4702 [ 4]> lda absORa,x ;precharge accu301b : 28 [ 4]> plp301c : 050c [ 3] ora zpttst_ax absrlo,absflo,0301e : 08 [ 3]> php ;save flags301f : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne3022 : d0fe [ 3]> bne * ;failed not equal (non zero)>3024 : 68 [ 4]> pla ;load status> eor_flag 03025 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>3027 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;302a : d0fe [ 3]> bne * ;failed not equal (non zero)>302c : ca [ 2] dex302d : 10e2 [ 3] bpl tora2302f : a203 [ 2] ldx #33031 : b518 [ 4] tora3 lda zpOR,x3033 : 850c [ 3] sta zptset_ax absORa,$ff> load_flag $ff3035 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>3037 : 48 [ 3]> pha ;use stack to load status3038 : bd4702 [ 4]> lda absORa,x ;precharge accu303b : 28 [ 4]> plp303c : 050c [ 3] ora zpttst_ax absrlo,absflo,$ff-fnz303e : 08 [ 3]> php ;save flags303f : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne3042 : d0fe [ 3]> bne * ;failed not equal (non zero)>3044 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz3045 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 232---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3047 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;304a : d0fe [ 3]> bne * ;failed not equal (non zero)>304c : ca [ 2] dex304d : 10e2 [ 3] bpl tora3304f : a203 [ 2] ldx #3 ;abs3051 : b518 [ 4] tora4 lda zpOR,x3053 : 8d0302 [ 4] sta abstset_ax absORa,0> load_flag 03056 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>3058 : 48 [ 3]> pha ;use stack to load status3059 : bd4702 [ 4]> lda absORa,x ;precharge accu305c : 28 [ 4]> plp305d : 0d0302 [ 4] ora absttst_ax absrlo,absflo,03060 : 08 [ 3]> php ;save flags3061 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne3064 : d0fe [ 3]> bne * ;failed not equal (non zero)>3066 : 68 [ 4]> pla ;load status> eor_flag 03067 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>3069 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;306c : d0fe [ 3]> bne * ;failed not equal (non zero)>306e : ca [ 2] dex306f : 10e0 [ 3] bpl tora43071 : a203 [ 2] ldx #33073 : b518 [ 4] tora5 lda zpOR,x3075 : 8d0302 [ 4] sta abstset_ax absORa,$ff> load_flag $ff3078 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>307a : 48 [ 3]> pha ;use stack to load status307b : bd4702 [ 4]> lda absORa,x ;precharge accu307e : 28 [ 4]> plp307f : 0d0302 [ 4] ora absttst_ax absrlo,absflo,$ff-fnz3082 : 08 [ 3]> php ;save flags3083 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne3086 : d0fe [ 3]> bne * ;failed not equal (non zero)>AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 233---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3088 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz3089 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>308b : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;308e : d0fe [ 3]> bne * ;failed not equal (non zero)>3090 : ca [ 2] dex3091 : 1002 [ 3] bpl tora63093 : a203 [ 2] ldx #3 ;zp,x3095 : tora6set_ax absORa,0> load_flag 03095 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>3097 : 48 [ 3]> pha ;use stack to load status3098 : bd4702 [ 4]> lda absORa,x ;precharge accu309b : 28 [ 4]> plp309c : 1518 [ 4] ora zpOR,xtst_ax absrlo,absflo,0309e : 08 [ 3]> php ;save flags309f : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne30a2 : d0fe [ 3]> bne * ;failed not equal (non zero)>30a4 : 68 [ 4]> pla ;load status> eor_flag 030a5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>30a7 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;30aa : d0fe [ 3]> bne * ;failed not equal (non zero)>30ac : ca [ 2] dex30ad : 10e6 [ 3] bpl tora630af : a203 [ 2] ldx #330b1 : tora7set_ax absORa,$ff> load_flag $ff30b1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>30b3 : 48 [ 3]> pha ;use stack to load status30b4 : bd4702 [ 4]> lda absORa,x ;precharge accu30b7 : 28 [ 4]> plp30b8 : 1518 [ 4] ora zpOR,xtst_ax absrlo,absflo,$ff-fnz30ba : 08 [ 3]> php ;save flags30bb : dd5302 [ 4]> cmp absrlo,x ;test result> trap_neAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 234---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------30be : d0fe [ 3]> bne * ;failed not equal (non zero)>30c0 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz30c1 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>30c3 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;30c6 : d0fe [ 3]> bne * ;failed not equal (non zero)>30c8 : ca [ 2] dex30c9 : 10e6 [ 3] bpl tora730cb : a203 [ 2] ldx #3 ;abs,x30cd : tora8set_ax absORa,0> load_flag 030cd : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>30cf : 48 [ 3]> pha ;use stack to load status30d0 : bd4702 [ 4]> lda absORa,x ;precharge accu30d3 : 28 [ 4]> plp30d4 : 1d3b02 [ 4] ora absOR,xtst_ax absrlo,absflo,030d7 : 08 [ 3]> php ;save flags30d8 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne30db : d0fe [ 3]> bne * ;failed not equal (non zero)>30dd : 68 [ 4]> pla ;load status> eor_flag 030de : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>30e0 : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;30e3 : d0fe [ 3]> bne * ;failed not equal (non zero)>30e5 : ca [ 2] dex30e6 : 10e5 [ 3] bpl tora830e8 : a203 [ 2] ldx #330ea : tora9set_ax absORa,$ff> load_flag $ff30ea : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>30ec : 48 [ 3]> pha ;use stack to load status30ed : bd4702 [ 4]> lda absORa,x ;precharge accu30f0 : 28 [ 4]> plp30f1 : 1d3b02 [ 4] ora absOR,xtst_ax absrlo,absflo,$ff-fnz30f4 : 08 [ 3]> php ;save flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 235---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------30f5 : dd5302 [ 4]> cmp absrlo,x ;test result> trap_ne30f8 : d0fe [ 3]> bne * ;failed not equal (non zero)>30fa : 68 [ 4]> pla ;load status> eor_flag $ff-fnz30fb : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>30fd : dd5702 [ 4]> cmp absflo,x ;test flags> trap_ne ;3100 : d0fe [ 3]> bne * ;failed not equal (non zero)>3102 : ca [ 2] dex3103 : 10e5 [ 4] bpl tora93105 : a003 [ 2] ldy #3 ;abs,y3107 : tora10set_ay absORa,0> load_flag 03107 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>3109 : 48 [ 3]> pha ;use stack to load status310a : b94702 [ 4]> lda absORa,y ;precharge accu310d : 28 [ 4]> plp310e : 193b02 [ 4] ora absOR,ytst_ay absrlo,absflo,03111 : 08 [ 3]> php ;save flags3112 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;3115 : d0fe [ 3]> bne * ;failed not equal (non zero)>3117 : 68 [ 4]> pla ;load status> eor_flag 03118 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>311a : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne311d : d0fe [ 3]> bne * ;failed not equal (non zero)>311f : 88 [ 2] dey3120 : 10e5 [ 3] bpl tora103122 : a003 [ 2] ldy #33124 : tora11set_ay absORa,$ff> load_flag $ff3124 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>3126 : 48 [ 3]> pha ;use stack to load status3127 : b94702 [ 4]> lda absORa,y ;precharge accu312a : 28 [ 4]> plp312b : 193b02 [ 4] ora absOR,yAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 236---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------tst_ay absrlo,absflo,$ff-fnz312e : 08 [ 3]> php ;save flags312f : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;3132 : d0fe [ 3]> bne * ;failed not equal (non zero)>3134 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz3135 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>3137 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne313a : d0fe [ 3]> bne * ;failed not equal (non zero)>313c : 88 [ 2] dey313d : 10e5 [ 3] bpl tora11313f : a206 [ 2] ldx #6 ;(zp,x)3141 : a003 [ 2] ldy #33143 : tora12set_ay absORa,0> load_flag 03143 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>3145 : 48 [ 3]> pha ;use stack to load status3146 : b94702 [ 4]> lda absORa,y ;precharge accu3149 : 28 [ 4]> plp314a : 014a [ 6] ora (indOR,x)tst_ay absrlo,absflo,0314c : 08 [ 3]> php ;save flags314d : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;3150 : d0fe [ 3]> bne * ;failed not equal (non zero)>3152 : 68 [ 4]> pla ;load status> eor_flag 03153 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>3155 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne3158 : d0fe [ 3]> bne * ;failed not equal (non zero)>315a : ca [ 2] dex315b : ca [ 2] dex315c : 88 [ 2] dey315d : 10e4 [ 3] bpl tora12315f : a206 [ 2] ldx #63161 : a003 [ 2] ldy #33163 : tora13set_ay absORa,$ff> load_flag $ff3163 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 237---------------------------------------------------------- 65c02_ft.a65 ----------------------------------------------------------->3165 : 48 [ 3]> pha ;use stack to load status3166 : b94702 [ 4]> lda absORa,y ;precharge accu3169 : 28 [ 4]> plp316a : 014a [ 6] ora (indOR,x)tst_ay absrlo,absflo,$ff-fnz316c : 08 [ 3]> php ;save flags316d : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;3170 : d0fe [ 3]> bne * ;failed not equal (non zero)>3172 : 68 [ 4]> pla ;load status> eor_flag $ff-fnz3173 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>3175 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne3178 : d0fe [ 3]> bne * ;failed not equal (non zero)>317a : ca [ 2] dex317b : ca [ 2] dex317c : 88 [ 2] dey317d : 10e4 [ 3] bpl tora13317f : a003 [ 2] ldy #3 ;(zp),y3181 : tora14set_ay absORa,0> load_flag 03181 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)>3183 : 48 [ 3]> pha ;use stack to load status3184 : b94702 [ 4]> lda absORa,y ;precharge accu3187 : 28 [ 4]> plp3188 : 114a [ 5] ora (indOR),ytst_ay absrlo,absflo,0318a : 08 [ 3]> php ;save flags318b : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;318e : d0fe [ 3]> bne * ;failed not equal (non zero)>3190 : 68 [ 4]> pla ;load status> eor_flag 03191 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits>3193 : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne3196 : d0fe [ 3]> bne * ;failed not equal (non zero)>3198 : 88 [ 2] dey3199 : 10e6 [ 3] bpl tora14319b : a003 [ 2] ldy #3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 238---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------319d : tora15set_ay absORa,$ff> load_flag $ff319d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>319f : 48 [ 3]> pha ;use stack to load status31a0 : b94702 [ 4]> lda absORa,y ;precharge accu31a3 : 28 [ 4]> plp31a4 : 114a [ 5] ora (indOR),ytst_ay absrlo,absflo,$ff-fnz31a6 : 08 [ 3]> php ;save flags31a7 : d95302 [ 4]> cmp absrlo,y ;test result> trap_ne ;31aa : d0fe [ 3]> bne * ;failed not equal (non zero)>31ac : 68 [ 4]> pla ;load status> eor_flag $ff-fnz31ad : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits>31af : d95702 [ 4]> cmp absflo,y ;test flags> trap_ne31b2 : d0fe [ 3]> bne * ;failed not equal (non zero)>31b4 : 88 [ 2] dey31b5 : 10e6 [ 3] bpl tora15if I_flag = 331b7 : 58 [ 2] cliendif31b8 : bin_testif skip_bin_test = 131b8 : 4c2032 [ 3] jmp dec_testelselda #test_numsta test_caseendifnext_test31bb : ad0002 [ 4]> lda test_case ;previous test31be : c928 [ 2]> cmp #test_num> trap_ne ;test is out of sequence31c0 : d0fe [ 3]> bne * ;failed not equal (non zero)>0029 = >test_num = test_num + 131c2 : a929 [ 2]> lda #test_num ;*** this tests' number31c4 : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; full binary add/subtract test; iterates through all combinations of operands and carry input; uses increments/decrements to predict result & result flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 239---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------31c7 : d8 [ 2] cld31c8 : a20e [ 2] ldx #ad2 ;for indexed test31ca : a0ff [ 2] ldy #$ff ;max range31cc : a900 [ 2] lda #0 ;start with adding zeroes & no carry31ce : 850c [ 3] sta adfc ;carry in - for diag31d0 : 850d [ 3] sta ad1 ;operand 1 - accumulator31d2 : 850e [ 3] sta ad2 ;operand 2 - memory or immediate31d4 : 8d0302 [ 4] sta ada2 ;non zp31d7 : 850f [ 3] sta adrl ;expected result bits 0-731d9 : 8510 [ 3] sta adrh ;expected result bit 8 (carry out)31db : a9ff [ 2] lda #$ff ;complemented operand 2 for subtract31dd : 8512 [ 3] sta sb231df : 8d0402 [ 4] sta sba2 ;non zp31e2 : a902 [ 2] lda #2 ;expected Z-flag31e4 : 8511 [ 3] sta adrf31e6 : 18 [ 2] tadd clc ;test with carry clear31e7 : 200334 [ 6] jsr chkadd31ea : e60c [ 5] inc adfc ;now with carry31ec : e60f [ 5] inc adrl ;result +131ee : 08 [ 3] php ;save N & Z from low result31ef : 08 [ 3] php31f0 : 68 [ 4] pla ;accu holds expected flags31f1 : 2982 [ 2] and #$82 ;mask N & Z31f3 : 28 [ 4] plp31f4 : d002 [ 3] bne tadd131f6 : e610 [ 5] inc adrh ;result bit 8 - carry31f8 : 0510 [ 3] tadd1 ora adrh ;merge C to expected flags31fa : 8511 [ 3] sta adrf ;save expected flags except overflow31fc : 38 [ 2] sec ;test with carry set31fd : 200334 [ 6] jsr chkadd3200 : c60c [ 5] dec adfc ;same for operand +1 but no carry3202 : e60d [ 5] inc ad13204 : d0e0 [ 4] bne tadd ;iterate op13206 : a900 [ 2] lda #0 ;preset result to op2 when op1 = 03208 : 8510 [ 3] sta adrh320a : ee0302 [ 6] inc ada2320d : e60e [ 5] inc ad2320f : 08 [ 3] php ;save NZ as operand 2 becomes the new result3210 : 68 [ 4] pla3211 : 2982 [ 2] and #$82 ;mask N00000Z03213 : 8511 [ 3] sta adrf ;no need to check carry as we are adding to 03215 : c612 [ 5] dec sb2 ;complement subtract operand 23217 : ce0402 [ 6] dec sba2321a : a50e [ 3] lda ad2321c : 850f [ 3] sta adrl321e : d0c6 [ 4] bne tadd ;iterate op23220 : dec_testif skip_dec_test = 13220 : 4ccf32 [ 3] jmp successelselda #test_numsta test_caseendifAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 240---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------next_test3223 : ad0002 [ 4]> lda test_case ;previous test3226 : c929 [ 2]> cmp #test_num> trap_ne ;test is out of sequence3228 : d0fe [ 3]> bne * ;failed not equal (non zero)>002a = >test_num = test_num + 1322a : a92a [ 2]> lda #test_num ;*** this tests' number322c : 8d0002 [ 4]> sta test_case> ;check_ram ;uncomment to find altered RAM after each test; decimal add/subtract test; *** WARNING - tests documented behavior only! ***; only valid BCD operands are tested, N V Z flags are ignored; iterates through all valid combinations of operands and carry input; uses increments/decrements to predict result & carry flag322f : f8 [ 2] sed3230 : a20e [ 2] ldx #ad2 ;for indexed test3232 : a0ff [ 2] ldy #$ff ;max range3234 : a999 [ 2] lda #$99 ;start with adding 99 to 99 with carry3236 : 850d [ 3] sta ad1 ;operand 1 - accumulator3238 : 850e [ 3] sta ad2 ;operand 2 - memory or immediate323a : 8d0302 [ 4] sta ada2 ;non zp323d : 850f [ 3] sta adrl ;expected result bits 0-7323f : a901 [ 2] lda #1 ;set carry in & out3241 : 850c [ 3] sta adfc ;carry in - for diag3243 : 8510 [ 3] sta adrh ;expected result bit 8 (carry out)3245 : a900 [ 2] lda #0 ;complemented operand 2 for subtract3247 : 8512 [ 3] sta sb23249 : 8d0402 [ 4] sta sba2 ;non zp324c : 38 [ 2] tdad sec ;test with carry set324d : 20d232 [ 6] jsr chkdad3250 : c60c [ 5] dec adfc ;now with carry clear3252 : a50f [ 3] lda adrl ;decimal adjust result3254 : d008 [ 3] bne tdad1 ;skip clear carry & preset result 99 (9A-1)3256 : c610 [ 5] dec adrh3258 : a999 [ 2] lda #$99325a : 850f [ 3] sta adrl325c : d012 [ 3] bne tdad3325e : 290f [ 2] tdad1 and #$f ;lower nibble mask3260 : d00c [ 3] bne tdad2 ;no decimal adjust needed3262 : c60f [ 5] dec adrl ;decimal adjust (?0-6)3264 : c60f [ 5] dec adrl3266 : c60f [ 5] dec adrl3268 : c60f [ 5] dec adrl326a : c60f [ 5] dec adrl326c : c60f [ 5] dec adrl326e : c60f [ 5] tdad2 dec adrl ;result -13270 : 18 [ 2] tdad3 clc ;test with carry clear3271 : 20d232 [ 6] jsr chkdad3274 : e60c [ 5] inc adfc ;same for operand -1 but with carry3276 : a50d [ 3] lda ad1 ;decimal adjust operand 13278 : f015 [ 3] beq tdad5 ;iterate operand 2327a : 290f [ 2] and #$f ;lower nibble maskAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 241---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------327c : d00c [ 3] bne tdad4 ;skip decimal adjust327e : c60d [ 5] dec ad1 ;decimal adjust (?0-6)3280 : c60d [ 5] dec ad13282 : c60d [ 5] dec ad13284 : c60d [ 5] dec ad13286 : c60d [ 5] dec ad13288 : c60d [ 5] dec ad1328a : c60d [ 5] tdad4 dec ad1 ;operand 1 -1328c : 4c4c32 [ 3] jmp tdad ;iterate op1328f : a999 [ 2] tdad5 lda #$99 ;precharge op1 max3291 : 850d [ 3] sta ad13293 : a50e [ 3] lda ad2 ;decimal adjust operand 23295 : f030 [ 3] beq tdad7 ;end of iteration3297 : 290f [ 2] and #$f ;lower nibble mask3299 : d018 [ 3] bne tdad6 ;skip decimal adjust329b : c60e [ 5] dec ad2 ;decimal adjust (?0-6)329d : c60e [ 5] dec ad2329f : c60e [ 5] dec ad232a1 : c60e [ 5] dec ad232a3 : c60e [ 5] dec ad232a5 : c60e [ 5] dec ad232a7 : e612 [ 5] inc sb2 ;complemented decimal adjust for subtract (?9+6)32a9 : e612 [ 5] inc sb232ab : e612 [ 5] inc sb232ad : e612 [ 5] inc sb232af : e612 [ 5] inc sb232b1 : e612 [ 5] inc sb232b3 : c60e [ 5] tdad6 dec ad2 ;operand 2 -132b5 : e612 [ 5] inc sb2 ;complemented operand for subtract32b7 : a512 [ 3] lda sb232b9 : 8d0402 [ 4] sta sba2 ;copy as non zp operand32bc : a50e [ 3] lda ad232be : 8d0302 [ 4] sta ada2 ;copy as non zp operand32c1 : 850f [ 3] sta adrl ;new result since op1+carry=00+carry +op2=op232c3 : e610 [ 5] inc adrh ;result carry32c5 : d085 [ 3] bne tdad ;iterate op232c7 : d8 [ 2] tdad7 cld32c8 : ad0002 [ 4] lda test_case32cb : c92a [ 2] cmp #test_numtrap_ne ;test is out of sequence32cd : d0fe [ 3]> bne * ;failed not equal (non zero); final RAM integrity test; verifies that none of the previous tests has altered RAM outside of the; designated write areas.check_ram> ;RAM check disabled - RAM size not set; *** DEBUG INFO ***; to debug checksum errors uncomment check_ram in the next_test macro to; narrow down the responsible opcode.; may give false errors when monitor, OS or other background activity isAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 242---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------; allowed during previous tests.; S U C C E S S ************************************************; -------------32cf : 4c0004 [ 3] success jmp start ;if you get here everything went well; -------------; S U C C E S S ************************************************; core subroutine of the decimal add/subtract test; *** WARNING - tests documented behavior only! ***; only valid BCD operands are tested, N V Z flags are ignored; iterates through all valid combinations of operands and carry input; uses increments/decrements to predict result & carry flag32d2 : chkdad; decimal ADC / SBC zp32d2 : 08 [ 3] php ;save carry for subtract32d3 : a50d [ 3] lda ad132d5 : 650e [ 3] adc ad2 ;perform add32d7 : 08 [ 3] php32d8 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result32da : d0fe [ 3]> bne * ;failed not equal (non zero)32dc : 68 [ 4] pla ;check flags32dd : 2901 [ 2] and #1 ;mask carry32df : c510 [ 3] cmp adrhtrap_ne ;bad carry32e1 : d0fe [ 3]> bne * ;failed not equal (non zero)32e3 : 28 [ 4] plp32e4 : 08 [ 3] php ;save carry for next add32e5 : a50d [ 3] lda ad132e7 : e512 [ 3] sbc sb2 ;perform subtract32e9 : 08 [ 3] php32ea : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result32ec : d0fe [ 3]> bne * ;failed not equal (non zero)32ee : 68 [ 4] pla ;check flags32ef : 2901 [ 2] and #1 ;mask carry32f1 : c510 [ 3] cmp adrhtrap_ne ;bad flags32f3 : d0fe [ 3]> bne * ;failed not equal (non zero)32f5 : 28 [ 4] plp; decimal ADC / SBC abs32f6 : 08 [ 3] php ;save carry for subtract32f7 : a50d [ 3] lda ad132f9 : 6d0302 [ 4] adc ada2 ;perform add32fc : 08 [ 3] php32fd : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result32ff : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 243---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3301 : 68 [ 4] pla ;check flags3302 : 2901 [ 2] and #1 ;mask carry3304 : c510 [ 3] cmp adrhtrap_ne ;bad carry3306 : d0fe [ 3]> bne * ;failed not equal (non zero)3308 : 28 [ 4] plp3309 : 08 [ 3] php ;save carry for next add330a : a50d [ 3] lda ad1330c : ed0402 [ 4] sbc sba2 ;perform subtract330f : 08 [ 3] php3310 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3312 : d0fe [ 3]> bne * ;failed not equal (non zero)3314 : 68 [ 4] pla ;check flags3315 : 2901 [ 2] and #1 ;mask carry3317 : c510 [ 3] cmp adrhtrap_ne ;bad carry3319 : d0fe [ 3]> bne * ;failed not equal (non zero)331b : 28 [ 4] plp; decimal ADC / SBC #331c : 08 [ 3] php ;save carry for subtract331d : a50e [ 3] lda ad2331f : 8d2533 [ 4] sta chkdadi ;self modify immediate3322 : a50d [ 3] lda ad13325 = chkdadi = * + 1 ;operand of the immediate ADC3324 : 6900 [ 2] adc #0 ;perform add3326 : 08 [ 3] php3327 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3329 : d0fe [ 3]> bne * ;failed not equal (non zero)332b : 68 [ 4] pla ;check flags332c : 2901 [ 2] and #1 ;mask carry332e : c510 [ 3] cmp adrhtrap_ne ;bad carry3330 : d0fe [ 3]> bne * ;failed not equal (non zero)3332 : 28 [ 4] plp3333 : 08 [ 3] php ;save carry for next add3334 : a512 [ 3] lda sb23336 : 8d3c33 [ 4] sta chkdsbi ;self modify immediate3339 : a50d [ 3] lda ad1333c = chkdsbi = * + 1 ;operand of the immediate SBC333b : e900 [ 2] sbc #0 ;perform subtract333d : 08 [ 3] php333e : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3340 : d0fe [ 3]> bne * ;failed not equal (non zero)3342 : 68 [ 4] pla ;check flags3343 : 2901 [ 2] and #1 ;mask carryAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 244---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3345 : c510 [ 3] cmp adrhtrap_ne ;bad carry3347 : d0fe [ 3]> bne * ;failed not equal (non zero)3349 : 28 [ 4] plp; decimal ADC / SBC zp,x334a : 08 [ 3] php ;save carry for subtract334b : a50d [ 3] lda ad1334d : 7500 [ 4] adc 0,x ;perform add334f : 08 [ 3] php3350 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3352 : d0fe [ 3]> bne * ;failed not equal (non zero)3354 : 68 [ 4] pla ;check flags3355 : 2901 [ 2] and #1 ;mask carry3357 : c510 [ 3] cmp adrhtrap_ne ;bad carry3359 : d0fe [ 3]> bne * ;failed not equal (non zero)335b : 28 [ 4] plp335c : 08 [ 3] php ;save carry for next add335d : a50d [ 3] lda ad1335f : f504 [ 4] sbc sb2-ad2,x ;perform subtract3361 : 08 [ 3] php3362 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3364 : d0fe [ 3]> bne * ;failed not equal (non zero)3366 : 68 [ 4] pla ;check flags3367 : 2901 [ 2] and #1 ;mask carry3369 : c510 [ 3] cmp adrhtrap_ne ;bad carry336b : d0fe [ 3]> bne * ;failed not equal (non zero)336d : 28 [ 4] plp; decimal ADC / SBC abs,x336e : 08 [ 3] php ;save carry for subtract336f : a50d [ 3] lda ad13371 : 7df501 [ 4] adc ada2-ad2,x ;perform add3374 : 08 [ 3] php3375 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3377 : d0fe [ 3]> bne * ;failed not equal (non zero)3379 : 68 [ 4] pla ;check flags337a : 2901 [ 2] and #1 ;mask carry337c : c510 [ 3] cmp adrhtrap_ne ;bad carry337e : d0fe [ 3]> bne * ;failed not equal (non zero)3380 : 28 [ 4] plp3381 : 08 [ 3] php ;save carry for next add3382 : a50d [ 3] lda ad13384 : fdf601 [ 4] sbc sba2-ad2,x ;perform subtractAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 245---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3387 : 08 [ 3] php3388 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result338a : d0fe [ 3]> bne * ;failed not equal (non zero)338c : 68 [ 4] pla ;check flags338d : 2901 [ 2] and #1 ;mask carry338f : c510 [ 3] cmp adrhtrap_ne ;bad carry3391 : d0fe [ 3]> bne * ;failed not equal (non zero)3393 : 28 [ 4] plp; decimal ADC / SBC abs,y3394 : 08 [ 3] php ;save carry for subtract3395 : a50d [ 3] lda ad13397 : 790401 [ 4] adc ada2-$ff,y ;perform add339a : 08 [ 3] php339b : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result339d : d0fe [ 3]> bne * ;failed not equal (non zero)339f : 68 [ 4] pla ;check flags33a0 : 2901 [ 2] and #1 ;mask carry33a2 : c510 [ 3] cmp adrhtrap_ne ;bad carry33a4 : d0fe [ 3]> bne * ;failed not equal (non zero)33a6 : 28 [ 4] plp33a7 : 08 [ 3] php ;save carry for next add33a8 : a50d [ 3] lda ad133aa : f90501 [ 4] sbc sba2-$ff,y ;perform subtract33ad : 08 [ 3] php33ae : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result33b0 : d0fe [ 3]> bne * ;failed not equal (non zero)33b2 : 68 [ 4] pla ;check flags33b3 : 2901 [ 2] and #1 ;mask carry33b5 : c510 [ 3] cmp adrhtrap_ne ;bad carry33b7 : d0fe [ 3]> bne * ;failed not equal (non zero)33b9 : 28 [ 4] plp; decimal ADC / SBC (zp,x)33ba : 08 [ 3] php ;save carry for subtract33bb : a50d [ 3] lda ad133bd : 6144 [ 6] adc (lo adi2-ad2,x) ;perform add33bf : 08 [ 3] php33c0 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result33c2 : d0fe [ 3]> bne * ;failed not equal (non zero)33c4 : 68 [ 4] pla ;check flags33c5 : 2901 [ 2] and #1 ;mask carry33c7 : c510 [ 3] cmp adrhAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 246---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trap_ne ;bad carry33c9 : d0fe [ 3]> bne * ;failed not equal (non zero)33cb : 28 [ 4] plp33cc : 08 [ 3] php ;save carry for next add33cd : a50d [ 3] lda ad133cf : e146 [ 6] sbc (lo sbi2-ad2,x) ;perform subtract33d1 : 08 [ 3] php33d2 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result33d4 : d0fe [ 3]> bne * ;failed not equal (non zero)33d6 : 68 [ 4] pla ;check flags33d7 : 2901 [ 2] and #1 ;mask carry33d9 : c510 [ 3] cmp adrhtrap_ne ;bad carry33db : d0fe [ 3]> bne * ;failed not equal (non zero)33dd : 28 [ 4] plp; decimal ADC / SBC (abs),y33de : 08 [ 3] php ;save carry for subtract33df : a50d [ 3] lda ad133e1 : 7156 [ 5] adc (adiy2),y ;perform add33e3 : 08 [ 3] php33e4 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result33e6 : d0fe [ 3]> bne * ;failed not equal (non zero)33e8 : 68 [ 4] pla ;check flags33e9 : 2901 [ 2] and #1 ;mask carry33eb : c510 [ 3] cmp adrhtrap_ne ;bad carry33ed : d0fe [ 3]> bne * ;failed not equal (non zero)33ef : 28 [ 4] plp33f0 : 08 [ 3] php ;save carry for next add33f1 : a50d [ 3] lda ad133f3 : f158 [ 5] sbc (sbiy2),y ;perform subtract33f5 : 08 [ 3] php33f6 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result33f8 : d0fe [ 3]> bne * ;failed not equal (non zero)33fa : 68 [ 4] pla ;check flags33fb : 2901 [ 2] and #1 ;mask carry33fd : c510 [ 3] cmp adrhtrap_ne ;bad carry33ff : d0fe [ 3]> bne * ;failed not equal (non zero)3401 : 28 [ 4] plp3402 : 60 [ 6] rts; core subroutine of the full binary add/subtract test; iterates through all combinations of operands and carry input; uses increments/decrements to predict result & result flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 247---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3403 : a511 [ 3] chkadd lda adrf ;add V-flag if overflow3405 : 2983 [ 2] and #$83 ;keep N-----ZC / clear V3407 : 48 [ 3] pha3408 : a50d [ 3] lda ad1 ;test sign unequal between operands340a : 450e [ 3] eor ad2340c : 300a [ 3] bmi ckad1 ;no overflow possible - operands have different sign340e : a50d [ 3] lda ad1 ;test sign equal between operands and result3410 : 450f [ 3] eor adrl3412 : 1004 [ 3] bpl ckad1 ;no overflow occured - operand and result have same sign3414 : 68 [ 4] pla3415 : 0940 [ 2] ora #$40 ;set V3417 : 48 [ 3] pha3418 : 68 [ 4] ckad1 pla3419 : 8511 [ 3] sta adrf ;save expected flags; binary ADC / SBC zp341b : 08 [ 3] php ;save carry for subtract341c : a50d [ 3] lda ad1341e : 650e [ 3] adc ad2 ;perform add3420 : 08 [ 3] php3421 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3423 : d0fe [ 3]> bne * ;failed not equal (non zero)3425 : 68 [ 4] pla ;check flags3426 : 29c3 [ 2] and #$c3 ;mask NV----ZC3428 : c511 [ 3] cmp adrftrap_ne ;bad flags342a : d0fe [ 3]> bne * ;failed not equal (non zero)342c : 28 [ 4] plp342d : 08 [ 3] php ;save carry for next add342e : a50d [ 3] lda ad13430 : e512 [ 3] sbc sb2 ;perform subtract3432 : 08 [ 3] php3433 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3435 : d0fe [ 3]> bne * ;failed not equal (non zero)3437 : 68 [ 4] pla ;check flags3438 : 29c3 [ 2] and #$c3 ;mask NV----ZC343a : c511 [ 3] cmp adrftrap_ne ;bad flags343c : d0fe [ 3]> bne * ;failed not equal (non zero)343e : 28 [ 4] plp; binary ADC / SBC abs343f : 08 [ 3] php ;save carry for subtract3440 : a50d [ 3] lda ad13442 : 6d0302 [ 4] adc ada2 ;perform add3445 : 08 [ 3] php3446 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3448 : d0fe [ 3]> bne * ;failed not equal (non zero)344a : 68 [ 4] pla ;check flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 248---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------344b : 29c3 [ 2] and #$c3 ;mask NV----ZC344d : c511 [ 3] cmp adrftrap_ne ;bad flags344f : d0fe [ 3]> bne * ;failed not equal (non zero)3451 : 28 [ 4] plp3452 : 08 [ 3] php ;save carry for next add3453 : a50d [ 3] lda ad13455 : ed0402 [ 4] sbc sba2 ;perform subtract3458 : 08 [ 3] php3459 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result345b : d0fe [ 3]> bne * ;failed not equal (non zero)345d : 68 [ 4] pla ;check flags345e : 29c3 [ 2] and #$c3 ;mask NV----ZC3460 : c511 [ 3] cmp adrftrap_ne ;bad flags3462 : d0fe [ 3]> bne * ;failed not equal (non zero)3464 : 28 [ 4] plp; binary ADC / SBC #3465 : 08 [ 3] php ;save carry for subtract3466 : a50e [ 3] lda ad23468 : 8d6e34 [ 4] sta chkadi ;self modify immediate346b : a50d [ 3] lda ad1346e = chkadi = * + 1 ;operand of the immediate ADC346d : 6900 [ 2] adc #0 ;perform add346f : 08 [ 3] php3470 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3472 : d0fe [ 3]> bne * ;failed not equal (non zero)3474 : 68 [ 4] pla ;check flags3475 : 29c3 [ 2] and #$c3 ;mask NV----ZC3477 : c511 [ 3] cmp adrftrap_ne ;bad flags3479 : d0fe [ 3]> bne * ;failed not equal (non zero)347b : 28 [ 4] plp347c : 08 [ 3] php ;save carry for next add347d : a512 [ 3] lda sb2347f : 8d8534 [ 4] sta chksbi ;self modify immediate3482 : a50d [ 3] lda ad13485 = chksbi = * + 1 ;operand of the immediate SBC3484 : e900 [ 2] sbc #0 ;perform subtract3486 : 08 [ 3] php3487 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3489 : d0fe [ 3]> bne * ;failed not equal (non zero)348b : 68 [ 4] pla ;check flags348c : 29c3 [ 2] and #$c3 ;mask NV----ZC348e : c511 [ 3] cmp adrftrap_ne ;bad flagsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 249---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3490 : d0fe [ 3]> bne * ;failed not equal (non zero)3492 : 28 [ 4] plp; binary ADC / SBC zp,x3493 : 08 [ 3] php ;save carry for subtract3494 : a50d [ 3] lda ad13496 : 7500 [ 4] adc 0,x ;perform add3498 : 08 [ 3] php3499 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result349b : d0fe [ 3]> bne * ;failed not equal (non zero)349d : 68 [ 4] pla ;check flags349e : 29c3 [ 2] and #$c3 ;mask NV----ZC34a0 : c511 [ 3] cmp adrftrap_ne ;bad flags34a2 : d0fe [ 3]> bne * ;failed not equal (non zero)34a4 : 28 [ 4] plp34a5 : 08 [ 3] php ;save carry for next add34a6 : a50d [ 3] lda ad134a8 : f504 [ 4] sbc sb2-ad2,x ;perform subtract34aa : 08 [ 3] php34ab : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result34ad : d0fe [ 3]> bne * ;failed not equal (non zero)34af : 68 [ 4] pla ;check flags34b0 : 29c3 [ 2] and #$c3 ;mask NV----ZC34b2 : c511 [ 3] cmp adrftrap_ne ;bad flags34b4 : d0fe [ 3]> bne * ;failed not equal (non zero)34b6 : 28 [ 4] plp; binary ADC / SBC abs,x34b7 : 08 [ 3] php ;save carry for subtract34b8 : a50d [ 3] lda ad134ba : 7df501 [ 4] adc ada2-ad2,x ;perform add34bd : 08 [ 3] php34be : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result34c0 : d0fe [ 3]> bne * ;failed not equal (non zero)34c2 : 68 [ 4] pla ;check flags34c3 : 29c3 [ 2] and #$c3 ;mask NV----ZC34c5 : c511 [ 3] cmp adrftrap_ne ;bad flags34c7 : d0fe [ 3]> bne * ;failed not equal (non zero)34c9 : 28 [ 4] plp34ca : 08 [ 3] php ;save carry for next add34cb : a50d [ 3] lda ad134cd : fdf601 [ 4] sbc sba2-ad2,x ;perform subtract34d0 : 08 [ 3] php34d1 : c50f [ 3] cmp adrl ;check resultAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 250---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trap_ne ;bad result34d3 : d0fe [ 3]> bne * ;failed not equal (non zero)34d5 : 68 [ 4] pla ;check flags34d6 : 29c3 [ 2] and #$c3 ;mask NV----ZC34d8 : c511 [ 3] cmp adrftrap_ne ;bad flags34da : d0fe [ 3]> bne * ;failed not equal (non zero)34dc : 28 [ 4] plp; binary ADC / SBC abs,y34dd : 08 [ 3] php ;save carry for subtract34de : a50d [ 3] lda ad134e0 : 790401 [ 4] adc ada2-$ff,y ;perform add34e3 : 08 [ 3] php34e4 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result34e6 : d0fe [ 3]> bne * ;failed not equal (non zero)34e8 : 68 [ 4] pla ;check flags34e9 : 29c3 [ 2] and #$c3 ;mask NV----ZC34eb : c511 [ 3] cmp adrftrap_ne ;bad flags34ed : d0fe [ 3]> bne * ;failed not equal (non zero)34ef : 28 [ 4] plp34f0 : 08 [ 3] php ;save carry for next add34f1 : a50d [ 3] lda ad134f3 : f90501 [ 4] sbc sba2-$ff,y ;perform subtract34f6 : 08 [ 3] php34f7 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result34f9 : d0fe [ 3]> bne * ;failed not equal (non zero)34fb : 68 [ 4] pla ;check flags34fc : 29c3 [ 2] and #$c3 ;mask NV----ZC34fe : c511 [ 3] cmp adrftrap_ne ;bad flags3500 : d0fe [ 3]> bne * ;failed not equal (non zero)3502 : 28 [ 4] plp; binary ADC / SBC (zp,x)3503 : 08 [ 3] php ;save carry for subtract3504 : a50d [ 3] lda ad13506 : 6144 [ 6] adc (lo adi2-ad2,x) ;perform add3508 : 08 [ 3] php3509 : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result350b : d0fe [ 3]> bne * ;failed not equal (non zero)350d : 68 [ 4] pla ;check flags350e : 29c3 [ 2] and #$c3 ;mask NV----ZC3510 : c511 [ 3] cmp adrftrap_ne ;bad flags3512 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 251---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3514 : 28 [ 4] plp3515 : 08 [ 3] php ;save carry for next add3516 : a50d [ 3] lda ad13518 : e146 [ 6] sbc (lo sbi2-ad2,x) ;perform subtract351a : 08 [ 3] php351b : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result351d : d0fe [ 3]> bne * ;failed not equal (non zero)351f : 68 [ 4] pla ;check flags3520 : 29c3 [ 2] and #$c3 ;mask NV----ZC3522 : c511 [ 3] cmp adrftrap_ne ;bad flags3524 : d0fe [ 3]> bne * ;failed not equal (non zero)3526 : 28 [ 4] plp; binary ADC / SBC (abs),y3527 : 08 [ 3] php ;save carry for subtract3528 : a50d [ 3] lda ad1352a : 7156 [ 5] adc (adiy2),y ;perform add352c : 08 [ 3] php352d : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result352f : d0fe [ 3]> bne * ;failed not equal (non zero)3531 : 68 [ 4] pla ;check flags3532 : 29c3 [ 2] and #$c3 ;mask NV----ZC3534 : c511 [ 3] cmp adrftrap_ne ;bad flags3536 : d0fe [ 3]> bne * ;failed not equal (non zero)3538 : 28 [ 4] plp3539 : 08 [ 3] php ;save carry for next add353a : a50d [ 3] lda ad1353c : f158 [ 5] sbc (sbiy2),y ;perform subtract353e : 08 [ 3] php353f : c50f [ 3] cmp adrl ;check resulttrap_ne ;bad result3541 : d0fe [ 3]> bne * ;failed not equal (non zero)3543 : 68 [ 4] pla ;check flags3544 : 29c3 [ 2] and #$c3 ;mask NV----ZC3546 : c511 [ 3] cmp adrftrap_ne ;bad flags3548 : d0fe [ 3]> bne * ;failed not equal (non zero)354a : 28 [ 4] plp354b : 60 [ 6] rts; target for the jump absolute test354c : 88 [ 2] dey354d : 88 [ 2] dey354e : test_far354e : 08 [ 3] php ;either SP or Y count will fail, if we do not hitAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 252---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------354f : 88 [ 2] dey3550 : 88 [ 2] dey3551 : 88 [ 2] dey3552 : 28 [ 4] plptrap_cs ;flags loaded?3553 : b0fe [ 3]> bcs * ;failed carry settrap_vs3555 : 70fe [ 3]> bvs * ;failed overflow settrap_mi3557 : 30fe [ 3]> bmi * ;failed minus (bit 7 set)trap_eq3559 : f0fe [ 3]> beq * ;failed equal (zero)355b : c946 [ 2] cmp #'F' ;registers loaded?trap_ne355d : d0fe [ 3]> bne * ;failed not equal (non zero)355f : e041 [ 2] cpx #'A'trap_ne3561 : d0fe [ 3]> bne * ;failed not equal (non zero)3563 : c04f [ 2] cpy #('R'-3)trap_ne3565 : d0fe [ 3]> bne * ;failed not equal (non zero)3567 : 48 [ 3] pha ;save a,x3568 : 8a [ 2] txa3569 : 48 [ 3] pha356a : ba [ 2] tsx356b : e0fd [ 2] cpx #$fd ;check SPtrap_ne356d : d0fe [ 3]> bne * ;failed not equal (non zero)356f : 68 [ 4] pla ;restore x3570 : aa [ 2] taxset_stat $ff> load_flag $ff3571 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>3573 : 48 [ 3]> pha ;use stack to load status3574 : 28 [ 4]> plp3575 : 68 [ 4] pla ;restore a3576 : e8 [ 2] inx ;return registers with modifications3577 : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=13579 : 4cf707 [ 3] jmp far_ret; target for the jump indirect testalign357c : 8535 ptr_tst_ind dw test_ind357e : 4c08 ptr_ind_ret dw ind_rettrap ;runover protectionAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 253---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------3580 : 4c8035 [ 3]> jmp * ;failed anyway3583 : 88 [ 2] dey3584 : 88 [ 2] dey3585 : test_ind3585 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit3586 : 88 [ 2] dey3587 : 88 [ 2] dey3588 : 88 [ 2] dey3589 : 28 [ 4] plptrap_cs ;flags loaded?358a : b0fe [ 3]> bcs * ;failed carry settrap_vs358c : 70fe [ 3]> bvs * ;failed overflow settrap_mi358e : 30fe [ 3]> bmi * ;failed minus (bit 7 set)trap_eq3590 : f0fe [ 3]> beq * ;failed equal (zero)3592 : c949 [ 2] cmp #'I' ;registers loaded?trap_ne3594 : d0fe [ 3]> bne * ;failed not equal (non zero)3596 : e04e [ 2] cpx #'N'trap_ne3598 : d0fe [ 3]> bne * ;failed not equal (non zero)359a : c041 [ 2] cpy #('D'-3)trap_ne359c : d0fe [ 3]> bne * ;failed not equal (non zero)359e : 48 [ 3] pha ;save a,x359f : 8a [ 2] txa35a0 : 48 [ 3] pha35a1 : ba [ 2] tsx35a2 : e0fd [ 2] cpx #$fd ;check SPtrap_ne35a4 : d0fe [ 3]> bne * ;failed not equal (non zero)35a6 : 68 [ 4] pla ;restore x35a7 : aa [ 2] taxset_stat $ff> load_flag $ff35a8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>35aa : 48 [ 3]> pha ;use stack to load status35ab : 28 [ 4]> plp35ac : 68 [ 4] pla ;restore a35ad : e8 [ 2] inx ;return registers with modifications35ae : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=135b0 : 6c7e35 [ 6] jmp (ptr_ind_ret)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 254---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trap ;runover protection35b3 : 4cb335 [ 3]> jmp * ;failed anyway; target for the jump subroutine test35b6 : 88 [ 2] dey35b7 : 88 [ 2] dey35b8 : test_jsr35b8 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit35b9 : 88 [ 2] dey35ba : 88 [ 2] dey35bb : 88 [ 2] dey35bc : 28 [ 4] plptrap_cs ;flags loaded?35bd : b0fe [ 3]> bcs * ;failed carry settrap_vs35bf : 70fe [ 3]> bvs * ;failed overflow settrap_mi35c1 : 30fe [ 3]> bmi * ;failed minus (bit 7 set)trap_eq35c3 : f0fe [ 3]> beq * ;failed equal (zero)35c5 : c94a [ 2] cmp #'J' ;registers loaded?trap_ne35c7 : d0fe [ 3]> bne * ;failed not equal (non zero)35c9 : e053 [ 2] cpx #'S'trap_ne35cb : d0fe [ 3]> bne * ;failed not equal (non zero)35cd : c04f [ 2] cpy #('R'-3)trap_ne35cf : d0fe [ 3]> bne * ;failed not equal (non zero)35d1 : 48 [ 3] pha ;save a,x35d2 : 8a [ 2] txa35d3 : 48 [ 3] pha35d4 : ba [ 2] tsx ;sp -4? (return addr,a,x)35d5 : e0fb [ 2] cpx #$fbtrap_ne35d7 : d0fe [ 3]> bne * ;failed not equal (non zero)35d9 : adff01 [ 4] lda $1ff ;propper return on stack35dc : c908 [ 2] cmp #hi(jsr_ret)trap_ne35de : d0fe [ 3]> bne * ;failed not equal (non zero)35e0 : adfe01 [ 4] lda $1fe35e3 : c982 [ 2] cmp #lo(jsr_ret)trap_ne35e5 : d0fe [ 3]> bne * ;failed not equal (non zero)AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 255---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------set_stat $ff> load_flag $ff35e7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>35e9 : 48 [ 3]> pha ;use stack to load status35ea : 28 [ 4]> plp35eb : 68 [ 4] pla ;pull x,a35ec : aa [ 2] tax35ed : 68 [ 4] pla35ee : e8 [ 2] inx ;return registers with modifications35ef : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=135f1 : 60 [ 6] rtstrap ;runover protection35f2 : 4cf235 [ 3]> jmp * ;failed anyway;trap in case of unexpected IRQ, NMI, BRK, RESET - BRK test target35f5 : nmi_traptrap ;check stack for conditions at NMI35f5 : 4cf535 [ 3]> jmp * ;failed anyway35f8 : res_traptrap ;unexpected RESET35f8 : 4cf835 [ 3]> jmp * ;failed anyway35fb : 88 [ 2] dey35fc : 88 [ 2] dey35fd : irq_trap ;BRK test or unextpected BRK or IRQ35fd : 08 [ 3] php ;either SP or Y count will fail, if we do not hit35fe : 88 [ 2] dey35ff : 88 [ 2] dey3600 : 88 [ 2] dey;next 4 traps could be caused by unexpected BRK or IRQ;check stack for BREAK and originating location;possible jump/branch into weeds (uninitialized space)3601 : c942 [ 2] cmp #'B' ;registers loaded?trap_ne3603 : d0fe [ 3]> bne * ;failed not equal (non zero)3605 : e052 [ 2] cpx #'R'trap_ne3607 : d0fe [ 3]> bne * ;failed not equal (non zero)3609 : c048 [ 2] cpy #('K'-3)trap_ne360b : d0fe [ 3]> bne * ;failed not equal (non zero)360d : 850a [ 3] sta irq_a ;save registers during break test360f : 860b [ 3] stx irq_x3611 : ba [ 2] tsx ;test break on stack3612 : bd0201 [ 4] lda $102,xcmp_flag 0 ;break test should have B=13615 : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bitsAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 256---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------trap_ne ; - no break flag on stack3617 : d0fe [ 3]> bne * ;failed not equal (non zero)3619 : 68 [ 4] pla361a : c934 [ 2] cmp #$34 ;should have added interrupt disabletrap_ne361c : d0fe [ 3]> bne * ;failed not equal (non zero)361e : ba [ 2] tsx361f : e0fc [ 2] cpx #$fc ;sp -3? (return addr, flags)trap_ne3621 : d0fe [ 3]> bne * ;failed not equal (non zero)3623 : adff01 [ 4] lda $1ff ;propper return on stack3626 : c908 [ 2] cmp #hi(brk_ret)trap_ne3628 : d0fe [ 3]> bne * ;failed not equal (non zero)362a : adfe01 [ 4] lda $1fe; cmp #lo(brk_ret)362d : c9b8 [ 2] cmp #lo(brk_ret - 1) ; M65C02 treats JSR and traps (NMI, BRK/IRQ, RST) the same; add one totrap_ne362f : d0fe [ 3]> bne * ;failed not equal (non zero)set_stat $ff> load_flag $ff3631 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)>3633 : 48 [ 3]> pha ;use stack to load status3634 : 28 [ 4]> plp3635 : a60b [ 3] ldx irq_x3637 : e8 [ 2] inx ;return registers with modifications3638 : a50a [ 3] lda irq_a363a : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=1 but original flags should be restored363c : 40 [ 6] rtitrap ;runover protection363d : 4c3d36 [ 3]> jmp * ;failed anyway;copy of data to initialize BSS segmentif load_data_direct != 1zp_initzp1_ db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSRzp7f_ db $7f ;test pattern for compare;logical zeropage operandszpOR_ db 0,$1f,$71,$80 ;test pattern for ORzpAN_ db $0f,$ff,$7f,$80 ;test pattern for ANDzpEO_ db $ff,$0f,$8f,$8f ;test pattern for EOR;indirect addressing pointersind1_ dw abs1 ;indirect pointer to pattern in absolute memorydw abs1+1dw abs1+2dw abs1+3AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 257---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------dw abs7finw1_ dw abs1-$f8 ;indirect pointer for wrap-test patternindt_ dw abst ;indirect pointer to store area in absolute memorydw abst+1dw abst+2dw abst+3inwt_ dw abst-$f8 ;indirect pointer for wrap-test storeindAN_ dw absAN ;indirect pointer to AND pattern in absolute memorydw absAN+1dw absAN+2dw absAN+3indEO_ dw absEO ;indirect pointer to EOR pattern in absolute memorydw absEO+1dw absEO+2dw absEO+3indOR_ dw absOR ;indirect pointer to OR pattern in absolute memorydw absOR+1dw absOR+2dw absOR+3;add/subtract indirect pointersadi2_ dw ada2 ;indirect pointer to operand 2 in absolute memorysbi2_ dw sba2 ;indirect pointer to complemented operand 2 (SBC)adiy2_ dw ada2-$ff ;with offset for indirect indexedsbiy2_ dw sba2-$ffzp_endif (zp_end - zp_init) != (zp_bss_end - zp_bss);force assembler error if size is differentERROR ERROR ERROR ;mismatch between bss and zeropage dataendifdata_initabs1_ db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSRabs7f_ db $7f ;test pattern for compare;loadsfLDx_ db fn,fn,0,fz ;expected flags for load;shiftsrASL_ ;expected result ASL & ROL -carryrROL_ db $86,$04,$82,0 ; "rROLc_ db $87,$05,$83,1 ;expected result ROL +carryrLSR_ ;expected result LSR & ROR -carryrROR_ db $61,$41,$20,0 ; "rRORc_ db $e1,$c1,$a0,$80 ;expected result ROR +carryfASL_ ;expected flags for shiftsfROL_ db fnc,fc,fn,fz ;no carry infROLc_ db fnc,fc,fn,0 ;carry infLSR_fROR_ db fc,0,fc,fz ;no carry infRORc_ db fnc,fn,fnc,fn ;carry in;increments (decrements)rINC_ db $7f,$80,$ff,0,1 ;expected result for INC/DECfINC_ db 0,fn,fn,fz,0 ;expected flags for INC/DEC;logical memory operandabsOR_ db 0,$1f,$71,$80 ;test pattern for ORabsAN_ db $0f,$ff,$7f,$80 ;test pattern for ANDabsEO_ db $ff,$0f,$8f,$8f ;test pattern for EOR;logical accu operandAS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 258---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------absORa_ db 0,$f1,$1f,0 ;test pattern for ORabsANa_ db $f0,$ff,$ff,$ff ;test pattern for ANDabsEOa_ db $ff,$f0,$f0,$0f ;test pattern for EOR;logical resultsabsrlo_ db 0,$ff,$7f,$80absflo_ db fz,fn,0,fndata_endif (data_end - data_init) != (data_bss_end - data_bss);force assembler error if size is differentERROR ERROR ERROR ;mismatch between bss and dataendifvec_initdw nmi_trapdw res_trapdw irq_trapvec_bss equ $fffaendif ;end of RAM init dataif (load_data_direct = 1) & (ROM_vectors = 1)fffa = org $fffa ;vectorsfffa : f535 dw nmi_trapfffc : f835 dw res_trapfffe : fd35 dw irq_trapendiffffa = end startNo errors in pass 2.Wrote binary from address $0000 through $ffff.Total size 65536 bytes.Program start address is at $0400 (1024).
Go to most recent revision | Compare with Previous | Blame | View Log