| 1 |
2 |
MichaelA |
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 1
|
| 2 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3 |
|
|
|
| 4 |
|
|
---------------------------------------------------------- Symbol Table -----------------------------------------------------------
|
| 5 |
|
|
|
| 6 |
|
|
Symbol Value Decimal
|
| 7 |
|
|
|
| 8 |
|
|
absAN : $023f 575
|
| 9 |
|
|
absANa : $024b 587
|
| 10 |
|
|
absEO : $0243 579
|
| 11 |
|
|
absEOa : $024f 591
|
| 12 |
|
|
absflo : $0257 599
|
| 13 |
|
|
absOR : $023b 571
|
| 14 |
|
|
absORa : $0247 583
|
| 15 |
|
|
absrlo : $0253 595
|
| 16 |
|
|
abst : $0203 515
|
| 17 |
|
|
abs1 : $0208 520
|
| 18 |
|
|
abs7f : $020c 524
|
| 19 |
|
|
ada2 : $0203 515
|
| 20 |
|
|
adfc : $000c 12
|
| 21 |
|
|
adiy2 : $0056 86
|
| 22 |
|
|
adi2 : $0052 82
|
| 23 |
|
|
adrf : $0011 17
|
| 24 |
|
|
adrh : $0010 16
|
| 25 |
|
|
adrl : $000f 15
|
| 26 |
|
|
ad1 : $000d 13
|
| 27 |
|
|
ad2 : $000e 14
|
| 28 |
|
|
bin_test : $31b8 12728
|
| 29 |
|
|
break : $0010 16
|
| 30 |
|
|
brk_ret : $08b9 2233
|
| 31 |
|
|
br1 : $05c9 1481
|
| 32 |
|
|
br11 : $060d 1549
|
| 33 |
|
|
br12 : $0612 1554
|
| 34 |
|
|
br13 : $0617 1559
|
| 35 |
|
|
br14 : $0628 1576
|
| 36 |
|
|
br2 : $05ce 1486
|
| 37 |
|
|
br3 : $05d3 1491
|
| 38 |
|
|
br4 : $05e4 1508
|
| 39 |
|
|
carry : $0001 1
|
| 40 |
|
|
check_ram :
|
| 41 |
|
|
chkadd : $3403 13315
|
| 42 |
|
|
chkadi : $346e 13422 *
|
| 43 |
|
|
chkdad : $32d2 13010
|
| 44 |
|
|
chkdadi : $3325 13093 *
|
| 45 |
|
|
chkdsbi : $333c 13116 *
|
| 46 |
|
|
chksbi : $3485 13445 *
|
| 47 |
|
|
ckad1 : $3418 13336
|
| 48 |
|
|
cmp_flag :
|
| 49 |
|
|
code_segment : $0400 1024 *
|
| 50 |
|
|
data_bss : $0208 520
|
| 51 |
|
|
data_bss_end : $025b 603
|
| 52 |
|
|
data_segment : $0200 512 *
|
| 53 |
|
|
decmode : $0008 8
|
| 54 |
|
|
dec_test : $3220 12832
|
| 55 |
|
|
eor_flag :
|
| 56 |
|
|
fASL : $0221 545
|
| 57 |
|
|
fai : $0034 52
|
| 58 |
|
|
fao : $0030 48
|
| 59 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 2
|
| 60 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 61 |
|
|
|
| 62 |
|
|
far_ret : $07f7 2039
|
| 63 |
|
|
fc : $0001 1
|
| 64 |
|
|
fINC : $0236 566
|
| 65 |
|
|
fLDx : $020d 525
|
| 66 |
|
|
fLSR : $0229 553
|
| 67 |
|
|
fn : $0080 128
|
| 68 |
|
|
fnc : $0081 129
|
| 69 |
|
|
fnv : $00c0 192
|
| 70 |
|
|
fnz : $0082 130
|
| 71 |
|
|
fnzc : $0083 131
|
| 72 |
|
|
fROL : $0221 545
|
| 73 |
|
|
fROLc : $0225 549
|
| 74 |
|
|
fROR : $0229 553
|
| 75 |
|
|
fRORc : $022d 557
|
| 76 |
|
|
fv : $0040 64
|
| 77 |
|
|
fvz : $0042 66
|
| 78 |
|
|
fz : $0002 2
|
| 79 |
|
|
fzc : $0003 3
|
| 80 |
|
|
I_flag : $0003 3 *
|
| 81 |
|
|
indAN : $003a 58
|
| 82 |
|
|
indEO : $0042 66
|
| 83 |
|
|
indOR : $004a 74
|
| 84 |
|
|
indt : $0030 48
|
| 85 |
|
|
ind1 : $0024 36
|
| 86 |
|
|
ind_ret : $084c 2124
|
| 87 |
|
|
intdis : $0004 4
|
| 88 |
|
|
inwt : $0038 56
|
| 89 |
|
|
inw1 : $002e 46
|
| 90 |
|
|
irq_a : $000a 10
|
| 91 |
|
|
irq_trap : $35fd 13821
|
| 92 |
|
|
irq_x : $000b 11
|
| 93 |
|
|
jsr_ret : $0882 2178 *
|
| 94 |
|
|
load_data_direct : $0001 1 *
|
| 95 |
|
|
load_flag :
|
| 96 |
|
|
minus : $0080 128
|
| 97 |
|
|
m8 : $00ff 255
|
| 98 |
|
|
m8i : $00fb 251
|
| 99 |
|
|
nbr1 : $05d8 1496
|
| 100 |
|
|
nbr11 : $061c 1564
|
| 101 |
|
|
nbr12 : $061f 1567
|
| 102 |
|
|
nbr13 : $0622 1570
|
| 103 |
|
|
nbr14 : $0625 1573
|
| 104 |
|
|
nbr2 : $05db 1499
|
| 105 |
|
|
nbr3 : $05de 1502
|
| 106 |
|
|
nbr4 : $05e1 1505
|
| 107 |
|
|
next_test :
|
| 108 |
|
|
nmi_trap : $35f5 13813
|
| 109 |
|
|
overfl : $0040 64
|
| 110 |
|
|
ptr_ind_ret : $357e 13694
|
| 111 |
|
|
ptr_tst_ind : $357c 13692
|
| 112 |
|
|
ROM_vectors : $0001 1 *
|
| 113 |
|
|
rASL : $0211 529
|
| 114 |
|
|
ram_chksm : $0201 513
|
| 115 |
|
|
ram_top : $ffff -1 *
|
| 116 |
|
|
range_adr : $04a5 1189 *
|
| 117 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 3
|
| 118 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 119 |
|
|
|
| 120 |
|
|
range_end : $0531 1329
|
| 121 |
|
|
range_fw : $041c 1052
|
| 122 |
|
|
range_loop : $0414 1044
|
| 123 |
|
|
range_ok : $052a 1322
|
| 124 |
|
|
range_op : $04a4 1188
|
| 125 |
|
|
reserv : $0020 32
|
| 126 |
|
|
res_trap : $35f8 13816
|
| 127 |
|
|
rINC : $0231 561
|
| 128 |
|
|
rLSR : $0219 537
|
| 129 |
|
|
rROL : $0211 529
|
| 130 |
|
|
rROLc : $0215 533
|
| 131 |
|
|
rROR : $0219 537
|
| 132 |
|
|
rRORc : $021d 541
|
| 133 |
|
|
sba2 : $0204 516
|
| 134 |
|
|
sbiy2 : $0058 88
|
| 135 |
|
|
sbi2 : $0054 84
|
| 136 |
|
|
sb2 : $0012 18
|
| 137 |
|
|
set_a :
|
| 138 |
|
|
set_abs :
|
| 139 |
|
|
set_absx :
|
| 140 |
|
|
set_ax :
|
| 141 |
|
|
set_ay :
|
| 142 |
|
|
set_stat :
|
| 143 |
|
|
set_x :
|
| 144 |
|
|
set_y :
|
| 145 |
|
|
set_z :
|
| 146 |
|
|
set_zx :
|
| 147 |
|
|
skip_bin_test : $0001 1 *
|
| 148 |
|
|
skip_dec_test : $0001 1 *
|
| 149 |
|
|
skip_part_1 : $0000 0 *
|
| 150 |
|
|
start : $0400 1024
|
| 151 |
|
|
success : $32cf 13007
|
| 152 |
|
|
tadd : $31e6 12774
|
| 153 |
|
|
tadd1 : $31f8 12792
|
| 154 |
|
|
tand : $2be3 11235
|
| 155 |
|
|
tandi1 : $2bf0 11248
|
| 156 |
|
|
tandi2 : $2c11 11281
|
| 157 |
|
|
tand1 : $2c04 11268
|
| 158 |
|
|
tand10 : $2d1b 11547
|
| 159 |
|
|
tand11 : $2d38 11576
|
| 160 |
|
|
tand12 : $2d57 11607
|
| 161 |
|
|
tand13 : $2d77 11639
|
| 162 |
|
|
tand14 : $2d95 11669
|
| 163 |
|
|
tand15 : $2db1 11697
|
| 164 |
|
|
tand2 : $2c25 11301
|
| 165 |
|
|
tand3 : $2c45 11333
|
| 166 |
|
|
tand4 : $2c65 11365
|
| 167 |
|
|
tand5 : $2c87 11399
|
| 168 |
|
|
tand6 : $2ca9 11433
|
| 169 |
|
|
tand7 : $2cc5 11461
|
| 170 |
|
|
tand8 : $2ce1 11489
|
| 171 |
|
|
tand9 : $2cfe 11518
|
| 172 |
|
|
tasl : $2187 8583
|
| 173 |
|
|
tasl1 : $21a1 8609
|
| 174 |
|
|
tasl2 : $22cb 8907
|
| 175 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 4
|
| 176 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 177 |
|
|
|
| 178 |
|
|
tasl3 : $22ea 8938
|
| 179 |
|
|
tasl4 : $244b 9291
|
| 180 |
|
|
tasl5 : $246d 9325
|
| 181 |
|
|
tasl6 : $25ef 9711
|
| 182 |
|
|
tasl7 : $260e 9742
|
| 183 |
|
|
tasl8 : $276f 10095
|
| 184 |
|
|
tasl9 : $2791 10129
|
| 185 |
|
|
tdad : $324c 12876
|
| 186 |
|
|
tdad1 : $325e 12894
|
| 187 |
|
|
tdad2 : $326e 12910
|
| 188 |
|
|
tdad3 : $3270 12912
|
| 189 |
|
|
tdad4 : $328a 12938
|
| 190 |
|
|
tdad5 : $328f 12943
|
| 191 |
|
|
tdad6 : $32b3 12979
|
| 192 |
|
|
tdad7 : $32c7 12999
|
| 193 |
|
|
tdec : $293d 10557
|
| 194 |
|
|
tdec1 : $2960 10592
|
| 195 |
|
|
tdec10 : $298c 10636
|
| 196 |
|
|
tdec11 : $29af 10671
|
| 197 |
|
|
tdec12 : $2a43 10819
|
| 198 |
|
|
tdec13 : $2a69 10857
|
| 199 |
|
|
tdec14 : $2af2 10994
|
| 200 |
|
|
tdec15 : $2b17 11031
|
| 201 |
|
|
tdec16 : $2bac 11180
|
| 202 |
|
|
tdec17 : $2bd5 11221
|
| 203 |
|
|
tdec2 : $29ec 10732
|
| 204 |
|
|
tdec3 : $2a12 10770
|
| 205 |
|
|
tdec4 : $2aa1 10913
|
| 206 |
|
|
tdec5 : $2ac6 10950
|
| 207 |
|
|
tdec6 : $2b53 11091
|
| 208 |
|
|
tdec7 : $2b7c 11132
|
| 209 |
|
|
teor : $2dd9 11737
|
| 210 |
|
|
teori1 : $2de6 11750
|
| 211 |
|
|
teori2 : $2e07 11783
|
| 212 |
|
|
teor1 : $2dfa 11770
|
| 213 |
|
|
teor10 : $2f11 12049
|
| 214 |
|
|
teor11 : $2f2e 12078
|
| 215 |
|
|
teor12 : $2f4d 12109
|
| 216 |
|
|
teor13 : $2f6d 12141
|
| 217 |
|
|
teor14 : $2f8b 12171
|
| 218 |
|
|
teor15 : $2fa7 12199
|
| 219 |
|
|
teor2 : $2e1b 11803
|
| 220 |
|
|
teor3 : $2e3b 11835
|
| 221 |
|
|
teor4 : $2e5b 11867
|
| 222 |
|
|
teor5 : $2e7d 11901
|
| 223 |
|
|
teor6 : $2e9f 11935
|
| 224 |
|
|
teor7 : $2ebb 11963
|
| 225 |
|
|
teor8 : $2ed7 11991
|
| 226 |
|
|
teor9 : $2ef4 12020
|
| 227 |
|
|
test_bne : $0544 1348
|
| 228 |
|
|
test_case : $0200 512
|
| 229 |
|
|
test_far : $354e 13646
|
| 230 |
|
|
test_ind : $3585 13701
|
| 231 |
|
|
test_jsr : $35b8 13752
|
| 232 |
|
|
test_near : $081a 2074
|
| 233 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 5
|
| 234 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 235 |
|
|
|
| 236 |
|
|
test_num : $002a 42 *
|
| 237 |
|
|
tinc : $2917 10519
|
| 238 |
|
|
tinc1 : $2936 10550
|
| 239 |
|
|
tinc10 : $2966 10598
|
| 240 |
|
|
tinc11 : $2985 10629
|
| 241 |
|
|
tinc12 : $2a19 10777
|
| 242 |
|
|
tinc13 : $2a3b 10811
|
| 243 |
|
|
tinc14 : $2aca 10954
|
| 244 |
|
|
tinc15 : $2aeb 10987
|
| 245 |
|
|
tinc16 : $2b80 11136
|
| 246 |
|
|
tinc17 : $2ba5 11173
|
| 247 |
|
|
tinc2 : $29c2 10690
|
| 248 |
|
|
tinc3 : $29e4 10724
|
| 249 |
|
|
tinc4 : $2a79 10873
|
| 250 |
|
|
tinc5 : $2a9a 10906
|
| 251 |
|
|
tinc6 : $2b27 11047
|
| 252 |
|
|
tinc7 : $2b4c 11084
|
| 253 |
|
|
tldax : $14fa 5370
|
| 254 |
|
|
tldax1 : $151c 5404
|
| 255 |
|
|
tldax2 : $153e 5438
|
| 256 |
|
|
tldax3 : $155f 5471
|
| 257 |
|
|
tldax4 : $165d 5725
|
| 258 |
|
|
tldax5 : $1682 5762
|
| 259 |
|
|
tldax6 : $16c6 5830
|
| 260 |
|
|
tldax7 : $16d2 5842
|
| 261 |
|
|
tlday : $15ab 5547
|
| 262 |
|
|
tlday1 : $15cd 5581
|
| 263 |
|
|
tlday2 : $1604 5636
|
| 264 |
|
|
tlday3 : $1625 5669
|
| 265 |
|
|
tlday4 : $16fb 5883
|
| 266 |
|
|
tlday5 : $171c 5916
|
| 267 |
|
|
tlday6 : $173d 5949
|
| 268 |
|
|
tldx : $0d16 3350
|
| 269 |
|
|
tldx1 : $0d39 3385
|
| 270 |
|
|
tldx2 : $0d5c 3420
|
| 271 |
|
|
tldx3 : $0d80 3456
|
| 272 |
|
|
tldx4 : $0dd1 3537
|
| 273 |
|
|
tldx5 : $0dde 3550
|
| 274 |
|
|
tldy : $0e13 3603
|
| 275 |
|
|
tldy1 : $0e36 3638
|
| 276 |
|
|
tldy2 : $0e59 3673
|
| 277 |
|
|
tldy3 : $0e7c 3708
|
| 278 |
|
|
tldy4 : $0eca 3786
|
| 279 |
|
|
tldy5 : $0ed7 3799
|
| 280 |
|
|
tlsr : $21bb 8635
|
| 281 |
|
|
tlsr1 : $21d5 8661
|
| 282 |
|
|
tlsr2 : $2309 8969
|
| 283 |
|
|
tlsr3 : $2328 9000
|
| 284 |
|
|
tlsr4 : $248f 9359
|
| 285 |
|
|
tlsr5 : $24b1 9393
|
| 286 |
|
|
tlsr6 : $262d 9773
|
| 287 |
|
|
tlsr7 : $264c 9804
|
| 288 |
|
|
tlsr8 : $27b3 10163
|
| 289 |
|
|
tlsr9 : $27d5 10197
|
| 290 |
|
|
tora : $2fcf 12239
|
| 291 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 6
|
| 292 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 293 |
|
|
|
| 294 |
|
|
torai1 : $2fdc 12252
|
| 295 |
|
|
torai2 : $2ffd 12285
|
| 296 |
|
|
tora1 : $2ff0 12272
|
| 297 |
|
|
tora10 : $3107 12551
|
| 298 |
|
|
tora11 : $3124 12580
|
| 299 |
|
|
tora12 : $3143 12611
|
| 300 |
|
|
tora13 : $3163 12643
|
| 301 |
|
|
tora14 : $3181 12673
|
| 302 |
|
|
tora15 : $319d 12701
|
| 303 |
|
|
tora2 : $3011 12305
|
| 304 |
|
|
tora3 : $3031 12337
|
| 305 |
|
|
tora4 : $3051 12369
|
| 306 |
|
|
tora5 : $3073 12403
|
| 307 |
|
|
tora6 : $3095 12437
|
| 308 |
|
|
tora7 : $30b1 12465
|
| 309 |
|
|
tora8 : $30cd 12493
|
| 310 |
|
|
tora9 : $30ea 12522
|
| 311 |
|
|
trap :
|
| 312 |
|
|
trap_cc :
|
| 313 |
|
|
trap_cs :
|
| 314 |
|
|
trap_eq :
|
| 315 |
|
|
trap_mi :
|
| 316 |
|
|
trap_ne :
|
| 317 |
|
|
trap_pl :
|
| 318 |
|
|
trap_vc :
|
| 319 |
|
|
trap_vs :
|
| 320 |
|
|
trol : $21ef 8687
|
| 321 |
|
|
trolc : $2223 8739
|
| 322 |
|
|
trolc1 : $223d 8765
|
| 323 |
|
|
trolc2 : $2385 9093
|
| 324 |
|
|
trolc3 : $23a4 9124
|
| 325 |
|
|
trolc4 : $2517 9495
|
| 326 |
|
|
trolc5 : $2539 9529
|
| 327 |
|
|
trolc6 : $26a9 9897
|
| 328 |
|
|
trolc7 : $26c8 9928
|
| 329 |
|
|
trolc8 : $283b 10299
|
| 330 |
|
|
trolc9 : $285d 10333
|
| 331 |
|
|
trol1 : $2209 8713
|
| 332 |
|
|
trol2 : $2347 9031
|
| 333 |
|
|
trol3 : $2366 9062
|
| 334 |
|
|
trol4 : $24d3 9427
|
| 335 |
|
|
trol5 : $24f5 9461
|
| 336 |
|
|
trol6 : $266b 9835
|
| 337 |
|
|
trol7 : $268a 9866
|
| 338 |
|
|
trol8 : $27f7 10231
|
| 339 |
|
|
trol9 : $2819 10265
|
| 340 |
|
|
tror : $2257 8791
|
| 341 |
|
|
trorc : $228b 8843
|
| 342 |
|
|
trorc1 : $22a5 8869
|
| 343 |
|
|
trorc2 : $2401 9217
|
| 344 |
|
|
trorc3 : $2420 9248
|
| 345 |
|
|
trorc4 : $259f 9631
|
| 346 |
|
|
trorc5 : $25c1 9665
|
| 347 |
|
|
trorc6 : $2725 10021
|
| 348 |
|
|
trorc7 : $2744 10052
|
| 349 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 7
|
| 350 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 351 |
|
|
|
| 352 |
|
|
trorc8 : $28c3 10435
|
| 353 |
|
|
trorc9 : $28e5 10469
|
| 354 |
|
|
tror1 : $2271 8817
|
| 355 |
|
|
tror2 : $23c3 9155
|
| 356 |
|
|
tror3 : $23e2 9186
|
| 357 |
|
|
tror4 : $255b 9563
|
| 358 |
|
|
tror5 : $257d 9597
|
| 359 |
|
|
tror6 : $26e7 9959
|
| 360 |
|
|
tror7 : $2706 9990
|
| 361 |
|
|
tror8 : $287f 10367
|
| 362 |
|
|
tror9 : $28a1 10401
|
| 363 |
|
|
tstax : $1582 5506
|
| 364 |
|
|
tstax1 : $16e0 5856
|
| 365 |
|
|
tstay : $15f1 5617
|
| 366 |
|
|
tstay1 : $1648 5704
|
| 367 |
|
|
tstay2 : $16a7 5799
|
| 368 |
|
|
tstay4 : $170b 5899
|
| 369 |
|
|
tstay5 : $172a 5930
|
| 370 |
|
|
tstay6 : $174c 5964
|
| 371 |
|
|
tstx : $0da6 3494
|
| 372 |
|
|
tstx1 : $0dec 3564
|
| 373 |
|
|
tsty : $0ea1 3745
|
| 374 |
|
|
tsty1 : $0ee5 3813
|
| 375 |
|
|
tst_a :
|
| 376 |
|
|
tst_abs :
|
| 377 |
|
|
tst_absx :
|
| 378 |
|
|
tst_ax :
|
| 379 |
|
|
tst_ay :
|
| 380 |
|
|
tst_stat :
|
| 381 |
|
|
tst_x :
|
| 382 |
|
|
tst_y :
|
| 383 |
|
|
tst_z :
|
| 384 |
|
|
tst_zx :
|
| 385 |
|
|
zero : $0002 2
|
| 386 |
|
|
zero_page : $000a 10 *
|
| 387 |
|
|
zpAN : $001c 28
|
| 388 |
|
|
zpEO : $0020 32
|
| 389 |
|
|
zpOR : $0018 24
|
| 390 |
|
|
zpt : $000c 12
|
| 391 |
|
|
zp1 : $0013 19
|
| 392 |
|
|
zp7f : $0017 23
|
| 393 |
|
|
zp_bss : $0013 19
|
| 394 |
|
|
zp_bss_end : $005a 90
|
| 395 |
|
|
__65SC02__ : $0001 1
|
| 396 |
|
|
|
| 397 |
|
|
336 labels used
|
| 398 |
|
|
|
| 399 |
|
|
5633 lines read, no errors in pass 1.
|
| 400 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 8
|
| 401 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 402 |
|
|
|
| 403 |
|
|
;
|
| 404 |
|
|
; 6 5 0 2 F U N C T I O N A L T E S T
|
| 405 |
|
|
;
|
| 406 |
|
|
; Copyright (C) 2012-2013 Klaus Dormann
|
| 407 |
|
|
;
|
| 408 |
|
|
; This program is free software: you can redistribute it and/or modify
|
| 409 |
|
|
; it under the terms of the GNU General Public License as published by
|
| 410 |
|
|
; the Free Software Foundation, either version 3 of the License, or
|
| 411 |
|
|
; (at your option) any later version.
|
| 412 |
|
|
;
|
| 413 |
|
|
; This program is distributed in the hope that it will be useful,
|
| 414 |
|
|
; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
| 415 |
|
|
; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
| 416 |
|
|
; GNU General Public License for more details.
|
| 417 |
|
|
;
|
| 418 |
|
|
; You should have received a copy of the GNU General Public License
|
| 419 |
|
|
; along with this program. If not, see .
|
| 420 |
|
|
|
| 421 |
|
|
|
| 422 |
|
|
; This program is designed to test all opcodes of a 6502 emulator using all
|
| 423 |
|
|
; addressing modes with focus on propper setting of the processor status
|
| 424 |
|
|
; register bits.
|
| 425 |
|
|
;
|
| 426 |
|
|
; version 23-jul-2013
|
| 427 |
|
|
; contact info at http://2m5.de or email K@2m5.de
|
| 428 |
|
|
;
|
| 429 |
|
|
; assembled with AS65 from http://www.kingswood-consulting.co.uk/assemblers/
|
| 430 |
|
|
; command line switches: -l -m -s2 -w -h0
|
| 431 |
|
|
; | | | | no page headers in listing
|
| 432 |
|
|
; | | | wide listing (133 char/col)
|
| 433 |
|
|
; | | write intel hex file instead of binary
|
| 434 |
|
|
; | expand macros in listing
|
| 435 |
|
|
; generate pass2 listing
|
| 436 |
|
|
;
|
| 437 |
|
|
; No IO - should be run from a monitor with access to registers.
|
| 438 |
|
|
; To run load intel hex image with a load command, than alter PC to 400 hex
|
| 439 |
|
|
; (code_segment) and enter a go command.
|
| 440 |
|
|
; Loop on program counter determines error or successful completion of test.
|
| 441 |
|
|
; Check listing for relevant traps (jump/branch *).
|
| 442 |
|
|
; Please note that in early tests some instructions will have to be used before
|
| 443 |
|
|
; they are actually tested!
|
| 444 |
|
|
;
|
| 445 |
|
|
; RESET, NMI or IRQ should not occur and will be trapped if vectors are enabled.
|
| 446 |
|
|
; Tests documented behavior of the original NMOS 6502 only! No unofficial
|
| 447 |
|
|
; opcodes. Additional opcodes of newer versions of the CPU (65C02, 65816) will
|
| 448 |
|
|
; not be tested. Decimal ops will only be tested with valid BCD operands and
|
| 449 |
|
|
; N V Z flags will be ignored.
|
| 450 |
|
|
;
|
| 451 |
|
|
; Debugging hints:
|
| 452 |
|
|
; Most of the code is written sequentially. if you hit a trap, check the
|
| 453 |
|
|
; immediately preceeding code for the instruction to be tested. Results are
|
| 454 |
|
|
; tested first, flags are checked second by pushing them onto the stack and
|
| 455 |
|
|
; pulling them to the accumulator after the result was checked. The "real"
|
| 456 |
|
|
; flags are no longer valid for the tested instruction at this time!
|
| 457 |
|
|
; If the tested instruction was indexed, the relevant index (X or Y) must
|
| 458 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 9
|
| 459 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 460 |
|
|
|
| 461 |
|
|
; also be checked. Opposed to the flags, X and Y registers are still valid.
|
| 462 |
|
|
;
|
| 463 |
|
|
; versions:
|
| 464 |
|
|
; 28-jul-2012 1st version distributed for testing
|
| 465 |
|
|
; 29-jul-2012 fixed references to location 0, now #0
|
| 466 |
|
|
; added license - GPLv3
|
| 467 |
|
|
; 30-jul-2012 added configuration options
|
| 468 |
|
|
; 01-aug-2012 added trap macro to allow user to change error handling
|
| 469 |
|
|
; 01-dec-2012 fixed trap in branch field must be a branch
|
| 470 |
|
|
; 02-mar-2013 fixed PLA flags not tested
|
| 471 |
|
|
; 19-jul-2013 allowed ROM vectors to be loaded when load_data_direct = 0
|
| 472 |
|
|
; added test sequence check to detect if tests jump their fence
|
| 473 |
|
|
; 23-jul-2013 added RAM integrity check
|
| 474 |
|
|
|
| 475 |
|
|
; C O N F I G U R A T I O N
|
| 476 |
|
|
;
|
| 477 |
|
|
;ROM_vectors writable (0=no, 1=yes)
|
| 478 |
|
|
;if ROM vectors can not be used interrupts will not be trapped
|
| 479 |
|
|
;as a consequence BRK can not be tested but will be emulated to test RTI
|
| 480 |
|
|
0001 = ROM_vectors = 1
|
| 481 |
|
|
;load_data_direct (0=move from code segment, 1=load directly)
|
| 482 |
|
|
;loading directly is preferred but may not be supported by your platform
|
| 483 |
|
|
;0 produces only consecutive object code, 1 is not suitable for a binary image
|
| 484 |
|
|
0001 = load_data_direct = 1
|
| 485 |
|
|
;I_flag behavior (0=force enabled, 1=force disabled, 2=prohibit change, 3=allow
|
| 486 |
|
|
;change) 2 requires extra code and is not recommended. SEI & CLI can only be
|
| 487 |
|
|
;tested if you allow changing the interrupt status (I_flag = 3)
|
| 488 |
|
|
0003 = I_flag = 3
|
| 489 |
|
|
;configure memory - try to stay away from memory used by the system
|
| 490 |
|
|
;zero_page memory start address, $50 (80) consecutive Bytes required
|
| 491 |
|
|
; add 2 if I_flag = 2
|
| 492 |
|
|
000a = zero_page = $a
|
| 493 |
|
|
;data_segment memory start address, $5B (91) consecutive Bytes required
|
| 494 |
|
|
0200 = data_segment = $200
|
| 495 |
|
|
if (data_segment & $ff) != 0
|
| 496 |
|
|
ERROR ERROR ERROR low byte of data_segment MUST be $00 !!
|
| 497 |
|
|
endif
|
| 498 |
|
|
;code_segment memory start address, 13kB of consecutive space required
|
| 499 |
|
|
; add 2.5 kB if I_flag = 2
|
| 500 |
|
|
;parts of the code are self modifying and must reside in RAM
|
| 501 |
|
|
0400 = code_segment = $400
|
| 502 |
|
|
;RAM integrity test option. Checks for undesired RAM writes.
|
| 503 |
|
|
;set lowest non RAM or RAM mirror address page (-1=disable, 0=64k, $40=16k)
|
| 504 |
|
|
;leave disabled if a monitor, OS or background interrupt is allowed to alter RAM
|
| 505 |
|
|
ffff = ram_top = -1
|
| 506 |
|
|
;
|
| 507 |
|
|
;Skip to ADC/SBC tests
|
| 508 |
|
|
;
|
| 509 |
|
|
0000 = skip_part_1 = 0
|
| 510 |
|
|
;
|
| 511 |
|
|
;Skip Binary or Decimal mode ADC/SBC instruction tests
|
| 512 |
|
|
;
|
| 513 |
|
|
0001 = skip_bin_test = 1
|
| 514 |
|
|
0001 = skip_dec_test = 1
|
| 515 |
|
|
|
| 516 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 10
|
| 517 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 518 |
|
|
|
| 519 |
|
|
noopt ;do not take shortcuts
|
| 520 |
|
|
|
| 521 |
|
|
;macros for error & success traps to allow user modification
|
| 522 |
|
|
;example:
|
| 523 |
|
|
;trap macro
|
| 524 |
|
|
; jsr my_error_handler
|
| 525 |
|
|
; endm
|
| 526 |
|
|
;trap_eq macro
|
| 527 |
|
|
; bne skip\?
|
| 528 |
|
|
; trap ;failed equal (zero)
|
| 529 |
|
|
;skip\?
|
| 530 |
|
|
; endm
|
| 531 |
|
|
;
|
| 532 |
|
|
; my_error_handler should pop the calling address from the stack and report it.
|
| 533 |
|
|
; putting larger portions of code (more than 3 bytes) inside the trap macro
|
| 534 |
|
|
; may lead to branch range problems for some tests.
|
| 535 |
|
|
trap macro
|
| 536 |
|
|
jmp * ;failed anyway
|
| 537 |
|
|
endm
|
| 538 |
|
|
trap_eq macro
|
| 539 |
|
|
beq * ;failed equal (zero)
|
| 540 |
|
|
endm
|
| 541 |
|
|
trap_ne macro
|
| 542 |
|
|
bne * ;failed not equal (non zero)
|
| 543 |
|
|
endm
|
| 544 |
|
|
trap_cs macro
|
| 545 |
|
|
bcs * ;failed carry set
|
| 546 |
|
|
endm
|
| 547 |
|
|
trap_cc macro
|
| 548 |
|
|
bcc * ;failed carry clear
|
| 549 |
|
|
endm
|
| 550 |
|
|
trap_mi macro
|
| 551 |
|
|
bmi * ;failed minus (bit 7 set)
|
| 552 |
|
|
endm
|
| 553 |
|
|
trap_pl macro
|
| 554 |
|
|
bpl * ;failed plus (bit 7 clear)
|
| 555 |
|
|
endm
|
| 556 |
|
|
trap_vs macro
|
| 557 |
|
|
bvs * ;failed overflow set
|
| 558 |
|
|
endm
|
| 559 |
|
|
trap_vc macro
|
| 560 |
|
|
bvc * ;failed overflow clear
|
| 561 |
|
|
endm
|
| 562 |
|
|
success macro
|
| 563 |
|
|
jmp * ;test passed, no errors
|
| 564 |
|
|
endm
|
| 565 |
|
|
|
| 566 |
|
|
|
| 567 |
|
|
0001 = carry equ %00000001 ;flag bits in status
|
| 568 |
|
|
0002 = zero equ %00000010
|
| 569 |
|
|
0004 = intdis equ %00000100
|
| 570 |
|
|
0008 = decmode equ %00001000
|
| 571 |
|
|
0010 = break equ %00010000
|
| 572 |
|
|
0020 = reserv equ %00100000
|
| 573 |
|
|
0040 = overfl equ %01000000
|
| 574 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 11
|
| 575 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 576 |
|
|
|
| 577 |
|
|
0080 = minus equ %10000000
|
| 578 |
|
|
|
| 579 |
|
|
0001 = fc equ carry
|
| 580 |
|
|
0002 = fz equ zero
|
| 581 |
|
|
0003 = fzc equ carry+zero
|
| 582 |
|
|
0040 = fv equ overfl
|
| 583 |
|
|
0042 = fvz equ overfl+zero
|
| 584 |
|
|
0080 = fn equ minus
|
| 585 |
|
|
0081 = fnc equ minus+carry
|
| 586 |
|
|
0082 = fnz equ minus+zero
|
| 587 |
|
|
0083 = fnzc equ minus+zero+carry
|
| 588 |
|
|
00c0 = fnv equ minus+overfl
|
| 589 |
|
|
|
| 590 |
|
|
0030 = fao equ break+reserv ;bits always on after PHP, BRK
|
| 591 |
|
|
0034 = fai equ fao+intdis ;+ forced interrupt disable
|
| 592 |
|
|
00ff = m8 equ $ff ;8 bit mask
|
| 593 |
|
|
00fb = m8i equ $ff&~intdis ;8 bit mask - interrupt disable
|
| 594 |
|
|
|
| 595 |
|
|
;macros to allow masking of status bits.
|
| 596 |
|
|
;masking of interrupt enable/disable on load and compare
|
| 597 |
|
|
;masking of always on bits after PHP or BRK (unused & break) on compare
|
| 598 |
|
|
if I_flag = 0
|
| 599 |
|
|
load_flag macro
|
| 600 |
|
|
lda #\1&m8i ;force enable interrupts (mask I)
|
| 601 |
|
|
endm
|
| 602 |
|
|
cmp_flag macro
|
| 603 |
|
|
cmp #(\1|fao)&m8i ;I_flag is always enabled + always on bits
|
| 604 |
|
|
endm
|
| 605 |
|
|
eor_flag macro
|
| 606 |
|
|
eor #(\1&m8i|fao) ;mask I, invert expected flags + always on bits
|
| 607 |
|
|
endm
|
| 608 |
|
|
endif
|
| 609 |
|
|
if I_flag = 1
|
| 610 |
|
|
load_flag macro
|
| 611 |
|
|
lda #\1|intdis ;force disable interrupts
|
| 612 |
|
|
endm
|
| 613 |
|
|
cmp_flag macro
|
| 614 |
|
|
cmp #(\1|fai)&m8 ;I_flag is always disabled + always on bits
|
| 615 |
|
|
endm
|
| 616 |
|
|
eor_flag macro
|
| 617 |
|
|
eor #(\1|fai) ;invert expected flags + always on bits + I
|
| 618 |
|
|
endm
|
| 619 |
|
|
endif
|
| 620 |
|
|
if I_flag = 2
|
| 621 |
|
|
load_flag macro
|
| 622 |
|
|
lda #\1
|
| 623 |
|
|
ora flag_I_on ;restore I-flag
|
| 624 |
|
|
and flag_I_off
|
| 625 |
|
|
endm
|
| 626 |
|
|
cmp_flag macro
|
| 627 |
|
|
eor flag_I_on ;I_flag is never changed
|
| 628 |
|
|
cmp #(\1|fao)&m8i ;expected flags + always on bits, mask I
|
| 629 |
|
|
endm
|
| 630 |
|
|
eor_flag macro
|
| 631 |
|
|
eor flag_I_on ;I_flag is never changed
|
| 632 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 12
|
| 633 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 634 |
|
|
|
| 635 |
|
|
eor #(\1&m8i|fao) ;mask I, invert expected flags + always on bits
|
| 636 |
|
|
endm
|
| 637 |
|
|
endif
|
| 638 |
|
|
if I_flag = 3
|
| 639 |
|
|
load_flag macro
|
| 640 |
|
|
lda #\1 ;allow test to change I-flag (no mask)
|
| 641 |
|
|
endm
|
| 642 |
|
|
cmp_flag macro
|
| 643 |
|
|
cmp #(\1|fao)&m8 ;expected flags + always on bits
|
| 644 |
|
|
endm
|
| 645 |
|
|
eor_flag macro
|
| 646 |
|
|
eor #\1|fao ;invert expected flags + always on bits
|
| 647 |
|
|
endm
|
| 648 |
|
|
endif
|
| 649 |
|
|
|
| 650 |
|
|
;macros to set (register|memory|zeropage) & status
|
| 651 |
|
|
set_stat macro ;setting flags in the processor status register
|
| 652 |
|
|
load_flag \1
|
| 653 |
|
|
pha ;use stack to load status
|
| 654 |
|
|
plp
|
| 655 |
|
|
endm
|
| 656 |
|
|
|
| 657 |
|
|
set_a macro ;precharging accu & status
|
| 658 |
|
|
load_flag \2
|
| 659 |
|
|
pha ;use stack to load status
|
| 660 |
|
|
lda #\1 ;precharge accu
|
| 661 |
|
|
plp
|
| 662 |
|
|
endm
|
| 663 |
|
|
|
| 664 |
|
|
set_x macro ;precharging index & status
|
| 665 |
|
|
load_flag \2
|
| 666 |
|
|
pha ;use stack to load status
|
| 667 |
|
|
ldx #\1 ;precharge index x
|
| 668 |
|
|
plp
|
| 669 |
|
|
endm
|
| 670 |
|
|
|
| 671 |
|
|
set_y macro ;precharging index & status
|
| 672 |
|
|
load_flag \2
|
| 673 |
|
|
pha ;use stack to load status
|
| 674 |
|
|
ldy #\1 ;precharge index y
|
| 675 |
|
|
plp
|
| 676 |
|
|
endm
|
| 677 |
|
|
|
| 678 |
|
|
set_ax macro ;precharging indexed accu & immediate status
|
| 679 |
|
|
load_flag \2
|
| 680 |
|
|
pha ;use stack to load status
|
| 681 |
|
|
lda \1,x ;precharge accu
|
| 682 |
|
|
plp
|
| 683 |
|
|
endm
|
| 684 |
|
|
|
| 685 |
|
|
set_ay macro ;precharging indexed accu & immediate status
|
| 686 |
|
|
load_flag \2
|
| 687 |
|
|
pha ;use stack to load status
|
| 688 |
|
|
lda \1,y ;precharge accu
|
| 689 |
|
|
plp
|
| 690 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 13
|
| 691 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 692 |
|
|
|
| 693 |
|
|
endm
|
| 694 |
|
|
|
| 695 |
|
|
set_z macro ;precharging indexed zp & immediate status
|
| 696 |
|
|
load_flag \2
|
| 697 |
|
|
pha ;use stack to load status
|
| 698 |
|
|
lda \1,x ;load to zeropage
|
| 699 |
|
|
sta zpt
|
| 700 |
|
|
plp
|
| 701 |
|
|
endm
|
| 702 |
|
|
|
| 703 |
|
|
set_zx macro ;precharging zp,x & immediate status
|
| 704 |
|
|
load_flag \2
|
| 705 |
|
|
pha ;use stack to load status
|
| 706 |
|
|
lda \1,x ;load to indexed zeropage
|
| 707 |
|
|
sta zpt,x
|
| 708 |
|
|
plp
|
| 709 |
|
|
endm
|
| 710 |
|
|
|
| 711 |
|
|
set_abs macro ;precharging indexed memory & immediate status
|
| 712 |
|
|
load_flag \2
|
| 713 |
|
|
pha ;use stack to load status
|
| 714 |
|
|
lda \1,x ;load to memory
|
| 715 |
|
|
sta abst
|
| 716 |
|
|
plp
|
| 717 |
|
|
endm
|
| 718 |
|
|
|
| 719 |
|
|
set_absx macro ;precharging abs,x & immediate status
|
| 720 |
|
|
load_flag \2
|
| 721 |
|
|
pha ;use stack to load status
|
| 722 |
|
|
lda \1,x ;load to indexed memory
|
| 723 |
|
|
sta abst,x
|
| 724 |
|
|
plp
|
| 725 |
|
|
endm
|
| 726 |
|
|
|
| 727 |
|
|
;macros to test (register|memory|zeropage) & status & (mask)
|
| 728 |
|
|
tst_stat macro ;testing flags in the processor status register
|
| 729 |
|
|
php ;save status
|
| 730 |
|
|
php ;use stack to retrieve status
|
| 731 |
|
|
pla
|
| 732 |
|
|
cmp_flag \1
|
| 733 |
|
|
trap_ne
|
| 734 |
|
|
plp ;restore status
|
| 735 |
|
|
endm
|
| 736 |
|
|
|
| 737 |
|
|
tst_a macro ;testing result in accu & flags
|
| 738 |
|
|
php ;save flags
|
| 739 |
|
|
php
|
| 740 |
|
|
cmp #\1 ;test result
|
| 741 |
|
|
trap_ne
|
| 742 |
|
|
pla ;load status
|
| 743 |
|
|
cmp_flag \2
|
| 744 |
|
|
trap_ne
|
| 745 |
|
|
plp ;restore status
|
| 746 |
|
|
endm
|
| 747 |
|
|
|
| 748 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 14
|
| 749 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 750 |
|
|
|
| 751 |
|
|
tst_x macro ;testing result in x index & flags
|
| 752 |
|
|
php ;save flags
|
| 753 |
|
|
php
|
| 754 |
|
|
cpx #\1 ;test result
|
| 755 |
|
|
trap_ne
|
| 756 |
|
|
pla ;load status
|
| 757 |
|
|
cmp_flag \2
|
| 758 |
|
|
trap_ne
|
| 759 |
|
|
plp ;restore status
|
| 760 |
|
|
endm
|
| 761 |
|
|
|
| 762 |
|
|
tst_y macro ;testing result in y index & flags
|
| 763 |
|
|
php ;save flags
|
| 764 |
|
|
php
|
| 765 |
|
|
cpy #\1 ;test result
|
| 766 |
|
|
trap_ne
|
| 767 |
|
|
pla ;load status
|
| 768 |
|
|
cmp_flag \2
|
| 769 |
|
|
trap_ne
|
| 770 |
|
|
plp ;restore status
|
| 771 |
|
|
endm
|
| 772 |
|
|
|
| 773 |
|
|
tst_ax macro ;indexed testing result in accu & flags
|
| 774 |
|
|
php ;save flags
|
| 775 |
|
|
cmp \1,x ;test result
|
| 776 |
|
|
trap_ne
|
| 777 |
|
|
pla ;load status
|
| 778 |
|
|
eor_flag \3
|
| 779 |
|
|
cmp \2,x ;test flags
|
| 780 |
|
|
trap_ne ;
|
| 781 |
|
|
endm
|
| 782 |
|
|
|
| 783 |
|
|
tst_ay macro ;indexed testing result in accu & flags
|
| 784 |
|
|
php ;save flags
|
| 785 |
|
|
cmp \1,y ;test result
|
| 786 |
|
|
trap_ne ;
|
| 787 |
|
|
pla ;load status
|
| 788 |
|
|
eor_flag \3
|
| 789 |
|
|
cmp \2,y ;test flags
|
| 790 |
|
|
trap_ne
|
| 791 |
|
|
endm
|
| 792 |
|
|
|
| 793 |
|
|
tst_z macro ;indexed testing result in zp & flags
|
| 794 |
|
|
php ;save flags
|
| 795 |
|
|
lda zpt
|
| 796 |
|
|
cmp \1,x ;test result
|
| 797 |
|
|
trap_ne
|
| 798 |
|
|
pla ;load status
|
| 799 |
|
|
eor_flag \3
|
| 800 |
|
|
cmp \2,x ;test flags
|
| 801 |
|
|
trap_ne
|
| 802 |
|
|
endm
|
| 803 |
|
|
|
| 804 |
|
|
tst_zx macro ;testing result in zp,x & flags
|
| 805 |
|
|
php ;save flags
|
| 806 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 15
|
| 807 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 808 |
|
|
|
| 809 |
|
|
lda zpt,x
|
| 810 |
|
|
cmp \1,x ;test result
|
| 811 |
|
|
trap_ne
|
| 812 |
|
|
pla ;load status
|
| 813 |
|
|
eor_flag \3
|
| 814 |
|
|
cmp \2,x ;test flags
|
| 815 |
|
|
trap_ne
|
| 816 |
|
|
endm
|
| 817 |
|
|
|
| 818 |
|
|
tst_abs macro ;indexed testing result in memory & flags
|
| 819 |
|
|
php ;save flags
|
| 820 |
|
|
lda abst
|
| 821 |
|
|
cmp \1,x ;test result
|
| 822 |
|
|
trap_ne
|
| 823 |
|
|
pla ;load status
|
| 824 |
|
|
eor_flag \3
|
| 825 |
|
|
cmp \2,x ;test flags
|
| 826 |
|
|
trap_ne
|
| 827 |
|
|
endm
|
| 828 |
|
|
|
| 829 |
|
|
tst_absx macro ;testing result in abs,x & flags
|
| 830 |
|
|
php ;save flags
|
| 831 |
|
|
lda abst,x
|
| 832 |
|
|
cmp \1,x ;test result
|
| 833 |
|
|
trap_ne
|
| 834 |
|
|
pla ;load status
|
| 835 |
|
|
eor_flag \3
|
| 836 |
|
|
cmp \2,x ;test flags
|
| 837 |
|
|
trap_ne
|
| 838 |
|
|
endm
|
| 839 |
|
|
|
| 840 |
|
|
; RAM integrity test
|
| 841 |
|
|
; verifies that none of the previous tests has altered RAM outside of the
|
| 842 |
|
|
; designated write areas.
|
| 843 |
|
|
; uses zpt word as indirect pointer, zpt+2 word as checksum
|
| 844 |
|
|
if ram_top > -1
|
| 845 |
|
|
check_ram macro
|
| 846 |
|
|
cld
|
| 847 |
|
|
lda #0
|
| 848 |
|
|
sta zpt ;set low byte of indirect pointer
|
| 849 |
|
|
sta zpt+3 ;checksum high byte
|
| 850 |
|
|
sta range_adr ;reset self modifying code
|
| 851 |
|
|
sta tandi1
|
| 852 |
|
|
sta tandi2
|
| 853 |
|
|
sta teori1
|
| 854 |
|
|
sta teori2
|
| 855 |
|
|
sta torai1
|
| 856 |
|
|
sta torai2
|
| 857 |
|
|
sta chkdadi
|
| 858 |
|
|
sta chkdsbi
|
| 859 |
|
|
sta chkadi
|
| 860 |
|
|
sta chksbi
|
| 861 |
|
|
clc
|
| 862 |
|
|
ldx #zp_bss-zero_page ;zeropage - write test area
|
| 863 |
|
|
ccs3\? adc zero_page,x
|
| 864 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 16
|
| 865 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 866 |
|
|
|
| 867 |
|
|
bcc ccs2\?
|
| 868 |
|
|
inc zpt+3 ;carry to high byte
|
| 869 |
|
|
clc
|
| 870 |
|
|
ccs2\? inx
|
| 871 |
|
|
bne ccs3\?
|
| 872 |
|
|
ldx #hi(data_segment) ;set high byte of indirect pointer
|
| 873 |
|
|
stx zpt+1
|
| 874 |
|
|
ldy #lo(data_bss) ;data after write test area
|
| 875 |
|
|
ccs5\? adc (zpt),y
|
| 876 |
|
|
bcc ccs4\?
|
| 877 |
|
|
inc zpt+3 ;carry to high byte
|
| 878 |
|
|
clc
|
| 879 |
|
|
ccs4\? iny
|
| 880 |
|
|
bne ccs5\?
|
| 881 |
|
|
inx ;advance RAM high address
|
| 882 |
|
|
stx zpt+1
|
| 883 |
|
|
cpx #ram_top
|
| 884 |
|
|
bne ccs5\?
|
| 885 |
|
|
sta zpt+2 ;checksum low is
|
| 886 |
|
|
cmp ram_chksm ;checksum low expected
|
| 887 |
|
|
trap_ne ;checksum mismatch
|
| 888 |
|
|
lda zpt+3 ;checksum high is
|
| 889 |
|
|
cmp ram_chksm+1 ;checksum high expected
|
| 890 |
|
|
trap_ne ;checksum mismatch
|
| 891 |
|
|
endm
|
| 892 |
|
|
else
|
| 893 |
|
|
check_ram macro
|
| 894 |
|
|
;RAM check disabled - RAM size not set
|
| 895 |
|
|
endm
|
| 896 |
|
|
endif
|
| 897 |
|
|
|
| 898 |
|
|
next_test macro ;make sure, tests don't jump the fence
|
| 899 |
|
|
lda test_case ;previous test
|
| 900 |
|
|
cmp #test_num
|
| 901 |
|
|
trap_ne ;test is out of sequence
|
| 902 |
|
|
test_num = test_num + 1
|
| 903 |
|
|
lda #test_num ;*** this tests' number
|
| 904 |
|
|
sta test_case
|
| 905 |
|
|
;check_ram ;uncomment to find altered RAM after each test
|
| 906 |
|
|
endm
|
| 907 |
|
|
|
| 908 |
|
|
if load_data_direct = 1
|
| 909 |
|
|
data
|
| 910 |
|
|
else
|
| 911 |
|
|
bss ;uninitialized segment, copy of data at end of code!
|
| 912 |
|
|
endif
|
| 913 |
|
|
;
|
| 914 |
|
|
; org zero_page
|
| 915 |
|
|
0000 = org 0
|
| 916 |
|
|
0000 : 00000000000000.. ds zero_page
|
| 917 |
|
|
;break test interrupt save
|
| 918 |
|
|
000a : 00 irq_a ds 1 ;a register
|
| 919 |
|
|
000b : 00 irq_x ds 1 ;x register
|
| 920 |
|
|
if I_flag = 2
|
| 921 |
|
|
;masking for I bit in status
|
| 922 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 17
|
| 923 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 924 |
|
|
|
| 925 |
|
|
flag_I_on ds 1 ;or mask to load flags
|
| 926 |
|
|
flag_I_off ds 1 ;and mask to load flags
|
| 927 |
|
|
endif
|
| 928 |
|
|
000c : zpt ;5 bytes store/modify test area
|
| 929 |
|
|
;add/subtract operand generation and result/flag prediction
|
| 930 |
|
|
000c : 00 adfc ds 1 ;carry flag before op
|
| 931 |
|
|
000d : 00 ad1 ds 1 ;operand 1 - accumulator
|
| 932 |
|
|
000e : 00 ad2 ds 1 ;operand 2 - memory / immediate
|
| 933 |
|
|
000f : 00 adrl ds 1 ;expected result bits 0-7
|
| 934 |
|
|
0010 : 00 adrh ds 1 ;expected result bit 8 (carry)
|
| 935 |
|
|
0011 : 00 adrf ds 1 ;expected flags NV0000ZC (-V in decimal mode)
|
| 936 |
|
|
0012 : 00 sb2 ds 1 ;operand 2 complemented for subtract
|
| 937 |
|
|
0013 : zp_bss
|
| 938 |
|
|
0013 : c3824100 zp1 db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSR
|
| 939 |
|
|
0017 : 7f zp7f db $7f ;test pattern for compare
|
| 940 |
|
|
;logical zeropage operands
|
| 941 |
|
|
0018 : 001f7180 zpOR db 0,$1f,$71,$80 ;test pattern for OR
|
| 942 |
|
|
001c : 0fff7f80 zpAN db $0f,$ff,$7f,$80 ;test pattern for AND
|
| 943 |
|
|
0020 : ff0f8f8f zpEO db $ff,$0f,$8f,$8f ;test pattern for EOR
|
| 944 |
|
|
;indirect addressing pointers
|
| 945 |
|
|
0024 : 0802 ind1 dw abs1 ;indirect pointer to pattern in absolute memory
|
| 946 |
|
|
0026 : 0902 dw abs1+1
|
| 947 |
|
|
0028 : 0a02 dw abs1+2
|
| 948 |
|
|
002a : 0b02 dw abs1+3
|
| 949 |
|
|
002c : 0c02 dw abs7f
|
| 950 |
|
|
002e : 1001 inw1 dw abs1-$f8 ;indirect pointer for wrap-test pattern
|
| 951 |
|
|
0030 : 0302 indt dw abst ;indirect pointer to store area in absolute memory
|
| 952 |
|
|
0032 : 0402 dw abst+1
|
| 953 |
|
|
0034 : 0502 dw abst+2
|
| 954 |
|
|
0036 : 0602 dw abst+3
|
| 955 |
|
|
0038 : 0b01 inwt dw abst-$f8 ;indirect pointer for wrap-test store
|
| 956 |
|
|
003a : 3f02 indAN dw absAN ;indirect pointer to AND pattern in absolute memory
|
| 957 |
|
|
003c : 4002 dw absAN+1
|
| 958 |
|
|
003e : 4102 dw absAN+2
|
| 959 |
|
|
0040 : 4202 dw absAN+3
|
| 960 |
|
|
0042 : 4302 indEO dw absEO ;indirect pointer to EOR pattern in absolute memory
|
| 961 |
|
|
0044 : 4402 dw absEO+1
|
| 962 |
|
|
0046 : 4502 dw absEO+2
|
| 963 |
|
|
0048 : 4602 dw absEO+3
|
| 964 |
|
|
004a : 3b02 indOR dw absOR ;indirect pointer to OR pattern in absolute memory
|
| 965 |
|
|
004c : 3c02 dw absOR+1
|
| 966 |
|
|
004e : 3d02 dw absOR+2
|
| 967 |
|
|
0050 : 3e02 dw absOR+3
|
| 968 |
|
|
;add/subtract indirect pointers
|
| 969 |
|
|
0052 : 0302 adi2 dw ada2 ;indirect pointer to operand 2 in absolute memory
|
| 970 |
|
|
0054 : 0402 sbi2 dw sba2 ;indirect pointer to complemented operand 2 (SBC)
|
| 971 |
|
|
0056 : 0401 adiy2 dw ada2-$ff ;with offset for indirect indexed
|
| 972 |
|
|
0058 : 0501 sbiy2 dw sba2-$ff
|
| 973 |
|
|
005a : zp_bss_end
|
| 974 |
|
|
|
| 975 |
|
|
0200 = org data_segment
|
| 976 |
|
|
0200 : 00 test_case ds 1 ;current test number
|
| 977 |
|
|
0201 : 0000 ram_chksm ds 2 ;checksum for RAM integrity test
|
| 978 |
|
|
;add/subtract operand copy - abs tests write area
|
| 979 |
|
|
0203 : abst ;5 bytes store/modify test area
|
| 980 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 18
|
| 981 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 982 |
|
|
|
| 983 |
|
|
0203 : 00 ada2 ds 1 ;operand 2
|
| 984 |
|
|
0204 : 00 sba2 ds 1 ;operand 2 complemented for subtract
|
| 985 |
|
|
0205 : 000000 ds 3 ;fill remaining bytes
|
| 986 |
|
|
0208 : data_bss
|
| 987 |
|
|
0208 : c3824100 abs1 db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSR
|
| 988 |
|
|
020c : 7f abs7f db $7f ;test pattern for compare
|
| 989 |
|
|
;loads
|
| 990 |
|
|
020d : 80800002 fLDx db fn,fn,0,fz ;expected flags for load
|
| 991 |
|
|
;shifts
|
| 992 |
|
|
0211 : rASL ;expected result ASL & ROL -carry
|
| 993 |
|
|
0211 : 86048200 rROL db $86,$04,$82,0 ; "
|
| 994 |
|
|
0215 : 87058301 rROLc db $87,$05,$83,1 ;expected result ROL +carry
|
| 995 |
|
|
0219 : rLSR ;expected result LSR & ROR -carry
|
| 996 |
|
|
0219 : 61412000 rROR db $61,$41,$20,0 ; "
|
| 997 |
|
|
021d : e1c1a080 rRORc db $e1,$c1,$a0,$80 ;expected result ROR +carry
|
| 998 |
|
|
0221 : fASL ;expected flags for shifts
|
| 999 |
|
|
0221 : 81018002 fROL db fnc,fc,fn,fz ;no carry in
|
| 1000 |
|
|
0225 : 81018000 fROLc db fnc,fc,fn,0 ;carry in
|
| 1001 |
|
|
0229 : fLSR
|
| 1002 |
|
|
0229 : 01000102 fROR db fc,0,fc,fz ;no carry in
|
| 1003 |
|
|
022d : 81808180 fRORc db fnc,fn,fnc,fn ;carry in
|
| 1004 |
|
|
;increments (decrements)
|
| 1005 |
|
|
0231 : 7f80ff0001 rINC db $7f,$80,$ff,0,1 ;expected result for INC/DEC
|
| 1006 |
|
|
0236 : 0080800200 fINC db 0,fn,fn,fz,0 ;expected flags for INC/DEC
|
| 1007 |
|
|
;logical memory operand
|
| 1008 |
|
|
023b : 001f7180 absOR db 0,$1f,$71,$80 ;test pattern for OR
|
| 1009 |
|
|
023f : 0fff7f80 absAN db $0f,$ff,$7f,$80 ;test pattern for AND
|
| 1010 |
|
|
0243 : ff0f8f8f absEO db $ff,$0f,$8f,$8f ;test pattern for EOR
|
| 1011 |
|
|
;logical accu operand
|
| 1012 |
|
|
0247 : 00f11f00 absORa db 0,$f1,$1f,0 ;test pattern for OR
|
| 1013 |
|
|
024b : f0ffffff absANa db $f0,$ff,$ff,$ff ;test pattern for AND
|
| 1014 |
|
|
024f : fff0f00f absEOa db $ff,$f0,$f0,$0f ;test pattern for EOR
|
| 1015 |
|
|
;logical results
|
| 1016 |
|
|
0253 : 00ff7f80 absrlo db 0,$ff,$7f,$80
|
| 1017 |
|
|
0257 : 02800080 absflo db fz,fn,0,fn
|
| 1018 |
|
|
025b : data_bss_end
|
| 1019 |
|
|
|
| 1020 |
|
|
|
| 1021 |
|
|
code
|
| 1022 |
|
|
0400 = org code_segment
|
| 1023 |
|
|
0400 : d8 [ 2] start cld
|
| 1024 |
|
|
0401 : a900 [ 2] lda #0 ;*** test 0 = initialize
|
| 1025 |
|
|
0403 : 8d0002 [ 4] sta test_case
|
| 1026 |
|
|
0000 = test_num = 0
|
| 1027 |
|
|
|
| 1028 |
|
|
;stop interrupts before initializing BSS
|
| 1029 |
|
|
if I_flag = 1
|
| 1030 |
|
|
sei
|
| 1031 |
|
|
endif
|
| 1032 |
|
|
|
| 1033 |
|
|
;initialize BSS segment
|
| 1034 |
|
|
if load_data_direct != 1
|
| 1035 |
|
|
ldx #zp_end-zp_init-1
|
| 1036 |
|
|
ld_zp lda zp_init,x
|
| 1037 |
|
|
sta zp_bss,x
|
| 1038 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 19
|
| 1039 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1040 |
|
|
|
| 1041 |
|
|
dex
|
| 1042 |
|
|
bpl ld_zp
|
| 1043 |
|
|
ldx #data_end-data_init-1
|
| 1044 |
|
|
ld_data lda data_init,x
|
| 1045 |
|
|
sta data_bss,x
|
| 1046 |
|
|
dex
|
| 1047 |
|
|
bpl ld_data
|
| 1048 |
|
|
if ROM_vectors = 1
|
| 1049 |
|
|
ldx #5
|
| 1050 |
|
|
ld_vect lda vec_init,x
|
| 1051 |
|
|
sta vec_bss,x
|
| 1052 |
|
|
dex
|
| 1053 |
|
|
bpl ld_vect
|
| 1054 |
|
|
endif
|
| 1055 |
|
|
endif
|
| 1056 |
|
|
|
| 1057 |
|
|
;retain status of interrupt flag
|
| 1058 |
|
|
if I_flag = 2
|
| 1059 |
|
|
php
|
| 1060 |
|
|
pla
|
| 1061 |
|
|
and #4 ;isolate flag
|
| 1062 |
|
|
sta flag_I_on ;or mask
|
| 1063 |
|
|
eor #lo(~4) ;reverse
|
| 1064 |
|
|
sta flag_I_off ;and mask
|
| 1065 |
|
|
endif
|
| 1066 |
|
|
|
| 1067 |
|
|
;generate checksum for RAM integrity test
|
| 1068 |
|
|
if ram_top > -1
|
| 1069 |
|
|
lda #0
|
| 1070 |
|
|
sta zpt ;set low byte of indirect pointer
|
| 1071 |
|
|
sta ram_chksm+1 ;checksum high byte
|
| 1072 |
|
|
sta range_adr ;reset self modifying code
|
| 1073 |
|
|
sta tandi1
|
| 1074 |
|
|
sta tandi2
|
| 1075 |
|
|
sta teori1
|
| 1076 |
|
|
sta teori2
|
| 1077 |
|
|
sta torai1
|
| 1078 |
|
|
sta torai2
|
| 1079 |
|
|
sta chkdadi
|
| 1080 |
|
|
sta chkdsbi
|
| 1081 |
|
|
sta chkadi
|
| 1082 |
|
|
sta chksbi
|
| 1083 |
|
|
clc
|
| 1084 |
|
|
ldx #zp_bss-zero_page ;zeropage - write test area
|
| 1085 |
|
|
gcs3 adc zero_page,x
|
| 1086 |
|
|
bcc gcs2
|
| 1087 |
|
|
inc ram_chksm+1 ;carry to high byte
|
| 1088 |
|
|
clc
|
| 1089 |
|
|
gcs2 inx
|
| 1090 |
|
|
bne gcs3
|
| 1091 |
|
|
ldx #hi(data_segment) ;set high byte of indirect pointer
|
| 1092 |
|
|
stx zpt+1
|
| 1093 |
|
|
ldy #lo(data_bss) ;data after write test area
|
| 1094 |
|
|
gcs5 adc (zpt),y
|
| 1095 |
|
|
bcc gcs4
|
| 1096 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 20
|
| 1097 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1098 |
|
|
|
| 1099 |
|
|
inc ram_chksm+1 ;carry to high byte
|
| 1100 |
|
|
clc
|
| 1101 |
|
|
gcs4 iny
|
| 1102 |
|
|
bne gcs5
|
| 1103 |
|
|
inx ;advance RAM high address
|
| 1104 |
|
|
stx zpt+1
|
| 1105 |
|
|
cpx #ram_top
|
| 1106 |
|
|
bne gcs5
|
| 1107 |
|
|
sta ram_chksm ;checksum complete
|
| 1108 |
|
|
endif
|
| 1109 |
|
|
|
| 1110 |
|
|
if skip_part_1 = 1
|
| 1111 |
|
|
jmp bin_test
|
| 1112 |
|
|
endif
|
| 1113 |
|
|
|
| 1114 |
|
|
next_test
|
| 1115 |
|
|
0406 : ad0002 [ 4]> lda test_case ;previous test
|
| 1116 |
|
|
0409 : c900 [ 2]> cmp #test_num
|
| 1117 |
|
|
> trap_ne ;test is out of sequence
|
| 1118 |
|
|
040b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1119 |
|
|
>
|
| 1120 |
|
|
0001 = >test_num = test_num + 1
|
| 1121 |
|
|
040d : a901 [ 2]> lda #test_num ;*** this tests' number
|
| 1122 |
|
|
040f : 8d0002 [ 4]> sta test_case
|
| 1123 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 1124 |
|
|
|
| 1125 |
|
|
|
| 1126 |
|
|
;testing relative addressing with BEQ
|
| 1127 |
|
|
0412 : a0fe [ 2] ldy #$fe ;testing maximum range, not -1/-2 (invalid/self adr)
|
| 1128 |
|
|
0414 : range_loop
|
| 1129 |
|
|
0414 : 88 [ 2] dey ;next relative address
|
| 1130 |
|
|
0415 : 98 [ 2] tya
|
| 1131 |
|
|
0416 : aa [ 2] tax ;precharge count to end of loop
|
| 1132 |
|
|
0417 : 1003 [ 3] bpl range_fw ;calculate relative address
|
| 1133 |
|
|
0419 : 18 [ 2] clc ;avoid branch self or to relative address of branch
|
| 1134 |
|
|
041a : 6902 [ 2] adc #2
|
| 1135 |
|
|
041c : range_fw
|
| 1136 |
|
|
041c : 497f [ 2] eor #$7f ;complement except sign
|
| 1137 |
|
|
041e : 8da504 [ 4] sta range_adr ;load into test target
|
| 1138 |
|
|
0421 : a900 [ 2] lda #0 ;should set zero flag in status register
|
| 1139 |
|
|
0423 : 4ca404 [ 3] jmp range_op
|
| 1140 |
|
|
|
| 1141 |
|
|
;relative address target field with branch under test in the middle
|
| 1142 |
|
|
0426 : ca [ 2] dex ;-128 - max backward
|
| 1143 |
|
|
0427 : ca [ 2] dex
|
| 1144 |
|
|
0428 : ca [ 2] dex
|
| 1145 |
|
|
0429 : ca [ 2] dex
|
| 1146 |
|
|
042a : ca [ 2] dex
|
| 1147 |
|
|
042b : ca [ 2] dex
|
| 1148 |
|
|
042c : ca [ 2] dex
|
| 1149 |
|
|
042d : ca [ 2] dex
|
| 1150 |
|
|
042e : ca [ 2] dex ;-120
|
| 1151 |
|
|
042f : ca [ 2] dex
|
| 1152 |
|
|
0430 : ca [ 2] dex
|
| 1153 |
|
|
0431 : ca [ 2] dex
|
| 1154 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 21
|
| 1155 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1156 |
|
|
|
| 1157 |
|
|
0432 : ca [ 2] dex
|
| 1158 |
|
|
0433 : ca [ 2] dex
|
| 1159 |
|
|
0434 : ca [ 2] dex
|
| 1160 |
|
|
0435 : ca [ 2] dex
|
| 1161 |
|
|
0436 : ca [ 2] dex
|
| 1162 |
|
|
0437 : ca [ 2] dex
|
| 1163 |
|
|
0438 : ca [ 2] dex ;-110
|
| 1164 |
|
|
0439 : ca [ 2] dex
|
| 1165 |
|
|
043a : ca [ 2] dex
|
| 1166 |
|
|
043b : ca [ 2] dex
|
| 1167 |
|
|
043c : ca [ 2] dex
|
| 1168 |
|
|
043d : ca [ 2] dex
|
| 1169 |
|
|
043e : ca [ 2] dex
|
| 1170 |
|
|
043f : ca [ 2] dex
|
| 1171 |
|
|
0440 : ca [ 2] dex
|
| 1172 |
|
|
0441 : ca [ 2] dex
|
| 1173 |
|
|
0442 : ca [ 2] dex ;-100
|
| 1174 |
|
|
0443 : ca [ 2] dex
|
| 1175 |
|
|
0444 : ca [ 2] dex
|
| 1176 |
|
|
0445 : ca [ 2] dex
|
| 1177 |
|
|
0446 : ca [ 2] dex
|
| 1178 |
|
|
0447 : ca [ 2] dex
|
| 1179 |
|
|
0448 : ca [ 2] dex
|
| 1180 |
|
|
0449 : ca [ 2] dex
|
| 1181 |
|
|
044a : ca [ 2] dex
|
| 1182 |
|
|
044b : ca [ 2] dex
|
| 1183 |
|
|
044c : ca [ 2] dex ;-90
|
| 1184 |
|
|
044d : ca [ 2] dex
|
| 1185 |
|
|
044e : ca [ 2] dex
|
| 1186 |
|
|
044f : ca [ 2] dex
|
| 1187 |
|
|
0450 : ca [ 2] dex
|
| 1188 |
|
|
0451 : ca [ 2] dex
|
| 1189 |
|
|
0452 : ca [ 2] dex
|
| 1190 |
|
|
0453 : ca [ 2] dex
|
| 1191 |
|
|
0454 : ca [ 2] dex
|
| 1192 |
|
|
0455 : ca [ 2] dex
|
| 1193 |
|
|
0456 : ca [ 2] dex ;-80
|
| 1194 |
|
|
0457 : ca [ 2] dex
|
| 1195 |
|
|
0458 : ca [ 2] dex
|
| 1196 |
|
|
0459 : ca [ 2] dex
|
| 1197 |
|
|
045a : ca [ 2] dex
|
| 1198 |
|
|
045b : ca [ 2] dex
|
| 1199 |
|
|
045c : ca [ 2] dex
|
| 1200 |
|
|
045d : ca [ 2] dex
|
| 1201 |
|
|
045e : ca [ 2] dex
|
| 1202 |
|
|
045f : ca [ 2] dex
|
| 1203 |
|
|
0460 : ca [ 2] dex ;-70
|
| 1204 |
|
|
0461 : ca [ 2] dex
|
| 1205 |
|
|
0462 : ca [ 2] dex
|
| 1206 |
|
|
0463 : ca [ 2] dex
|
| 1207 |
|
|
0464 : ca [ 2] dex
|
| 1208 |
|
|
0465 : ca [ 2] dex
|
| 1209 |
|
|
0466 : ca [ 2] dex
|
| 1210 |
|
|
0467 : ca [ 2] dex
|
| 1211 |
|
|
0468 : ca [ 2] dex
|
| 1212 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 22
|
| 1213 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1214 |
|
|
|
| 1215 |
|
|
0469 : ca [ 2] dex
|
| 1216 |
|
|
046a : ca [ 2] dex ;-60
|
| 1217 |
|
|
046b : ca [ 2] dex
|
| 1218 |
|
|
046c : ca [ 2] dex
|
| 1219 |
|
|
046d : ca [ 2] dex
|
| 1220 |
|
|
046e : ca [ 2] dex
|
| 1221 |
|
|
046f : ca [ 2] dex
|
| 1222 |
|
|
0470 : ca [ 2] dex
|
| 1223 |
|
|
0471 : ca [ 2] dex
|
| 1224 |
|
|
0472 : ca [ 2] dex
|
| 1225 |
|
|
0473 : ca [ 2] dex
|
| 1226 |
|
|
0474 : ca [ 2] dex ;-50
|
| 1227 |
|
|
0475 : ca [ 2] dex
|
| 1228 |
|
|
0476 : ca [ 2] dex
|
| 1229 |
|
|
0477 : ca [ 2] dex
|
| 1230 |
|
|
0478 : ca [ 2] dex
|
| 1231 |
|
|
0479 : ca [ 2] dex
|
| 1232 |
|
|
047a : ca [ 2] dex
|
| 1233 |
|
|
047b : ca [ 2] dex
|
| 1234 |
|
|
047c : ca [ 2] dex
|
| 1235 |
|
|
047d : ca [ 2] dex
|
| 1236 |
|
|
047e : ca [ 2] dex ;-40
|
| 1237 |
|
|
047f : ca [ 2] dex
|
| 1238 |
|
|
0480 : ca [ 2] dex
|
| 1239 |
|
|
0481 : ca [ 2] dex
|
| 1240 |
|
|
0482 : ca [ 2] dex
|
| 1241 |
|
|
0483 : ca [ 2] dex
|
| 1242 |
|
|
0484 : ca [ 2] dex
|
| 1243 |
|
|
0485 : ca [ 2] dex
|
| 1244 |
|
|
0486 : ca [ 2] dex
|
| 1245 |
|
|
0487 : ca [ 2] dex
|
| 1246 |
|
|
0488 : ca [ 2] dex ;-30
|
| 1247 |
|
|
0489 : ca [ 2] dex
|
| 1248 |
|
|
048a : ca [ 2] dex
|
| 1249 |
|
|
048b : ca [ 2] dex
|
| 1250 |
|
|
048c : ca [ 2] dex
|
| 1251 |
|
|
048d : ca [ 2] dex
|
| 1252 |
|
|
048e : ca [ 2] dex
|
| 1253 |
|
|
048f : ca [ 2] dex
|
| 1254 |
|
|
0490 : ca [ 2] dex
|
| 1255 |
|
|
0491 : ca [ 2] dex
|
| 1256 |
|
|
0492 : ca [ 2] dex ;-20
|
| 1257 |
|
|
0493 : ca [ 2] dex
|
| 1258 |
|
|
0494 : ca [ 2] dex
|
| 1259 |
|
|
0495 : ca [ 2] dex
|
| 1260 |
|
|
0496 : ca [ 2] dex
|
| 1261 |
|
|
0497 : ca [ 2] dex
|
| 1262 |
|
|
0498 : ca [ 2] dex
|
| 1263 |
|
|
0499 : ca [ 2] dex
|
| 1264 |
|
|
049a : ca [ 2] dex
|
| 1265 |
|
|
049b : ca [ 2] dex
|
| 1266 |
|
|
049c : ca [ 2] dex ;-10
|
| 1267 |
|
|
049d : ca [ 2] dex
|
| 1268 |
|
|
049e : ca [ 2] dex
|
| 1269 |
|
|
049f : ca [ 2] dex
|
| 1270 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 23
|
| 1271 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1272 |
|
|
|
| 1273 |
|
|
04a0 : ca [ 2] dex
|
| 1274 |
|
|
04a1 : ca [ 2] dex
|
| 1275 |
|
|
04a2 : ca [ 2] dex
|
| 1276 |
|
|
04a3 : ca [ 2] dex ;-3
|
| 1277 |
|
|
04a4 : range_op ;test target with zero flag=0, z=1 if previous dex
|
| 1278 |
|
|
04a5 = range_adr = *+1 ;modifiable relative address
|
| 1279 |
|
|
04a4 : f03e [ 3] beq *+64 ;if called without modification
|
| 1280 |
|
|
04a6 : ca [ 2] dex ;+0
|
| 1281 |
|
|
04a7 : ca [ 2] dex
|
| 1282 |
|
|
04a8 : ca [ 2] dex
|
| 1283 |
|
|
04a9 : ca [ 2] dex
|
| 1284 |
|
|
04aa : ca [ 2] dex
|
| 1285 |
|
|
04ab : ca [ 2] dex
|
| 1286 |
|
|
04ac : ca [ 2] dex
|
| 1287 |
|
|
04ad : ca [ 2] dex
|
| 1288 |
|
|
04ae : ca [ 2] dex
|
| 1289 |
|
|
04af : ca [ 2] dex
|
| 1290 |
|
|
04b0 : ca [ 2] dex ;+10
|
| 1291 |
|
|
04b1 : ca [ 2] dex
|
| 1292 |
|
|
04b2 : ca [ 2] dex
|
| 1293 |
|
|
04b3 : ca [ 2] dex
|
| 1294 |
|
|
04b4 : ca [ 2] dex
|
| 1295 |
|
|
04b5 : ca [ 2] dex
|
| 1296 |
|
|
04b6 : ca [ 2] dex
|
| 1297 |
|
|
04b7 : ca [ 2] dex
|
| 1298 |
|
|
04b8 : ca [ 2] dex
|
| 1299 |
|
|
04b9 : ca [ 2] dex
|
| 1300 |
|
|
04ba : ca [ 2] dex ;+20
|
| 1301 |
|
|
04bb : ca [ 2] dex
|
| 1302 |
|
|
04bc : ca [ 2] dex
|
| 1303 |
|
|
04bd : ca [ 2] dex
|
| 1304 |
|
|
04be : ca [ 2] dex
|
| 1305 |
|
|
04bf : ca [ 2] dex
|
| 1306 |
|
|
04c0 : ca [ 2] dex
|
| 1307 |
|
|
04c1 : ca [ 2] dex
|
| 1308 |
|
|
04c2 : ca [ 2] dex
|
| 1309 |
|
|
04c3 : ca [ 2] dex
|
| 1310 |
|
|
04c4 : ca [ 2] dex ;+30
|
| 1311 |
|
|
04c5 : ca [ 2] dex
|
| 1312 |
|
|
04c6 : ca [ 2] dex
|
| 1313 |
|
|
04c7 : ca [ 2] dex
|
| 1314 |
|
|
04c8 : ca [ 2] dex
|
| 1315 |
|
|
04c9 : ca [ 2] dex
|
| 1316 |
|
|
04ca : ca [ 2] dex
|
| 1317 |
|
|
04cb : ca [ 2] dex
|
| 1318 |
|
|
04cc : ca [ 2] dex
|
| 1319 |
|
|
04cd : ca [ 2] dex
|
| 1320 |
|
|
04ce : ca [ 2] dex ;+40
|
| 1321 |
|
|
04cf : ca [ 2] dex
|
| 1322 |
|
|
04d0 : ca [ 2] dex
|
| 1323 |
|
|
04d1 : ca [ 2] dex
|
| 1324 |
|
|
04d2 : ca [ 2] dex
|
| 1325 |
|
|
04d3 : ca [ 2] dex
|
| 1326 |
|
|
04d4 : ca [ 2] dex
|
| 1327 |
|
|
04d5 : ca [ 2] dex
|
| 1328 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 24
|
| 1329 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1330 |
|
|
|
| 1331 |
|
|
04d6 : ca [ 2] dex
|
| 1332 |
|
|
04d7 : ca [ 2] dex
|
| 1333 |
|
|
04d8 : ca [ 2] dex ;+50
|
| 1334 |
|
|
04d9 : ca [ 2] dex
|
| 1335 |
|
|
04da : ca [ 2] dex
|
| 1336 |
|
|
04db : ca [ 2] dex
|
| 1337 |
|
|
04dc : ca [ 2] dex
|
| 1338 |
|
|
04dd : ca [ 2] dex
|
| 1339 |
|
|
04de : ca [ 2] dex
|
| 1340 |
|
|
04df : ca [ 2] dex
|
| 1341 |
|
|
04e0 : ca [ 2] dex
|
| 1342 |
|
|
04e1 : ca [ 2] dex
|
| 1343 |
|
|
04e2 : ca [ 2] dex ;+60
|
| 1344 |
|
|
04e3 : ca [ 2] dex
|
| 1345 |
|
|
04e4 : ca [ 2] dex
|
| 1346 |
|
|
04e5 : ca [ 2] dex
|
| 1347 |
|
|
04e6 : ca [ 2] dex
|
| 1348 |
|
|
04e7 : ca [ 2] dex
|
| 1349 |
|
|
04e8 : ca [ 2] dex
|
| 1350 |
|
|
04e9 : ca [ 2] dex
|
| 1351 |
|
|
04ea : ca [ 2] dex
|
| 1352 |
|
|
04eb : ca [ 2] dex
|
| 1353 |
|
|
04ec : ca [ 2] dex ;+70
|
| 1354 |
|
|
04ed : ca [ 2] dex
|
| 1355 |
|
|
04ee : ca [ 2] dex
|
| 1356 |
|
|
04ef : ca [ 2] dex
|
| 1357 |
|
|
04f0 : ca [ 2] dex
|
| 1358 |
|
|
04f1 : ca [ 2] dex
|
| 1359 |
|
|
04f2 : ca [ 2] dex
|
| 1360 |
|
|
04f3 : ca [ 2] dex
|
| 1361 |
|
|
04f4 : ca [ 2] dex
|
| 1362 |
|
|
04f5 : ca [ 2] dex
|
| 1363 |
|
|
04f6 : ca [ 2] dex ;+80
|
| 1364 |
|
|
04f7 : ca [ 2] dex
|
| 1365 |
|
|
04f8 : ca [ 2] dex
|
| 1366 |
|
|
04f9 : ca [ 2] dex
|
| 1367 |
|
|
04fa : ca [ 2] dex
|
| 1368 |
|
|
04fb : ca [ 2] dex
|
| 1369 |
|
|
04fc : ca [ 2] dex
|
| 1370 |
|
|
04fd : ca [ 2] dex
|
| 1371 |
|
|
04fe : ca [ 2] dex
|
| 1372 |
|
|
04ff : ca [ 2] dex
|
| 1373 |
|
|
0500 : ca [ 2] dex ;+90
|
| 1374 |
|
|
0501 : ca [ 2] dex
|
| 1375 |
|
|
0502 : ca [ 2] dex
|
| 1376 |
|
|
0503 : ca [ 2] dex
|
| 1377 |
|
|
0504 : ca [ 2] dex
|
| 1378 |
|
|
0505 : ca [ 2] dex
|
| 1379 |
|
|
0506 : ca [ 2] dex
|
| 1380 |
|
|
0507 : ca [ 2] dex
|
| 1381 |
|
|
0508 : ca [ 2] dex
|
| 1382 |
|
|
0509 : ca [ 2] dex
|
| 1383 |
|
|
050a : ca [ 2] dex ;+100
|
| 1384 |
|
|
050b : ca [ 2] dex
|
| 1385 |
|
|
050c : ca [ 2] dex
|
| 1386 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 25
|
| 1387 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1388 |
|
|
|
| 1389 |
|
|
050d : ca [ 2] dex
|
| 1390 |
|
|
050e : ca [ 2] dex
|
| 1391 |
|
|
050f : ca [ 2] dex
|
| 1392 |
|
|
0510 : ca [ 2] dex
|
| 1393 |
|
|
0511 : ca [ 2] dex
|
| 1394 |
|
|
0512 : ca [ 2] dex
|
| 1395 |
|
|
0513 : ca [ 2] dex
|
| 1396 |
|
|
0514 : ca [ 2] dex ;+110
|
| 1397 |
|
|
0515 : ca [ 2] dex
|
| 1398 |
|
|
0516 : ca [ 2] dex
|
| 1399 |
|
|
0517 : ca [ 2] dex
|
| 1400 |
|
|
0518 : ca [ 2] dex
|
| 1401 |
|
|
0519 : ca [ 2] dex
|
| 1402 |
|
|
051a : ca [ 2] dex
|
| 1403 |
|
|
051b : ca [ 2] dex
|
| 1404 |
|
|
051c : ca [ 2] dex
|
| 1405 |
|
|
051d : ca [ 2] dex
|
| 1406 |
|
|
051e : ca [ 2] dex ;+120
|
| 1407 |
|
|
051f : ca [ 2] dex
|
| 1408 |
|
|
0520 : ca [ 2] dex
|
| 1409 |
|
|
0521 : ca [ 2] dex
|
| 1410 |
|
|
0522 : ca [ 2] dex
|
| 1411 |
|
|
0523 : ca [ 2] dex
|
| 1412 |
|
|
0524 : ca [ 2] dex
|
| 1413 |
|
|
0525 : f003 [ 3] beq range_ok ;+127 - max forward
|
| 1414 |
|
|
trap ; bad range
|
| 1415 |
|
|
0527 : 4c2705 [ 3]> jmp * ;failed anyway
|
| 1416 |
|
|
|
| 1417 |
|
|
052a : range_ok
|
| 1418 |
|
|
052a : c000 [ 2] cpy #0
|
| 1419 |
|
|
052c : f003 [ 3] beq range_end
|
| 1420 |
|
|
052e : 4c1404 [ 3] jmp range_loop
|
| 1421 |
|
|
0531 : range_end ;range test successful
|
| 1422 |
|
|
next_test
|
| 1423 |
|
|
0531 : ad0002 [ 4]> lda test_case ;previous test
|
| 1424 |
|
|
0534 : c901 [ 2]> cmp #test_num
|
| 1425 |
|
|
> trap_ne ;test is out of sequence
|
| 1426 |
|
|
0536 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1427 |
|
|
>
|
| 1428 |
|
|
0002 = >test_num = test_num + 1
|
| 1429 |
|
|
0538 : a902 [ 2]> lda #test_num ;*** this tests' number
|
| 1430 |
|
|
053a : 8d0002 [ 4]> sta test_case
|
| 1431 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 1432 |
|
|
|
| 1433 |
|
|
|
| 1434 |
|
|
;partial test BNE & CMP, CPX, CPY immediate
|
| 1435 |
|
|
053d : c001 [ 2] cpy #1 ;testing BNE true
|
| 1436 |
|
|
053f : d003 [ 3] bne test_bne
|
| 1437 |
|
|
trap
|
| 1438 |
|
|
0541 : 4c4105 [ 3]> jmp * ;failed anyway
|
| 1439 |
|
|
|
| 1440 |
|
|
0544 : test_bne
|
| 1441 |
|
|
0544 : a900 [ 2] lda #0
|
| 1442 |
|
|
0546 : c900 [ 2] cmp #0 ;test compare immediate
|
| 1443 |
|
|
trap_ne
|
| 1444 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 26
|
| 1445 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1446 |
|
|
|
| 1447 |
|
|
0548 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1448 |
|
|
|
| 1449 |
|
|
trap_cc
|
| 1450 |
|
|
054a : 90fe [ 3]> bcc * ;failed carry clear
|
| 1451 |
|
|
|
| 1452 |
|
|
trap_mi
|
| 1453 |
|
|
054c : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 1454 |
|
|
|
| 1455 |
|
|
054e : c901 [ 2] cmp #1
|
| 1456 |
|
|
trap_eq
|
| 1457 |
|
|
0550 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 1458 |
|
|
|
| 1459 |
|
|
trap_cs
|
| 1460 |
|
|
0552 : b0fe [ 3]> bcs * ;failed carry set
|
| 1461 |
|
|
|
| 1462 |
|
|
trap_pl
|
| 1463 |
|
|
0554 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)
|
| 1464 |
|
|
|
| 1465 |
|
|
0556 : aa [ 2] tax
|
| 1466 |
|
|
0557 : e000 [ 2] cpx #0 ;test compare x immediate
|
| 1467 |
|
|
trap_ne
|
| 1468 |
|
|
0559 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1469 |
|
|
|
| 1470 |
|
|
trap_cc
|
| 1471 |
|
|
055b : 90fe [ 3]> bcc * ;failed carry clear
|
| 1472 |
|
|
|
| 1473 |
|
|
trap_mi
|
| 1474 |
|
|
055d : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 1475 |
|
|
|
| 1476 |
|
|
055f : e001 [ 2] cpx #1
|
| 1477 |
|
|
trap_eq
|
| 1478 |
|
|
0561 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 1479 |
|
|
|
| 1480 |
|
|
trap_cs
|
| 1481 |
|
|
0563 : b0fe [ 3]> bcs * ;failed carry set
|
| 1482 |
|
|
|
| 1483 |
|
|
trap_pl
|
| 1484 |
|
|
0565 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)
|
| 1485 |
|
|
|
| 1486 |
|
|
0567 : a8 [ 2] tay
|
| 1487 |
|
|
0568 : c000 [ 2] cpy #0 ;test compare y immediate
|
| 1488 |
|
|
trap_ne
|
| 1489 |
|
|
056a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1490 |
|
|
|
| 1491 |
|
|
trap_cc
|
| 1492 |
|
|
056c : 90fe [ 3]> bcc * ;failed carry clear
|
| 1493 |
|
|
|
| 1494 |
|
|
trap_mi
|
| 1495 |
|
|
056e : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 1496 |
|
|
|
| 1497 |
|
|
0570 : c001 [ 2] cpy #1
|
| 1498 |
|
|
trap_eq
|
| 1499 |
|
|
0572 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 1500 |
|
|
|
| 1501 |
|
|
trap_cs
|
| 1502 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 27
|
| 1503 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1504 |
|
|
|
| 1505 |
|
|
0574 : b0fe [ 3]> bcs * ;failed carry set
|
| 1506 |
|
|
|
| 1507 |
|
|
trap_pl
|
| 1508 |
|
|
0576 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)
|
| 1509 |
|
|
|
| 1510 |
|
|
next_test
|
| 1511 |
|
|
0578 : ad0002 [ 4]> lda test_case ;previous test
|
| 1512 |
|
|
057b : c902 [ 2]> cmp #test_num
|
| 1513 |
|
|
> trap_ne ;test is out of sequence
|
| 1514 |
|
|
057d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1515 |
|
|
>
|
| 1516 |
|
|
0003 = >test_num = test_num + 1
|
| 1517 |
|
|
057f : a903 [ 2]> lda #test_num ;*** this tests' number
|
| 1518 |
|
|
0581 : 8d0002 [ 4]> sta test_case
|
| 1519 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 1520 |
|
|
|
| 1521 |
|
|
;testing stack operations PHA PHP PLA PLP
|
| 1522 |
|
|
|
| 1523 |
|
|
0584 : a2ff [ 2] ldx #$ff ;initialize stack
|
| 1524 |
|
|
0586 : 9a [ 2] txs
|
| 1525 |
|
|
0587 : a955 [ 2] lda #$55
|
| 1526 |
|
|
0589 : 48 [ 3] pha
|
| 1527 |
|
|
058a : a9aa [ 2] lda #$aa
|
| 1528 |
|
|
058c : 48 [ 3] pha
|
| 1529 |
|
|
058d : cdfe01 [ 4] cmp $1fe ;on stack ?
|
| 1530 |
|
|
trap_ne
|
| 1531 |
|
|
0590 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1532 |
|
|
|
| 1533 |
|
|
0592 : ba [ 2] tsx
|
| 1534 |
|
|
0593 : 8a [ 2] txa ;overwrite accu
|
| 1535 |
|
|
0594 : c9fd [ 2] cmp #$fd ;sp decremented?
|
| 1536 |
|
|
trap_ne
|
| 1537 |
|
|
0596 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1538 |
|
|
|
| 1539 |
|
|
0598 : 68 [ 4] pla
|
| 1540 |
|
|
0599 : c9aa [ 2] cmp #$aa ;successful retreived from stack?
|
| 1541 |
|
|
trap_ne
|
| 1542 |
|
|
059b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1543 |
|
|
|
| 1544 |
|
|
059d : 68 [ 4] pla
|
| 1545 |
|
|
059e : c955 [ 2] cmp #$55
|
| 1546 |
|
|
trap_ne
|
| 1547 |
|
|
05a0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1548 |
|
|
|
| 1549 |
|
|
05a2 : cdff01 [ 4] cmp $1ff ;remains on stack?
|
| 1550 |
|
|
trap_ne
|
| 1551 |
|
|
05a5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1552 |
|
|
|
| 1553 |
|
|
05a7 : ba [ 2] tsx
|
| 1554 |
|
|
05a8 : e0ff [ 2] cpx #$ff ;sp incremented?
|
| 1555 |
|
|
trap_ne
|
| 1556 |
|
|
05aa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1557 |
|
|
|
| 1558 |
|
|
next_test
|
| 1559 |
|
|
05ac : ad0002 [ 4]> lda test_case ;previous test
|
| 1560 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 28
|
| 1561 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1562 |
|
|
|
| 1563 |
|
|
05af : c903 [ 2]> cmp #test_num
|
| 1564 |
|
|
> trap_ne ;test is out of sequence
|
| 1565 |
|
|
05b1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1566 |
|
|
>
|
| 1567 |
|
|
0004 = >test_num = test_num + 1
|
| 1568 |
|
|
05b3 : a904 [ 2]> lda #test_num ;*** this tests' number
|
| 1569 |
|
|
05b5 : 8d0002 [ 4]> sta test_case
|
| 1570 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 1571 |
|
|
|
| 1572 |
|
|
|
| 1573 |
|
|
;testing branch decisions BPL BMI BVC BVS BCC BCS BNE BEQ
|
| 1574 |
|
|
set_stat $ff ;all on
|
| 1575 |
|
|
> load_flag $ff
|
| 1576 |
|
|
05b8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 1577 |
|
|
>
|
| 1578 |
|
|
05ba : 48 [ 3]> pha ;use stack to load status
|
| 1579 |
|
|
05bb : 28 [ 4]> plp
|
| 1580 |
|
|
|
| 1581 |
|
|
05bc : 101a [ 3] bpl nbr1 ;branches should not be taken
|
| 1582 |
|
|
05be : 501b [ 3] bvc nbr2
|
| 1583 |
|
|
05c0 : 901c [ 3] bcc nbr3
|
| 1584 |
|
|
05c2 : d01d [ 3] bne nbr4
|
| 1585 |
|
|
05c4 : 3003 [ 3] bmi br1 ;branches should be taken
|
| 1586 |
|
|
trap
|
| 1587 |
|
|
05c6 : 4cc605 [ 3]> jmp * ;failed anyway
|
| 1588 |
|
|
|
| 1589 |
|
|
05c9 : 7003 [ 3] br1 bvs br2
|
| 1590 |
|
|
trap
|
| 1591 |
|
|
05cb : 4ccb05 [ 3]> jmp * ;failed anyway
|
| 1592 |
|
|
|
| 1593 |
|
|
05ce : b003 [ 3] br2 bcs br3
|
| 1594 |
|
|
trap
|
| 1595 |
|
|
05d0 : 4cd005 [ 3]> jmp * ;failed anyway
|
| 1596 |
|
|
|
| 1597 |
|
|
05d3 : f00f [ 3] br3 beq br4
|
| 1598 |
|
|
trap
|
| 1599 |
|
|
05d5 : 4cd505 [ 3]> jmp * ;failed anyway
|
| 1600 |
|
|
|
| 1601 |
|
|
05d8 : nbr1
|
| 1602 |
|
|
trap ;previous bpl taken
|
| 1603 |
|
|
05d8 : 4cd805 [ 3]> jmp * ;failed anyway
|
| 1604 |
|
|
|
| 1605 |
|
|
05db : nbr2
|
| 1606 |
|
|
trap ;previous bvc taken
|
| 1607 |
|
|
05db : 4cdb05 [ 3]> jmp * ;failed anyway
|
| 1608 |
|
|
|
| 1609 |
|
|
05de : nbr3
|
| 1610 |
|
|
trap ;previous bcc taken
|
| 1611 |
|
|
05de : 4cde05 [ 3]> jmp * ;failed anyway
|
| 1612 |
|
|
|
| 1613 |
|
|
05e1 : nbr4
|
| 1614 |
|
|
trap ;previous bne taken
|
| 1615 |
|
|
05e1 : 4ce105 [ 3]> jmp * ;failed anyway
|
| 1616 |
|
|
|
| 1617 |
|
|
05e4 : 08 [ 3] br4 php
|
| 1618 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 29
|
| 1619 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1620 |
|
|
|
| 1621 |
|
|
05e5 : ba [ 2] tsx
|
| 1622 |
|
|
05e6 : e0fe [ 2] cpx #$fe ;sp after php?
|
| 1623 |
|
|
trap_ne
|
| 1624 |
|
|
05e8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1625 |
|
|
|
| 1626 |
|
|
05ea : 68 [ 4] pla
|
| 1627 |
|
|
cmp_flag $ff ;returned all flags on?
|
| 1628 |
|
|
05eb : c9ff [ 2]> cmp #($ff |fao)&m8 ;expected flags + always on bits
|
| 1629 |
|
|
|
| 1630 |
|
|
trap_ne
|
| 1631 |
|
|
05ed : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1632 |
|
|
|
| 1633 |
|
|
05ef : ba [ 2] tsx
|
| 1634 |
|
|
05f0 : e0ff [ 2] cpx #$ff ;sp after php?
|
| 1635 |
|
|
trap_ne
|
| 1636 |
|
|
05f2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1637 |
|
|
|
| 1638 |
|
|
set_stat 0 ;all off
|
| 1639 |
|
|
> load_flag 0
|
| 1640 |
|
|
05f4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 1641 |
|
|
>
|
| 1642 |
|
|
05f6 : 48 [ 3]> pha ;use stack to load status
|
| 1643 |
|
|
05f7 : 28 [ 4]> plp
|
| 1644 |
|
|
|
| 1645 |
|
|
05f8 : 3022 [ 4] bmi nbr11 ;branches should not be taken
|
| 1646 |
|
|
05fa : 7023 [ 4] bvs nbr12
|
| 1647 |
|
|
05fc : b024 [ 4] bcs nbr13
|
| 1648 |
|
|
05fe : f025 [ 4] beq nbr14
|
| 1649 |
|
|
trap_mi
|
| 1650 |
|
|
0600 : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 1651 |
|
|
|
| 1652 |
|
|
trap_vs
|
| 1653 |
|
|
0602 : 70fe [ 3]> bvs * ;failed overflow set
|
| 1654 |
|
|
|
| 1655 |
|
|
trap_cs
|
| 1656 |
|
|
0604 : b0fe [ 3]> bcs * ;failed carry set
|
| 1657 |
|
|
|
| 1658 |
|
|
trap_eq
|
| 1659 |
|
|
0606 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 1660 |
|
|
|
| 1661 |
|
|
0608 : 1003 [ 3] bpl br11 ;branches should be taken
|
| 1662 |
|
|
trap
|
| 1663 |
|
|
060a : 4c0a06 [ 3]> jmp * ;failed anyway
|
| 1664 |
|
|
|
| 1665 |
|
|
060d : 5003 [ 3] br11 bvc br12
|
| 1666 |
|
|
trap
|
| 1667 |
|
|
060f : 4c0f06 [ 3]> jmp * ;failed anyway
|
| 1668 |
|
|
|
| 1669 |
|
|
0612 : 9003 [ 3] br12 bcc br13
|
| 1670 |
|
|
trap
|
| 1671 |
|
|
0614 : 4c1406 [ 3]> jmp * ;failed anyway
|
| 1672 |
|
|
|
| 1673 |
|
|
0617 : d00f [ 3] br13 bne br14
|
| 1674 |
|
|
trap
|
| 1675 |
|
|
0619 : 4c1906 [ 3]> jmp * ;failed anyway
|
| 1676 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 30
|
| 1677 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1678 |
|
|
|
| 1679 |
|
|
|
| 1680 |
|
|
061c : nbr11
|
| 1681 |
|
|
trap ;previous bmi taken
|
| 1682 |
|
|
061c : 4c1c06 [ 3]> jmp * ;failed anyway
|
| 1683 |
|
|
|
| 1684 |
|
|
061f : nbr12
|
| 1685 |
|
|
trap ;previous bvs taken
|
| 1686 |
|
|
061f : 4c1f06 [ 3]> jmp * ;failed anyway
|
| 1687 |
|
|
|
| 1688 |
|
|
0622 : nbr13
|
| 1689 |
|
|
trap ;previous bcs taken
|
| 1690 |
|
|
0622 : 4c2206 [ 3]> jmp * ;failed anyway
|
| 1691 |
|
|
|
| 1692 |
|
|
0625 : nbr14
|
| 1693 |
|
|
trap ;previous beq taken
|
| 1694 |
|
|
0625 : 4c2506 [ 3]> jmp * ;failed anyway
|
| 1695 |
|
|
|
| 1696 |
|
|
0628 : 08 [ 3] br14 php
|
| 1697 |
|
|
0629 : 68 [ 4] pla
|
| 1698 |
|
|
cmp_flag 0 ;flags off except break (pushed by sw) + reserved?
|
| 1699 |
|
|
062a : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bits
|
| 1700 |
|
|
|
| 1701 |
|
|
trap_ne
|
| 1702 |
|
|
062c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1703 |
|
|
|
| 1704 |
|
|
;crosscheck flags
|
| 1705 |
|
|
set_stat carry
|
| 1706 |
|
|
> load_flag carry
|
| 1707 |
|
|
062e : a901 [ 2]> lda #carry ;allow test to change I-flag (no mask)
|
| 1708 |
|
|
>
|
| 1709 |
|
|
0630 : 48 [ 3]> pha ;use stack to load status
|
| 1710 |
|
|
0631 : 28 [ 4]> plp
|
| 1711 |
|
|
|
| 1712 |
|
|
trap_cc
|
| 1713 |
|
|
0632 : 90fe [ 3]> bcc * ;failed carry clear
|
| 1714 |
|
|
|
| 1715 |
|
|
set_stat zero
|
| 1716 |
|
|
> load_flag zero
|
| 1717 |
|
|
0634 : a902 [ 2]> lda #zero ;allow test to change I-flag (no mask)
|
| 1718 |
|
|
>
|
| 1719 |
|
|
0636 : 48 [ 3]> pha ;use stack to load status
|
| 1720 |
|
|
0637 : 28 [ 4]> plp
|
| 1721 |
|
|
|
| 1722 |
|
|
trap_ne
|
| 1723 |
|
|
0638 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1724 |
|
|
|
| 1725 |
|
|
set_stat overfl
|
| 1726 |
|
|
> load_flag overfl
|
| 1727 |
|
|
063a : a940 [ 2]> lda #overfl ;allow test to change I-flag (no mask)
|
| 1728 |
|
|
>
|
| 1729 |
|
|
063c : 48 [ 3]> pha ;use stack to load status
|
| 1730 |
|
|
063d : 28 [ 4]> plp
|
| 1731 |
|
|
|
| 1732 |
|
|
trap_vc
|
| 1733 |
|
|
063e : 50fe [ 3]> bvc * ;failed overflow clear
|
| 1734 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 31
|
| 1735 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1736 |
|
|
|
| 1737 |
|
|
|
| 1738 |
|
|
set_stat minus
|
| 1739 |
|
|
> load_flag minus
|
| 1740 |
|
|
0640 : a980 [ 2]> lda #minus ;allow test to change I-flag (no mask)
|
| 1741 |
|
|
>
|
| 1742 |
|
|
0642 : 48 [ 3]> pha ;use stack to load status
|
| 1743 |
|
|
0643 : 28 [ 4]> plp
|
| 1744 |
|
|
|
| 1745 |
|
|
trap_pl
|
| 1746 |
|
|
0644 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)
|
| 1747 |
|
|
|
| 1748 |
|
|
set_stat $ff-carry
|
| 1749 |
|
|
> load_flag $ff-carry
|
| 1750 |
|
|
0646 : a9fe [ 2]> lda #$ff-carry ;allow test to change I-flag (no mask)
|
| 1751 |
|
|
>
|
| 1752 |
|
|
0648 : 48 [ 3]> pha ;use stack to load status
|
| 1753 |
|
|
0649 : 28 [ 4]> plp
|
| 1754 |
|
|
|
| 1755 |
|
|
trap_cs
|
| 1756 |
|
|
064a : b0fe [ 3]> bcs * ;failed carry set
|
| 1757 |
|
|
|
| 1758 |
|
|
set_stat $ff-zero
|
| 1759 |
|
|
> load_flag $ff-zero
|
| 1760 |
|
|
064c : a9fd [ 2]> lda #$ff-zero ;allow test to change I-flag (no mask)
|
| 1761 |
|
|
>
|
| 1762 |
|
|
064e : 48 [ 3]> pha ;use stack to load status
|
| 1763 |
|
|
064f : 28 [ 4]> plp
|
| 1764 |
|
|
|
| 1765 |
|
|
trap_eq
|
| 1766 |
|
|
0650 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 1767 |
|
|
|
| 1768 |
|
|
set_stat $ff-overfl
|
| 1769 |
|
|
> load_flag $ff-overfl
|
| 1770 |
|
|
0652 : a9bf [ 2]> lda #$ff-overfl ;allow test to change I-flag (no mask)
|
| 1771 |
|
|
>
|
| 1772 |
|
|
0654 : 48 [ 3]> pha ;use stack to load status
|
| 1773 |
|
|
0655 : 28 [ 4]> plp
|
| 1774 |
|
|
|
| 1775 |
|
|
trap_vs
|
| 1776 |
|
|
0656 : 70fe [ 3]> bvs * ;failed overflow set
|
| 1777 |
|
|
|
| 1778 |
|
|
set_stat $ff-minus
|
| 1779 |
|
|
> load_flag $ff-minus
|
| 1780 |
|
|
0658 : a97f [ 2]> lda #$ff-minus ;allow test to change I-flag (no mask)
|
| 1781 |
|
|
>
|
| 1782 |
|
|
065a : 48 [ 3]> pha ;use stack to load status
|
| 1783 |
|
|
065b : 28 [ 4]> plp
|
| 1784 |
|
|
|
| 1785 |
|
|
trap_mi
|
| 1786 |
|
|
065c : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 1787 |
|
|
|
| 1788 |
|
|
next_test
|
| 1789 |
|
|
065e : ad0002 [ 4]> lda test_case ;previous test
|
| 1790 |
|
|
0661 : c904 [ 2]> cmp #test_num
|
| 1791 |
|
|
> trap_ne ;test is out of sequence
|
| 1792 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 32
|
| 1793 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1794 |
|
|
|
| 1795 |
|
|
0663 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1796 |
|
|
>
|
| 1797 |
|
|
0005 = >test_num = test_num + 1
|
| 1798 |
|
|
0665 : a905 [ 2]> lda #test_num ;*** this tests' number
|
| 1799 |
|
|
0667 : 8d0002 [ 4]> sta test_case
|
| 1800 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 1801 |
|
|
|
| 1802 |
|
|
|
| 1803 |
|
|
; test PHA does not alter flags or accumulator but PLA does
|
| 1804 |
|
|
066a : a255 [ 2] ldx #$55 ;x & y protected
|
| 1805 |
|
|
066c : a0aa [ 2] ldy #$aa
|
| 1806 |
|
|
set_a 1,$ff ;push
|
| 1807 |
|
|
> load_flag $ff
|
| 1808 |
|
|
066e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 1809 |
|
|
>
|
| 1810 |
|
|
0670 : 48 [ 3]> pha ;use stack to load status
|
| 1811 |
|
|
0671 : a901 [ 2]> lda #1 ;precharge accu
|
| 1812 |
|
|
0673 : 28 [ 4]> plp
|
| 1813 |
|
|
|
| 1814 |
|
|
0674 : 48 [ 3] pha
|
| 1815 |
|
|
tst_a 1,$ff
|
| 1816 |
|
|
0675 : 08 [ 3]> php ;save flags
|
| 1817 |
|
|
0676 : 08 [ 3]> php
|
| 1818 |
|
|
0677 : c901 [ 2]> cmp #1 ;test result
|
| 1819 |
|
|
> trap_ne
|
| 1820 |
|
|
0679 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1821 |
|
|
>
|
| 1822 |
|
|
067b : 68 [ 4]> pla ;load status
|
| 1823 |
|
|
> cmp_flag $ff
|
| 1824 |
|
|
067c : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 1825 |
|
|
>
|
| 1826 |
|
|
> trap_ne
|
| 1827 |
|
|
067e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1828 |
|
|
>
|
| 1829 |
|
|
0680 : 28 [ 4]> plp ;restore status
|
| 1830 |
|
|
|
| 1831 |
|
|
set_a 0,0
|
| 1832 |
|
|
> load_flag 0
|
| 1833 |
|
|
0681 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 1834 |
|
|
>
|
| 1835 |
|
|
0683 : 48 [ 3]> pha ;use stack to load status
|
| 1836 |
|
|
0684 : a900 [ 2]> lda #0 ;precharge accu
|
| 1837 |
|
|
0686 : 28 [ 4]> plp
|
| 1838 |
|
|
|
| 1839 |
|
|
0687 : 48 [ 3] pha
|
| 1840 |
|
|
tst_a 0,0
|
| 1841 |
|
|
0688 : 08 [ 3]> php ;save flags
|
| 1842 |
|
|
0689 : 08 [ 3]> php
|
| 1843 |
|
|
068a : c900 [ 2]> cmp #0 ;test result
|
| 1844 |
|
|
> trap_ne
|
| 1845 |
|
|
068c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1846 |
|
|
>
|
| 1847 |
|
|
068e : 68 [ 4]> pla ;load status
|
| 1848 |
|
|
> cmp_flag 0
|
| 1849 |
|
|
068f : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 1850 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 33
|
| 1851 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1852 |
|
|
|
| 1853 |
|
|
>
|
| 1854 |
|
|
> trap_ne
|
| 1855 |
|
|
0691 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1856 |
|
|
>
|
| 1857 |
|
|
0693 : 28 [ 4]> plp ;restore status
|
| 1858 |
|
|
|
| 1859 |
|
|
set_a $ff,$ff
|
| 1860 |
|
|
> load_flag $ff
|
| 1861 |
|
|
0694 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 1862 |
|
|
>
|
| 1863 |
|
|
0696 : 48 [ 3]> pha ;use stack to load status
|
| 1864 |
|
|
0697 : a9ff [ 2]> lda #$ff ;precharge accu
|
| 1865 |
|
|
0699 : 28 [ 4]> plp
|
| 1866 |
|
|
|
| 1867 |
|
|
069a : 48 [ 3] pha
|
| 1868 |
|
|
tst_a $ff,$ff
|
| 1869 |
|
|
069b : 08 [ 3]> php ;save flags
|
| 1870 |
|
|
069c : 08 [ 3]> php
|
| 1871 |
|
|
069d : c9ff [ 2]> cmp #$ff ;test result
|
| 1872 |
|
|
> trap_ne
|
| 1873 |
|
|
069f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1874 |
|
|
>
|
| 1875 |
|
|
06a1 : 68 [ 4]> pla ;load status
|
| 1876 |
|
|
> cmp_flag $ff
|
| 1877 |
|
|
06a2 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 1878 |
|
|
>
|
| 1879 |
|
|
> trap_ne
|
| 1880 |
|
|
06a4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1881 |
|
|
>
|
| 1882 |
|
|
06a6 : 28 [ 4]> plp ;restore status
|
| 1883 |
|
|
|
| 1884 |
|
|
set_a 1,0
|
| 1885 |
|
|
> load_flag 0
|
| 1886 |
|
|
06a7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 1887 |
|
|
>
|
| 1888 |
|
|
06a9 : 48 [ 3]> pha ;use stack to load status
|
| 1889 |
|
|
06aa : a901 [ 2]> lda #1 ;precharge accu
|
| 1890 |
|
|
06ac : 28 [ 4]> plp
|
| 1891 |
|
|
|
| 1892 |
|
|
06ad : 48 [ 3] pha
|
| 1893 |
|
|
tst_a 1,0
|
| 1894 |
|
|
06ae : 08 [ 3]> php ;save flags
|
| 1895 |
|
|
06af : 08 [ 3]> php
|
| 1896 |
|
|
06b0 : c901 [ 2]> cmp #1 ;test result
|
| 1897 |
|
|
> trap_ne
|
| 1898 |
|
|
06b2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1899 |
|
|
>
|
| 1900 |
|
|
06b4 : 68 [ 4]> pla ;load status
|
| 1901 |
|
|
> cmp_flag 0
|
| 1902 |
|
|
06b5 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 1903 |
|
|
>
|
| 1904 |
|
|
> trap_ne
|
| 1905 |
|
|
06b7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1906 |
|
|
>
|
| 1907 |
|
|
06b9 : 28 [ 4]> plp ;restore status
|
| 1908 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 34
|
| 1909 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1910 |
|
|
|
| 1911 |
|
|
|
| 1912 |
|
|
set_a 0,$ff
|
| 1913 |
|
|
> load_flag $ff
|
| 1914 |
|
|
06ba : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 1915 |
|
|
>
|
| 1916 |
|
|
06bc : 48 [ 3]> pha ;use stack to load status
|
| 1917 |
|
|
06bd : a900 [ 2]> lda #0 ;precharge accu
|
| 1918 |
|
|
06bf : 28 [ 4]> plp
|
| 1919 |
|
|
|
| 1920 |
|
|
06c0 : 48 [ 3] pha
|
| 1921 |
|
|
tst_a 0,$ff
|
| 1922 |
|
|
06c1 : 08 [ 3]> php ;save flags
|
| 1923 |
|
|
06c2 : 08 [ 3]> php
|
| 1924 |
|
|
06c3 : c900 [ 2]> cmp #0 ;test result
|
| 1925 |
|
|
> trap_ne
|
| 1926 |
|
|
06c5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1927 |
|
|
>
|
| 1928 |
|
|
06c7 : 68 [ 4]> pla ;load status
|
| 1929 |
|
|
> cmp_flag $ff
|
| 1930 |
|
|
06c8 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 1931 |
|
|
>
|
| 1932 |
|
|
> trap_ne
|
| 1933 |
|
|
06ca : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1934 |
|
|
>
|
| 1935 |
|
|
06cc : 28 [ 4]> plp ;restore status
|
| 1936 |
|
|
|
| 1937 |
|
|
set_a $ff,0
|
| 1938 |
|
|
> load_flag 0
|
| 1939 |
|
|
06cd : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 1940 |
|
|
>
|
| 1941 |
|
|
06cf : 48 [ 3]> pha ;use stack to load status
|
| 1942 |
|
|
06d0 : a9ff [ 2]> lda #$ff ;precharge accu
|
| 1943 |
|
|
06d2 : 28 [ 4]> plp
|
| 1944 |
|
|
|
| 1945 |
|
|
06d3 : 48 [ 3] pha
|
| 1946 |
|
|
tst_a $ff,0
|
| 1947 |
|
|
06d4 : 08 [ 3]> php ;save flags
|
| 1948 |
|
|
06d5 : 08 [ 3]> php
|
| 1949 |
|
|
06d6 : c9ff [ 2]> cmp #$ff ;test result
|
| 1950 |
|
|
> trap_ne
|
| 1951 |
|
|
06d8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1952 |
|
|
>
|
| 1953 |
|
|
06da : 68 [ 4]> pla ;load status
|
| 1954 |
|
|
> cmp_flag 0
|
| 1955 |
|
|
06db : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 1956 |
|
|
>
|
| 1957 |
|
|
> trap_ne
|
| 1958 |
|
|
06dd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1959 |
|
|
>
|
| 1960 |
|
|
06df : 28 [ 4]> plp ;restore status
|
| 1961 |
|
|
|
| 1962 |
|
|
set_a 0,$ff ;pull
|
| 1963 |
|
|
> load_flag $ff
|
| 1964 |
|
|
06e0 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 1965 |
|
|
>
|
| 1966 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 35
|
| 1967 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 1968 |
|
|
|
| 1969 |
|
|
06e2 : 48 [ 3]> pha ;use stack to load status
|
| 1970 |
|
|
06e3 : a900 [ 2]> lda #0 ;precharge accu
|
| 1971 |
|
|
06e5 : 28 [ 4]> plp
|
| 1972 |
|
|
|
| 1973 |
|
|
06e6 : 68 [ 4] pla
|
| 1974 |
|
|
tst_a $ff,$ff-zero
|
| 1975 |
|
|
06e7 : 08 [ 3]> php ;save flags
|
| 1976 |
|
|
06e8 : 08 [ 3]> php
|
| 1977 |
|
|
06e9 : c9ff [ 2]> cmp #$ff ;test result
|
| 1978 |
|
|
> trap_ne
|
| 1979 |
|
|
06eb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1980 |
|
|
>
|
| 1981 |
|
|
06ed : 68 [ 4]> pla ;load status
|
| 1982 |
|
|
> cmp_flag $ff-zero
|
| 1983 |
|
|
06ee : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 1984 |
|
|
>
|
| 1985 |
|
|
> trap_ne
|
| 1986 |
|
|
06f0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 1987 |
|
|
>
|
| 1988 |
|
|
06f2 : 28 [ 4]> plp ;restore status
|
| 1989 |
|
|
|
| 1990 |
|
|
set_a $ff,0
|
| 1991 |
|
|
> load_flag 0
|
| 1992 |
|
|
06f3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 1993 |
|
|
>
|
| 1994 |
|
|
06f5 : 48 [ 3]> pha ;use stack to load status
|
| 1995 |
|
|
06f6 : a9ff [ 2]> lda #$ff ;precharge accu
|
| 1996 |
|
|
06f8 : 28 [ 4]> plp
|
| 1997 |
|
|
|
| 1998 |
|
|
06f9 : 68 [ 4] pla
|
| 1999 |
|
|
tst_a 0,zero
|
| 2000 |
|
|
06fa : 08 [ 3]> php ;save flags
|
| 2001 |
|
|
06fb : 08 [ 3]> php
|
| 2002 |
|
|
06fc : c900 [ 2]> cmp #0 ;test result
|
| 2003 |
|
|
> trap_ne
|
| 2004 |
|
|
06fe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2005 |
|
|
>
|
| 2006 |
|
|
0700 : 68 [ 4]> pla ;load status
|
| 2007 |
|
|
> cmp_flag zero
|
| 2008 |
|
|
0701 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 2009 |
|
|
>
|
| 2010 |
|
|
> trap_ne
|
| 2011 |
|
|
0703 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2012 |
|
|
>
|
| 2013 |
|
|
0705 : 28 [ 4]> plp ;restore status
|
| 2014 |
|
|
|
| 2015 |
|
|
set_a $fe,$ff
|
| 2016 |
|
|
> load_flag $ff
|
| 2017 |
|
|
0706 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 2018 |
|
|
>
|
| 2019 |
|
|
0708 : 48 [ 3]> pha ;use stack to load status
|
| 2020 |
|
|
0709 : a9fe [ 2]> lda #$fe ;precharge accu
|
| 2021 |
|
|
070b : 28 [ 4]> plp
|
| 2022 |
|
|
|
| 2023 |
|
|
070c : 68 [ 4] pla
|
| 2024 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 36
|
| 2025 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2026 |
|
|
|
| 2027 |
|
|
tst_a 1,$ff-zero-minus
|
| 2028 |
|
|
070d : 08 [ 3]> php ;save flags
|
| 2029 |
|
|
070e : 08 [ 3]> php
|
| 2030 |
|
|
070f : c901 [ 2]> cmp #1 ;test result
|
| 2031 |
|
|
> trap_ne
|
| 2032 |
|
|
0711 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2033 |
|
|
>
|
| 2034 |
|
|
0713 : 68 [ 4]> pla ;load status
|
| 2035 |
|
|
> cmp_flag $ff-zero-minus
|
| 2036 |
|
|
0714 : c97d [ 2]> cmp #($ff-zero-minus|fao)&m8 ;expected flags + always on bits
|
| 2037 |
|
|
>
|
| 2038 |
|
|
> trap_ne
|
| 2039 |
|
|
0716 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2040 |
|
|
>
|
| 2041 |
|
|
0718 : 28 [ 4]> plp ;restore status
|
| 2042 |
|
|
|
| 2043 |
|
|
set_a 0,0
|
| 2044 |
|
|
> load_flag 0
|
| 2045 |
|
|
0719 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2046 |
|
|
>
|
| 2047 |
|
|
071b : 48 [ 3]> pha ;use stack to load status
|
| 2048 |
|
|
071c : a900 [ 2]> lda #0 ;precharge accu
|
| 2049 |
|
|
071e : 28 [ 4]> plp
|
| 2050 |
|
|
|
| 2051 |
|
|
071f : 68 [ 4] pla
|
| 2052 |
|
|
tst_a $ff,minus
|
| 2053 |
|
|
0720 : 08 [ 3]> php ;save flags
|
| 2054 |
|
|
0721 : 08 [ 3]> php
|
| 2055 |
|
|
0722 : c9ff [ 2]> cmp #$ff ;test result
|
| 2056 |
|
|
> trap_ne
|
| 2057 |
|
|
0724 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2058 |
|
|
>
|
| 2059 |
|
|
0726 : 68 [ 4]> pla ;load status
|
| 2060 |
|
|
> cmp_flag minus
|
| 2061 |
|
|
0727 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 2062 |
|
|
>
|
| 2063 |
|
|
> trap_ne
|
| 2064 |
|
|
0729 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2065 |
|
|
>
|
| 2066 |
|
|
072b : 28 [ 4]> plp ;restore status
|
| 2067 |
|
|
|
| 2068 |
|
|
set_a $ff,$ff
|
| 2069 |
|
|
> load_flag $ff
|
| 2070 |
|
|
072c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 2071 |
|
|
>
|
| 2072 |
|
|
072e : 48 [ 3]> pha ;use stack to load status
|
| 2073 |
|
|
072f : a9ff [ 2]> lda #$ff ;precharge accu
|
| 2074 |
|
|
0731 : 28 [ 4]> plp
|
| 2075 |
|
|
|
| 2076 |
|
|
0732 : 68 [ 4] pla
|
| 2077 |
|
|
tst_a 0,$ff-minus
|
| 2078 |
|
|
0733 : 08 [ 3]> php ;save flags
|
| 2079 |
|
|
0734 : 08 [ 3]> php
|
| 2080 |
|
|
0735 : c900 [ 2]> cmp #0 ;test result
|
| 2081 |
|
|
> trap_ne
|
| 2082 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 37
|
| 2083 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2084 |
|
|
|
| 2085 |
|
|
0737 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2086 |
|
|
>
|
| 2087 |
|
|
0739 : 68 [ 4]> pla ;load status
|
| 2088 |
|
|
> cmp_flag $ff-minus
|
| 2089 |
|
|
073a : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 2090 |
|
|
>
|
| 2091 |
|
|
> trap_ne
|
| 2092 |
|
|
073c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2093 |
|
|
>
|
| 2094 |
|
|
073e : 28 [ 4]> plp ;restore status
|
| 2095 |
|
|
|
| 2096 |
|
|
set_a $fe,0
|
| 2097 |
|
|
> load_flag 0
|
| 2098 |
|
|
073f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2099 |
|
|
>
|
| 2100 |
|
|
0741 : 48 [ 3]> pha ;use stack to load status
|
| 2101 |
|
|
0742 : a9fe [ 2]> lda #$fe ;precharge accu
|
| 2102 |
|
|
0744 : 28 [ 4]> plp
|
| 2103 |
|
|
|
| 2104 |
|
|
0745 : 68 [ 4] pla
|
| 2105 |
|
|
tst_a 1,0
|
| 2106 |
|
|
0746 : 08 [ 3]> php ;save flags
|
| 2107 |
|
|
0747 : 08 [ 3]> php
|
| 2108 |
|
|
0748 : c901 [ 2]> cmp #1 ;test result
|
| 2109 |
|
|
> trap_ne
|
| 2110 |
|
|
074a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2111 |
|
|
>
|
| 2112 |
|
|
074c : 68 [ 4]> pla ;load status
|
| 2113 |
|
|
> cmp_flag 0
|
| 2114 |
|
|
074d : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 2115 |
|
|
>
|
| 2116 |
|
|
> trap_ne
|
| 2117 |
|
|
074f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2118 |
|
|
>
|
| 2119 |
|
|
0751 : 28 [ 4]> plp ;restore status
|
| 2120 |
|
|
|
| 2121 |
|
|
0752 : e055 [ 2] cpx #$55 ;x & y unchanged?
|
| 2122 |
|
|
trap_ne
|
| 2123 |
|
|
0754 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2124 |
|
|
|
| 2125 |
|
|
0756 : c0aa [ 2] cpy #$aa
|
| 2126 |
|
|
trap_ne
|
| 2127 |
|
|
0758 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2128 |
|
|
|
| 2129 |
|
|
next_test
|
| 2130 |
|
|
075a : ad0002 [ 4]> lda test_case ;previous test
|
| 2131 |
|
|
075d : c905 [ 2]> cmp #test_num
|
| 2132 |
|
|
> trap_ne ;test is out of sequence
|
| 2133 |
|
|
075f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2134 |
|
|
>
|
| 2135 |
|
|
0006 = >test_num = test_num + 1
|
| 2136 |
|
|
0761 : a906 [ 2]> lda #test_num ;*** this tests' number
|
| 2137 |
|
|
0763 : 8d0002 [ 4]> sta test_case
|
| 2138 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2139 |
|
|
|
| 2140 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 38
|
| 2141 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2142 |
|
|
|
| 2143 |
|
|
|
| 2144 |
|
|
; partial pretest EOR #
|
| 2145 |
|
|
set_a $3c,0
|
| 2146 |
|
|
> load_flag 0
|
| 2147 |
|
|
0766 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2148 |
|
|
>
|
| 2149 |
|
|
0768 : 48 [ 3]> pha ;use stack to load status
|
| 2150 |
|
|
0769 : a93c [ 2]> lda #$3c ;precharge accu
|
| 2151 |
|
|
076b : 28 [ 4]> plp
|
| 2152 |
|
|
|
| 2153 |
|
|
076c : 49c3 [ 2] eor #$c3
|
| 2154 |
|
|
tst_a $ff,fn
|
| 2155 |
|
|
076e : 08 [ 3]> php ;save flags
|
| 2156 |
|
|
076f : 08 [ 3]> php
|
| 2157 |
|
|
0770 : c9ff [ 2]> cmp #$ff ;test result
|
| 2158 |
|
|
> trap_ne
|
| 2159 |
|
|
0772 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2160 |
|
|
>
|
| 2161 |
|
|
0774 : 68 [ 4]> pla ;load status
|
| 2162 |
|
|
> cmp_flag fn
|
| 2163 |
|
|
0775 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 2164 |
|
|
>
|
| 2165 |
|
|
> trap_ne
|
| 2166 |
|
|
0777 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2167 |
|
|
>
|
| 2168 |
|
|
0779 : 28 [ 4]> plp ;restore status
|
| 2169 |
|
|
|
| 2170 |
|
|
set_a $c3,0
|
| 2171 |
|
|
> load_flag 0
|
| 2172 |
|
|
077a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2173 |
|
|
>
|
| 2174 |
|
|
077c : 48 [ 3]> pha ;use stack to load status
|
| 2175 |
|
|
077d : a9c3 [ 2]> lda #$c3 ;precharge accu
|
| 2176 |
|
|
077f : 28 [ 4]> plp
|
| 2177 |
|
|
|
| 2178 |
|
|
0780 : 49c3 [ 2] eor #$c3
|
| 2179 |
|
|
tst_a 0,fz
|
| 2180 |
|
|
0782 : 08 [ 3]> php ;save flags
|
| 2181 |
|
|
0783 : 08 [ 3]> php
|
| 2182 |
|
|
0784 : c900 [ 2]> cmp #0 ;test result
|
| 2183 |
|
|
> trap_ne
|
| 2184 |
|
|
0786 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2185 |
|
|
>
|
| 2186 |
|
|
0788 : 68 [ 4]> pla ;load status
|
| 2187 |
|
|
> cmp_flag fz
|
| 2188 |
|
|
0789 : c932 [ 2]> cmp #(fz|fao)&m8 ;expected flags + always on bits
|
| 2189 |
|
|
>
|
| 2190 |
|
|
> trap_ne
|
| 2191 |
|
|
078b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2192 |
|
|
>
|
| 2193 |
|
|
078d : 28 [ 4]> plp ;restore status
|
| 2194 |
|
|
|
| 2195 |
|
|
next_test
|
| 2196 |
|
|
078e : ad0002 [ 4]> lda test_case ;previous test
|
| 2197 |
|
|
0791 : c906 [ 2]> cmp #test_num
|
| 2198 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 39
|
| 2199 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2200 |
|
|
|
| 2201 |
|
|
> trap_ne ;test is out of sequence
|
| 2202 |
|
|
0793 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2203 |
|
|
>
|
| 2204 |
|
|
0007 = >test_num = test_num + 1
|
| 2205 |
|
|
0795 : a907 [ 2]> lda #test_num ;*** this tests' number
|
| 2206 |
|
|
0797 : 8d0002 [ 4]> sta test_case
|
| 2207 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2208 |
|
|
|
| 2209 |
|
|
|
| 2210 |
|
|
; PC modifying instructions except branches (NOP, JMP, JSR, RTS, BRK, RTI)
|
| 2211 |
|
|
; testing NOP
|
| 2212 |
|
|
079a : a224 [ 2] ldx #$24
|
| 2213 |
|
|
079c : a042 [ 2] ldy #$42
|
| 2214 |
|
|
set_a $18,0
|
| 2215 |
|
|
> load_flag 0
|
| 2216 |
|
|
079e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2217 |
|
|
>
|
| 2218 |
|
|
07a0 : 48 [ 3]> pha ;use stack to load status
|
| 2219 |
|
|
07a1 : a918 [ 2]> lda #$18 ;precharge accu
|
| 2220 |
|
|
07a3 : 28 [ 4]> plp
|
| 2221 |
|
|
|
| 2222 |
|
|
07a4 : ea [ 2] nop
|
| 2223 |
|
|
tst_a $18,0
|
| 2224 |
|
|
07a5 : 08 [ 3]> php ;save flags
|
| 2225 |
|
|
07a6 : 08 [ 3]> php
|
| 2226 |
|
|
07a7 : c918 [ 2]> cmp #$18 ;test result
|
| 2227 |
|
|
> trap_ne
|
| 2228 |
|
|
07a9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2229 |
|
|
>
|
| 2230 |
|
|
07ab : 68 [ 4]> pla ;load status
|
| 2231 |
|
|
> cmp_flag 0
|
| 2232 |
|
|
07ac : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 2233 |
|
|
>
|
| 2234 |
|
|
> trap_ne
|
| 2235 |
|
|
07ae : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2236 |
|
|
>
|
| 2237 |
|
|
07b0 : 28 [ 4]> plp ;restore status
|
| 2238 |
|
|
|
| 2239 |
|
|
07b1 : e024 [ 2] cpx #$24
|
| 2240 |
|
|
trap_ne
|
| 2241 |
|
|
07b3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2242 |
|
|
|
| 2243 |
|
|
07b5 : c042 [ 2] cpy #$42
|
| 2244 |
|
|
trap_ne
|
| 2245 |
|
|
07b7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2246 |
|
|
|
| 2247 |
|
|
07b9 : a2db [ 2] ldx #$db
|
| 2248 |
|
|
07bb : a0bd [ 2] ldy #$bd
|
| 2249 |
|
|
set_a $e7,$ff
|
| 2250 |
|
|
> load_flag $ff
|
| 2251 |
|
|
07bd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 2252 |
|
|
>
|
| 2253 |
|
|
07bf : 48 [ 3]> pha ;use stack to load status
|
| 2254 |
|
|
07c0 : a9e7 [ 2]> lda #$e7 ;precharge accu
|
| 2255 |
|
|
07c2 : 28 [ 4]> plp
|
| 2256 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 40
|
| 2257 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2258 |
|
|
|
| 2259 |
|
|
|
| 2260 |
|
|
07c3 : ea [ 2] nop
|
| 2261 |
|
|
tst_a $e7,$ff
|
| 2262 |
|
|
07c4 : 08 [ 3]> php ;save flags
|
| 2263 |
|
|
07c5 : 08 [ 3]> php
|
| 2264 |
|
|
07c6 : c9e7 [ 2]> cmp #$e7 ;test result
|
| 2265 |
|
|
> trap_ne
|
| 2266 |
|
|
07c8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2267 |
|
|
>
|
| 2268 |
|
|
07ca : 68 [ 4]> pla ;load status
|
| 2269 |
|
|
> cmp_flag $ff
|
| 2270 |
|
|
07cb : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 2271 |
|
|
>
|
| 2272 |
|
|
> trap_ne
|
| 2273 |
|
|
07cd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2274 |
|
|
>
|
| 2275 |
|
|
07cf : 28 [ 4]> plp ;restore status
|
| 2276 |
|
|
|
| 2277 |
|
|
07d0 : e0db [ 2] cpx #$db
|
| 2278 |
|
|
trap_ne
|
| 2279 |
|
|
07d2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2280 |
|
|
|
| 2281 |
|
|
07d4 : c0bd [ 2] cpy #$bd
|
| 2282 |
|
|
trap_ne
|
| 2283 |
|
|
07d6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2284 |
|
|
|
| 2285 |
|
|
next_test
|
| 2286 |
|
|
07d8 : ad0002 [ 4]> lda test_case ;previous test
|
| 2287 |
|
|
07db : c907 [ 2]> cmp #test_num
|
| 2288 |
|
|
> trap_ne ;test is out of sequence
|
| 2289 |
|
|
07dd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2290 |
|
|
>
|
| 2291 |
|
|
0008 = >test_num = test_num + 1
|
| 2292 |
|
|
07df : a908 [ 2]> lda #test_num ;*** this tests' number
|
| 2293 |
|
|
07e1 : 8d0002 [ 4]> sta test_case
|
| 2294 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2295 |
|
|
|
| 2296 |
|
|
|
| 2297 |
|
|
; jump absolute
|
| 2298 |
|
|
set_stat $0
|
| 2299 |
|
|
> load_flag $0
|
| 2300 |
|
|
07e4 : a900 [ 2]> lda #$0 ;allow test to change I-flag (no mask)
|
| 2301 |
|
|
>
|
| 2302 |
|
|
07e6 : 48 [ 3]> pha ;use stack to load status
|
| 2303 |
|
|
07e7 : 28 [ 4]> plp
|
| 2304 |
|
|
|
| 2305 |
|
|
07e8 : a946 [ 2] lda #'F'
|
| 2306 |
|
|
07ea : a241 [ 2] ldx #'A'
|
| 2307 |
|
|
07ec : a052 [ 2] ldy #'R' ;N=0, V=0, Z=0, C=0
|
| 2308 |
|
|
07ee : 4c4e35 [ 3] jmp test_far
|
| 2309 |
|
|
07f1 : ea [ 2] nop
|
| 2310 |
|
|
07f2 : ea [ 2] nop
|
| 2311 |
|
|
trap_ne ;runover protection
|
| 2312 |
|
|
07f3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2313 |
|
|
|
| 2314 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 41
|
| 2315 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2316 |
|
|
|
| 2317 |
|
|
07f5 : e8 [ 2] inx
|
| 2318 |
|
|
07f6 : e8 [ 2] inx
|
| 2319 |
|
|
07f7 : far_ret
|
| 2320 |
|
|
trap_eq ;returned flags OK?
|
| 2321 |
|
|
07f7 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 2322 |
|
|
|
| 2323 |
|
|
trap_pl
|
| 2324 |
|
|
07f9 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)
|
| 2325 |
|
|
|
| 2326 |
|
|
trap_cc
|
| 2327 |
|
|
07fb : 90fe [ 3]> bcc * ;failed carry clear
|
| 2328 |
|
|
|
| 2329 |
|
|
trap_vc
|
| 2330 |
|
|
07fd : 50fe [ 3]> bvc * ;failed overflow clear
|
| 2331 |
|
|
|
| 2332 |
|
|
07ff : c9ec [ 2] cmp #('F'^$aa) ;returned registers OK?
|
| 2333 |
|
|
trap_ne
|
| 2334 |
|
|
0801 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2335 |
|
|
|
| 2336 |
|
|
0803 : e042 [ 2] cpx #('A'+1)
|
| 2337 |
|
|
trap_ne
|
| 2338 |
|
|
0805 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2339 |
|
|
|
| 2340 |
|
|
0807 : c04f [ 2] cpy #('R'-3)
|
| 2341 |
|
|
trap_ne
|
| 2342 |
|
|
0809 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2343 |
|
|
|
| 2344 |
|
|
080b : ca [ 2] dex
|
| 2345 |
|
|
080c : c8 [ 2] iny
|
| 2346 |
|
|
080d : c8 [ 2] iny
|
| 2347 |
|
|
080e : c8 [ 2] iny
|
| 2348 |
|
|
080f : 49aa [ 2] eor #$aa ;N=0, V=1, Z=0, C=1
|
| 2349 |
|
|
0811 : 4c1a08 [ 3] jmp test_near
|
| 2350 |
|
|
0814 : ea [ 2] nop
|
| 2351 |
|
|
0815 : ea [ 2] nop
|
| 2352 |
|
|
trap_ne ;runover protection
|
| 2353 |
|
|
0816 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2354 |
|
|
|
| 2355 |
|
|
0818 : e8 [ 2] inx
|
| 2356 |
|
|
0819 : e8 [ 2] inx
|
| 2357 |
|
|
081a : test_near
|
| 2358 |
|
|
trap_eq ;passed flags OK?
|
| 2359 |
|
|
081a : f0fe [ 3]> beq * ;failed equal (zero)
|
| 2360 |
|
|
|
| 2361 |
|
|
trap_mi
|
| 2362 |
|
|
081c : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 2363 |
|
|
|
| 2364 |
|
|
trap_cc
|
| 2365 |
|
|
081e : 90fe [ 3]> bcc * ;failed carry clear
|
| 2366 |
|
|
|
| 2367 |
|
|
trap_vc
|
| 2368 |
|
|
0820 : 50fe [ 3]> bvc * ;failed overflow clear
|
| 2369 |
|
|
|
| 2370 |
|
|
0822 : c946 [ 2] cmp #'F' ;passed registers OK?
|
| 2371 |
|
|
trap_ne
|
| 2372 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 42
|
| 2373 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2374 |
|
|
|
| 2375 |
|
|
0824 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2376 |
|
|
|
| 2377 |
|
|
0826 : e041 [ 2] cpx #'A'
|
| 2378 |
|
|
trap_ne
|
| 2379 |
|
|
0828 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2380 |
|
|
|
| 2381 |
|
|
082a : c052 [ 2] cpy #'R'
|
| 2382 |
|
|
trap_ne
|
| 2383 |
|
|
082c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2384 |
|
|
|
| 2385 |
|
|
next_test
|
| 2386 |
|
|
082e : ad0002 [ 4]> lda test_case ;previous test
|
| 2387 |
|
|
0831 : c908 [ 2]> cmp #test_num
|
| 2388 |
|
|
> trap_ne ;test is out of sequence
|
| 2389 |
|
|
0833 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2390 |
|
|
>
|
| 2391 |
|
|
0009 = >test_num = test_num + 1
|
| 2392 |
|
|
0835 : a909 [ 2]> lda #test_num ;*** this tests' number
|
| 2393 |
|
|
0837 : 8d0002 [ 4]> sta test_case
|
| 2394 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2395 |
|
|
|
| 2396 |
|
|
|
| 2397 |
|
|
; jump indirect
|
| 2398 |
|
|
set_stat 0
|
| 2399 |
|
|
> load_flag 0
|
| 2400 |
|
|
083a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2401 |
|
|
>
|
| 2402 |
|
|
083c : 48 [ 3]> pha ;use stack to load status
|
| 2403 |
|
|
083d : 28 [ 4]> plp
|
| 2404 |
|
|
|
| 2405 |
|
|
083e : a949 [ 2] lda #'I'
|
| 2406 |
|
|
0840 : a24e [ 2] ldx #'N'
|
| 2407 |
|
|
0842 : a044 [ 2] ldy #'D' ;N=0, V=0, Z=0, C=0
|
| 2408 |
|
|
0844 : 6c7c35 [ 6] jmp (ptr_tst_ind)
|
| 2409 |
|
|
0847 : ea [ 2] nop
|
| 2410 |
|
|
trap_ne ;runover protection
|
| 2411 |
|
|
0848 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2412 |
|
|
|
| 2413 |
|
|
084a : 88 [ 2] dey
|
| 2414 |
|
|
084b : 88 [ 2] dey
|
| 2415 |
|
|
084c : ind_ret
|
| 2416 |
|
|
084c : 08 [ 3] php ;either SP or Y count will fail, if we do not hit
|
| 2417 |
|
|
084d : 88 [ 2] dey
|
| 2418 |
|
|
084e : 88 [ 2] dey
|
| 2419 |
|
|
084f : 88 [ 2] dey
|
| 2420 |
|
|
0850 : 28 [ 4] plp
|
| 2421 |
|
|
trap_eq ;returned flags OK?
|
| 2422 |
|
|
0851 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 2423 |
|
|
|
| 2424 |
|
|
trap_pl
|
| 2425 |
|
|
0853 : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)
|
| 2426 |
|
|
|
| 2427 |
|
|
trap_cc
|
| 2428 |
|
|
0855 : 90fe [ 3]> bcc * ;failed carry clear
|
| 2429 |
|
|
|
| 2430 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 43
|
| 2431 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2432 |
|
|
|
| 2433 |
|
|
trap_vc
|
| 2434 |
|
|
0857 : 50fe [ 3]> bvc * ;failed overflow clear
|
| 2435 |
|
|
|
| 2436 |
|
|
0859 : c9e3 [ 2] cmp #('I'^$aa) ;returned registers OK?
|
| 2437 |
|
|
trap_ne
|
| 2438 |
|
|
085b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2439 |
|
|
|
| 2440 |
|
|
085d : e04f [ 2] cpx #('N'+1)
|
| 2441 |
|
|
trap_ne
|
| 2442 |
|
|
085f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2443 |
|
|
|
| 2444 |
|
|
0861 : c03e [ 2] cpy #('D'-6)
|
| 2445 |
|
|
trap_ne
|
| 2446 |
|
|
0863 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2447 |
|
|
|
| 2448 |
|
|
0865 : ba [ 2] tsx ;SP check
|
| 2449 |
|
|
0866 : e0ff [ 2] cpx #$ff
|
| 2450 |
|
|
trap_ne
|
| 2451 |
|
|
0868 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2452 |
|
|
|
| 2453 |
|
|
next_test
|
| 2454 |
|
|
086a : ad0002 [ 4]> lda test_case ;previous test
|
| 2455 |
|
|
086d : c909 [ 2]> cmp #test_num
|
| 2456 |
|
|
> trap_ne ;test is out of sequence
|
| 2457 |
|
|
086f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2458 |
|
|
>
|
| 2459 |
|
|
000a = >test_num = test_num + 1
|
| 2460 |
|
|
0871 : a90a [ 2]> lda #test_num ;*** this tests' number
|
| 2461 |
|
|
0873 : 8d0002 [ 4]> sta test_case
|
| 2462 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2463 |
|
|
|
| 2464 |
|
|
|
| 2465 |
|
|
; jump subroutine & return from subroutine
|
| 2466 |
|
|
set_stat 0
|
| 2467 |
|
|
> load_flag 0
|
| 2468 |
|
|
0876 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2469 |
|
|
>
|
| 2470 |
|
|
0878 : 48 [ 3]> pha ;use stack to load status
|
| 2471 |
|
|
0879 : 28 [ 4]> plp
|
| 2472 |
|
|
|
| 2473 |
|
|
087a : a94a [ 2] lda #'J'
|
| 2474 |
|
|
087c : a253 [ 2] ldx #'S'
|
| 2475 |
|
|
087e : a052 [ 2] ldy #'R' ;N=0, V=0, Z=0, C=0
|
| 2476 |
|
|
0880 : 20b835 [ 6] jsr test_jsr
|
| 2477 |
|
|
0882 = jsr_ret = *-1 ;last address of jsr = return address
|
| 2478 |
|
|
0883 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit
|
| 2479 |
|
|
0884 : 88 [ 2] dey
|
| 2480 |
|
|
0885 : 88 [ 2] dey
|
| 2481 |
|
|
0886 : 88 [ 2] dey
|
| 2482 |
|
|
0887 : 28 [ 4] plp
|
| 2483 |
|
|
trap_eq ;returned flags OK?
|
| 2484 |
|
|
0888 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 2485 |
|
|
|
| 2486 |
|
|
trap_pl
|
| 2487 |
|
|
088a : 10fe [ 3]> bpl * ;failed plus (bit 7 clear)
|
| 2488 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 44
|
| 2489 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2490 |
|
|
|
| 2491 |
|
|
|
| 2492 |
|
|
trap_cc
|
| 2493 |
|
|
088c : 90fe [ 3]> bcc * ;failed carry clear
|
| 2494 |
|
|
|
| 2495 |
|
|
trap_vc
|
| 2496 |
|
|
088e : 50fe [ 3]> bvc * ;failed overflow clear
|
| 2497 |
|
|
|
| 2498 |
|
|
0890 : c9e0 [ 2] cmp #('J'^$aa) ;returned registers OK?
|
| 2499 |
|
|
trap_ne
|
| 2500 |
|
|
0892 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2501 |
|
|
|
| 2502 |
|
|
0894 : e054 [ 2] cpx #('S'+1)
|
| 2503 |
|
|
trap_ne
|
| 2504 |
|
|
0896 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2505 |
|
|
|
| 2506 |
|
|
0898 : c04c [ 2] cpy #('R'-6)
|
| 2507 |
|
|
trap_ne
|
| 2508 |
|
|
089a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2509 |
|
|
|
| 2510 |
|
|
089c : ba [ 2] tsx ;sp?
|
| 2511 |
|
|
089d : e0ff [ 2] cpx #$ff
|
| 2512 |
|
|
trap_ne
|
| 2513 |
|
|
089f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2514 |
|
|
|
| 2515 |
|
|
next_test
|
| 2516 |
|
|
08a1 : ad0002 [ 4]> lda test_case ;previous test
|
| 2517 |
|
|
08a4 : c90a [ 2]> cmp #test_num
|
| 2518 |
|
|
> trap_ne ;test is out of sequence
|
| 2519 |
|
|
08a6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2520 |
|
|
>
|
| 2521 |
|
|
000b = >test_num = test_num + 1
|
| 2522 |
|
|
08a8 : a90b [ 2]> lda #test_num ;*** this tests' number
|
| 2523 |
|
|
08aa : 8d0002 [ 4]> sta test_case
|
| 2524 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2525 |
|
|
|
| 2526 |
|
|
|
| 2527 |
|
|
; break & return from interrupt
|
| 2528 |
|
|
if ROM_vectors = 1
|
| 2529 |
|
|
set_stat 0
|
| 2530 |
|
|
> load_flag 0
|
| 2531 |
|
|
08ad : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2532 |
|
|
>
|
| 2533 |
|
|
08af : 48 [ 3]> pha ;use stack to load status
|
| 2534 |
|
|
08b0 : 28 [ 4]> plp
|
| 2535 |
|
|
|
| 2536 |
|
|
08b1 : a942 [ 2] lda #'B'
|
| 2537 |
|
|
08b3 : a252 [ 2] ldx #'R'
|
| 2538 |
|
|
08b5 : a04b [ 2] ldy #'K' ;N=0, V=0, Z=0, C=0
|
| 2539 |
|
|
08b7 : 00 [ 7] brk
|
| 2540 |
|
|
else
|
| 2541 |
|
|
lda #hi brk_ret ;emulated break
|
| 2542 |
|
|
pha
|
| 2543 |
|
|
lda #lo brk_ret
|
| 2544 |
|
|
pha
|
| 2545 |
|
|
lda #fao ;set break & unused on stack
|
| 2546 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 45
|
| 2547 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2548 |
|
|
|
| 2549 |
|
|
pha
|
| 2550 |
|
|
set_stat intdis
|
| 2551 |
|
|
lda #'B'
|
| 2552 |
|
|
ldx #'R'
|
| 2553 |
|
|
ldy #'K' ;N=0, V=0, Z=0, C=0
|
| 2554 |
|
|
jmp irq_trap
|
| 2555 |
|
|
endif
|
| 2556 |
|
|
08b8 : 88 [ 2] dey ;should not be executed
|
| 2557 |
|
|
08b9 : brk_ret ;address of break return
|
| 2558 |
|
|
08b9 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit
|
| 2559 |
|
|
08ba : 88 [ 2] dey
|
| 2560 |
|
|
08bb : 88 [ 2] dey
|
| 2561 |
|
|
08bc : 88 [ 2] dey
|
| 2562 |
|
|
08bd : c9e8 [ 2] cmp #('B'^$aa) ;returned registers OK?
|
| 2563 |
|
|
trap_ne
|
| 2564 |
|
|
08bf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2565 |
|
|
|
| 2566 |
|
|
08c1 : e053 [ 2] cpx #('R'+1)
|
| 2567 |
|
|
trap_ne
|
| 2568 |
|
|
08c3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2569 |
|
|
|
| 2570 |
|
|
08c5 : c045 [ 2] cpy #('K'-6)
|
| 2571 |
|
|
trap_ne
|
| 2572 |
|
|
08c7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2573 |
|
|
|
| 2574 |
|
|
08c9 : 68 [ 4] pla ;returned flags OK (unchanged)?
|
| 2575 |
|
|
cmp_flag 0
|
| 2576 |
|
|
08ca : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 2577 |
|
|
|
| 2578 |
|
|
trap_ne
|
| 2579 |
|
|
08cc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2580 |
|
|
|
| 2581 |
|
|
08ce : ba [ 2] tsx ;sp?
|
| 2582 |
|
|
08cf : e0ff [ 2] cpx #$ff
|
| 2583 |
|
|
trap_ne
|
| 2584 |
|
|
08d1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2585 |
|
|
|
| 2586 |
|
|
next_test
|
| 2587 |
|
|
08d3 : ad0002 [ 4]> lda test_case ;previous test
|
| 2588 |
|
|
08d6 : c90b [ 2]> cmp #test_num
|
| 2589 |
|
|
> trap_ne ;test is out of sequence
|
| 2590 |
|
|
08d8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2591 |
|
|
>
|
| 2592 |
|
|
000c = >test_num = test_num + 1
|
| 2593 |
|
|
08da : a90c [ 2]> lda #test_num ;*** this tests' number
|
| 2594 |
|
|
08dc : 8d0002 [ 4]> sta test_case
|
| 2595 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2596 |
|
|
|
| 2597 |
|
|
|
| 2598 |
|
|
; test set and clear flags CLC CLI CLD CLV SEC SEI SED
|
| 2599 |
|
|
set_stat $ff
|
| 2600 |
|
|
> load_flag $ff
|
| 2601 |
|
|
08df : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 2602 |
|
|
>
|
| 2603 |
|
|
08e1 : 48 [ 3]> pha ;use stack to load status
|
| 2604 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 46
|
| 2605 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2606 |
|
|
|
| 2607 |
|
|
08e2 : 28 [ 4]> plp
|
| 2608 |
|
|
|
| 2609 |
|
|
08e3 : 18 [ 2] clc
|
| 2610 |
|
|
tst_stat $ff-carry
|
| 2611 |
|
|
08e4 : 08 [ 3]> php ;save status
|
| 2612 |
|
|
08e5 : 08 [ 3]> php ;use stack to retrieve status
|
| 2613 |
|
|
08e6 : 68 [ 4]> pla
|
| 2614 |
|
|
> cmp_flag $ff-carry
|
| 2615 |
|
|
08e7 : c9fe [ 2]> cmp #($ff-carry|fao)&m8 ;expected flags + always on bits
|
| 2616 |
|
|
>
|
| 2617 |
|
|
> trap_ne
|
| 2618 |
|
|
08e9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2619 |
|
|
>
|
| 2620 |
|
|
08eb : 28 [ 4]> plp ;restore status
|
| 2621 |
|
|
|
| 2622 |
|
|
08ec : 38 [ 2] sec
|
| 2623 |
|
|
tst_stat $ff
|
| 2624 |
|
|
08ed : 08 [ 3]> php ;save status
|
| 2625 |
|
|
08ee : 08 [ 3]> php ;use stack to retrieve status
|
| 2626 |
|
|
08ef : 68 [ 4]> pla
|
| 2627 |
|
|
> cmp_flag $ff
|
| 2628 |
|
|
08f0 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 2629 |
|
|
>
|
| 2630 |
|
|
> trap_ne
|
| 2631 |
|
|
08f2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2632 |
|
|
>
|
| 2633 |
|
|
08f4 : 28 [ 4]> plp ;restore status
|
| 2634 |
|
|
|
| 2635 |
|
|
if I_flag = 3
|
| 2636 |
|
|
08f5 : 58 [ 2] cli
|
| 2637 |
|
|
tst_stat $ff-intdis
|
| 2638 |
|
|
08f6 : 08 [ 3]> php ;save status
|
| 2639 |
|
|
08f7 : 08 [ 3]> php ;use stack to retrieve status
|
| 2640 |
|
|
08f8 : 68 [ 4]> pla
|
| 2641 |
|
|
> cmp_flag $ff-intdis
|
| 2642 |
|
|
08f9 : c9fb [ 2]> cmp #($ff-intdis|fao)&m8 ;expected flags + always on bits
|
| 2643 |
|
|
>
|
| 2644 |
|
|
> trap_ne
|
| 2645 |
|
|
08fb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2646 |
|
|
>
|
| 2647 |
|
|
08fd : 28 [ 4]> plp ;restore status
|
| 2648 |
|
|
|
| 2649 |
|
|
08fe : 78 [ 2] sei
|
| 2650 |
|
|
tst_stat $ff
|
| 2651 |
|
|
08ff : 08 [ 3]> php ;save status
|
| 2652 |
|
|
0900 : 08 [ 3]> php ;use stack to retrieve status
|
| 2653 |
|
|
0901 : 68 [ 4]> pla
|
| 2654 |
|
|
> cmp_flag $ff
|
| 2655 |
|
|
0902 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 2656 |
|
|
>
|
| 2657 |
|
|
> trap_ne
|
| 2658 |
|
|
0904 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2659 |
|
|
>
|
| 2660 |
|
|
0906 : 28 [ 4]> plp ;restore status
|
| 2661 |
|
|
|
| 2662 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 47
|
| 2663 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2664 |
|
|
|
| 2665 |
|
|
endif
|
| 2666 |
|
|
0907 : d8 [ 2] cld
|
| 2667 |
|
|
tst_stat $ff-decmode
|
| 2668 |
|
|
0908 : 08 [ 3]> php ;save status
|
| 2669 |
|
|
0909 : 08 [ 3]> php ;use stack to retrieve status
|
| 2670 |
|
|
090a : 68 [ 4]> pla
|
| 2671 |
|
|
> cmp_flag $ff-decmode
|
| 2672 |
|
|
090b : c9f7 [ 2]> cmp #($ff-decmode|fao)&m8 ;expected flags + always on bits
|
| 2673 |
|
|
>
|
| 2674 |
|
|
> trap_ne
|
| 2675 |
|
|
090d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2676 |
|
|
>
|
| 2677 |
|
|
090f : 28 [ 4]> plp ;restore status
|
| 2678 |
|
|
|
| 2679 |
|
|
0910 : f8 [ 2] sed
|
| 2680 |
|
|
tst_stat $ff
|
| 2681 |
|
|
0911 : 08 [ 3]> php ;save status
|
| 2682 |
|
|
0912 : 08 [ 3]> php ;use stack to retrieve status
|
| 2683 |
|
|
0913 : 68 [ 4]> pla
|
| 2684 |
|
|
> cmp_flag $ff
|
| 2685 |
|
|
0914 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 2686 |
|
|
>
|
| 2687 |
|
|
> trap_ne
|
| 2688 |
|
|
0916 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2689 |
|
|
>
|
| 2690 |
|
|
0918 : 28 [ 4]> plp ;restore status
|
| 2691 |
|
|
|
| 2692 |
|
|
0919 : b8 [ 2] clv
|
| 2693 |
|
|
tst_stat $ff-overfl
|
| 2694 |
|
|
091a : 08 [ 3]> php ;save status
|
| 2695 |
|
|
091b : 08 [ 3]> php ;use stack to retrieve status
|
| 2696 |
|
|
091c : 68 [ 4]> pla
|
| 2697 |
|
|
> cmp_flag $ff-overfl
|
| 2698 |
|
|
091d : c9bf [ 2]> cmp #($ff-overfl|fao)&m8 ;expected flags + always on bits
|
| 2699 |
|
|
>
|
| 2700 |
|
|
> trap_ne
|
| 2701 |
|
|
091f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2702 |
|
|
>
|
| 2703 |
|
|
0921 : 28 [ 4]> plp ;restore status
|
| 2704 |
|
|
|
| 2705 |
|
|
set_stat 0
|
| 2706 |
|
|
> load_flag 0
|
| 2707 |
|
|
0922 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2708 |
|
|
>
|
| 2709 |
|
|
0924 : 48 [ 3]> pha ;use stack to load status
|
| 2710 |
|
|
0925 : 28 [ 4]> plp
|
| 2711 |
|
|
|
| 2712 |
|
|
tst_stat 0
|
| 2713 |
|
|
0926 : 08 [ 3]> php ;save status
|
| 2714 |
|
|
0927 : 08 [ 3]> php ;use stack to retrieve status
|
| 2715 |
|
|
0928 : 68 [ 4]> pla
|
| 2716 |
|
|
> cmp_flag 0
|
| 2717 |
|
|
0929 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 2718 |
|
|
>
|
| 2719 |
|
|
> trap_ne
|
| 2720 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 48
|
| 2721 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2722 |
|
|
|
| 2723 |
|
|
092b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2724 |
|
|
>
|
| 2725 |
|
|
092d : 28 [ 4]> plp ;restore status
|
| 2726 |
|
|
|
| 2727 |
|
|
092e : 38 [ 2] sec
|
| 2728 |
|
|
tst_stat carry
|
| 2729 |
|
|
092f : 08 [ 3]> php ;save status
|
| 2730 |
|
|
0930 : 08 [ 3]> php ;use stack to retrieve status
|
| 2731 |
|
|
0931 : 68 [ 4]> pla
|
| 2732 |
|
|
> cmp_flag carry
|
| 2733 |
|
|
0932 : c931 [ 2]> cmp #(carry|fao)&m8 ;expected flags + always on bits
|
| 2734 |
|
|
>
|
| 2735 |
|
|
> trap_ne
|
| 2736 |
|
|
0934 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2737 |
|
|
>
|
| 2738 |
|
|
0936 : 28 [ 4]> plp ;restore status
|
| 2739 |
|
|
|
| 2740 |
|
|
0937 : 18 [ 2] clc
|
| 2741 |
|
|
tst_stat 0
|
| 2742 |
|
|
0938 : 08 [ 3]> php ;save status
|
| 2743 |
|
|
0939 : 08 [ 3]> php ;use stack to retrieve status
|
| 2744 |
|
|
093a : 68 [ 4]> pla
|
| 2745 |
|
|
> cmp_flag 0
|
| 2746 |
|
|
093b : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bits
|
| 2747 |
|
|
>
|
| 2748 |
|
|
> trap_ne
|
| 2749 |
|
|
093d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2750 |
|
|
>
|
| 2751 |
|
|
093f : 28 [ 4]> plp ;restore status
|
| 2752 |
|
|
|
| 2753 |
|
|
if I_flag = 3
|
| 2754 |
|
|
0940 : 78 [ 2] sei
|
| 2755 |
|
|
tst_stat intdis
|
| 2756 |
|
|
0941 : 08 [ 3]> php ;save status
|
| 2757 |
|
|
0942 : 08 [ 3]> php ;use stack to retrieve status
|
| 2758 |
|
|
0943 : 68 [ 4]> pla
|
| 2759 |
|
|
> cmp_flag intdis
|
| 2760 |
|
|
0944 : c934 [ 2]> cmp #(intdis|fao)&m8 ;expected flags + always on bits
|
| 2761 |
|
|
>
|
| 2762 |
|
|
> trap_ne
|
| 2763 |
|
|
0946 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2764 |
|
|
>
|
| 2765 |
|
|
0948 : 28 [ 4]> plp ;restore status
|
| 2766 |
|
|
|
| 2767 |
|
|
0949 : 58 [ 2] cli
|
| 2768 |
|
|
tst_stat 0
|
| 2769 |
|
|
094a : 08 [ 3]> php ;save status
|
| 2770 |
|
|
094b : 08 [ 3]> php ;use stack to retrieve status
|
| 2771 |
|
|
094c : 68 [ 4]> pla
|
| 2772 |
|
|
> cmp_flag 0
|
| 2773 |
|
|
094d : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 2774 |
|
|
>
|
| 2775 |
|
|
> trap_ne
|
| 2776 |
|
|
094f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2777 |
|
|
>
|
| 2778 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 49
|
| 2779 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2780 |
|
|
|
| 2781 |
|
|
0951 : 28 [ 4]> plp ;restore status
|
| 2782 |
|
|
|
| 2783 |
|
|
endif
|
| 2784 |
|
|
0952 : f8 [ 2] sed
|
| 2785 |
|
|
tst_stat decmode
|
| 2786 |
|
|
0953 : 08 [ 3]> php ;save status
|
| 2787 |
|
|
0954 : 08 [ 3]> php ;use stack to retrieve status
|
| 2788 |
|
|
0955 : 68 [ 4]> pla
|
| 2789 |
|
|
> cmp_flag decmode
|
| 2790 |
|
|
0956 : c938 [ 2]> cmp #(decmode|fao)&m8 ;expected flags + always on bits
|
| 2791 |
|
|
>
|
| 2792 |
|
|
> trap_ne
|
| 2793 |
|
|
0958 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2794 |
|
|
>
|
| 2795 |
|
|
095a : 28 [ 4]> plp ;restore status
|
| 2796 |
|
|
|
| 2797 |
|
|
095b : d8 [ 2] cld
|
| 2798 |
|
|
tst_stat 0
|
| 2799 |
|
|
095c : 08 [ 3]> php ;save status
|
| 2800 |
|
|
095d : 08 [ 3]> php ;use stack to retrieve status
|
| 2801 |
|
|
095e : 68 [ 4]> pla
|
| 2802 |
|
|
> cmp_flag 0
|
| 2803 |
|
|
095f : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bits
|
| 2804 |
|
|
>
|
| 2805 |
|
|
> trap_ne
|
| 2806 |
|
|
0961 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2807 |
|
|
>
|
| 2808 |
|
|
0963 : 28 [ 4]> plp ;restore status
|
| 2809 |
|
|
|
| 2810 |
|
|
set_stat overfl
|
| 2811 |
|
|
> load_flag overfl
|
| 2812 |
|
|
0964 : a940 [ 2]> lda #overfl ;allow test to change I-flag (no mask)
|
| 2813 |
|
|
>
|
| 2814 |
|
|
0966 : 48 [ 3]> pha ;use stack to load status
|
| 2815 |
|
|
0967 : 28 [ 4]> plp
|
| 2816 |
|
|
|
| 2817 |
|
|
tst_stat overfl
|
| 2818 |
|
|
0968 : 08 [ 3]> php ;save status
|
| 2819 |
|
|
0969 : 08 [ 3]> php ;use stack to retrieve status
|
| 2820 |
|
|
096a : 68 [ 4]> pla
|
| 2821 |
|
|
> cmp_flag overfl
|
| 2822 |
|
|
096b : c970 [ 2]> cmp #(overfl|fao)&m8 ;expected flags + always on bits
|
| 2823 |
|
|
>
|
| 2824 |
|
|
> trap_ne
|
| 2825 |
|
|
096d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2826 |
|
|
>
|
| 2827 |
|
|
096f : 28 [ 4]> plp ;restore status
|
| 2828 |
|
|
|
| 2829 |
|
|
0970 : b8 [ 2] clv
|
| 2830 |
|
|
tst_stat 0
|
| 2831 |
|
|
0971 : 08 [ 3]> php ;save status
|
| 2832 |
|
|
0972 : 08 [ 3]> php ;use stack to retrieve status
|
| 2833 |
|
|
0973 : 68 [ 4]> pla
|
| 2834 |
|
|
> cmp_flag 0
|
| 2835 |
|
|
0974 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 2836 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 50
|
| 2837 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2838 |
|
|
|
| 2839 |
|
|
>
|
| 2840 |
|
|
> trap_ne
|
| 2841 |
|
|
0976 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2842 |
|
|
>
|
| 2843 |
|
|
0978 : 28 [ 4]> plp ;restore status
|
| 2844 |
|
|
|
| 2845 |
|
|
next_test
|
| 2846 |
|
|
0979 : ad0002 [ 4]> lda test_case ;previous test
|
| 2847 |
|
|
097c : c90c [ 2]> cmp #test_num
|
| 2848 |
|
|
> trap_ne ;test is out of sequence
|
| 2849 |
|
|
097e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2850 |
|
|
>
|
| 2851 |
|
|
000d = >test_num = test_num + 1
|
| 2852 |
|
|
0980 : a90d [ 2]> lda #test_num ;*** this tests' number
|
| 2853 |
|
|
0982 : 8d0002 [ 4]> sta test_case
|
| 2854 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 2855 |
|
|
|
| 2856 |
|
|
; testing index register increment/decrement and transfer
|
| 2857 |
|
|
; INX INY DEX DEY TAX TXA TAY TYA
|
| 2858 |
|
|
0985 : a2fe [ 2] ldx #$fe
|
| 2859 |
|
|
set_stat $ff
|
| 2860 |
|
|
> load_flag $ff
|
| 2861 |
|
|
0987 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 2862 |
|
|
>
|
| 2863 |
|
|
0989 : 48 [ 3]> pha ;use stack to load status
|
| 2864 |
|
|
098a : 28 [ 4]> plp
|
| 2865 |
|
|
|
| 2866 |
|
|
098b : e8 [ 2] inx ;ff
|
| 2867 |
|
|
tst_x $ff,$ff-zero
|
| 2868 |
|
|
098c : 08 [ 3]> php ;save flags
|
| 2869 |
|
|
098d : 08 [ 3]> php
|
| 2870 |
|
|
098e : e0ff [ 2]> cpx #$ff ;test result
|
| 2871 |
|
|
> trap_ne
|
| 2872 |
|
|
0990 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2873 |
|
|
>
|
| 2874 |
|
|
0992 : 68 [ 4]> pla ;load status
|
| 2875 |
|
|
> cmp_flag $ff-zero
|
| 2876 |
|
|
0993 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 2877 |
|
|
>
|
| 2878 |
|
|
> trap_ne
|
| 2879 |
|
|
0995 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2880 |
|
|
>
|
| 2881 |
|
|
0997 : 28 [ 4]> plp ;restore status
|
| 2882 |
|
|
|
| 2883 |
|
|
0998 : e8 [ 2] inx ;00
|
| 2884 |
|
|
tst_x 0,$ff-minus
|
| 2885 |
|
|
0999 : 08 [ 3]> php ;save flags
|
| 2886 |
|
|
099a : 08 [ 3]> php
|
| 2887 |
|
|
099b : e000 [ 2]> cpx #0 ;test result
|
| 2888 |
|
|
> trap_ne
|
| 2889 |
|
|
099d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2890 |
|
|
>
|
| 2891 |
|
|
099f : 68 [ 4]> pla ;load status
|
| 2892 |
|
|
> cmp_flag $ff-minus
|
| 2893 |
|
|
09a0 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 2894 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 51
|
| 2895 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2896 |
|
|
|
| 2897 |
|
|
>
|
| 2898 |
|
|
> trap_ne
|
| 2899 |
|
|
09a2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2900 |
|
|
>
|
| 2901 |
|
|
09a4 : 28 [ 4]> plp ;restore status
|
| 2902 |
|
|
|
| 2903 |
|
|
09a5 : e8 [ 2] inx ;01
|
| 2904 |
|
|
tst_x 1,$ff-minus-zero
|
| 2905 |
|
|
09a6 : 08 [ 3]> php ;save flags
|
| 2906 |
|
|
09a7 : 08 [ 3]> php
|
| 2907 |
|
|
09a8 : e001 [ 2]> cpx #1 ;test result
|
| 2908 |
|
|
> trap_ne
|
| 2909 |
|
|
09aa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2910 |
|
|
>
|
| 2911 |
|
|
09ac : 68 [ 4]> pla ;load status
|
| 2912 |
|
|
> cmp_flag $ff-minus-zero
|
| 2913 |
|
|
09ad : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits
|
| 2914 |
|
|
>
|
| 2915 |
|
|
> trap_ne
|
| 2916 |
|
|
09af : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2917 |
|
|
>
|
| 2918 |
|
|
09b1 : 28 [ 4]> plp ;restore status
|
| 2919 |
|
|
|
| 2920 |
|
|
09b2 : ca [ 2] dex ;00
|
| 2921 |
|
|
tst_x 0,$ff-minus
|
| 2922 |
|
|
09b3 : 08 [ 3]> php ;save flags
|
| 2923 |
|
|
09b4 : 08 [ 3]> php
|
| 2924 |
|
|
09b5 : e000 [ 2]> cpx #0 ;test result
|
| 2925 |
|
|
> trap_ne
|
| 2926 |
|
|
09b7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2927 |
|
|
>
|
| 2928 |
|
|
09b9 : 68 [ 4]> pla ;load status
|
| 2929 |
|
|
> cmp_flag $ff-minus
|
| 2930 |
|
|
09ba : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 2931 |
|
|
>
|
| 2932 |
|
|
> trap_ne
|
| 2933 |
|
|
09bc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2934 |
|
|
>
|
| 2935 |
|
|
09be : 28 [ 4]> plp ;restore status
|
| 2936 |
|
|
|
| 2937 |
|
|
09bf : ca [ 2] dex ;ff
|
| 2938 |
|
|
tst_x $ff,$ff-zero
|
| 2939 |
|
|
09c0 : 08 [ 3]> php ;save flags
|
| 2940 |
|
|
09c1 : 08 [ 3]> php
|
| 2941 |
|
|
09c2 : e0ff [ 2]> cpx #$ff ;test result
|
| 2942 |
|
|
> trap_ne
|
| 2943 |
|
|
09c4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2944 |
|
|
>
|
| 2945 |
|
|
09c6 : 68 [ 4]> pla ;load status
|
| 2946 |
|
|
> cmp_flag $ff-zero
|
| 2947 |
|
|
09c7 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 2948 |
|
|
>
|
| 2949 |
|
|
> trap_ne
|
| 2950 |
|
|
09c9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2951 |
|
|
>
|
| 2952 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 52
|
| 2953 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 2954 |
|
|
|
| 2955 |
|
|
09cb : 28 [ 4]> plp ;restore status
|
| 2956 |
|
|
|
| 2957 |
|
|
09cc : ca [ 2] dex ;fe
|
| 2958 |
|
|
set_stat 0
|
| 2959 |
|
|
> load_flag 0
|
| 2960 |
|
|
09cd : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 2961 |
|
|
>
|
| 2962 |
|
|
09cf : 48 [ 3]> pha ;use stack to load status
|
| 2963 |
|
|
09d0 : 28 [ 4]> plp
|
| 2964 |
|
|
|
| 2965 |
|
|
09d1 : e8 [ 2] inx ;ff
|
| 2966 |
|
|
tst_x $ff,minus
|
| 2967 |
|
|
09d2 : 08 [ 3]> php ;save flags
|
| 2968 |
|
|
09d3 : 08 [ 3]> php
|
| 2969 |
|
|
09d4 : e0ff [ 2]> cpx #$ff ;test result
|
| 2970 |
|
|
> trap_ne
|
| 2971 |
|
|
09d6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2972 |
|
|
>
|
| 2973 |
|
|
09d8 : 68 [ 4]> pla ;load status
|
| 2974 |
|
|
> cmp_flag minus
|
| 2975 |
|
|
09d9 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 2976 |
|
|
>
|
| 2977 |
|
|
> trap_ne
|
| 2978 |
|
|
09db : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2979 |
|
|
>
|
| 2980 |
|
|
09dd : 28 [ 4]> plp ;restore status
|
| 2981 |
|
|
|
| 2982 |
|
|
09de : e8 [ 2] inx ;00
|
| 2983 |
|
|
tst_x 0,zero
|
| 2984 |
|
|
09df : 08 [ 3]> php ;save flags
|
| 2985 |
|
|
09e0 : 08 [ 3]> php
|
| 2986 |
|
|
09e1 : e000 [ 2]> cpx #0 ;test result
|
| 2987 |
|
|
> trap_ne
|
| 2988 |
|
|
09e3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2989 |
|
|
>
|
| 2990 |
|
|
09e5 : 68 [ 4]> pla ;load status
|
| 2991 |
|
|
> cmp_flag zero
|
| 2992 |
|
|
09e6 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 2993 |
|
|
>
|
| 2994 |
|
|
> trap_ne
|
| 2995 |
|
|
09e8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 2996 |
|
|
>
|
| 2997 |
|
|
09ea : 28 [ 4]> plp ;restore status
|
| 2998 |
|
|
|
| 2999 |
|
|
09eb : e8 [ 2] inx ;01
|
| 3000 |
|
|
tst_x 1,0
|
| 3001 |
|
|
09ec : 08 [ 3]> php ;save flags
|
| 3002 |
|
|
09ed : 08 [ 3]> php
|
| 3003 |
|
|
09ee : e001 [ 2]> cpx #1 ;test result
|
| 3004 |
|
|
> trap_ne
|
| 3005 |
|
|
09f0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3006 |
|
|
>
|
| 3007 |
|
|
09f2 : 68 [ 4]> pla ;load status
|
| 3008 |
|
|
> cmp_flag 0
|
| 3009 |
|
|
09f3 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3010 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 53
|
| 3011 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3012 |
|
|
|
| 3013 |
|
|
>
|
| 3014 |
|
|
> trap_ne
|
| 3015 |
|
|
09f5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3016 |
|
|
>
|
| 3017 |
|
|
09f7 : 28 [ 4]> plp ;restore status
|
| 3018 |
|
|
|
| 3019 |
|
|
09f8 : ca [ 2] dex ;00
|
| 3020 |
|
|
tst_x 0,zero
|
| 3021 |
|
|
09f9 : 08 [ 3]> php ;save flags
|
| 3022 |
|
|
09fa : 08 [ 3]> php
|
| 3023 |
|
|
09fb : e000 [ 2]> cpx #0 ;test result
|
| 3024 |
|
|
> trap_ne
|
| 3025 |
|
|
09fd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3026 |
|
|
>
|
| 3027 |
|
|
09ff : 68 [ 4]> pla ;load status
|
| 3028 |
|
|
> cmp_flag zero
|
| 3029 |
|
|
0a00 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 3030 |
|
|
>
|
| 3031 |
|
|
> trap_ne
|
| 3032 |
|
|
0a02 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3033 |
|
|
>
|
| 3034 |
|
|
0a04 : 28 [ 4]> plp ;restore status
|
| 3035 |
|
|
|
| 3036 |
|
|
0a05 : ca [ 2] dex ;ff
|
| 3037 |
|
|
tst_x $ff,minus
|
| 3038 |
|
|
0a06 : 08 [ 3]> php ;save flags
|
| 3039 |
|
|
0a07 : 08 [ 3]> php
|
| 3040 |
|
|
0a08 : e0ff [ 2]> cpx #$ff ;test result
|
| 3041 |
|
|
> trap_ne
|
| 3042 |
|
|
0a0a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3043 |
|
|
>
|
| 3044 |
|
|
0a0c : 68 [ 4]> pla ;load status
|
| 3045 |
|
|
> cmp_flag minus
|
| 3046 |
|
|
0a0d : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 3047 |
|
|
>
|
| 3048 |
|
|
> trap_ne
|
| 3049 |
|
|
0a0f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3050 |
|
|
>
|
| 3051 |
|
|
0a11 : 28 [ 4]> plp ;restore status
|
| 3052 |
|
|
|
| 3053 |
|
|
|
| 3054 |
|
|
0a12 : a0fe [ 2] ldy #$fe
|
| 3055 |
|
|
set_stat $ff
|
| 3056 |
|
|
> load_flag $ff
|
| 3057 |
|
|
0a14 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3058 |
|
|
>
|
| 3059 |
|
|
0a16 : 48 [ 3]> pha ;use stack to load status
|
| 3060 |
|
|
0a17 : 28 [ 4]> plp
|
| 3061 |
|
|
|
| 3062 |
|
|
0a18 : c8 [ 2] iny ;ff
|
| 3063 |
|
|
tst_y $ff,$ff-zero
|
| 3064 |
|
|
0a19 : 08 [ 3]> php ;save flags
|
| 3065 |
|
|
0a1a : 08 [ 3]> php
|
| 3066 |
|
|
0a1b : c0ff [ 2]> cpy #$ff ;test result
|
| 3067 |
|
|
> trap_ne
|
| 3068 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 54
|
| 3069 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3070 |
|
|
|
| 3071 |
|
|
0a1d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3072 |
|
|
>
|
| 3073 |
|
|
0a1f : 68 [ 4]> pla ;load status
|
| 3074 |
|
|
> cmp_flag $ff-zero
|
| 3075 |
|
|
0a20 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 3076 |
|
|
>
|
| 3077 |
|
|
> trap_ne
|
| 3078 |
|
|
0a22 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3079 |
|
|
>
|
| 3080 |
|
|
0a24 : 28 [ 4]> plp ;restore status
|
| 3081 |
|
|
|
| 3082 |
|
|
0a25 : c8 [ 2] iny ;00
|
| 3083 |
|
|
tst_y 0,$ff-minus
|
| 3084 |
|
|
0a26 : 08 [ 3]> php ;save flags
|
| 3085 |
|
|
0a27 : 08 [ 3]> php
|
| 3086 |
|
|
0a28 : c000 [ 2]> cpy #0 ;test result
|
| 3087 |
|
|
> trap_ne
|
| 3088 |
|
|
0a2a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3089 |
|
|
>
|
| 3090 |
|
|
0a2c : 68 [ 4]> pla ;load status
|
| 3091 |
|
|
> cmp_flag $ff-minus
|
| 3092 |
|
|
0a2d : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 3093 |
|
|
>
|
| 3094 |
|
|
> trap_ne
|
| 3095 |
|
|
0a2f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3096 |
|
|
>
|
| 3097 |
|
|
0a31 : 28 [ 4]> plp ;restore status
|
| 3098 |
|
|
|
| 3099 |
|
|
0a32 : c8 [ 2] iny ;01
|
| 3100 |
|
|
tst_y 1,$ff-minus-zero
|
| 3101 |
|
|
0a33 : 08 [ 3]> php ;save flags
|
| 3102 |
|
|
0a34 : 08 [ 3]> php
|
| 3103 |
|
|
0a35 : c001 [ 2]> cpy #1 ;test result
|
| 3104 |
|
|
> trap_ne
|
| 3105 |
|
|
0a37 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3106 |
|
|
>
|
| 3107 |
|
|
0a39 : 68 [ 4]> pla ;load status
|
| 3108 |
|
|
> cmp_flag $ff-minus-zero
|
| 3109 |
|
|
0a3a : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits
|
| 3110 |
|
|
>
|
| 3111 |
|
|
> trap_ne
|
| 3112 |
|
|
0a3c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3113 |
|
|
>
|
| 3114 |
|
|
0a3e : 28 [ 4]> plp ;restore status
|
| 3115 |
|
|
|
| 3116 |
|
|
0a3f : 88 [ 2] dey ;00
|
| 3117 |
|
|
tst_y 0,$ff-minus
|
| 3118 |
|
|
0a40 : 08 [ 3]> php ;save flags
|
| 3119 |
|
|
0a41 : 08 [ 3]> php
|
| 3120 |
|
|
0a42 : c000 [ 2]> cpy #0 ;test result
|
| 3121 |
|
|
> trap_ne
|
| 3122 |
|
|
0a44 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3123 |
|
|
>
|
| 3124 |
|
|
0a46 : 68 [ 4]> pla ;load status
|
| 3125 |
|
|
> cmp_flag $ff-minus
|
| 3126 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 55
|
| 3127 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3128 |
|
|
|
| 3129 |
|
|
0a47 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 3130 |
|
|
>
|
| 3131 |
|
|
> trap_ne
|
| 3132 |
|
|
0a49 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3133 |
|
|
>
|
| 3134 |
|
|
0a4b : 28 [ 4]> plp ;restore status
|
| 3135 |
|
|
|
| 3136 |
|
|
0a4c : 88 [ 2] dey ;ff
|
| 3137 |
|
|
tst_y $ff,$ff-zero
|
| 3138 |
|
|
0a4d : 08 [ 3]> php ;save flags
|
| 3139 |
|
|
0a4e : 08 [ 3]> php
|
| 3140 |
|
|
0a4f : c0ff [ 2]> cpy #$ff ;test result
|
| 3141 |
|
|
> trap_ne
|
| 3142 |
|
|
0a51 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3143 |
|
|
>
|
| 3144 |
|
|
0a53 : 68 [ 4]> pla ;load status
|
| 3145 |
|
|
> cmp_flag $ff-zero
|
| 3146 |
|
|
0a54 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 3147 |
|
|
>
|
| 3148 |
|
|
> trap_ne
|
| 3149 |
|
|
0a56 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3150 |
|
|
>
|
| 3151 |
|
|
0a58 : 28 [ 4]> plp ;restore status
|
| 3152 |
|
|
|
| 3153 |
|
|
0a59 : 88 [ 2] dey ;fe
|
| 3154 |
|
|
set_stat 0
|
| 3155 |
|
|
> load_flag 0
|
| 3156 |
|
|
0a5a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3157 |
|
|
>
|
| 3158 |
|
|
0a5c : 48 [ 3]> pha ;use stack to load status
|
| 3159 |
|
|
0a5d : 28 [ 4]> plp
|
| 3160 |
|
|
|
| 3161 |
|
|
0a5e : c8 [ 2] iny ;ff
|
| 3162 |
|
|
tst_y $ff,0+minus
|
| 3163 |
|
|
0a5f : 08 [ 3]> php ;save flags
|
| 3164 |
|
|
0a60 : 08 [ 3]> php
|
| 3165 |
|
|
0a61 : c0ff [ 2]> cpy #$ff ;test result
|
| 3166 |
|
|
> trap_ne
|
| 3167 |
|
|
0a63 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3168 |
|
|
>
|
| 3169 |
|
|
0a65 : 68 [ 4]> pla ;load status
|
| 3170 |
|
|
> cmp_flag 0+minus
|
| 3171 |
|
|
0a66 : c9b0 [ 2]> cmp #(0+minus|fao)&m8 ;expected flags + always on bits
|
| 3172 |
|
|
>
|
| 3173 |
|
|
> trap_ne
|
| 3174 |
|
|
0a68 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3175 |
|
|
>
|
| 3176 |
|
|
0a6a : 28 [ 4]> plp ;restore status
|
| 3177 |
|
|
|
| 3178 |
|
|
0a6b : c8 [ 2] iny ;00
|
| 3179 |
|
|
tst_y 0,zero
|
| 3180 |
|
|
0a6c : 08 [ 3]> php ;save flags
|
| 3181 |
|
|
0a6d : 08 [ 3]> php
|
| 3182 |
|
|
0a6e : c000 [ 2]> cpy #0 ;test result
|
| 3183 |
|
|
> trap_ne
|
| 3184 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 56
|
| 3185 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3186 |
|
|
|
| 3187 |
|
|
0a70 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3188 |
|
|
>
|
| 3189 |
|
|
0a72 : 68 [ 4]> pla ;load status
|
| 3190 |
|
|
> cmp_flag zero
|
| 3191 |
|
|
0a73 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 3192 |
|
|
>
|
| 3193 |
|
|
> trap_ne
|
| 3194 |
|
|
0a75 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3195 |
|
|
>
|
| 3196 |
|
|
0a77 : 28 [ 4]> plp ;restore status
|
| 3197 |
|
|
|
| 3198 |
|
|
0a78 : c8 [ 2] iny ;01
|
| 3199 |
|
|
tst_y 1,0
|
| 3200 |
|
|
0a79 : 08 [ 3]> php ;save flags
|
| 3201 |
|
|
0a7a : 08 [ 3]> php
|
| 3202 |
|
|
0a7b : c001 [ 2]> cpy #1 ;test result
|
| 3203 |
|
|
> trap_ne
|
| 3204 |
|
|
0a7d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3205 |
|
|
>
|
| 3206 |
|
|
0a7f : 68 [ 4]> pla ;load status
|
| 3207 |
|
|
> cmp_flag 0
|
| 3208 |
|
|
0a80 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3209 |
|
|
>
|
| 3210 |
|
|
> trap_ne
|
| 3211 |
|
|
0a82 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3212 |
|
|
>
|
| 3213 |
|
|
0a84 : 28 [ 4]> plp ;restore status
|
| 3214 |
|
|
|
| 3215 |
|
|
0a85 : 88 [ 2] dey ;00
|
| 3216 |
|
|
tst_y 0,zero
|
| 3217 |
|
|
0a86 : 08 [ 3]> php ;save flags
|
| 3218 |
|
|
0a87 : 08 [ 3]> php
|
| 3219 |
|
|
0a88 : c000 [ 2]> cpy #0 ;test result
|
| 3220 |
|
|
> trap_ne
|
| 3221 |
|
|
0a8a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3222 |
|
|
>
|
| 3223 |
|
|
0a8c : 68 [ 4]> pla ;load status
|
| 3224 |
|
|
> cmp_flag zero
|
| 3225 |
|
|
0a8d : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 3226 |
|
|
>
|
| 3227 |
|
|
> trap_ne
|
| 3228 |
|
|
0a8f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3229 |
|
|
>
|
| 3230 |
|
|
0a91 : 28 [ 4]> plp ;restore status
|
| 3231 |
|
|
|
| 3232 |
|
|
0a92 : 88 [ 2] dey ;ff
|
| 3233 |
|
|
tst_y $ff,minus
|
| 3234 |
|
|
0a93 : 08 [ 3]> php ;save flags
|
| 3235 |
|
|
0a94 : 08 [ 3]> php
|
| 3236 |
|
|
0a95 : c0ff [ 2]> cpy #$ff ;test result
|
| 3237 |
|
|
> trap_ne
|
| 3238 |
|
|
0a97 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3239 |
|
|
>
|
| 3240 |
|
|
0a99 : 68 [ 4]> pla ;load status
|
| 3241 |
|
|
> cmp_flag minus
|
| 3242 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 57
|
| 3243 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3244 |
|
|
|
| 3245 |
|
|
0a9a : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 3246 |
|
|
>
|
| 3247 |
|
|
> trap_ne
|
| 3248 |
|
|
0a9c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3249 |
|
|
>
|
| 3250 |
|
|
0a9e : 28 [ 4]> plp ;restore status
|
| 3251 |
|
|
|
| 3252 |
|
|
|
| 3253 |
|
|
0a9f : a2ff [ 2] ldx #$ff
|
| 3254 |
|
|
set_stat $ff
|
| 3255 |
|
|
> load_flag $ff
|
| 3256 |
|
|
0aa1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3257 |
|
|
>
|
| 3258 |
|
|
0aa3 : 48 [ 3]> pha ;use stack to load status
|
| 3259 |
|
|
0aa4 : 28 [ 4]> plp
|
| 3260 |
|
|
|
| 3261 |
|
|
0aa5 : 8a [ 2] txa
|
| 3262 |
|
|
tst_a $ff,$ff-zero
|
| 3263 |
|
|
0aa6 : 08 [ 3]> php ;save flags
|
| 3264 |
|
|
0aa7 : 08 [ 3]> php
|
| 3265 |
|
|
0aa8 : c9ff [ 2]> cmp #$ff ;test result
|
| 3266 |
|
|
> trap_ne
|
| 3267 |
|
|
0aaa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3268 |
|
|
>
|
| 3269 |
|
|
0aac : 68 [ 4]> pla ;load status
|
| 3270 |
|
|
> cmp_flag $ff-zero
|
| 3271 |
|
|
0aad : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 3272 |
|
|
>
|
| 3273 |
|
|
> trap_ne
|
| 3274 |
|
|
0aaf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3275 |
|
|
>
|
| 3276 |
|
|
0ab1 : 28 [ 4]> plp ;restore status
|
| 3277 |
|
|
|
| 3278 |
|
|
0ab2 : 08 [ 3] php
|
| 3279 |
|
|
0ab3 : e8 [ 2] inx ;00
|
| 3280 |
|
|
0ab4 : 28 [ 4] plp
|
| 3281 |
|
|
0ab5 : 8a [ 2] txa
|
| 3282 |
|
|
tst_a 0,$ff-minus
|
| 3283 |
|
|
0ab6 : 08 [ 3]> php ;save flags
|
| 3284 |
|
|
0ab7 : 08 [ 3]> php
|
| 3285 |
|
|
0ab8 : c900 [ 2]> cmp #0 ;test result
|
| 3286 |
|
|
> trap_ne
|
| 3287 |
|
|
0aba : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3288 |
|
|
>
|
| 3289 |
|
|
0abc : 68 [ 4]> pla ;load status
|
| 3290 |
|
|
> cmp_flag $ff-minus
|
| 3291 |
|
|
0abd : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 3292 |
|
|
>
|
| 3293 |
|
|
> trap_ne
|
| 3294 |
|
|
0abf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3295 |
|
|
>
|
| 3296 |
|
|
0ac1 : 28 [ 4]> plp ;restore status
|
| 3297 |
|
|
|
| 3298 |
|
|
0ac2 : 08 [ 3] php
|
| 3299 |
|
|
0ac3 : e8 [ 2] inx ;01
|
| 3300 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 58
|
| 3301 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3302 |
|
|
|
| 3303 |
|
|
0ac4 : 28 [ 4] plp
|
| 3304 |
|
|
0ac5 : 8a [ 2] txa
|
| 3305 |
|
|
tst_a 1,$ff-minus-zero
|
| 3306 |
|
|
0ac6 : 08 [ 3]> php ;save flags
|
| 3307 |
|
|
0ac7 : 08 [ 3]> php
|
| 3308 |
|
|
0ac8 : c901 [ 2]> cmp #1 ;test result
|
| 3309 |
|
|
> trap_ne
|
| 3310 |
|
|
0aca : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3311 |
|
|
>
|
| 3312 |
|
|
0acc : 68 [ 4]> pla ;load status
|
| 3313 |
|
|
> cmp_flag $ff-minus-zero
|
| 3314 |
|
|
0acd : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits
|
| 3315 |
|
|
>
|
| 3316 |
|
|
> trap_ne
|
| 3317 |
|
|
0acf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3318 |
|
|
>
|
| 3319 |
|
|
0ad1 : 28 [ 4]> plp ;restore status
|
| 3320 |
|
|
|
| 3321 |
|
|
set_stat 0
|
| 3322 |
|
|
> load_flag 0
|
| 3323 |
|
|
0ad2 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3324 |
|
|
>
|
| 3325 |
|
|
0ad4 : 48 [ 3]> pha ;use stack to load status
|
| 3326 |
|
|
0ad5 : 28 [ 4]> plp
|
| 3327 |
|
|
|
| 3328 |
|
|
0ad6 : 8a [ 2] txa
|
| 3329 |
|
|
tst_a 1,0
|
| 3330 |
|
|
0ad7 : 08 [ 3]> php ;save flags
|
| 3331 |
|
|
0ad8 : 08 [ 3]> php
|
| 3332 |
|
|
0ad9 : c901 [ 2]> cmp #1 ;test result
|
| 3333 |
|
|
> trap_ne
|
| 3334 |
|
|
0adb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3335 |
|
|
>
|
| 3336 |
|
|
0add : 68 [ 4]> pla ;load status
|
| 3337 |
|
|
> cmp_flag 0
|
| 3338 |
|
|
0ade : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3339 |
|
|
>
|
| 3340 |
|
|
> trap_ne
|
| 3341 |
|
|
0ae0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3342 |
|
|
>
|
| 3343 |
|
|
0ae2 : 28 [ 4]> plp ;restore status
|
| 3344 |
|
|
|
| 3345 |
|
|
0ae3 : 08 [ 3] php
|
| 3346 |
|
|
0ae4 : ca [ 2] dex ;00
|
| 3347 |
|
|
0ae5 : 28 [ 4] plp
|
| 3348 |
|
|
0ae6 : 8a [ 2] txa
|
| 3349 |
|
|
tst_a 0,zero
|
| 3350 |
|
|
0ae7 : 08 [ 3]> php ;save flags
|
| 3351 |
|
|
0ae8 : 08 [ 3]> php
|
| 3352 |
|
|
0ae9 : c900 [ 2]> cmp #0 ;test result
|
| 3353 |
|
|
> trap_ne
|
| 3354 |
|
|
0aeb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3355 |
|
|
>
|
| 3356 |
|
|
0aed : 68 [ 4]> pla ;load status
|
| 3357 |
|
|
> cmp_flag zero
|
| 3358 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 59
|
| 3359 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3360 |
|
|
|
| 3361 |
|
|
0aee : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 3362 |
|
|
>
|
| 3363 |
|
|
> trap_ne
|
| 3364 |
|
|
0af0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3365 |
|
|
>
|
| 3366 |
|
|
0af2 : 28 [ 4]> plp ;restore status
|
| 3367 |
|
|
|
| 3368 |
|
|
0af3 : 08 [ 3] php
|
| 3369 |
|
|
0af4 : ca [ 2] dex ;ff
|
| 3370 |
|
|
0af5 : 28 [ 4] plp
|
| 3371 |
|
|
0af6 : 8a [ 2] txa
|
| 3372 |
|
|
tst_a $ff,minus
|
| 3373 |
|
|
0af7 : 08 [ 3]> php ;save flags
|
| 3374 |
|
|
0af8 : 08 [ 3]> php
|
| 3375 |
|
|
0af9 : c9ff [ 2]> cmp #$ff ;test result
|
| 3376 |
|
|
> trap_ne
|
| 3377 |
|
|
0afb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3378 |
|
|
>
|
| 3379 |
|
|
0afd : 68 [ 4]> pla ;load status
|
| 3380 |
|
|
> cmp_flag minus
|
| 3381 |
|
|
0afe : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 3382 |
|
|
>
|
| 3383 |
|
|
> trap_ne
|
| 3384 |
|
|
0b00 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3385 |
|
|
>
|
| 3386 |
|
|
0b02 : 28 [ 4]> plp ;restore status
|
| 3387 |
|
|
|
| 3388 |
|
|
|
| 3389 |
|
|
0b03 : a0ff [ 2] ldy #$ff
|
| 3390 |
|
|
set_stat $ff
|
| 3391 |
|
|
> load_flag $ff
|
| 3392 |
|
|
0b05 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3393 |
|
|
>
|
| 3394 |
|
|
0b07 : 48 [ 3]> pha ;use stack to load status
|
| 3395 |
|
|
0b08 : 28 [ 4]> plp
|
| 3396 |
|
|
|
| 3397 |
|
|
0b09 : 98 [ 2] tya
|
| 3398 |
|
|
tst_a $ff,$ff-zero
|
| 3399 |
|
|
0b0a : 08 [ 3]> php ;save flags
|
| 3400 |
|
|
0b0b : 08 [ 3]> php
|
| 3401 |
|
|
0b0c : c9ff [ 2]> cmp #$ff ;test result
|
| 3402 |
|
|
> trap_ne
|
| 3403 |
|
|
0b0e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3404 |
|
|
>
|
| 3405 |
|
|
0b10 : 68 [ 4]> pla ;load status
|
| 3406 |
|
|
> cmp_flag $ff-zero
|
| 3407 |
|
|
0b11 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 3408 |
|
|
>
|
| 3409 |
|
|
> trap_ne
|
| 3410 |
|
|
0b13 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3411 |
|
|
>
|
| 3412 |
|
|
0b15 : 28 [ 4]> plp ;restore status
|
| 3413 |
|
|
|
| 3414 |
|
|
0b16 : 08 [ 3] php
|
| 3415 |
|
|
0b17 : c8 [ 2] iny ;00
|
| 3416 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 60
|
| 3417 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3418 |
|
|
|
| 3419 |
|
|
0b18 : 28 [ 4] plp
|
| 3420 |
|
|
0b19 : 98 [ 2] tya
|
| 3421 |
|
|
tst_a 0,$ff-minus
|
| 3422 |
|
|
0b1a : 08 [ 3]> php ;save flags
|
| 3423 |
|
|
0b1b : 08 [ 3]> php
|
| 3424 |
|
|
0b1c : c900 [ 2]> cmp #0 ;test result
|
| 3425 |
|
|
> trap_ne
|
| 3426 |
|
|
0b1e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3427 |
|
|
>
|
| 3428 |
|
|
0b20 : 68 [ 4]> pla ;load status
|
| 3429 |
|
|
> cmp_flag $ff-minus
|
| 3430 |
|
|
0b21 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 3431 |
|
|
>
|
| 3432 |
|
|
> trap_ne
|
| 3433 |
|
|
0b23 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3434 |
|
|
>
|
| 3435 |
|
|
0b25 : 28 [ 4]> plp ;restore status
|
| 3436 |
|
|
|
| 3437 |
|
|
0b26 : 08 [ 3] php
|
| 3438 |
|
|
0b27 : c8 [ 2] iny ;01
|
| 3439 |
|
|
0b28 : 28 [ 4] plp
|
| 3440 |
|
|
0b29 : 98 [ 2] tya
|
| 3441 |
|
|
tst_a 1,$ff-minus-zero
|
| 3442 |
|
|
0b2a : 08 [ 3]> php ;save flags
|
| 3443 |
|
|
0b2b : 08 [ 3]> php
|
| 3444 |
|
|
0b2c : c901 [ 2]> cmp #1 ;test result
|
| 3445 |
|
|
> trap_ne
|
| 3446 |
|
|
0b2e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3447 |
|
|
>
|
| 3448 |
|
|
0b30 : 68 [ 4]> pla ;load status
|
| 3449 |
|
|
> cmp_flag $ff-minus-zero
|
| 3450 |
|
|
0b31 : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits
|
| 3451 |
|
|
>
|
| 3452 |
|
|
> trap_ne
|
| 3453 |
|
|
0b33 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3454 |
|
|
>
|
| 3455 |
|
|
0b35 : 28 [ 4]> plp ;restore status
|
| 3456 |
|
|
|
| 3457 |
|
|
set_stat 0
|
| 3458 |
|
|
> load_flag 0
|
| 3459 |
|
|
0b36 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3460 |
|
|
>
|
| 3461 |
|
|
0b38 : 48 [ 3]> pha ;use stack to load status
|
| 3462 |
|
|
0b39 : 28 [ 4]> plp
|
| 3463 |
|
|
|
| 3464 |
|
|
0b3a : 98 [ 2] tya
|
| 3465 |
|
|
tst_a 1,0
|
| 3466 |
|
|
0b3b : 08 [ 3]> php ;save flags
|
| 3467 |
|
|
0b3c : 08 [ 3]> php
|
| 3468 |
|
|
0b3d : c901 [ 2]> cmp #1 ;test result
|
| 3469 |
|
|
> trap_ne
|
| 3470 |
|
|
0b3f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3471 |
|
|
>
|
| 3472 |
|
|
0b41 : 68 [ 4]> pla ;load status
|
| 3473 |
|
|
> cmp_flag 0
|
| 3474 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 61
|
| 3475 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3476 |
|
|
|
| 3477 |
|
|
0b42 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3478 |
|
|
>
|
| 3479 |
|
|
> trap_ne
|
| 3480 |
|
|
0b44 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3481 |
|
|
>
|
| 3482 |
|
|
0b46 : 28 [ 4]> plp ;restore status
|
| 3483 |
|
|
|
| 3484 |
|
|
0b47 : 08 [ 3] php
|
| 3485 |
|
|
0b48 : 88 [ 2] dey ;00
|
| 3486 |
|
|
0b49 : 28 [ 4] plp
|
| 3487 |
|
|
0b4a : 98 [ 2] tya
|
| 3488 |
|
|
tst_a 0,zero
|
| 3489 |
|
|
0b4b : 08 [ 3]> php ;save flags
|
| 3490 |
|
|
0b4c : 08 [ 3]> php
|
| 3491 |
|
|
0b4d : c900 [ 2]> cmp #0 ;test result
|
| 3492 |
|
|
> trap_ne
|
| 3493 |
|
|
0b4f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3494 |
|
|
>
|
| 3495 |
|
|
0b51 : 68 [ 4]> pla ;load status
|
| 3496 |
|
|
> cmp_flag zero
|
| 3497 |
|
|
0b52 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 3498 |
|
|
>
|
| 3499 |
|
|
> trap_ne
|
| 3500 |
|
|
0b54 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3501 |
|
|
>
|
| 3502 |
|
|
0b56 : 28 [ 4]> plp ;restore status
|
| 3503 |
|
|
|
| 3504 |
|
|
0b57 : 08 [ 3] php
|
| 3505 |
|
|
0b58 : 88 [ 2] dey ;ff
|
| 3506 |
|
|
0b59 : 28 [ 4] plp
|
| 3507 |
|
|
0b5a : 98 [ 2] tya
|
| 3508 |
|
|
tst_a $ff,minus
|
| 3509 |
|
|
0b5b : 08 [ 3]> php ;save flags
|
| 3510 |
|
|
0b5c : 08 [ 3]> php
|
| 3511 |
|
|
0b5d : c9ff [ 2]> cmp #$ff ;test result
|
| 3512 |
|
|
> trap_ne
|
| 3513 |
|
|
0b5f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3514 |
|
|
>
|
| 3515 |
|
|
0b61 : 68 [ 4]> pla ;load status
|
| 3516 |
|
|
> cmp_flag minus
|
| 3517 |
|
|
0b62 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 3518 |
|
|
>
|
| 3519 |
|
|
> trap_ne
|
| 3520 |
|
|
0b64 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3521 |
|
|
>
|
| 3522 |
|
|
0b66 : 28 [ 4]> plp ;restore status
|
| 3523 |
|
|
|
| 3524 |
|
|
|
| 3525 |
|
|
load_flag $ff
|
| 3526 |
|
|
0b67 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3527 |
|
|
|
| 3528 |
|
|
0b69 : 48 [ 3] pha
|
| 3529 |
|
|
0b6a : a2ff [ 2] ldx #$ff ;ff
|
| 3530 |
|
|
0b6c : 8a [ 2] txa
|
| 3531 |
|
|
0b6d : 28 [ 4] plp
|
| 3532 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 62
|
| 3533 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3534 |
|
|
|
| 3535 |
|
|
0b6e : a8 [ 2] tay
|
| 3536 |
|
|
tst_y $ff,$ff-zero
|
| 3537 |
|
|
0b6f : 08 [ 3]> php ;save flags
|
| 3538 |
|
|
0b70 : 08 [ 3]> php
|
| 3539 |
|
|
0b71 : c0ff [ 2]> cpy #$ff ;test result
|
| 3540 |
|
|
> trap_ne
|
| 3541 |
|
|
0b73 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3542 |
|
|
>
|
| 3543 |
|
|
0b75 : 68 [ 4]> pla ;load status
|
| 3544 |
|
|
> cmp_flag $ff-zero
|
| 3545 |
|
|
0b76 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 3546 |
|
|
>
|
| 3547 |
|
|
> trap_ne
|
| 3548 |
|
|
0b78 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3549 |
|
|
>
|
| 3550 |
|
|
0b7a : 28 [ 4]> plp ;restore status
|
| 3551 |
|
|
|
| 3552 |
|
|
0b7b : 08 [ 3] php
|
| 3553 |
|
|
0b7c : e8 [ 2] inx ;00
|
| 3554 |
|
|
0b7d : 8a [ 2] txa
|
| 3555 |
|
|
0b7e : 28 [ 4] plp
|
| 3556 |
|
|
0b7f : a8 [ 2] tay
|
| 3557 |
|
|
tst_y 0,$ff-minus
|
| 3558 |
|
|
0b80 : 08 [ 3]> php ;save flags
|
| 3559 |
|
|
0b81 : 08 [ 3]> php
|
| 3560 |
|
|
0b82 : c000 [ 2]> cpy #0 ;test result
|
| 3561 |
|
|
> trap_ne
|
| 3562 |
|
|
0b84 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3563 |
|
|
>
|
| 3564 |
|
|
0b86 : 68 [ 4]> pla ;load status
|
| 3565 |
|
|
> cmp_flag $ff-minus
|
| 3566 |
|
|
0b87 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 3567 |
|
|
>
|
| 3568 |
|
|
> trap_ne
|
| 3569 |
|
|
0b89 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3570 |
|
|
>
|
| 3571 |
|
|
0b8b : 28 [ 4]> plp ;restore status
|
| 3572 |
|
|
|
| 3573 |
|
|
0b8c : 08 [ 3] php
|
| 3574 |
|
|
0b8d : e8 [ 2] inx ;01
|
| 3575 |
|
|
0b8e : 8a [ 2] txa
|
| 3576 |
|
|
0b8f : 28 [ 4] plp
|
| 3577 |
|
|
0b90 : a8 [ 2] tay
|
| 3578 |
|
|
tst_y 1,$ff-minus-zero
|
| 3579 |
|
|
0b91 : 08 [ 3]> php ;save flags
|
| 3580 |
|
|
0b92 : 08 [ 3]> php
|
| 3581 |
|
|
0b93 : c001 [ 2]> cpy #1 ;test result
|
| 3582 |
|
|
> trap_ne
|
| 3583 |
|
|
0b95 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3584 |
|
|
>
|
| 3585 |
|
|
0b97 : 68 [ 4]> pla ;load status
|
| 3586 |
|
|
> cmp_flag $ff-minus-zero
|
| 3587 |
|
|
0b98 : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits
|
| 3588 |
|
|
>
|
| 3589 |
|
|
> trap_ne
|
| 3590 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 63
|
| 3591 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3592 |
|
|
|
| 3593 |
|
|
0b9a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3594 |
|
|
>
|
| 3595 |
|
|
0b9c : 28 [ 4]> plp ;restore status
|
| 3596 |
|
|
|
| 3597 |
|
|
load_flag 0
|
| 3598 |
|
|
0b9d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3599 |
|
|
|
| 3600 |
|
|
0b9f : 48 [ 3] pha
|
| 3601 |
|
|
0ba0 : a900 [ 2] lda #0
|
| 3602 |
|
|
0ba2 : 8a [ 2] txa
|
| 3603 |
|
|
0ba3 : 28 [ 4] plp
|
| 3604 |
|
|
0ba4 : a8 [ 2] tay
|
| 3605 |
|
|
tst_y 1,0
|
| 3606 |
|
|
0ba5 : 08 [ 3]> php ;save flags
|
| 3607 |
|
|
0ba6 : 08 [ 3]> php
|
| 3608 |
|
|
0ba7 : c001 [ 2]> cpy #1 ;test result
|
| 3609 |
|
|
> trap_ne
|
| 3610 |
|
|
0ba9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3611 |
|
|
>
|
| 3612 |
|
|
0bab : 68 [ 4]> pla ;load status
|
| 3613 |
|
|
> cmp_flag 0
|
| 3614 |
|
|
0bac : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3615 |
|
|
>
|
| 3616 |
|
|
> trap_ne
|
| 3617 |
|
|
0bae : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3618 |
|
|
>
|
| 3619 |
|
|
0bb0 : 28 [ 4]> plp ;restore status
|
| 3620 |
|
|
|
| 3621 |
|
|
0bb1 : 08 [ 3] php
|
| 3622 |
|
|
0bb2 : ca [ 2] dex ;00
|
| 3623 |
|
|
0bb3 : 8a [ 2] txa
|
| 3624 |
|
|
0bb4 : 28 [ 4] plp
|
| 3625 |
|
|
0bb5 : a8 [ 2] tay
|
| 3626 |
|
|
tst_y 0,zero
|
| 3627 |
|
|
0bb6 : 08 [ 3]> php ;save flags
|
| 3628 |
|
|
0bb7 : 08 [ 3]> php
|
| 3629 |
|
|
0bb8 : c000 [ 2]> cpy #0 ;test result
|
| 3630 |
|
|
> trap_ne
|
| 3631 |
|
|
0bba : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3632 |
|
|
>
|
| 3633 |
|
|
0bbc : 68 [ 4]> pla ;load status
|
| 3634 |
|
|
> cmp_flag zero
|
| 3635 |
|
|
0bbd : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 3636 |
|
|
>
|
| 3637 |
|
|
> trap_ne
|
| 3638 |
|
|
0bbf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3639 |
|
|
>
|
| 3640 |
|
|
0bc1 : 28 [ 4]> plp ;restore status
|
| 3641 |
|
|
|
| 3642 |
|
|
0bc2 : 08 [ 3] php
|
| 3643 |
|
|
0bc3 : ca [ 2] dex ;ff
|
| 3644 |
|
|
0bc4 : 8a [ 2] txa
|
| 3645 |
|
|
0bc5 : 28 [ 4] plp
|
| 3646 |
|
|
0bc6 : a8 [ 2] tay
|
| 3647 |
|
|
tst_y $ff,minus
|
| 3648 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 64
|
| 3649 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3650 |
|
|
|
| 3651 |
|
|
0bc7 : 08 [ 3]> php ;save flags
|
| 3652 |
|
|
0bc8 : 08 [ 3]> php
|
| 3653 |
|
|
0bc9 : c0ff [ 2]> cpy #$ff ;test result
|
| 3654 |
|
|
> trap_ne
|
| 3655 |
|
|
0bcb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3656 |
|
|
>
|
| 3657 |
|
|
0bcd : 68 [ 4]> pla ;load status
|
| 3658 |
|
|
> cmp_flag minus
|
| 3659 |
|
|
0bce : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 3660 |
|
|
>
|
| 3661 |
|
|
> trap_ne
|
| 3662 |
|
|
0bd0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3663 |
|
|
>
|
| 3664 |
|
|
0bd2 : 28 [ 4]> plp ;restore status
|
| 3665 |
|
|
|
| 3666 |
|
|
|
| 3667 |
|
|
|
| 3668 |
|
|
load_flag $ff
|
| 3669 |
|
|
0bd3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3670 |
|
|
|
| 3671 |
|
|
0bd5 : 48 [ 3] pha
|
| 3672 |
|
|
0bd6 : a0ff [ 2] ldy #$ff ;ff
|
| 3673 |
|
|
0bd8 : 98 [ 2] tya
|
| 3674 |
|
|
0bd9 : 28 [ 4] plp
|
| 3675 |
|
|
0bda : aa [ 2] tax
|
| 3676 |
|
|
tst_x $ff,$ff-zero
|
| 3677 |
|
|
0bdb : 08 [ 3]> php ;save flags
|
| 3678 |
|
|
0bdc : 08 [ 3]> php
|
| 3679 |
|
|
0bdd : e0ff [ 2]> cpx #$ff ;test result
|
| 3680 |
|
|
> trap_ne
|
| 3681 |
|
|
0bdf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3682 |
|
|
>
|
| 3683 |
|
|
0be1 : 68 [ 4]> pla ;load status
|
| 3684 |
|
|
> cmp_flag $ff-zero
|
| 3685 |
|
|
0be2 : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 3686 |
|
|
>
|
| 3687 |
|
|
> trap_ne
|
| 3688 |
|
|
0be4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3689 |
|
|
>
|
| 3690 |
|
|
0be6 : 28 [ 4]> plp ;restore status
|
| 3691 |
|
|
|
| 3692 |
|
|
0be7 : 08 [ 3] php
|
| 3693 |
|
|
0be8 : c8 [ 2] iny ;00
|
| 3694 |
|
|
0be9 : 98 [ 2] tya
|
| 3695 |
|
|
0bea : 28 [ 4] plp
|
| 3696 |
|
|
0beb : aa [ 2] tax
|
| 3697 |
|
|
tst_x 0,$ff-minus
|
| 3698 |
|
|
0bec : 08 [ 3]> php ;save flags
|
| 3699 |
|
|
0bed : 08 [ 3]> php
|
| 3700 |
|
|
0bee : e000 [ 2]> cpx #0 ;test result
|
| 3701 |
|
|
> trap_ne
|
| 3702 |
|
|
0bf0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3703 |
|
|
>
|
| 3704 |
|
|
0bf2 : 68 [ 4]> pla ;load status
|
| 3705 |
|
|
> cmp_flag $ff-minus
|
| 3706 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 65
|
| 3707 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3708 |
|
|
|
| 3709 |
|
|
0bf3 : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 3710 |
|
|
>
|
| 3711 |
|
|
> trap_ne
|
| 3712 |
|
|
0bf5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3713 |
|
|
>
|
| 3714 |
|
|
0bf7 : 28 [ 4]> plp ;restore status
|
| 3715 |
|
|
|
| 3716 |
|
|
0bf8 : 08 [ 3] php
|
| 3717 |
|
|
0bf9 : c8 [ 2] iny ;01
|
| 3718 |
|
|
0bfa : 98 [ 2] tya
|
| 3719 |
|
|
0bfb : 28 [ 4] plp
|
| 3720 |
|
|
0bfc : aa [ 2] tax
|
| 3721 |
|
|
tst_x 1,$ff-minus-zero
|
| 3722 |
|
|
0bfd : 08 [ 3]> php ;save flags
|
| 3723 |
|
|
0bfe : 08 [ 3]> php
|
| 3724 |
|
|
0bff : e001 [ 2]> cpx #1 ;test result
|
| 3725 |
|
|
> trap_ne
|
| 3726 |
|
|
0c01 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3727 |
|
|
>
|
| 3728 |
|
|
0c03 : 68 [ 4]> pla ;load status
|
| 3729 |
|
|
> cmp_flag $ff-minus-zero
|
| 3730 |
|
|
0c04 : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits
|
| 3731 |
|
|
>
|
| 3732 |
|
|
> trap_ne
|
| 3733 |
|
|
0c06 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3734 |
|
|
>
|
| 3735 |
|
|
0c08 : 28 [ 4]> plp ;restore status
|
| 3736 |
|
|
|
| 3737 |
|
|
load_flag 0
|
| 3738 |
|
|
0c09 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3739 |
|
|
|
| 3740 |
|
|
0c0b : 48 [ 3] pha
|
| 3741 |
|
|
0c0c : a900 [ 2] lda #0 ;preset status
|
| 3742 |
|
|
0c0e : 98 [ 2] tya
|
| 3743 |
|
|
0c0f : 28 [ 4] plp
|
| 3744 |
|
|
0c10 : aa [ 2] tax
|
| 3745 |
|
|
tst_x 1,0
|
| 3746 |
|
|
0c11 : 08 [ 3]> php ;save flags
|
| 3747 |
|
|
0c12 : 08 [ 3]> php
|
| 3748 |
|
|
0c13 : e001 [ 2]> cpx #1 ;test result
|
| 3749 |
|
|
> trap_ne
|
| 3750 |
|
|
0c15 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3751 |
|
|
>
|
| 3752 |
|
|
0c17 : 68 [ 4]> pla ;load status
|
| 3753 |
|
|
> cmp_flag 0
|
| 3754 |
|
|
0c18 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3755 |
|
|
>
|
| 3756 |
|
|
> trap_ne
|
| 3757 |
|
|
0c1a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3758 |
|
|
>
|
| 3759 |
|
|
0c1c : 28 [ 4]> plp ;restore status
|
| 3760 |
|
|
|
| 3761 |
|
|
0c1d : 08 [ 3] php
|
| 3762 |
|
|
0c1e : 88 [ 2] dey ;00
|
| 3763 |
|
|
0c1f : 98 [ 2] tya
|
| 3764 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 66
|
| 3765 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3766 |
|
|
|
| 3767 |
|
|
0c20 : 28 [ 4] plp
|
| 3768 |
|
|
0c21 : aa [ 2] tax
|
| 3769 |
|
|
tst_x 0,zero
|
| 3770 |
|
|
0c22 : 08 [ 3]> php ;save flags
|
| 3771 |
|
|
0c23 : 08 [ 3]> php
|
| 3772 |
|
|
0c24 : e000 [ 2]> cpx #0 ;test result
|
| 3773 |
|
|
> trap_ne
|
| 3774 |
|
|
0c26 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3775 |
|
|
>
|
| 3776 |
|
|
0c28 : 68 [ 4]> pla ;load status
|
| 3777 |
|
|
> cmp_flag zero
|
| 3778 |
|
|
0c29 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 3779 |
|
|
>
|
| 3780 |
|
|
> trap_ne
|
| 3781 |
|
|
0c2b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3782 |
|
|
>
|
| 3783 |
|
|
0c2d : 28 [ 4]> plp ;restore status
|
| 3784 |
|
|
|
| 3785 |
|
|
0c2e : 08 [ 3] php
|
| 3786 |
|
|
0c2f : 88 [ 2] dey ;ff
|
| 3787 |
|
|
0c30 : 98 [ 2] tya
|
| 3788 |
|
|
0c31 : 28 [ 4] plp
|
| 3789 |
|
|
0c32 : aa [ 2] tax
|
| 3790 |
|
|
tst_x $ff,minus
|
| 3791 |
|
|
0c33 : 08 [ 3]> php ;save flags
|
| 3792 |
|
|
0c34 : 08 [ 3]> php
|
| 3793 |
|
|
0c35 : e0ff [ 2]> cpx #$ff ;test result
|
| 3794 |
|
|
> trap_ne
|
| 3795 |
|
|
0c37 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3796 |
|
|
>
|
| 3797 |
|
|
0c39 : 68 [ 4]> pla ;load status
|
| 3798 |
|
|
> cmp_flag minus
|
| 3799 |
|
|
0c3a : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 3800 |
|
|
>
|
| 3801 |
|
|
> trap_ne
|
| 3802 |
|
|
0c3c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3803 |
|
|
>
|
| 3804 |
|
|
0c3e : 28 [ 4]> plp ;restore status
|
| 3805 |
|
|
|
| 3806 |
|
|
next_test
|
| 3807 |
|
|
0c3f : ad0002 [ 4]> lda test_case ;previous test
|
| 3808 |
|
|
0c42 : c90d [ 2]> cmp #test_num
|
| 3809 |
|
|
> trap_ne ;test is out of sequence
|
| 3810 |
|
|
0c44 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3811 |
|
|
>
|
| 3812 |
|
|
000e = >test_num = test_num + 1
|
| 3813 |
|
|
0c46 : a90e [ 2]> lda #test_num ;*** this tests' number
|
| 3814 |
|
|
0c48 : 8d0002 [ 4]> sta test_case
|
| 3815 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 3816 |
|
|
|
| 3817 |
|
|
|
| 3818 |
|
|
;TSX sets NZ - TXS does not
|
| 3819 |
|
|
0c4b : a201 [ 2] ldx #1 ;01
|
| 3820 |
|
|
set_stat $ff
|
| 3821 |
|
|
> load_flag $ff
|
| 3822 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 67
|
| 3823 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3824 |
|
|
|
| 3825 |
|
|
0c4d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3826 |
|
|
>
|
| 3827 |
|
|
0c4f : 48 [ 3]> pha ;use stack to load status
|
| 3828 |
|
|
0c50 : 28 [ 4]> plp
|
| 3829 |
|
|
|
| 3830 |
|
|
0c51 : 9a [ 2] txs
|
| 3831 |
|
|
0c52 : 08 [ 3] php
|
| 3832 |
|
|
0c53 : ad0101 [ 4] lda $101
|
| 3833 |
|
|
cmp_flag $ff
|
| 3834 |
|
|
0c56 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 3835 |
|
|
|
| 3836 |
|
|
trap_ne
|
| 3837 |
|
|
0c58 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3838 |
|
|
|
| 3839 |
|
|
set_stat 0
|
| 3840 |
|
|
> load_flag 0
|
| 3841 |
|
|
0c5a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3842 |
|
|
>
|
| 3843 |
|
|
0c5c : 48 [ 3]> pha ;use stack to load status
|
| 3844 |
|
|
0c5d : 28 [ 4]> plp
|
| 3845 |
|
|
|
| 3846 |
|
|
0c5e : 9a [ 2] txs
|
| 3847 |
|
|
0c5f : 08 [ 3] php
|
| 3848 |
|
|
0c60 : ad0101 [ 4] lda $101
|
| 3849 |
|
|
cmp_flag 0
|
| 3850 |
|
|
0c63 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3851 |
|
|
|
| 3852 |
|
|
trap_ne
|
| 3853 |
|
|
0c65 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3854 |
|
|
|
| 3855 |
|
|
0c67 : ca [ 2] dex ;00
|
| 3856 |
|
|
set_stat $ff
|
| 3857 |
|
|
> load_flag $ff
|
| 3858 |
|
|
0c68 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3859 |
|
|
>
|
| 3860 |
|
|
0c6a : 48 [ 3]> pha ;use stack to load status
|
| 3861 |
|
|
0c6b : 28 [ 4]> plp
|
| 3862 |
|
|
|
| 3863 |
|
|
0c6c : 9a [ 2] txs
|
| 3864 |
|
|
0c6d : 08 [ 3] php
|
| 3865 |
|
|
0c6e : ad0001 [ 4] lda $100
|
| 3866 |
|
|
cmp_flag $ff
|
| 3867 |
|
|
0c71 : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 3868 |
|
|
|
| 3869 |
|
|
trap_ne
|
| 3870 |
|
|
0c73 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3871 |
|
|
|
| 3872 |
|
|
set_stat 0
|
| 3873 |
|
|
> load_flag 0
|
| 3874 |
|
|
0c75 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3875 |
|
|
>
|
| 3876 |
|
|
0c77 : 48 [ 3]> pha ;use stack to load status
|
| 3877 |
|
|
0c78 : 28 [ 4]> plp
|
| 3878 |
|
|
|
| 3879 |
|
|
0c79 : 9a [ 2] txs
|
| 3880 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 68
|
| 3881 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3882 |
|
|
|
| 3883 |
|
|
0c7a : 08 [ 3] php
|
| 3884 |
|
|
0c7b : ad0001 [ 4] lda $100
|
| 3885 |
|
|
cmp_flag 0
|
| 3886 |
|
|
0c7e : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3887 |
|
|
|
| 3888 |
|
|
trap_ne
|
| 3889 |
|
|
0c80 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3890 |
|
|
|
| 3891 |
|
|
0c82 : ca [ 2] dex ;ff
|
| 3892 |
|
|
set_stat $ff
|
| 3893 |
|
|
> load_flag $ff
|
| 3894 |
|
|
0c83 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3895 |
|
|
>
|
| 3896 |
|
|
0c85 : 48 [ 3]> pha ;use stack to load status
|
| 3897 |
|
|
0c86 : 28 [ 4]> plp
|
| 3898 |
|
|
|
| 3899 |
|
|
0c87 : 9a [ 2] txs
|
| 3900 |
|
|
0c88 : 08 [ 3] php
|
| 3901 |
|
|
0c89 : adff01 [ 4] lda $1ff
|
| 3902 |
|
|
cmp_flag $ff
|
| 3903 |
|
|
0c8c : c9ff [ 2]> cmp #($ff|fao)&m8 ;expected flags + always on bits
|
| 3904 |
|
|
|
| 3905 |
|
|
trap_ne
|
| 3906 |
|
|
0c8e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3907 |
|
|
|
| 3908 |
|
|
set_stat 0
|
| 3909 |
|
|
> load_flag 0
|
| 3910 |
|
|
0c90 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3911 |
|
|
>
|
| 3912 |
|
|
0c92 : 48 [ 3]> pha ;use stack to load status
|
| 3913 |
|
|
0c93 : 28 [ 4]> plp
|
| 3914 |
|
|
|
| 3915 |
|
|
0c94 : 9a [ 2] txs
|
| 3916 |
|
|
0c95 : 08 [ 3] php
|
| 3917 |
|
|
0c96 : adff01 [ 4] lda $1ff
|
| 3918 |
|
|
cmp_flag 0
|
| 3919 |
|
|
0c99 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 3920 |
|
|
|
| 3921 |
|
|
|
| 3922 |
|
|
0c9b : a201 [ 2] ldx #1
|
| 3923 |
|
|
0c9d : 9a [ 2] txs ;sp=01
|
| 3924 |
|
|
set_stat $ff
|
| 3925 |
|
|
> load_flag $ff
|
| 3926 |
|
|
0c9e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3927 |
|
|
>
|
| 3928 |
|
|
0ca0 : 48 [ 3]> pha ;use stack to load status
|
| 3929 |
|
|
0ca1 : 28 [ 4]> plp
|
| 3930 |
|
|
|
| 3931 |
|
|
0ca2 : ba [ 2] tsx ;clears Z, N
|
| 3932 |
|
|
0ca3 : 08 [ 3] php ;sp=00
|
| 3933 |
|
|
0ca4 : e001 [ 2] cpx #1
|
| 3934 |
|
|
trap_ne
|
| 3935 |
|
|
0ca6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3936 |
|
|
|
| 3937 |
|
|
0ca8 : ad0101 [ 4] lda $101
|
| 3938 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 69
|
| 3939 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3940 |
|
|
|
| 3941 |
|
|
cmp_flag $ff-minus-zero
|
| 3942 |
|
|
0cab : c97d [ 2]> cmp #($ff-minus-zero|fao)&m8 ;expected flags + always on bits
|
| 3943 |
|
|
|
| 3944 |
|
|
trap_ne
|
| 3945 |
|
|
0cad : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3946 |
|
|
|
| 3947 |
|
|
set_stat $ff
|
| 3948 |
|
|
> load_flag $ff
|
| 3949 |
|
|
0caf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3950 |
|
|
>
|
| 3951 |
|
|
0cb1 : 48 [ 3]> pha ;use stack to load status
|
| 3952 |
|
|
0cb2 : 28 [ 4]> plp
|
| 3953 |
|
|
|
| 3954 |
|
|
0cb3 : ba [ 2] tsx ;clears N, sets Z
|
| 3955 |
|
|
0cb4 : 08 [ 3] php ;sp=ff
|
| 3956 |
|
|
0cb5 : e000 [ 2] cpx #0
|
| 3957 |
|
|
trap_ne
|
| 3958 |
|
|
0cb7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3959 |
|
|
|
| 3960 |
|
|
0cb9 : ad0001 [ 4] lda $100
|
| 3961 |
|
|
cmp_flag $ff-minus
|
| 3962 |
|
|
0cbc : c97f [ 2]> cmp #($ff-minus|fao)&m8 ;expected flags + always on bits
|
| 3963 |
|
|
|
| 3964 |
|
|
trap_ne
|
| 3965 |
|
|
0cbe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3966 |
|
|
|
| 3967 |
|
|
set_stat $ff
|
| 3968 |
|
|
> load_flag $ff
|
| 3969 |
|
|
0cc0 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 3970 |
|
|
>
|
| 3971 |
|
|
0cc2 : 48 [ 3]> pha ;use stack to load status
|
| 3972 |
|
|
0cc3 : 28 [ 4]> plp
|
| 3973 |
|
|
|
| 3974 |
|
|
0cc4 : ba [ 2] tsx ;clears N, sets Z
|
| 3975 |
|
|
0cc5 : 08 [ 3] php ;sp=fe
|
| 3976 |
|
|
0cc6 : e0ff [ 2] cpx #$ff
|
| 3977 |
|
|
trap_ne
|
| 3978 |
|
|
0cc8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3979 |
|
|
|
| 3980 |
|
|
0cca : adff01 [ 4] lda $1ff
|
| 3981 |
|
|
cmp_flag $ff-zero
|
| 3982 |
|
|
0ccd : c9fd [ 2]> cmp #($ff-zero|fao)&m8 ;expected flags + always on bits
|
| 3983 |
|
|
|
| 3984 |
|
|
trap_ne
|
| 3985 |
|
|
0ccf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 3986 |
|
|
|
| 3987 |
|
|
|
| 3988 |
|
|
0cd1 : a201 [ 2] ldx #1
|
| 3989 |
|
|
0cd3 : 9a [ 2] txs ;sp=01
|
| 3990 |
|
|
set_stat 0
|
| 3991 |
|
|
> load_flag 0
|
| 3992 |
|
|
0cd4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 3993 |
|
|
>
|
| 3994 |
|
|
0cd6 : 48 [ 3]> pha ;use stack to load status
|
| 3995 |
|
|
0cd7 : 28 [ 4]> plp
|
| 3996 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 70
|
| 3997 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 3998 |
|
|
|
| 3999 |
|
|
|
| 4000 |
|
|
0cd8 : ba [ 2] tsx ;clears Z, N
|
| 4001 |
|
|
0cd9 : 08 [ 3] php ;sp=00
|
| 4002 |
|
|
0cda : e001 [ 2] cpx #1
|
| 4003 |
|
|
trap_ne
|
| 4004 |
|
|
0cdc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4005 |
|
|
|
| 4006 |
|
|
0cde : ad0101 [ 4] lda $101
|
| 4007 |
|
|
cmp_flag 0
|
| 4008 |
|
|
0ce1 : c930 [ 2]> cmp #(0|fao)&m8 ;expected flags + always on bits
|
| 4009 |
|
|
|
| 4010 |
|
|
trap_ne
|
| 4011 |
|
|
0ce3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4012 |
|
|
|
| 4013 |
|
|
set_stat 0
|
| 4014 |
|
|
> load_flag 0
|
| 4015 |
|
|
0ce5 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4016 |
|
|
>
|
| 4017 |
|
|
0ce7 : 48 [ 3]> pha ;use stack to load status
|
| 4018 |
|
|
0ce8 : 28 [ 4]> plp
|
| 4019 |
|
|
|
| 4020 |
|
|
0ce9 : ba [ 2] tsx ;clears N, sets Z
|
| 4021 |
|
|
0cea : 08 [ 3] php ;sp=ff
|
| 4022 |
|
|
0ceb : e000 [ 2] cpx #0
|
| 4023 |
|
|
trap_ne
|
| 4024 |
|
|
0ced : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4025 |
|
|
|
| 4026 |
|
|
0cef : ad0001 [ 4] lda $100
|
| 4027 |
|
|
cmp_flag zero
|
| 4028 |
|
|
0cf2 : c932 [ 2]> cmp #(zero|fao)&m8 ;expected flags + always on bits
|
| 4029 |
|
|
|
| 4030 |
|
|
trap_ne
|
| 4031 |
|
|
0cf4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4032 |
|
|
|
| 4033 |
|
|
set_stat 0
|
| 4034 |
|
|
> load_flag 0
|
| 4035 |
|
|
0cf6 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4036 |
|
|
>
|
| 4037 |
|
|
0cf8 : 48 [ 3]> pha ;use stack to load status
|
| 4038 |
|
|
0cf9 : 28 [ 4]> plp
|
| 4039 |
|
|
|
| 4040 |
|
|
0cfa : ba [ 2] tsx ;clears N, sets Z
|
| 4041 |
|
|
0cfb : 08 [ 3] php ;sp=fe
|
| 4042 |
|
|
0cfc : e0ff [ 2] cpx #$ff
|
| 4043 |
|
|
trap_ne
|
| 4044 |
|
|
0cfe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4045 |
|
|
|
| 4046 |
|
|
0d00 : adff01 [ 4] lda $1ff
|
| 4047 |
|
|
cmp_flag minus
|
| 4048 |
|
|
0d03 : c9b0 [ 2]> cmp #(minus|fao)&m8 ;expected flags + always on bits
|
| 4049 |
|
|
|
| 4050 |
|
|
trap_ne
|
| 4051 |
|
|
0d05 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4052 |
|
|
|
| 4053 |
|
|
0d07 : 68 [ 4] pla ;sp=ff
|
| 4054 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 71
|
| 4055 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4056 |
|
|
|
| 4057 |
|
|
next_test
|
| 4058 |
|
|
0d08 : ad0002 [ 4]> lda test_case ;previous test
|
| 4059 |
|
|
0d0b : c90e [ 2]> cmp #test_num
|
| 4060 |
|
|
> trap_ne ;test is out of sequence
|
| 4061 |
|
|
0d0d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4062 |
|
|
>
|
| 4063 |
|
|
000f = >test_num = test_num + 1
|
| 4064 |
|
|
0d0f : a90f [ 2]> lda #test_num ;*** this tests' number
|
| 4065 |
|
|
0d11 : 8d0002 [ 4]> sta test_case
|
| 4066 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 4067 |
|
|
|
| 4068 |
|
|
|
| 4069 |
|
|
; testing index register load & store LDY LDX STY STX all addressing modes
|
| 4070 |
|
|
; LDX / STX - zp,y / abs,y
|
| 4071 |
|
|
0d14 : a003 [ 2] ldy #3
|
| 4072 |
|
|
0d16 : tldx
|
| 4073 |
|
|
set_stat 0
|
| 4074 |
|
|
> load_flag 0
|
| 4075 |
|
|
0d16 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4076 |
|
|
>
|
| 4077 |
|
|
0d18 : 48 [ 3]> pha ;use stack to load status
|
| 4078 |
|
|
0d19 : 28 [ 4]> plp
|
| 4079 |
|
|
|
| 4080 |
|
|
0d1a : b613 [ 4] ldx zp1,y
|
| 4081 |
|
|
0d1c : 08 [ 3] php ;test stores do not alter flags
|
| 4082 |
|
|
0d1d : 8a [ 2] txa
|
| 4083 |
|
|
0d1e : 49c3 [ 2] eor #$c3
|
| 4084 |
|
|
0d20 : 28 [ 4] plp
|
| 4085 |
|
|
0d21 : 990302 [ 5] sta abst,y
|
| 4086 |
|
|
0d24 : 08 [ 3] php ;flags after load/store sequence
|
| 4087 |
|
|
0d25 : 49c3 [ 2] eor #$c3
|
| 4088 |
|
|
0d27 : d90802 [ 4] cmp abs1,y ;test result
|
| 4089 |
|
|
trap_ne
|
| 4090 |
|
|
0d2a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4091 |
|
|
|
| 4092 |
|
|
0d2c : 68 [ 4] pla ;load status
|
| 4093 |
|
|
eor_flag 0
|
| 4094 |
|
|
0d2d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4095 |
|
|
|
| 4096 |
|
|
0d2f : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 4097 |
|
|
trap_ne
|
| 4098 |
|
|
0d32 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4099 |
|
|
|
| 4100 |
|
|
0d34 : 88 [ 2] dey
|
| 4101 |
|
|
0d35 : 10df [ 3] bpl tldx
|
| 4102 |
|
|
|
| 4103 |
|
|
0d37 : a003 [ 2] ldy #3
|
| 4104 |
|
|
0d39 : tldx1
|
| 4105 |
|
|
set_stat $ff
|
| 4106 |
|
|
> load_flag $ff
|
| 4107 |
|
|
0d39 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4108 |
|
|
>
|
| 4109 |
|
|
0d3b : 48 [ 3]> pha ;use stack to load status
|
| 4110 |
|
|
0d3c : 28 [ 4]> plp
|
| 4111 |
|
|
|
| 4112 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 72
|
| 4113 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4114 |
|
|
|
| 4115 |
|
|
0d3d : b613 [ 4] ldx zp1,y
|
| 4116 |
|
|
0d3f : 08 [ 3] php ;test stores do not alter flags
|
| 4117 |
|
|
0d40 : 8a [ 2] txa
|
| 4118 |
|
|
0d41 : 49c3 [ 2] eor #$c3
|
| 4119 |
|
|
0d43 : 28 [ 4] plp
|
| 4120 |
|
|
0d44 : 990302 [ 5] sta abst,y
|
| 4121 |
|
|
0d47 : 08 [ 3] php ;flags after load/store sequence
|
| 4122 |
|
|
0d48 : 49c3 [ 2] eor #$c3
|
| 4123 |
|
|
0d4a : d90802 [ 4] cmp abs1,y ;test result
|
| 4124 |
|
|
trap_ne
|
| 4125 |
|
|
0d4d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4126 |
|
|
|
| 4127 |
|
|
0d4f : 68 [ 4] pla ;load status
|
| 4128 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4129 |
|
|
0d50 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4130 |
|
|
|
| 4131 |
|
|
0d52 : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 4132 |
|
|
trap_ne
|
| 4133 |
|
|
0d55 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4134 |
|
|
|
| 4135 |
|
|
0d57 : 88 [ 2] dey
|
| 4136 |
|
|
0d58 : 10df [ 3] bpl tldx1
|
| 4137 |
|
|
|
| 4138 |
|
|
0d5a : a003 [ 2] ldy #3
|
| 4139 |
|
|
0d5c : tldx2
|
| 4140 |
|
|
set_stat 0
|
| 4141 |
|
|
> load_flag 0
|
| 4142 |
|
|
0d5c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4143 |
|
|
>
|
| 4144 |
|
|
0d5e : 48 [ 3]> pha ;use stack to load status
|
| 4145 |
|
|
0d5f : 28 [ 4]> plp
|
| 4146 |
|
|
|
| 4147 |
|
|
0d60 : be0802 [ 4] ldx abs1,y
|
| 4148 |
|
|
0d63 : 08 [ 3] php ;test stores do not alter flags
|
| 4149 |
|
|
0d64 : 8a [ 2] txa
|
| 4150 |
|
|
0d65 : 49c3 [ 2] eor #$c3
|
| 4151 |
|
|
0d67 : aa [ 2] tax
|
| 4152 |
|
|
0d68 : 28 [ 4] plp
|
| 4153 |
|
|
0d69 : 960c [ 4] stx zpt,y
|
| 4154 |
|
|
0d6b : 08 [ 3] php ;flags after load/store sequence
|
| 4155 |
|
|
0d6c : 49c3 [ 2] eor #$c3
|
| 4156 |
|
|
0d6e : d91300 [ 4] cmp zp1,y ;test result
|
| 4157 |
|
|
trap_ne
|
| 4158 |
|
|
0d71 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4159 |
|
|
|
| 4160 |
|
|
0d73 : 68 [ 4] pla ;load status
|
| 4161 |
|
|
eor_flag 0
|
| 4162 |
|
|
0d74 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4163 |
|
|
|
| 4164 |
|
|
0d76 : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 4165 |
|
|
trap_ne
|
| 4166 |
|
|
0d79 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4167 |
|
|
|
| 4168 |
|
|
0d7b : 88 [ 2] dey
|
| 4169 |
|
|
0d7c : 10de [ 3] bpl tldx2
|
| 4170 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 73
|
| 4171 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4172 |
|
|
|
| 4173 |
|
|
|
| 4174 |
|
|
0d7e : a003 [ 2] ldy #3
|
| 4175 |
|
|
0d80 : tldx3
|
| 4176 |
|
|
set_stat $ff
|
| 4177 |
|
|
> load_flag $ff
|
| 4178 |
|
|
0d80 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4179 |
|
|
>
|
| 4180 |
|
|
0d82 : 48 [ 3]> pha ;use stack to load status
|
| 4181 |
|
|
0d83 : 28 [ 4]> plp
|
| 4182 |
|
|
|
| 4183 |
|
|
0d84 : be0802 [ 4] ldx abs1,y
|
| 4184 |
|
|
0d87 : 08 [ 3] php ;test stores do not alter flags
|
| 4185 |
|
|
0d88 : 8a [ 2] txa
|
| 4186 |
|
|
0d89 : 49c3 [ 2] eor #$c3
|
| 4187 |
|
|
0d8b : aa [ 2] tax
|
| 4188 |
|
|
0d8c : 28 [ 4] plp
|
| 4189 |
|
|
0d8d : 960c [ 4] stx zpt,y
|
| 4190 |
|
|
0d8f : 08 [ 3] php ;flags after load/store sequence
|
| 4191 |
|
|
0d90 : 49c3 [ 2] eor #$c3
|
| 4192 |
|
|
0d92 : d91300 [ 4] cmp zp1,y ;test result
|
| 4193 |
|
|
trap_ne
|
| 4194 |
|
|
0d95 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4195 |
|
|
|
| 4196 |
|
|
0d97 : 68 [ 4] pla ;load status
|
| 4197 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4198 |
|
|
0d98 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4199 |
|
|
|
| 4200 |
|
|
0d9a : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 4201 |
|
|
trap_ne
|
| 4202 |
|
|
0d9d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4203 |
|
|
|
| 4204 |
|
|
0d9f : 88 [ 2] dey
|
| 4205 |
|
|
0da0 : 10de [ 3] bpl tldx3
|
| 4206 |
|
|
|
| 4207 |
|
|
0da2 : a003 [ 2] ldy #3 ;testing store result
|
| 4208 |
|
|
0da4 : a200 [ 2] ldx #0
|
| 4209 |
|
|
0da6 : b90c00 [ 4] tstx lda zpt,y
|
| 4210 |
|
|
0da9 : 49c3 [ 2] eor #$c3
|
| 4211 |
|
|
0dab : d91300 [ 4] cmp zp1,y
|
| 4212 |
|
|
trap_ne ;store to zp data
|
| 4213 |
|
|
0dae : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4214 |
|
|
|
| 4215 |
|
|
0db0 : 960c [ 4] stx zpt,y ;clear
|
| 4216 |
|
|
0db2 : b90302 [ 4] lda abst,y
|
| 4217 |
|
|
0db5 : 49c3 [ 2] eor #$c3
|
| 4218 |
|
|
0db7 : d90802 [ 4] cmp abs1,y
|
| 4219 |
|
|
trap_ne ;store to abs data
|
| 4220 |
|
|
0dba : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4221 |
|
|
|
| 4222 |
|
|
0dbc : 8a [ 2] txa
|
| 4223 |
|
|
0dbd : 990302 [ 5] sta abst,y ;clear
|
| 4224 |
|
|
0dc0 : 88 [ 2] dey
|
| 4225 |
|
|
0dc1 : 10e3 [ 3] bpl tstx
|
| 4226 |
|
|
next_test
|
| 4227 |
|
|
0dc3 : ad0002 [ 4]> lda test_case ;previous test
|
| 4228 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 74
|
| 4229 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4230 |
|
|
|
| 4231 |
|
|
0dc6 : c90f [ 2]> cmp #test_num
|
| 4232 |
|
|
> trap_ne ;test is out of sequence
|
| 4233 |
|
|
0dc8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4234 |
|
|
>
|
| 4235 |
|
|
0010 = >test_num = test_num + 1
|
| 4236 |
|
|
0dca : a910 [ 2]> lda #test_num ;*** this tests' number
|
| 4237 |
|
|
0dcc : 8d0002 [ 4]> sta test_case
|
| 4238 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 4239 |
|
|
|
| 4240 |
|
|
|
| 4241 |
|
|
; indexed wraparound test (only zp should wrap)
|
| 4242 |
|
|
0dcf : a0fd [ 2] ldy #3+$fa
|
| 4243 |
|
|
0dd1 : b619 [ 4] tldx4 ldx zp1-$fa&$ff,y ;wrap on indexed zp
|
| 4244 |
|
|
0dd3 : 8a [ 2] txa
|
| 4245 |
|
|
0dd4 : 990901 [ 5] sta abst-$fa,y ;no STX abs,y!
|
| 4246 |
|
|
0dd7 : 88 [ 2] dey
|
| 4247 |
|
|
0dd8 : c0fa [ 2] cpy #$fa
|
| 4248 |
|
|
0dda : b0f5 [ 3] bcs tldx4
|
| 4249 |
|
|
0ddc : a0fd [ 2] ldy #3+$fa
|
| 4250 |
|
|
0dde : be0e01 [ 4] tldx5 ldx abs1-$fa,y ;no wrap on indexed abs
|
| 4251 |
|
|
0de1 : 9612 [ 4] stx zpt-$fa&$ff,y
|
| 4252 |
|
|
0de3 : 88 [ 2] dey
|
| 4253 |
|
|
0de4 : c0fa [ 2] cpy #$fa
|
| 4254 |
|
|
0de6 : b0f6 [ 3] bcs tldx5
|
| 4255 |
|
|
0de8 : a003 [ 2] ldy #3 ;testing wraparound result
|
| 4256 |
|
|
0dea : a200 [ 2] ldx #0
|
| 4257 |
|
|
0dec : b90c00 [ 4] tstx1 lda zpt,y
|
| 4258 |
|
|
0def : d91300 [ 4] cmp zp1,y
|
| 4259 |
|
|
trap_ne ;store to zp data
|
| 4260 |
|
|
0df2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4261 |
|
|
|
| 4262 |
|
|
0df4 : 960c [ 4] stx zpt,y ;clear
|
| 4263 |
|
|
0df6 : b90302 [ 4] lda abst,y
|
| 4264 |
|
|
0df9 : d90802 [ 4] cmp abs1,y
|
| 4265 |
|
|
trap_ne ;store to abs data
|
| 4266 |
|
|
0dfc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4267 |
|
|
|
| 4268 |
|
|
0dfe : 8a [ 2] txa
|
| 4269 |
|
|
0dff : 990302 [ 5] sta abst,y ;clear
|
| 4270 |
|
|
0e02 : 88 [ 2] dey
|
| 4271 |
|
|
0e03 : 10e7 [ 4] bpl tstx1
|
| 4272 |
|
|
next_test
|
| 4273 |
|
|
0e05 : ad0002 [ 4]> lda test_case ;previous test
|
| 4274 |
|
|
0e08 : c910 [ 2]> cmp #test_num
|
| 4275 |
|
|
> trap_ne ;test is out of sequence
|
| 4276 |
|
|
0e0a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4277 |
|
|
>
|
| 4278 |
|
|
0011 = >test_num = test_num + 1
|
| 4279 |
|
|
0e0c : a911 [ 2]> lda #test_num ;*** this tests' number
|
| 4280 |
|
|
0e0e : 8d0002 [ 4]> sta test_case
|
| 4281 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 4282 |
|
|
|
| 4283 |
|
|
|
| 4284 |
|
|
; LDY / STY - zp,x / abs,x
|
| 4285 |
|
|
0e11 : a203 [ 2] ldx #3
|
| 4286 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 75
|
| 4287 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4288 |
|
|
|
| 4289 |
|
|
0e13 : tldy
|
| 4290 |
|
|
set_stat 0
|
| 4291 |
|
|
> load_flag 0
|
| 4292 |
|
|
0e13 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4293 |
|
|
>
|
| 4294 |
|
|
0e15 : 48 [ 3]> pha ;use stack to load status
|
| 4295 |
|
|
0e16 : 28 [ 4]> plp
|
| 4296 |
|
|
|
| 4297 |
|
|
0e17 : b413 [ 4] ldy zp1,x
|
| 4298 |
|
|
0e19 : 08 [ 3] php ;test stores do not alter flags
|
| 4299 |
|
|
0e1a : 98 [ 2] tya
|
| 4300 |
|
|
0e1b : 49c3 [ 2] eor #$c3
|
| 4301 |
|
|
0e1d : 28 [ 4] plp
|
| 4302 |
|
|
0e1e : 9d0302 [ 5] sta abst,x
|
| 4303 |
|
|
0e21 : 08 [ 3] php ;flags after load/store sequence
|
| 4304 |
|
|
0e22 : 49c3 [ 2] eor #$c3
|
| 4305 |
|
|
0e24 : dd0802 [ 4] cmp abs1,x ;test result
|
| 4306 |
|
|
trap_ne
|
| 4307 |
|
|
0e27 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4308 |
|
|
|
| 4309 |
|
|
0e29 : 68 [ 4] pla ;load status
|
| 4310 |
|
|
eor_flag 0
|
| 4311 |
|
|
0e2a : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4312 |
|
|
|
| 4313 |
|
|
0e2c : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 4314 |
|
|
trap_ne
|
| 4315 |
|
|
0e2f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4316 |
|
|
|
| 4317 |
|
|
0e31 : ca [ 2] dex
|
| 4318 |
|
|
0e32 : 10df [ 3] bpl tldy
|
| 4319 |
|
|
|
| 4320 |
|
|
0e34 : a203 [ 2] ldx #3
|
| 4321 |
|
|
0e36 : tldy1
|
| 4322 |
|
|
set_stat $ff
|
| 4323 |
|
|
> load_flag $ff
|
| 4324 |
|
|
0e36 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4325 |
|
|
>
|
| 4326 |
|
|
0e38 : 48 [ 3]> pha ;use stack to load status
|
| 4327 |
|
|
0e39 : 28 [ 4]> plp
|
| 4328 |
|
|
|
| 4329 |
|
|
0e3a : b413 [ 4] ldy zp1,x
|
| 4330 |
|
|
0e3c : 08 [ 3] php ;test stores do not alter flags
|
| 4331 |
|
|
0e3d : 98 [ 2] tya
|
| 4332 |
|
|
0e3e : 49c3 [ 2] eor #$c3
|
| 4333 |
|
|
0e40 : 28 [ 4] plp
|
| 4334 |
|
|
0e41 : 9d0302 [ 5] sta abst,x
|
| 4335 |
|
|
0e44 : 08 [ 3] php ;flags after load/store sequence
|
| 4336 |
|
|
0e45 : 49c3 [ 2] eor #$c3
|
| 4337 |
|
|
0e47 : dd0802 [ 4] cmp abs1,x ;test result
|
| 4338 |
|
|
trap_ne
|
| 4339 |
|
|
0e4a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4340 |
|
|
|
| 4341 |
|
|
0e4c : 68 [ 4] pla ;load status
|
| 4342 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4343 |
|
|
0e4d : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4344 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 76
|
| 4345 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4346 |
|
|
|
| 4347 |
|
|
|
| 4348 |
|
|
0e4f : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 4349 |
|
|
trap_ne
|
| 4350 |
|
|
0e52 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4351 |
|
|
|
| 4352 |
|
|
0e54 : ca [ 2] dex
|
| 4353 |
|
|
0e55 : 10df [ 3] bpl tldy1
|
| 4354 |
|
|
|
| 4355 |
|
|
0e57 : a203 [ 2] ldx #3
|
| 4356 |
|
|
0e59 : tldy2
|
| 4357 |
|
|
set_stat 0
|
| 4358 |
|
|
> load_flag 0
|
| 4359 |
|
|
0e59 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4360 |
|
|
>
|
| 4361 |
|
|
0e5b : 48 [ 3]> pha ;use stack to load status
|
| 4362 |
|
|
0e5c : 28 [ 4]> plp
|
| 4363 |
|
|
|
| 4364 |
|
|
0e5d : bc0802 [ 4] ldy abs1,x
|
| 4365 |
|
|
0e60 : 08 [ 3] php ;test stores do not alter flags
|
| 4366 |
|
|
0e61 : 98 [ 2] tya
|
| 4367 |
|
|
0e62 : 49c3 [ 2] eor #$c3
|
| 4368 |
|
|
0e64 : a8 [ 2] tay
|
| 4369 |
|
|
0e65 : 28 [ 4] plp
|
| 4370 |
|
|
0e66 : 940c [ 4] sty zpt,x
|
| 4371 |
|
|
0e68 : 08 [ 3] php ;flags after load/store sequence
|
| 4372 |
|
|
0e69 : 49c3 [ 2] eor #$c3
|
| 4373 |
|
|
0e6b : d513 [ 4] cmp zp1,x ;test result
|
| 4374 |
|
|
trap_ne
|
| 4375 |
|
|
0e6d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4376 |
|
|
|
| 4377 |
|
|
0e6f : 68 [ 4] pla ;load status
|
| 4378 |
|
|
eor_flag 0
|
| 4379 |
|
|
0e70 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4380 |
|
|
|
| 4381 |
|
|
0e72 : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 4382 |
|
|
trap_ne
|
| 4383 |
|
|
0e75 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4384 |
|
|
|
| 4385 |
|
|
0e77 : ca [ 2] dex
|
| 4386 |
|
|
0e78 : 10df [ 3] bpl tldy2
|
| 4387 |
|
|
|
| 4388 |
|
|
0e7a : a203 [ 2] ldx #3
|
| 4389 |
|
|
0e7c : tldy3
|
| 4390 |
|
|
set_stat $ff
|
| 4391 |
|
|
> load_flag $ff
|
| 4392 |
|
|
0e7c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4393 |
|
|
>
|
| 4394 |
|
|
0e7e : 48 [ 3]> pha ;use stack to load status
|
| 4395 |
|
|
0e7f : 28 [ 4]> plp
|
| 4396 |
|
|
|
| 4397 |
|
|
0e80 : bc0802 [ 4] ldy abs1,x
|
| 4398 |
|
|
0e83 : 08 [ 3] php ;test stores do not alter flags
|
| 4399 |
|
|
0e84 : 98 [ 2] tya
|
| 4400 |
|
|
0e85 : 49c3 [ 2] eor #$c3
|
| 4401 |
|
|
0e87 : a8 [ 2] tay
|
| 4402 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 77
|
| 4403 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4404 |
|
|
|
| 4405 |
|
|
0e88 : 28 [ 4] plp
|
| 4406 |
|
|
0e89 : 940c [ 4] sty zpt,x
|
| 4407 |
|
|
0e8b : 08 [ 3] php ;flags after load/store sequence
|
| 4408 |
|
|
0e8c : 49c3 [ 2] eor #$c3
|
| 4409 |
|
|
0e8e : d513 [ 4] cmp zp1,x ;test result
|
| 4410 |
|
|
trap_ne
|
| 4411 |
|
|
0e90 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4412 |
|
|
|
| 4413 |
|
|
0e92 : 68 [ 4] pla ;load status
|
| 4414 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4415 |
|
|
0e93 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4416 |
|
|
|
| 4417 |
|
|
0e95 : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 4418 |
|
|
trap_ne
|
| 4419 |
|
|
0e98 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4420 |
|
|
|
| 4421 |
|
|
0e9a : ca [ 2] dex
|
| 4422 |
|
|
0e9b : 10df [ 3] bpl tldy3
|
| 4423 |
|
|
|
| 4424 |
|
|
0e9d : a203 [ 2] ldx #3 ;testing store result
|
| 4425 |
|
|
0e9f : a000 [ 2] ldy #0
|
| 4426 |
|
|
0ea1 : b50c [ 4] tsty lda zpt,x
|
| 4427 |
|
|
0ea3 : 49c3 [ 2] eor #$c3
|
| 4428 |
|
|
0ea5 : d513 [ 4] cmp zp1,x
|
| 4429 |
|
|
trap_ne ;store to zp,x data
|
| 4430 |
|
|
0ea7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4431 |
|
|
|
| 4432 |
|
|
0ea9 : 940c [ 4] sty zpt,x ;clear
|
| 4433 |
|
|
0eab : bd0302 [ 4] lda abst,x
|
| 4434 |
|
|
0eae : 49c3 [ 2] eor #$c3
|
| 4435 |
|
|
0eb0 : dd0802 [ 4] cmp abs1,x
|
| 4436 |
|
|
trap_ne ;store to abs,x data
|
| 4437 |
|
|
0eb3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4438 |
|
|
|
| 4439 |
|
|
0eb5 : 8a [ 2] txa
|
| 4440 |
|
|
0eb6 : 9d0302 [ 5] sta abst,x ;clear
|
| 4441 |
|
|
0eb9 : ca [ 2] dex
|
| 4442 |
|
|
0eba : 10e5 [ 3] bpl tsty
|
| 4443 |
|
|
next_test
|
| 4444 |
|
|
0ebc : ad0002 [ 4]> lda test_case ;previous test
|
| 4445 |
|
|
0ebf : c911 [ 2]> cmp #test_num
|
| 4446 |
|
|
> trap_ne ;test is out of sequence
|
| 4447 |
|
|
0ec1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4448 |
|
|
>
|
| 4449 |
|
|
0012 = >test_num = test_num + 1
|
| 4450 |
|
|
0ec3 : a912 [ 2]> lda #test_num ;*** this tests' number
|
| 4451 |
|
|
0ec5 : 8d0002 [ 4]> sta test_case
|
| 4452 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 4453 |
|
|
|
| 4454 |
|
|
|
| 4455 |
|
|
; indexed wraparound test (only zp should wrap)
|
| 4456 |
|
|
0ec8 : a2fd [ 2] ldx #3+$fa
|
| 4457 |
|
|
0eca : b419 [ 4] tldy4 ldy zp1-$fa&$ff,x ;wrap on indexed zp
|
| 4458 |
|
|
0ecc : 98 [ 2] tya
|
| 4459 |
|
|
0ecd : 9d0901 [ 5] sta abst-$fa,x ;no STX abs,x!
|
| 4460 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 78
|
| 4461 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4462 |
|
|
|
| 4463 |
|
|
0ed0 : ca [ 2] dex
|
| 4464 |
|
|
0ed1 : e0fa [ 2] cpx #$fa
|
| 4465 |
|
|
0ed3 : b0f5 [ 3] bcs tldy4
|
| 4466 |
|
|
0ed5 : a2fd [ 2] ldx #3+$fa
|
| 4467 |
|
|
0ed7 : bc0e01 [ 4] tldy5 ldy abs1-$fa,x ;no wrap on indexed abs
|
| 4468 |
|
|
0eda : 9412 [ 4] sty zpt-$fa&$ff,x
|
| 4469 |
|
|
0edc : ca [ 2] dex
|
| 4470 |
|
|
0edd : e0fa [ 2] cpx #$fa
|
| 4471 |
|
|
0edf : b0f6 [ 3] bcs tldy5
|
| 4472 |
|
|
0ee1 : a203 [ 2] ldx #3 ;testing wraparound result
|
| 4473 |
|
|
0ee3 : a000 [ 2] ldy #0
|
| 4474 |
|
|
0ee5 : b50c [ 4] tsty1 lda zpt,x
|
| 4475 |
|
|
0ee7 : d513 [ 4] cmp zp1,x
|
| 4476 |
|
|
trap_ne ;store to zp,x data
|
| 4477 |
|
|
0ee9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4478 |
|
|
|
| 4479 |
|
|
0eeb : 940c [ 4] sty zpt,x ;clear
|
| 4480 |
|
|
0eed : bd0302 [ 4] lda abst,x
|
| 4481 |
|
|
0ef0 : dd0802 [ 4] cmp abs1,x
|
| 4482 |
|
|
trap_ne ;store to abs,x data
|
| 4483 |
|
|
0ef3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4484 |
|
|
|
| 4485 |
|
|
0ef5 : 8a [ 2] txa
|
| 4486 |
|
|
0ef6 : 9d0302 [ 5] sta abst,x ;clear
|
| 4487 |
|
|
0ef9 : ca [ 2] dex
|
| 4488 |
|
|
0efa : 10e9 [ 3] bpl tsty1
|
| 4489 |
|
|
next_test
|
| 4490 |
|
|
0efc : ad0002 [ 4]> lda test_case ;previous test
|
| 4491 |
|
|
0eff : c912 [ 2]> cmp #test_num
|
| 4492 |
|
|
> trap_ne ;test is out of sequence
|
| 4493 |
|
|
0f01 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4494 |
|
|
>
|
| 4495 |
|
|
0013 = >test_num = test_num + 1
|
| 4496 |
|
|
0f03 : a913 [ 2]> lda #test_num ;*** this tests' number
|
| 4497 |
|
|
0f05 : 8d0002 [ 4]> sta test_case
|
| 4498 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 4499 |
|
|
|
| 4500 |
|
|
|
| 4501 |
|
|
; LDX / STX - zp / abs / #
|
| 4502 |
|
|
set_stat 0
|
| 4503 |
|
|
> load_flag 0
|
| 4504 |
|
|
0f08 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4505 |
|
|
>
|
| 4506 |
|
|
0f0a : 48 [ 3]> pha ;use stack to load status
|
| 4507 |
|
|
0f0b : 28 [ 4]> plp
|
| 4508 |
|
|
|
| 4509 |
|
|
0f0c : a613 [ 3] ldx zp1
|
| 4510 |
|
|
0f0e : 08 [ 3] php ;test stores do not alter flags
|
| 4511 |
|
|
0f0f : 8a [ 2] txa
|
| 4512 |
|
|
0f10 : 49c3 [ 2] eor #$c3
|
| 4513 |
|
|
0f12 : aa [ 2] tax
|
| 4514 |
|
|
0f13 : 28 [ 4] plp
|
| 4515 |
|
|
0f14 : 8e0302 [ 4] stx abst
|
| 4516 |
|
|
0f17 : 08 [ 3] php ;flags after load/store sequence
|
| 4517 |
|
|
0f18 : 49c3 [ 2] eor #$c3
|
| 4518 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 79
|
| 4519 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4520 |
|
|
|
| 4521 |
|
|
0f1a : aa [ 2] tax
|
| 4522 |
|
|
0f1b : e0c3 [ 2] cpx #$c3 ;test result
|
| 4523 |
|
|
trap_ne
|
| 4524 |
|
|
0f1d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4525 |
|
|
|
| 4526 |
|
|
0f1f : 68 [ 4] pla ;load status
|
| 4527 |
|
|
eor_flag 0
|
| 4528 |
|
|
0f20 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4529 |
|
|
|
| 4530 |
|
|
0f22 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 4531 |
|
|
trap_ne
|
| 4532 |
|
|
0f25 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4533 |
|
|
|
| 4534 |
|
|
set_stat 0
|
| 4535 |
|
|
> load_flag 0
|
| 4536 |
|
|
0f27 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4537 |
|
|
>
|
| 4538 |
|
|
0f29 : 48 [ 3]> pha ;use stack to load status
|
| 4539 |
|
|
0f2a : 28 [ 4]> plp
|
| 4540 |
|
|
|
| 4541 |
|
|
0f2b : a614 [ 3] ldx zp1+1
|
| 4542 |
|
|
0f2d : 08 [ 3] php ;test stores do not alter flags
|
| 4543 |
|
|
0f2e : 8a [ 2] txa
|
| 4544 |
|
|
0f2f : 49c3 [ 2] eor #$c3
|
| 4545 |
|
|
0f31 : aa [ 2] tax
|
| 4546 |
|
|
0f32 : 28 [ 4] plp
|
| 4547 |
|
|
0f33 : 8e0402 [ 4] stx abst+1
|
| 4548 |
|
|
0f36 : 08 [ 3] php ;flags after load/store sequence
|
| 4549 |
|
|
0f37 : 49c3 [ 2] eor #$c3
|
| 4550 |
|
|
0f39 : aa [ 2] tax
|
| 4551 |
|
|
0f3a : e082 [ 2] cpx #$82 ;test result
|
| 4552 |
|
|
trap_ne
|
| 4553 |
|
|
0f3c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4554 |
|
|
|
| 4555 |
|
|
0f3e : 68 [ 4] pla ;load status
|
| 4556 |
|
|
eor_flag 0
|
| 4557 |
|
|
0f3f : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4558 |
|
|
|
| 4559 |
|
|
0f41 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 4560 |
|
|
trap_ne
|
| 4561 |
|
|
0f44 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4562 |
|
|
|
| 4563 |
|
|
set_stat 0
|
| 4564 |
|
|
> load_flag 0
|
| 4565 |
|
|
0f46 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4566 |
|
|
>
|
| 4567 |
|
|
0f48 : 48 [ 3]> pha ;use stack to load status
|
| 4568 |
|
|
0f49 : 28 [ 4]> plp
|
| 4569 |
|
|
|
| 4570 |
|
|
0f4a : a615 [ 3] ldx zp1+2
|
| 4571 |
|
|
0f4c : 08 [ 3] php ;test stores do not alter flags
|
| 4572 |
|
|
0f4d : 8a [ 2] txa
|
| 4573 |
|
|
0f4e : 49c3 [ 2] eor #$c3
|
| 4574 |
|
|
0f50 : aa [ 2] tax
|
| 4575 |
|
|
0f51 : 28 [ 4] plp
|
| 4576 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 80
|
| 4577 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4578 |
|
|
|
| 4579 |
|
|
0f52 : 8e0502 [ 4] stx abst+2
|
| 4580 |
|
|
0f55 : 08 [ 3] php ;flags after load/store sequence
|
| 4581 |
|
|
0f56 : 49c3 [ 2] eor #$c3
|
| 4582 |
|
|
0f58 : aa [ 2] tax
|
| 4583 |
|
|
0f59 : e041 [ 2] cpx #$41 ;test result
|
| 4584 |
|
|
trap_ne
|
| 4585 |
|
|
0f5b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4586 |
|
|
|
| 4587 |
|
|
0f5d : 68 [ 4] pla ;load status
|
| 4588 |
|
|
eor_flag 0
|
| 4589 |
|
|
0f5e : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4590 |
|
|
|
| 4591 |
|
|
0f60 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 4592 |
|
|
trap_ne
|
| 4593 |
|
|
0f63 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4594 |
|
|
|
| 4595 |
|
|
set_stat 0
|
| 4596 |
|
|
> load_flag 0
|
| 4597 |
|
|
0f65 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4598 |
|
|
>
|
| 4599 |
|
|
0f67 : 48 [ 3]> pha ;use stack to load status
|
| 4600 |
|
|
0f68 : 28 [ 4]> plp
|
| 4601 |
|
|
|
| 4602 |
|
|
0f69 : a616 [ 3] ldx zp1+3
|
| 4603 |
|
|
0f6b : 08 [ 3] php ;test stores do not alter flags
|
| 4604 |
|
|
0f6c : 8a [ 2] txa
|
| 4605 |
|
|
0f6d : 49c3 [ 2] eor #$c3
|
| 4606 |
|
|
0f6f : aa [ 2] tax
|
| 4607 |
|
|
0f70 : 28 [ 4] plp
|
| 4608 |
|
|
0f71 : 8e0602 [ 4] stx abst+3
|
| 4609 |
|
|
0f74 : 08 [ 3] php ;flags after load/store sequence
|
| 4610 |
|
|
0f75 : 49c3 [ 2] eor #$c3
|
| 4611 |
|
|
0f77 : aa [ 2] tax
|
| 4612 |
|
|
0f78 : e000 [ 2] cpx #0 ;test result
|
| 4613 |
|
|
trap_ne
|
| 4614 |
|
|
0f7a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4615 |
|
|
|
| 4616 |
|
|
0f7c : 68 [ 4] pla ;load status
|
| 4617 |
|
|
eor_flag 0
|
| 4618 |
|
|
0f7d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4619 |
|
|
|
| 4620 |
|
|
0f7f : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 4621 |
|
|
trap_ne
|
| 4622 |
|
|
0f82 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4623 |
|
|
|
| 4624 |
|
|
|
| 4625 |
|
|
set_stat $ff
|
| 4626 |
|
|
> load_flag $ff
|
| 4627 |
|
|
0f84 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4628 |
|
|
>
|
| 4629 |
|
|
0f86 : 48 [ 3]> pha ;use stack to load status
|
| 4630 |
|
|
0f87 : 28 [ 4]> plp
|
| 4631 |
|
|
|
| 4632 |
|
|
0f88 : a613 [ 3] ldx zp1
|
| 4633 |
|
|
0f8a : 08 [ 3] php ;test stores do not alter flags
|
| 4634 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 81
|
| 4635 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4636 |
|
|
|
| 4637 |
|
|
0f8b : 8a [ 2] txa
|
| 4638 |
|
|
0f8c : 49c3 [ 2] eor #$c3
|
| 4639 |
|
|
0f8e : aa [ 2] tax
|
| 4640 |
|
|
0f8f : 28 [ 4] plp
|
| 4641 |
|
|
0f90 : 8e0302 [ 4] stx abst
|
| 4642 |
|
|
0f93 : 08 [ 3] php ;flags after load/store sequence
|
| 4643 |
|
|
0f94 : 49c3 [ 2] eor #$c3
|
| 4644 |
|
|
0f96 : aa [ 2] tax
|
| 4645 |
|
|
0f97 : e0c3 [ 2] cpx #$c3 ;test result
|
| 4646 |
|
|
trap_ne ;
|
| 4647 |
|
|
0f99 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4648 |
|
|
|
| 4649 |
|
|
0f9b : 68 [ 4] pla ;load status
|
| 4650 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4651 |
|
|
0f9c : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4652 |
|
|
|
| 4653 |
|
|
0f9e : cd0d02 [ 4] cmp fLDx ;test flags
|
| 4654 |
|
|
trap_ne
|
| 4655 |
|
|
0fa1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4656 |
|
|
|
| 4657 |
|
|
set_stat $ff
|
| 4658 |
|
|
> load_flag $ff
|
| 4659 |
|
|
0fa3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4660 |
|
|
>
|
| 4661 |
|
|
0fa5 : 48 [ 3]> pha ;use stack to load status
|
| 4662 |
|
|
0fa6 : 28 [ 4]> plp
|
| 4663 |
|
|
|
| 4664 |
|
|
0fa7 : a614 [ 3] ldx zp1+1
|
| 4665 |
|
|
0fa9 : 08 [ 3] php ;test stores do not alter flags
|
| 4666 |
|
|
0faa : 8a [ 2] txa
|
| 4667 |
|
|
0fab : 49c3 [ 2] eor #$c3
|
| 4668 |
|
|
0fad : aa [ 2] tax
|
| 4669 |
|
|
0fae : 28 [ 4] plp
|
| 4670 |
|
|
0faf : 8e0402 [ 4] stx abst+1
|
| 4671 |
|
|
0fb2 : 08 [ 3] php ;flags after load/store sequence
|
| 4672 |
|
|
0fb3 : 49c3 [ 2] eor #$c3
|
| 4673 |
|
|
0fb5 : aa [ 2] tax
|
| 4674 |
|
|
0fb6 : e082 [ 2] cpx #$82 ;test result
|
| 4675 |
|
|
trap_ne
|
| 4676 |
|
|
0fb8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4677 |
|
|
|
| 4678 |
|
|
0fba : 68 [ 4] pla ;load status
|
| 4679 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4680 |
|
|
0fbb : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4681 |
|
|
|
| 4682 |
|
|
0fbd : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 4683 |
|
|
trap_ne
|
| 4684 |
|
|
0fc0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4685 |
|
|
|
| 4686 |
|
|
set_stat $ff
|
| 4687 |
|
|
> load_flag $ff
|
| 4688 |
|
|
0fc2 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4689 |
|
|
>
|
| 4690 |
|
|
0fc4 : 48 [ 3]> pha ;use stack to load status
|
| 4691 |
|
|
0fc5 : 28 [ 4]> plp
|
| 4692 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 82
|
| 4693 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4694 |
|
|
|
| 4695 |
|
|
|
| 4696 |
|
|
0fc6 : a615 [ 3] ldx zp1+2
|
| 4697 |
|
|
0fc8 : 08 [ 3] php ;test stores do not alter flags
|
| 4698 |
|
|
0fc9 : 8a [ 2] txa
|
| 4699 |
|
|
0fca : 49c3 [ 2] eor #$c3
|
| 4700 |
|
|
0fcc : aa [ 2] tax
|
| 4701 |
|
|
0fcd : 28 [ 4] plp
|
| 4702 |
|
|
0fce : 8e0502 [ 4] stx abst+2
|
| 4703 |
|
|
0fd1 : 08 [ 3] php ;flags after load/store sequence
|
| 4704 |
|
|
0fd2 : 49c3 [ 2] eor #$c3
|
| 4705 |
|
|
0fd4 : aa [ 2] tax
|
| 4706 |
|
|
0fd5 : e041 [ 2] cpx #$41 ;test result
|
| 4707 |
|
|
trap_ne ;
|
| 4708 |
|
|
0fd7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4709 |
|
|
|
| 4710 |
|
|
0fd9 : 68 [ 4] pla ;load status
|
| 4711 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4712 |
|
|
0fda : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4713 |
|
|
|
| 4714 |
|
|
0fdc : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 4715 |
|
|
trap_ne
|
| 4716 |
|
|
0fdf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4717 |
|
|
|
| 4718 |
|
|
set_stat $ff
|
| 4719 |
|
|
> load_flag $ff
|
| 4720 |
|
|
0fe1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4721 |
|
|
>
|
| 4722 |
|
|
0fe3 : 48 [ 3]> pha ;use stack to load status
|
| 4723 |
|
|
0fe4 : 28 [ 4]> plp
|
| 4724 |
|
|
|
| 4725 |
|
|
0fe5 : a616 [ 3] ldx zp1+3
|
| 4726 |
|
|
0fe7 : 08 [ 3] php ;test stores do not alter flags
|
| 4727 |
|
|
0fe8 : 8a [ 2] txa
|
| 4728 |
|
|
0fe9 : 49c3 [ 2] eor #$c3
|
| 4729 |
|
|
0feb : aa [ 2] tax
|
| 4730 |
|
|
0fec : 28 [ 4] plp
|
| 4731 |
|
|
0fed : 8e0602 [ 4] stx abst+3
|
| 4732 |
|
|
0ff0 : 08 [ 3] php ;flags after load/store sequence
|
| 4733 |
|
|
0ff1 : 49c3 [ 2] eor #$c3
|
| 4734 |
|
|
0ff3 : aa [ 2] tax
|
| 4735 |
|
|
0ff4 : e000 [ 2] cpx #0 ;test result
|
| 4736 |
|
|
trap_ne
|
| 4737 |
|
|
0ff6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4738 |
|
|
|
| 4739 |
|
|
0ff8 : 68 [ 4] pla ;load status
|
| 4740 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4741 |
|
|
0ff9 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4742 |
|
|
|
| 4743 |
|
|
0ffb : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 4744 |
|
|
trap_ne
|
| 4745 |
|
|
0ffe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4746 |
|
|
|
| 4747 |
|
|
|
| 4748 |
|
|
set_stat 0
|
| 4749 |
|
|
> load_flag 0
|
| 4750 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 83
|
| 4751 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4752 |
|
|
|
| 4753 |
|
|
1000 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4754 |
|
|
>
|
| 4755 |
|
|
1002 : 48 [ 3]> pha ;use stack to load status
|
| 4756 |
|
|
1003 : 28 [ 4]> plp
|
| 4757 |
|
|
|
| 4758 |
|
|
1004 : ae0802 [ 4] ldx abs1
|
| 4759 |
|
|
1007 : 08 [ 3] php ;test stores do not alter flags
|
| 4760 |
|
|
1008 : 8a [ 2] txa
|
| 4761 |
|
|
1009 : 49c3 [ 2] eor #$c3
|
| 4762 |
|
|
100b : aa [ 2] tax
|
| 4763 |
|
|
100c : 28 [ 4] plp
|
| 4764 |
|
|
100d : 860c [ 3] stx zpt
|
| 4765 |
|
|
100f : 08 [ 3] php ;flags after load/store sequence
|
| 4766 |
|
|
1010 : 49c3 [ 2] eor #$c3
|
| 4767 |
|
|
1012 : c513 [ 3] cmp zp1 ;test result
|
| 4768 |
|
|
trap_ne
|
| 4769 |
|
|
1014 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4770 |
|
|
|
| 4771 |
|
|
1016 : 68 [ 4] pla ;load status
|
| 4772 |
|
|
eor_flag 0
|
| 4773 |
|
|
1017 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4774 |
|
|
|
| 4775 |
|
|
1019 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 4776 |
|
|
trap_ne
|
| 4777 |
|
|
101c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4778 |
|
|
|
| 4779 |
|
|
set_stat 0
|
| 4780 |
|
|
> load_flag 0
|
| 4781 |
|
|
101e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4782 |
|
|
>
|
| 4783 |
|
|
1020 : 48 [ 3]> pha ;use stack to load status
|
| 4784 |
|
|
1021 : 28 [ 4]> plp
|
| 4785 |
|
|
|
| 4786 |
|
|
1022 : ae0902 [ 4] ldx abs1+1
|
| 4787 |
|
|
1025 : 08 [ 3] php ;test stores do not alter flags
|
| 4788 |
|
|
1026 : 8a [ 2] txa
|
| 4789 |
|
|
1027 : 49c3 [ 2] eor #$c3
|
| 4790 |
|
|
1029 : aa [ 2] tax
|
| 4791 |
|
|
102a : 28 [ 4] plp
|
| 4792 |
|
|
102b : 860d [ 3] stx zpt+1
|
| 4793 |
|
|
102d : 08 [ 3] php ;flags after load/store sequence
|
| 4794 |
|
|
102e : 49c3 [ 2] eor #$c3
|
| 4795 |
|
|
1030 : c514 [ 3] cmp zp1+1 ;test result
|
| 4796 |
|
|
trap_ne
|
| 4797 |
|
|
1032 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4798 |
|
|
|
| 4799 |
|
|
1034 : 68 [ 4] pla ;load status
|
| 4800 |
|
|
eor_flag 0
|
| 4801 |
|
|
1035 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4802 |
|
|
|
| 4803 |
|
|
1037 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 4804 |
|
|
trap_ne
|
| 4805 |
|
|
103a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4806 |
|
|
|
| 4807 |
|
|
set_stat 0
|
| 4808 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 84
|
| 4809 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4810 |
|
|
|
| 4811 |
|
|
> load_flag 0
|
| 4812 |
|
|
103c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4813 |
|
|
>
|
| 4814 |
|
|
103e : 48 [ 3]> pha ;use stack to load status
|
| 4815 |
|
|
103f : 28 [ 4]> plp
|
| 4816 |
|
|
|
| 4817 |
|
|
1040 : ae0a02 [ 4] ldx abs1+2
|
| 4818 |
|
|
1043 : 08 [ 3] php ;test stores do not alter flags
|
| 4819 |
|
|
1044 : 8a [ 2] txa
|
| 4820 |
|
|
1045 : 49c3 [ 2] eor #$c3
|
| 4821 |
|
|
1047 : aa [ 2] tax
|
| 4822 |
|
|
1048 : 28 [ 4] plp
|
| 4823 |
|
|
1049 : 860e [ 3] stx zpt+2
|
| 4824 |
|
|
104b : 08 [ 3] php ;flags after load/store sequence
|
| 4825 |
|
|
104c : 49c3 [ 2] eor #$c3
|
| 4826 |
|
|
104e : c515 [ 3] cmp zp1+2 ;test result
|
| 4827 |
|
|
trap_ne
|
| 4828 |
|
|
1050 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4829 |
|
|
|
| 4830 |
|
|
1052 : 68 [ 4] pla ;load status
|
| 4831 |
|
|
eor_flag 0
|
| 4832 |
|
|
1053 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4833 |
|
|
|
| 4834 |
|
|
1055 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 4835 |
|
|
trap_ne
|
| 4836 |
|
|
1058 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4837 |
|
|
|
| 4838 |
|
|
set_stat 0
|
| 4839 |
|
|
> load_flag 0
|
| 4840 |
|
|
105a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4841 |
|
|
>
|
| 4842 |
|
|
105c : 48 [ 3]> pha ;use stack to load status
|
| 4843 |
|
|
105d : 28 [ 4]> plp
|
| 4844 |
|
|
|
| 4845 |
|
|
105e : ae0b02 [ 4] ldx abs1+3
|
| 4846 |
|
|
1061 : 08 [ 3] php ;test stores do not alter flags
|
| 4847 |
|
|
1062 : 8a [ 2] txa
|
| 4848 |
|
|
1063 : 49c3 [ 2] eor #$c3
|
| 4849 |
|
|
1065 : aa [ 2] tax
|
| 4850 |
|
|
1066 : 28 [ 4] plp
|
| 4851 |
|
|
1067 : 860f [ 3] stx zpt+3
|
| 4852 |
|
|
1069 : 08 [ 3] php ;flags after load/store sequence
|
| 4853 |
|
|
106a : 49c3 [ 2] eor #$c3
|
| 4854 |
|
|
106c : c516 [ 3] cmp zp1+3 ;test result
|
| 4855 |
|
|
trap_ne
|
| 4856 |
|
|
106e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4857 |
|
|
|
| 4858 |
|
|
1070 : 68 [ 4] pla ;load status
|
| 4859 |
|
|
eor_flag 0
|
| 4860 |
|
|
1071 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 4861 |
|
|
|
| 4862 |
|
|
1073 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 4863 |
|
|
trap_ne
|
| 4864 |
|
|
1076 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4865 |
|
|
|
| 4866 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 85
|
| 4867 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4868 |
|
|
|
| 4869 |
|
|
|
| 4870 |
|
|
set_stat $ff
|
| 4871 |
|
|
> load_flag $ff
|
| 4872 |
|
|
1078 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4873 |
|
|
>
|
| 4874 |
|
|
107a : 48 [ 3]> pha ;use stack to load status
|
| 4875 |
|
|
107b : 28 [ 4]> plp
|
| 4876 |
|
|
|
| 4877 |
|
|
107c : ae0802 [ 4] ldx abs1
|
| 4878 |
|
|
107f : 08 [ 3] php ;test stores do not alter flags
|
| 4879 |
|
|
1080 : 8a [ 2] txa
|
| 4880 |
|
|
1081 : 49c3 [ 2] eor #$c3
|
| 4881 |
|
|
1083 : aa [ 2] tax
|
| 4882 |
|
|
1084 : 28 [ 4] plp
|
| 4883 |
|
|
1085 : 860c [ 3] stx zpt
|
| 4884 |
|
|
1087 : 08 [ 3] php ;flags after load/store sequence
|
| 4885 |
|
|
1088 : 49c3 [ 2] eor #$c3
|
| 4886 |
|
|
108a : aa [ 2] tax
|
| 4887 |
|
|
108b : e413 [ 3] cpx zp1 ;test result
|
| 4888 |
|
|
trap_ne
|
| 4889 |
|
|
108d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4890 |
|
|
|
| 4891 |
|
|
108f : 68 [ 4] pla ;load status
|
| 4892 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4893 |
|
|
1090 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4894 |
|
|
|
| 4895 |
|
|
1092 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 4896 |
|
|
trap_ne
|
| 4897 |
|
|
1095 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4898 |
|
|
|
| 4899 |
|
|
set_stat $ff
|
| 4900 |
|
|
> load_flag $ff
|
| 4901 |
|
|
1097 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4902 |
|
|
>
|
| 4903 |
|
|
1099 : 48 [ 3]> pha ;use stack to load status
|
| 4904 |
|
|
109a : 28 [ 4]> plp
|
| 4905 |
|
|
|
| 4906 |
|
|
109b : ae0902 [ 4] ldx abs1+1
|
| 4907 |
|
|
109e : 08 [ 3] php ;test stores do not alter flags
|
| 4908 |
|
|
109f : 8a [ 2] txa
|
| 4909 |
|
|
10a0 : 49c3 [ 2] eor #$c3
|
| 4910 |
|
|
10a2 : aa [ 2] tax
|
| 4911 |
|
|
10a3 : 28 [ 4] plp
|
| 4912 |
|
|
10a4 : 860d [ 3] stx zpt+1
|
| 4913 |
|
|
10a6 : 08 [ 3] php ;flags after load/store sequence
|
| 4914 |
|
|
10a7 : 49c3 [ 2] eor #$c3
|
| 4915 |
|
|
10a9 : aa [ 2] tax
|
| 4916 |
|
|
10aa : e414 [ 3] cpx zp1+1 ;test result
|
| 4917 |
|
|
trap_ne
|
| 4918 |
|
|
10ac : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4919 |
|
|
|
| 4920 |
|
|
10ae : 68 [ 4] pla ;load status
|
| 4921 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4922 |
|
|
10af : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4923 |
|
|
|
| 4924 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 86
|
| 4925 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4926 |
|
|
|
| 4927 |
|
|
10b1 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 4928 |
|
|
trap_ne
|
| 4929 |
|
|
10b4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4930 |
|
|
|
| 4931 |
|
|
set_stat $ff
|
| 4932 |
|
|
> load_flag $ff
|
| 4933 |
|
|
10b6 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4934 |
|
|
>
|
| 4935 |
|
|
10b8 : 48 [ 3]> pha ;use stack to load status
|
| 4936 |
|
|
10b9 : 28 [ 4]> plp
|
| 4937 |
|
|
|
| 4938 |
|
|
10ba : ae0a02 [ 4] ldx abs1+2
|
| 4939 |
|
|
10bd : 08 [ 3] php ;test stores do not alter flags
|
| 4940 |
|
|
10be : 8a [ 2] txa
|
| 4941 |
|
|
10bf : 49c3 [ 2] eor #$c3
|
| 4942 |
|
|
10c1 : aa [ 2] tax
|
| 4943 |
|
|
10c2 : 28 [ 4] plp
|
| 4944 |
|
|
10c3 : 860e [ 3] stx zpt+2
|
| 4945 |
|
|
10c5 : 08 [ 3] php ;flags after load/store sequence
|
| 4946 |
|
|
10c6 : 49c3 [ 2] eor #$c3
|
| 4947 |
|
|
10c8 : aa [ 2] tax
|
| 4948 |
|
|
10c9 : e415 [ 3] cpx zp1+2 ;test result
|
| 4949 |
|
|
trap_ne
|
| 4950 |
|
|
10cb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4951 |
|
|
|
| 4952 |
|
|
10cd : 68 [ 4] pla ;load status
|
| 4953 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4954 |
|
|
10ce : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4955 |
|
|
|
| 4956 |
|
|
10d0 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 4957 |
|
|
trap_ne
|
| 4958 |
|
|
10d3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4959 |
|
|
|
| 4960 |
|
|
set_stat $ff
|
| 4961 |
|
|
> load_flag $ff
|
| 4962 |
|
|
10d5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 4963 |
|
|
>
|
| 4964 |
|
|
10d7 : 48 [ 3]> pha ;use stack to load status
|
| 4965 |
|
|
10d8 : 28 [ 4]> plp
|
| 4966 |
|
|
|
| 4967 |
|
|
10d9 : ae0b02 [ 4] ldx abs1+3
|
| 4968 |
|
|
10dc : 08 [ 3] php ;test stores do not alter flags
|
| 4969 |
|
|
10dd : 8a [ 2] txa
|
| 4970 |
|
|
10de : 49c3 [ 2] eor #$c3
|
| 4971 |
|
|
10e0 : aa [ 2] tax
|
| 4972 |
|
|
10e1 : 28 [ 4] plp
|
| 4973 |
|
|
10e2 : 860f [ 3] stx zpt+3
|
| 4974 |
|
|
10e4 : 08 [ 3] php ;flags after load/store sequence
|
| 4975 |
|
|
10e5 : 49c3 [ 2] eor #$c3
|
| 4976 |
|
|
10e7 : aa [ 2] tax
|
| 4977 |
|
|
10e8 : e416 [ 3] cpx zp1+3 ;test result
|
| 4978 |
|
|
trap_ne
|
| 4979 |
|
|
10ea : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4980 |
|
|
|
| 4981 |
|
|
10ec : 68 [ 4] pla ;load status
|
| 4982 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 87
|
| 4983 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 4984 |
|
|
|
| 4985 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 4986 |
|
|
10ed : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 4987 |
|
|
|
| 4988 |
|
|
10ef : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 4989 |
|
|
trap_ne
|
| 4990 |
|
|
10f2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 4991 |
|
|
|
| 4992 |
|
|
|
| 4993 |
|
|
set_stat 0
|
| 4994 |
|
|
> load_flag 0
|
| 4995 |
|
|
10f4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 4996 |
|
|
>
|
| 4997 |
|
|
10f6 : 48 [ 3]> pha ;use stack to load status
|
| 4998 |
|
|
10f7 : 28 [ 4]> plp
|
| 4999 |
|
|
|
| 5000 |
|
|
10f8 : a2c3 [ 2] ldx #$c3
|
| 5001 |
|
|
10fa : 08 [ 3] php
|
| 5002 |
|
|
10fb : ec0802 [ 4] cpx abs1 ;test result
|
| 5003 |
|
|
trap_ne
|
| 5004 |
|
|
10fe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5005 |
|
|
|
| 5006 |
|
|
1100 : 68 [ 4] pla ;load status
|
| 5007 |
|
|
eor_flag 0
|
| 5008 |
|
|
1101 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5009 |
|
|
|
| 5010 |
|
|
1103 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5011 |
|
|
trap_ne
|
| 5012 |
|
|
1106 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5013 |
|
|
|
| 5014 |
|
|
set_stat 0
|
| 5015 |
|
|
> load_flag 0
|
| 5016 |
|
|
1108 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5017 |
|
|
>
|
| 5018 |
|
|
110a : 48 [ 3]> pha ;use stack to load status
|
| 5019 |
|
|
110b : 28 [ 4]> plp
|
| 5020 |
|
|
|
| 5021 |
|
|
110c : a282 [ 2] ldx #$82
|
| 5022 |
|
|
110e : 08 [ 3] php
|
| 5023 |
|
|
110f : ec0902 [ 4] cpx abs1+1 ;test result
|
| 5024 |
|
|
trap_ne
|
| 5025 |
|
|
1112 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5026 |
|
|
|
| 5027 |
|
|
1114 : 68 [ 4] pla ;load status
|
| 5028 |
|
|
eor_flag 0
|
| 5029 |
|
|
1115 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5030 |
|
|
|
| 5031 |
|
|
1117 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5032 |
|
|
trap_ne
|
| 5033 |
|
|
111a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5034 |
|
|
|
| 5035 |
|
|
set_stat 0
|
| 5036 |
|
|
> load_flag 0
|
| 5037 |
|
|
111c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5038 |
|
|
>
|
| 5039 |
|
|
111e : 48 [ 3]> pha ;use stack to load status
|
| 5040 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 88
|
| 5041 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5042 |
|
|
|
| 5043 |
|
|
111f : 28 [ 4]> plp
|
| 5044 |
|
|
|
| 5045 |
|
|
1120 : a241 [ 2] ldx #$41
|
| 5046 |
|
|
1122 : 08 [ 3] php
|
| 5047 |
|
|
1123 : ec0a02 [ 4] cpx abs1+2 ;test result
|
| 5048 |
|
|
trap_ne
|
| 5049 |
|
|
1126 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5050 |
|
|
|
| 5051 |
|
|
1128 : 68 [ 4] pla ;load status
|
| 5052 |
|
|
eor_flag 0
|
| 5053 |
|
|
1129 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5054 |
|
|
|
| 5055 |
|
|
112b : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5056 |
|
|
trap_ne
|
| 5057 |
|
|
112e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5058 |
|
|
|
| 5059 |
|
|
set_stat 0
|
| 5060 |
|
|
> load_flag 0
|
| 5061 |
|
|
1130 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5062 |
|
|
>
|
| 5063 |
|
|
1132 : 48 [ 3]> pha ;use stack to load status
|
| 5064 |
|
|
1133 : 28 [ 4]> plp
|
| 5065 |
|
|
|
| 5066 |
|
|
1134 : a200 [ 2] ldx #0
|
| 5067 |
|
|
1136 : 08 [ 3] php
|
| 5068 |
|
|
1137 : ec0b02 [ 4] cpx abs1+3 ;test result
|
| 5069 |
|
|
trap_ne
|
| 5070 |
|
|
113a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5071 |
|
|
|
| 5072 |
|
|
113c : 68 [ 4] pla ;load status
|
| 5073 |
|
|
eor_flag 0
|
| 5074 |
|
|
113d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5075 |
|
|
|
| 5076 |
|
|
113f : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5077 |
|
|
trap_ne
|
| 5078 |
|
|
1142 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5079 |
|
|
|
| 5080 |
|
|
|
| 5081 |
|
|
set_stat $ff
|
| 5082 |
|
|
> load_flag $ff
|
| 5083 |
|
|
1144 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5084 |
|
|
>
|
| 5085 |
|
|
1146 : 48 [ 3]> pha ;use stack to load status
|
| 5086 |
|
|
1147 : 28 [ 4]> plp
|
| 5087 |
|
|
|
| 5088 |
|
|
1148 : a2c3 [ 2] ldx #$c3
|
| 5089 |
|
|
114a : 08 [ 3] php
|
| 5090 |
|
|
114b : ec0802 [ 4] cpx abs1 ;test result
|
| 5091 |
|
|
trap_ne
|
| 5092 |
|
|
114e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5093 |
|
|
|
| 5094 |
|
|
1150 : 68 [ 4] pla ;load status
|
| 5095 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5096 |
|
|
1151 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5097 |
|
|
|
| 5098 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 89
|
| 5099 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5100 |
|
|
|
| 5101 |
|
|
1153 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5102 |
|
|
trap_ne
|
| 5103 |
|
|
1156 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5104 |
|
|
|
| 5105 |
|
|
set_stat $ff
|
| 5106 |
|
|
> load_flag $ff
|
| 5107 |
|
|
1158 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5108 |
|
|
>
|
| 5109 |
|
|
115a : 48 [ 3]> pha ;use stack to load status
|
| 5110 |
|
|
115b : 28 [ 4]> plp
|
| 5111 |
|
|
|
| 5112 |
|
|
115c : a282 [ 2] ldx #$82
|
| 5113 |
|
|
115e : 08 [ 3] php
|
| 5114 |
|
|
115f : ec0902 [ 4] cpx abs1+1 ;test result
|
| 5115 |
|
|
trap_ne
|
| 5116 |
|
|
1162 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5117 |
|
|
|
| 5118 |
|
|
1164 : 68 [ 4] pla ;load status
|
| 5119 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5120 |
|
|
1165 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5121 |
|
|
|
| 5122 |
|
|
1167 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5123 |
|
|
trap_ne
|
| 5124 |
|
|
116a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5125 |
|
|
|
| 5126 |
|
|
set_stat $ff
|
| 5127 |
|
|
> load_flag $ff
|
| 5128 |
|
|
116c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5129 |
|
|
>
|
| 5130 |
|
|
116e : 48 [ 3]> pha ;use stack to load status
|
| 5131 |
|
|
116f : 28 [ 4]> plp
|
| 5132 |
|
|
|
| 5133 |
|
|
1170 : a241 [ 2] ldx #$41
|
| 5134 |
|
|
1172 : 08 [ 3] php
|
| 5135 |
|
|
1173 : ec0a02 [ 4] cpx abs1+2 ;test result
|
| 5136 |
|
|
trap_ne
|
| 5137 |
|
|
1176 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5138 |
|
|
|
| 5139 |
|
|
1178 : 68 [ 4] pla ;load status
|
| 5140 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5141 |
|
|
1179 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5142 |
|
|
|
| 5143 |
|
|
117b : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5144 |
|
|
trap_ne
|
| 5145 |
|
|
117e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5146 |
|
|
|
| 5147 |
|
|
set_stat $ff
|
| 5148 |
|
|
> load_flag $ff
|
| 5149 |
|
|
1180 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5150 |
|
|
>
|
| 5151 |
|
|
1182 : 48 [ 3]> pha ;use stack to load status
|
| 5152 |
|
|
1183 : 28 [ 4]> plp
|
| 5153 |
|
|
|
| 5154 |
|
|
1184 : a200 [ 2] ldx #0
|
| 5155 |
|
|
1186 : 08 [ 3] php
|
| 5156 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 90
|
| 5157 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5158 |
|
|
|
| 5159 |
|
|
1187 : ec0b02 [ 4] cpx abs1+3 ;test result
|
| 5160 |
|
|
trap_ne
|
| 5161 |
|
|
118a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5162 |
|
|
|
| 5163 |
|
|
118c : 68 [ 4] pla ;load status
|
| 5164 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5165 |
|
|
118d : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5166 |
|
|
|
| 5167 |
|
|
118f : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5168 |
|
|
trap_ne
|
| 5169 |
|
|
1192 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5170 |
|
|
|
| 5171 |
|
|
|
| 5172 |
|
|
1194 : a200 [ 2] ldx #0
|
| 5173 |
|
|
1196 : a50c [ 3] lda zpt
|
| 5174 |
|
|
1198 : 49c3 [ 2] eor #$c3
|
| 5175 |
|
|
119a : c513 [ 3] cmp zp1
|
| 5176 |
|
|
trap_ne ;store to zp data
|
| 5177 |
|
|
119c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5178 |
|
|
|
| 5179 |
|
|
119e : 860c [ 3] stx zpt ;clear
|
| 5180 |
|
|
11a0 : ad0302 [ 4] lda abst
|
| 5181 |
|
|
11a3 : 49c3 [ 2] eor #$c3
|
| 5182 |
|
|
11a5 : cd0802 [ 4] cmp abs1
|
| 5183 |
|
|
trap_ne ;store to abs data
|
| 5184 |
|
|
11a8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5185 |
|
|
|
| 5186 |
|
|
11aa : 8e0302 [ 4] stx abst ;clear
|
| 5187 |
|
|
11ad : a50d [ 3] lda zpt+1
|
| 5188 |
|
|
11af : 49c3 [ 2] eor #$c3
|
| 5189 |
|
|
11b1 : c514 [ 3] cmp zp1+1
|
| 5190 |
|
|
trap_ne ;store to zp data
|
| 5191 |
|
|
11b3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5192 |
|
|
|
| 5193 |
|
|
11b5 : 860d [ 3] stx zpt+1 ;clear
|
| 5194 |
|
|
11b7 : ad0402 [ 4] lda abst+1
|
| 5195 |
|
|
11ba : 49c3 [ 2] eor #$c3
|
| 5196 |
|
|
11bc : cd0902 [ 4] cmp abs1+1
|
| 5197 |
|
|
trap_ne ;store to abs data
|
| 5198 |
|
|
11bf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5199 |
|
|
|
| 5200 |
|
|
11c1 : 8e0402 [ 4] stx abst+1 ;clear
|
| 5201 |
|
|
11c4 : a50e [ 3] lda zpt+2
|
| 5202 |
|
|
11c6 : 49c3 [ 2] eor #$c3
|
| 5203 |
|
|
11c8 : c515 [ 3] cmp zp1+2
|
| 5204 |
|
|
trap_ne ;store to zp data
|
| 5205 |
|
|
11ca : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5206 |
|
|
|
| 5207 |
|
|
11cc : 860e [ 3] stx zpt+2 ;clear
|
| 5208 |
|
|
11ce : ad0502 [ 4] lda abst+2
|
| 5209 |
|
|
11d1 : 49c3 [ 2] eor #$c3
|
| 5210 |
|
|
11d3 : cd0a02 [ 4] cmp abs1+2
|
| 5211 |
|
|
trap_ne ;store to abs data
|
| 5212 |
|
|
11d6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5213 |
|
|
|
| 5214 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 91
|
| 5215 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5216 |
|
|
|
| 5217 |
|
|
11d8 : 8e0502 [ 4] stx abst+2 ;clear
|
| 5218 |
|
|
11db : a50f [ 3] lda zpt+3
|
| 5219 |
|
|
11dd : 49c3 [ 2] eor #$c3
|
| 5220 |
|
|
11df : c516 [ 3] cmp zp1+3
|
| 5221 |
|
|
trap_ne ;store to zp data
|
| 5222 |
|
|
11e1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5223 |
|
|
|
| 5224 |
|
|
11e3 : 860f [ 3] stx zpt+3 ;clear
|
| 5225 |
|
|
11e5 : ad0602 [ 4] lda abst+3
|
| 5226 |
|
|
11e8 : 49c3 [ 2] eor #$c3
|
| 5227 |
|
|
11ea : cd0b02 [ 4] cmp abs1+3
|
| 5228 |
|
|
trap_ne ;store to abs data
|
| 5229 |
|
|
11ed : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5230 |
|
|
|
| 5231 |
|
|
11ef : 8e0602 [ 4] stx abst+3 ;clear
|
| 5232 |
|
|
next_test
|
| 5233 |
|
|
11f2 : ad0002 [ 4]> lda test_case ;previous test
|
| 5234 |
|
|
11f5 : c913 [ 2]> cmp #test_num
|
| 5235 |
|
|
> trap_ne ;test is out of sequence
|
| 5236 |
|
|
11f7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5237 |
|
|
>
|
| 5238 |
|
|
0014 = >test_num = test_num + 1
|
| 5239 |
|
|
11f9 : a914 [ 2]> lda #test_num ;*** this tests' number
|
| 5240 |
|
|
11fb : 8d0002 [ 4]> sta test_case
|
| 5241 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 5242 |
|
|
|
| 5243 |
|
|
|
| 5244 |
|
|
; LDY / STY - zp / abs / #
|
| 5245 |
|
|
set_stat 0
|
| 5246 |
|
|
> load_flag 0
|
| 5247 |
|
|
11fe : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5248 |
|
|
>
|
| 5249 |
|
|
1200 : 48 [ 3]> pha ;use stack to load status
|
| 5250 |
|
|
1201 : 28 [ 4]> plp
|
| 5251 |
|
|
|
| 5252 |
|
|
1202 : a413 [ 3] ldy zp1
|
| 5253 |
|
|
1204 : 08 [ 3] php ;test stores do not alter flags
|
| 5254 |
|
|
1205 : 98 [ 2] tya
|
| 5255 |
|
|
1206 : 49c3 [ 2] eor #$c3
|
| 5256 |
|
|
1208 : a8 [ 2] tay
|
| 5257 |
|
|
1209 : 28 [ 4] plp
|
| 5258 |
|
|
120a : 8c0302 [ 4] sty abst
|
| 5259 |
|
|
120d : 08 [ 3] php ;flags after load/store sequence
|
| 5260 |
|
|
120e : 49c3 [ 2] eor #$c3
|
| 5261 |
|
|
1210 : a8 [ 2] tay
|
| 5262 |
|
|
1211 : c0c3 [ 2] cpy #$c3 ;test result
|
| 5263 |
|
|
trap_ne
|
| 5264 |
|
|
1213 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5265 |
|
|
|
| 5266 |
|
|
1215 : 68 [ 4] pla ;load status
|
| 5267 |
|
|
eor_flag 0
|
| 5268 |
|
|
1216 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5269 |
|
|
|
| 5270 |
|
|
1218 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5271 |
|
|
trap_ne
|
| 5272 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 92
|
| 5273 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5274 |
|
|
|
| 5275 |
|
|
121b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5276 |
|
|
|
| 5277 |
|
|
set_stat 0
|
| 5278 |
|
|
> load_flag 0
|
| 5279 |
|
|
121d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5280 |
|
|
>
|
| 5281 |
|
|
121f : 48 [ 3]> pha ;use stack to load status
|
| 5282 |
|
|
1220 : 28 [ 4]> plp
|
| 5283 |
|
|
|
| 5284 |
|
|
1221 : a414 [ 3] ldy zp1+1
|
| 5285 |
|
|
1223 : 08 [ 3] php ;test stores do not alter flags
|
| 5286 |
|
|
1224 : 98 [ 2] tya
|
| 5287 |
|
|
1225 : 49c3 [ 2] eor #$c3
|
| 5288 |
|
|
1227 : a8 [ 2] tay
|
| 5289 |
|
|
1228 : 28 [ 4] plp
|
| 5290 |
|
|
1229 : 8c0402 [ 4] sty abst+1
|
| 5291 |
|
|
122c : 08 [ 3] php ;flags after load/store sequence
|
| 5292 |
|
|
122d : 49c3 [ 2] eor #$c3
|
| 5293 |
|
|
122f : a8 [ 2] tay
|
| 5294 |
|
|
1230 : c082 [ 2] cpy #$82 ;test result
|
| 5295 |
|
|
trap_ne
|
| 5296 |
|
|
1232 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5297 |
|
|
|
| 5298 |
|
|
1234 : 68 [ 4] pla ;load status
|
| 5299 |
|
|
eor_flag 0
|
| 5300 |
|
|
1235 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5301 |
|
|
|
| 5302 |
|
|
1237 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5303 |
|
|
trap_ne
|
| 5304 |
|
|
123a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5305 |
|
|
|
| 5306 |
|
|
set_stat 0
|
| 5307 |
|
|
> load_flag 0
|
| 5308 |
|
|
123c : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5309 |
|
|
>
|
| 5310 |
|
|
123e : 48 [ 3]> pha ;use stack to load status
|
| 5311 |
|
|
123f : 28 [ 4]> plp
|
| 5312 |
|
|
|
| 5313 |
|
|
1240 : a415 [ 3] ldy zp1+2
|
| 5314 |
|
|
1242 : 08 [ 3] php ;test stores do not alter flags
|
| 5315 |
|
|
1243 : 98 [ 2] tya
|
| 5316 |
|
|
1244 : 49c3 [ 2] eor #$c3
|
| 5317 |
|
|
1246 : a8 [ 2] tay
|
| 5318 |
|
|
1247 : 28 [ 4] plp
|
| 5319 |
|
|
1248 : 8c0502 [ 4] sty abst+2
|
| 5320 |
|
|
124b : 08 [ 3] php ;flags after load/store sequence
|
| 5321 |
|
|
124c : 49c3 [ 2] eor #$c3
|
| 5322 |
|
|
124e : a8 [ 2] tay
|
| 5323 |
|
|
124f : c041 [ 2] cpy #$41 ;test result
|
| 5324 |
|
|
trap_ne
|
| 5325 |
|
|
1251 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5326 |
|
|
|
| 5327 |
|
|
1253 : 68 [ 4] pla ;load status
|
| 5328 |
|
|
eor_flag 0
|
| 5329 |
|
|
1254 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5330 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 93
|
| 5331 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5332 |
|
|
|
| 5333 |
|
|
|
| 5334 |
|
|
1256 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5335 |
|
|
trap_ne
|
| 5336 |
|
|
1259 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5337 |
|
|
|
| 5338 |
|
|
set_stat 0
|
| 5339 |
|
|
> load_flag 0
|
| 5340 |
|
|
125b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5341 |
|
|
>
|
| 5342 |
|
|
125d : 48 [ 3]> pha ;use stack to load status
|
| 5343 |
|
|
125e : 28 [ 4]> plp
|
| 5344 |
|
|
|
| 5345 |
|
|
125f : a416 [ 3] ldy zp1+3
|
| 5346 |
|
|
1261 : 08 [ 3] php ;test stores do not alter flags
|
| 5347 |
|
|
1262 : 98 [ 2] tya
|
| 5348 |
|
|
1263 : 49c3 [ 2] eor #$c3
|
| 5349 |
|
|
1265 : a8 [ 2] tay
|
| 5350 |
|
|
1266 : 28 [ 4] plp
|
| 5351 |
|
|
1267 : 8c0602 [ 4] sty abst+3
|
| 5352 |
|
|
126a : 08 [ 3] php ;flags after load/store sequence
|
| 5353 |
|
|
126b : 49c3 [ 2] eor #$c3
|
| 5354 |
|
|
126d : a8 [ 2] tay
|
| 5355 |
|
|
126e : c000 [ 2] cpy #0 ;test result
|
| 5356 |
|
|
trap_ne
|
| 5357 |
|
|
1270 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5358 |
|
|
|
| 5359 |
|
|
1272 : 68 [ 4] pla ;load status
|
| 5360 |
|
|
eor_flag 0
|
| 5361 |
|
|
1273 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5362 |
|
|
|
| 5363 |
|
|
1275 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5364 |
|
|
trap_ne
|
| 5365 |
|
|
1278 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5366 |
|
|
|
| 5367 |
|
|
|
| 5368 |
|
|
set_stat $ff
|
| 5369 |
|
|
> load_flag $ff
|
| 5370 |
|
|
127a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5371 |
|
|
>
|
| 5372 |
|
|
127c : 48 [ 3]> pha ;use stack to load status
|
| 5373 |
|
|
127d : 28 [ 4]> plp
|
| 5374 |
|
|
|
| 5375 |
|
|
127e : a413 [ 3] ldy zp1
|
| 5376 |
|
|
1280 : 08 [ 3] php ;test stores do not alter flags
|
| 5377 |
|
|
1281 : 98 [ 2] tya
|
| 5378 |
|
|
1282 : 49c3 [ 2] eor #$c3
|
| 5379 |
|
|
1284 : a8 [ 2] tay
|
| 5380 |
|
|
1285 : 28 [ 4] plp
|
| 5381 |
|
|
1286 : 8c0302 [ 4] sty abst
|
| 5382 |
|
|
1289 : 08 [ 3] php ;flags after load/store sequence
|
| 5383 |
|
|
128a : 49c3 [ 2] eor #$c3
|
| 5384 |
|
|
128c : a8 [ 2] tay
|
| 5385 |
|
|
128d : c0c3 [ 2] cpy #$c3 ;test result
|
| 5386 |
|
|
trap_ne
|
| 5387 |
|
|
128f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5388 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 94
|
| 5389 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5390 |
|
|
|
| 5391 |
|
|
|
| 5392 |
|
|
1291 : 68 [ 4] pla ;load status
|
| 5393 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5394 |
|
|
1292 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5395 |
|
|
|
| 5396 |
|
|
1294 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5397 |
|
|
trap_ne
|
| 5398 |
|
|
1297 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5399 |
|
|
|
| 5400 |
|
|
set_stat $ff
|
| 5401 |
|
|
> load_flag $ff
|
| 5402 |
|
|
1299 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5403 |
|
|
>
|
| 5404 |
|
|
129b : 48 [ 3]> pha ;use stack to load status
|
| 5405 |
|
|
129c : 28 [ 4]> plp
|
| 5406 |
|
|
|
| 5407 |
|
|
129d : a414 [ 3] ldy zp1+1
|
| 5408 |
|
|
129f : 08 [ 3] php ;test stores do not alter flags
|
| 5409 |
|
|
12a0 : 98 [ 2] tya
|
| 5410 |
|
|
12a1 : 49c3 [ 2] eor #$c3
|
| 5411 |
|
|
12a3 : a8 [ 2] tay
|
| 5412 |
|
|
12a4 : 28 [ 4] plp
|
| 5413 |
|
|
12a5 : 8c0402 [ 4] sty abst+1
|
| 5414 |
|
|
12a8 : 08 [ 3] php ;flags after load/store sequence
|
| 5415 |
|
|
12a9 : 49c3 [ 2] eor #$c3
|
| 5416 |
|
|
12ab : a8 [ 2] tay
|
| 5417 |
|
|
12ac : c082 [ 2] cpy #$82 ;test result
|
| 5418 |
|
|
trap_ne
|
| 5419 |
|
|
12ae : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5420 |
|
|
|
| 5421 |
|
|
12b0 : 68 [ 4] pla ;load status
|
| 5422 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5423 |
|
|
12b1 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5424 |
|
|
|
| 5425 |
|
|
12b3 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5426 |
|
|
trap_ne
|
| 5427 |
|
|
12b6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5428 |
|
|
|
| 5429 |
|
|
set_stat $ff
|
| 5430 |
|
|
> load_flag $ff
|
| 5431 |
|
|
12b8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5432 |
|
|
>
|
| 5433 |
|
|
12ba : 48 [ 3]> pha ;use stack to load status
|
| 5434 |
|
|
12bb : 28 [ 4]> plp
|
| 5435 |
|
|
|
| 5436 |
|
|
12bc : a415 [ 3] ldy zp1+2
|
| 5437 |
|
|
12be : 08 [ 3] php ;test stores do not alter flags
|
| 5438 |
|
|
12bf : 98 [ 2] tya
|
| 5439 |
|
|
12c0 : 49c3 [ 2] eor #$c3
|
| 5440 |
|
|
12c2 : a8 [ 2] tay
|
| 5441 |
|
|
12c3 : 28 [ 4] plp
|
| 5442 |
|
|
12c4 : 8c0502 [ 4] sty abst+2
|
| 5443 |
|
|
12c7 : 08 [ 3] php ;flags after load/store sequence
|
| 5444 |
|
|
12c8 : 49c3 [ 2] eor #$c3
|
| 5445 |
|
|
12ca : a8 [ 2] tay
|
| 5446 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 95
|
| 5447 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5448 |
|
|
|
| 5449 |
|
|
12cb : c041 [ 2] cpy #$41 ;test result
|
| 5450 |
|
|
trap_ne
|
| 5451 |
|
|
12cd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5452 |
|
|
|
| 5453 |
|
|
12cf : 68 [ 4] pla ;load status
|
| 5454 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5455 |
|
|
12d0 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5456 |
|
|
|
| 5457 |
|
|
12d2 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5458 |
|
|
trap_ne
|
| 5459 |
|
|
12d5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5460 |
|
|
|
| 5461 |
|
|
set_stat $ff
|
| 5462 |
|
|
> load_flag $ff
|
| 5463 |
|
|
12d7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5464 |
|
|
>
|
| 5465 |
|
|
12d9 : 48 [ 3]> pha ;use stack to load status
|
| 5466 |
|
|
12da : 28 [ 4]> plp
|
| 5467 |
|
|
|
| 5468 |
|
|
12db : a416 [ 3] ldy zp1+3
|
| 5469 |
|
|
12dd : 08 [ 3] php ;test stores do not alter flags
|
| 5470 |
|
|
12de : 98 [ 2] tya
|
| 5471 |
|
|
12df : 49c3 [ 2] eor #$c3
|
| 5472 |
|
|
12e1 : a8 [ 2] tay
|
| 5473 |
|
|
12e2 : 28 [ 4] plp
|
| 5474 |
|
|
12e3 : 8c0602 [ 4] sty abst+3
|
| 5475 |
|
|
12e6 : 08 [ 3] php ;flags after load/store sequence
|
| 5476 |
|
|
12e7 : 49c3 [ 2] eor #$c3
|
| 5477 |
|
|
12e9 : a8 [ 2] tay
|
| 5478 |
|
|
12ea : c000 [ 2] cpy #0 ;test result
|
| 5479 |
|
|
trap_ne
|
| 5480 |
|
|
12ec : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5481 |
|
|
|
| 5482 |
|
|
12ee : 68 [ 4] pla ;load status
|
| 5483 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5484 |
|
|
12ef : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5485 |
|
|
|
| 5486 |
|
|
12f1 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5487 |
|
|
trap_ne
|
| 5488 |
|
|
12f4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5489 |
|
|
|
| 5490 |
|
|
|
| 5491 |
|
|
set_stat 0
|
| 5492 |
|
|
> load_flag 0
|
| 5493 |
|
|
12f6 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5494 |
|
|
>
|
| 5495 |
|
|
12f8 : 48 [ 3]> pha ;use stack to load status
|
| 5496 |
|
|
12f9 : 28 [ 4]> plp
|
| 5497 |
|
|
|
| 5498 |
|
|
12fa : ac0802 [ 4] ldy abs1
|
| 5499 |
|
|
12fd : 08 [ 3] php ;test stores do not alter flags
|
| 5500 |
|
|
12fe : 98 [ 2] tya
|
| 5501 |
|
|
12ff : 49c3 [ 2] eor #$c3
|
| 5502 |
|
|
1301 : a8 [ 2] tay
|
| 5503 |
|
|
1302 : 28 [ 4] plp
|
| 5504 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 96
|
| 5505 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5506 |
|
|
|
| 5507 |
|
|
1303 : 840c [ 3] sty zpt
|
| 5508 |
|
|
1305 : 08 [ 3] php ;flags after load/store sequence
|
| 5509 |
|
|
1306 : 49c3 [ 2] eor #$c3
|
| 5510 |
|
|
1308 : a8 [ 2] tay
|
| 5511 |
|
|
1309 : c413 [ 3] cpy zp1 ;test result
|
| 5512 |
|
|
trap_ne
|
| 5513 |
|
|
130b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5514 |
|
|
|
| 5515 |
|
|
130d : 68 [ 4] pla ;load status
|
| 5516 |
|
|
eor_flag 0
|
| 5517 |
|
|
130e : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5518 |
|
|
|
| 5519 |
|
|
1310 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5520 |
|
|
trap_ne
|
| 5521 |
|
|
1313 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5522 |
|
|
|
| 5523 |
|
|
set_stat 0
|
| 5524 |
|
|
> load_flag 0
|
| 5525 |
|
|
1315 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5526 |
|
|
>
|
| 5527 |
|
|
1317 : 48 [ 3]> pha ;use stack to load status
|
| 5528 |
|
|
1318 : 28 [ 4]> plp
|
| 5529 |
|
|
|
| 5530 |
|
|
1319 : ac0902 [ 4] ldy abs1+1
|
| 5531 |
|
|
131c : 08 [ 3] php ;test stores do not alter flags
|
| 5532 |
|
|
131d : 98 [ 2] tya
|
| 5533 |
|
|
131e : 49c3 [ 2] eor #$c3
|
| 5534 |
|
|
1320 : a8 [ 2] tay
|
| 5535 |
|
|
1321 : 28 [ 4] plp
|
| 5536 |
|
|
1322 : 840d [ 3] sty zpt+1
|
| 5537 |
|
|
1324 : 08 [ 3] php ;flags after load/store sequence
|
| 5538 |
|
|
1325 : 49c3 [ 2] eor #$c3
|
| 5539 |
|
|
1327 : a8 [ 2] tay
|
| 5540 |
|
|
1328 : c414 [ 3] cpy zp1+1 ;test result
|
| 5541 |
|
|
trap_ne
|
| 5542 |
|
|
132a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5543 |
|
|
|
| 5544 |
|
|
132c : 68 [ 4] pla ;load status
|
| 5545 |
|
|
eor_flag 0
|
| 5546 |
|
|
132d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5547 |
|
|
|
| 5548 |
|
|
132f : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5549 |
|
|
trap_ne
|
| 5550 |
|
|
1332 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5551 |
|
|
|
| 5552 |
|
|
set_stat 0
|
| 5553 |
|
|
> load_flag 0
|
| 5554 |
|
|
1334 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5555 |
|
|
>
|
| 5556 |
|
|
1336 : 48 [ 3]> pha ;use stack to load status
|
| 5557 |
|
|
1337 : 28 [ 4]> plp
|
| 5558 |
|
|
|
| 5559 |
|
|
1338 : ac0a02 [ 4] ldy abs1+2
|
| 5560 |
|
|
133b : 08 [ 3] php ;test stores do not alter flags
|
| 5561 |
|
|
133c : 98 [ 2] tya
|
| 5562 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 97
|
| 5563 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5564 |
|
|
|
| 5565 |
|
|
133d : 49c3 [ 2] eor #$c3
|
| 5566 |
|
|
133f : a8 [ 2] tay
|
| 5567 |
|
|
1340 : 28 [ 4] plp
|
| 5568 |
|
|
1341 : 840e [ 3] sty zpt+2
|
| 5569 |
|
|
1343 : 08 [ 3] php ;flags after load/store sequence
|
| 5570 |
|
|
1344 : 49c3 [ 2] eor #$c3
|
| 5571 |
|
|
1346 : a8 [ 2] tay
|
| 5572 |
|
|
1347 : c415 [ 3] cpy zp1+2 ;test result
|
| 5573 |
|
|
trap_ne
|
| 5574 |
|
|
1349 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5575 |
|
|
|
| 5576 |
|
|
134b : 68 [ 4] pla ;load status
|
| 5577 |
|
|
eor_flag 0
|
| 5578 |
|
|
134c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5579 |
|
|
|
| 5580 |
|
|
134e : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5581 |
|
|
trap_ne
|
| 5582 |
|
|
1351 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5583 |
|
|
|
| 5584 |
|
|
set_stat 0
|
| 5585 |
|
|
> load_flag 0
|
| 5586 |
|
|
1353 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5587 |
|
|
>
|
| 5588 |
|
|
1355 : 48 [ 3]> pha ;use stack to load status
|
| 5589 |
|
|
1356 : 28 [ 4]> plp
|
| 5590 |
|
|
|
| 5591 |
|
|
1357 : ac0b02 [ 4] ldy abs1+3
|
| 5592 |
|
|
135a : 08 [ 3] php ;test stores do not alter flags
|
| 5593 |
|
|
135b : 98 [ 2] tya
|
| 5594 |
|
|
135c : 49c3 [ 2] eor #$c3
|
| 5595 |
|
|
135e : a8 [ 2] tay
|
| 5596 |
|
|
135f : 28 [ 4] plp
|
| 5597 |
|
|
1360 : 840f [ 3] sty zpt+3
|
| 5598 |
|
|
1362 : 08 [ 3] php ;flags after load/store sequence
|
| 5599 |
|
|
1363 : 49c3 [ 2] eor #$c3
|
| 5600 |
|
|
1365 : a8 [ 2] tay
|
| 5601 |
|
|
1366 : c416 [ 3] cpy zp1+3 ;test result
|
| 5602 |
|
|
trap_ne
|
| 5603 |
|
|
1368 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5604 |
|
|
|
| 5605 |
|
|
136a : 68 [ 4] pla ;load status
|
| 5606 |
|
|
eor_flag 0
|
| 5607 |
|
|
136b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5608 |
|
|
|
| 5609 |
|
|
136d : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5610 |
|
|
trap_ne
|
| 5611 |
|
|
1370 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5612 |
|
|
|
| 5613 |
|
|
|
| 5614 |
|
|
set_stat $ff
|
| 5615 |
|
|
> load_flag $ff
|
| 5616 |
|
|
1372 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5617 |
|
|
>
|
| 5618 |
|
|
1374 : 48 [ 3]> pha ;use stack to load status
|
| 5619 |
|
|
1375 : 28 [ 4]> plp
|
| 5620 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 98
|
| 5621 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5622 |
|
|
|
| 5623 |
|
|
|
| 5624 |
|
|
1376 : ac0802 [ 4] ldy abs1
|
| 5625 |
|
|
1379 : 08 [ 3] php ;test stores do not alter flags
|
| 5626 |
|
|
137a : 98 [ 2] tya
|
| 5627 |
|
|
137b : 49c3 [ 2] eor #$c3
|
| 5628 |
|
|
137d : a8 [ 2] tay
|
| 5629 |
|
|
137e : 28 [ 4] plp
|
| 5630 |
|
|
137f : 840c [ 3] sty zpt
|
| 5631 |
|
|
1381 : 08 [ 3] php ;flags after load/store sequence
|
| 5632 |
|
|
1382 : 49c3 [ 2] eor #$c3
|
| 5633 |
|
|
1384 : a8 [ 2] tay
|
| 5634 |
|
|
1385 : c513 [ 3] cmp zp1 ;test result
|
| 5635 |
|
|
trap_ne
|
| 5636 |
|
|
1387 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5637 |
|
|
|
| 5638 |
|
|
1389 : 68 [ 4] pla ;load status
|
| 5639 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5640 |
|
|
138a : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5641 |
|
|
|
| 5642 |
|
|
138c : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5643 |
|
|
trap_ne
|
| 5644 |
|
|
138f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5645 |
|
|
|
| 5646 |
|
|
set_stat $ff
|
| 5647 |
|
|
> load_flag $ff
|
| 5648 |
|
|
1391 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5649 |
|
|
>
|
| 5650 |
|
|
1393 : 48 [ 3]> pha ;use stack to load status
|
| 5651 |
|
|
1394 : 28 [ 4]> plp
|
| 5652 |
|
|
|
| 5653 |
|
|
1395 : ac0902 [ 4] ldy abs1+1
|
| 5654 |
|
|
1398 : 08 [ 3] php ;test stores do not alter flags
|
| 5655 |
|
|
1399 : 98 [ 2] tya
|
| 5656 |
|
|
139a : 49c3 [ 2] eor #$c3
|
| 5657 |
|
|
139c : a8 [ 2] tay
|
| 5658 |
|
|
139d : 28 [ 4] plp
|
| 5659 |
|
|
139e : 840d [ 3] sty zpt+1
|
| 5660 |
|
|
13a0 : 08 [ 3] php ;flags after load/store sequence
|
| 5661 |
|
|
13a1 : 49c3 [ 2] eor #$c3
|
| 5662 |
|
|
13a3 : a8 [ 2] tay
|
| 5663 |
|
|
13a4 : c514 [ 3] cmp zp1+1 ;test result
|
| 5664 |
|
|
trap_ne
|
| 5665 |
|
|
13a6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5666 |
|
|
|
| 5667 |
|
|
13a8 : 68 [ 4] pla ;load status
|
| 5668 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5669 |
|
|
13a9 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5670 |
|
|
|
| 5671 |
|
|
13ab : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5672 |
|
|
trap_ne
|
| 5673 |
|
|
13ae : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5674 |
|
|
|
| 5675 |
|
|
set_stat $ff
|
| 5676 |
|
|
> load_flag $ff
|
| 5677 |
|
|
13b0 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5678 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 99
|
| 5679 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5680 |
|
|
|
| 5681 |
|
|
>
|
| 5682 |
|
|
13b2 : 48 [ 3]> pha ;use stack to load status
|
| 5683 |
|
|
13b3 : 28 [ 4]> plp
|
| 5684 |
|
|
|
| 5685 |
|
|
13b4 : ac0a02 [ 4] ldy abs1+2
|
| 5686 |
|
|
13b7 : 08 [ 3] php ;test stores do not alter flags
|
| 5687 |
|
|
13b8 : 98 [ 2] tya
|
| 5688 |
|
|
13b9 : 49c3 [ 2] eor #$c3
|
| 5689 |
|
|
13bb : a8 [ 2] tay
|
| 5690 |
|
|
13bc : 28 [ 4] plp
|
| 5691 |
|
|
13bd : 840e [ 3] sty zpt+2
|
| 5692 |
|
|
13bf : 08 [ 3] php ;flags after load/store sequence
|
| 5693 |
|
|
13c0 : 49c3 [ 2] eor #$c3
|
| 5694 |
|
|
13c2 : a8 [ 2] tay
|
| 5695 |
|
|
13c3 : c515 [ 3] cmp zp1+2 ;test result
|
| 5696 |
|
|
trap_ne
|
| 5697 |
|
|
13c5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5698 |
|
|
|
| 5699 |
|
|
13c7 : 68 [ 4] pla ;load status
|
| 5700 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5701 |
|
|
13c8 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5702 |
|
|
|
| 5703 |
|
|
13ca : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5704 |
|
|
trap_ne
|
| 5705 |
|
|
13cd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5706 |
|
|
|
| 5707 |
|
|
set_stat $ff
|
| 5708 |
|
|
> load_flag $ff
|
| 5709 |
|
|
13cf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5710 |
|
|
>
|
| 5711 |
|
|
13d1 : 48 [ 3]> pha ;use stack to load status
|
| 5712 |
|
|
13d2 : 28 [ 4]> plp
|
| 5713 |
|
|
|
| 5714 |
|
|
13d3 : ac0b02 [ 4] ldy abs1+3
|
| 5715 |
|
|
13d6 : 08 [ 3] php ;test stores do not alter flags
|
| 5716 |
|
|
13d7 : 98 [ 2] tya
|
| 5717 |
|
|
13d8 : 49c3 [ 2] eor #$c3
|
| 5718 |
|
|
13da : a8 [ 2] tay
|
| 5719 |
|
|
13db : 28 [ 4] plp
|
| 5720 |
|
|
13dc : 840f [ 3] sty zpt+3
|
| 5721 |
|
|
13de : 08 [ 3] php ;flags after load/store sequence
|
| 5722 |
|
|
13df : 49c3 [ 2] eor #$c3
|
| 5723 |
|
|
13e1 : a8 [ 2] tay
|
| 5724 |
|
|
13e2 : c516 [ 3] cmp zp1+3 ;test result
|
| 5725 |
|
|
trap_ne
|
| 5726 |
|
|
13e4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5727 |
|
|
|
| 5728 |
|
|
13e6 : 68 [ 4] pla ;load status
|
| 5729 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5730 |
|
|
13e7 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5731 |
|
|
|
| 5732 |
|
|
13e9 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5733 |
|
|
trap_ne
|
| 5734 |
|
|
13ec : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5735 |
|
|
|
| 5736 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 100
|
| 5737 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5738 |
|
|
|
| 5739 |
|
|
|
| 5740 |
|
|
|
| 5741 |
|
|
set_stat 0
|
| 5742 |
|
|
> load_flag 0
|
| 5743 |
|
|
13ee : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5744 |
|
|
>
|
| 5745 |
|
|
13f0 : 48 [ 3]> pha ;use stack to load status
|
| 5746 |
|
|
13f1 : 28 [ 4]> plp
|
| 5747 |
|
|
|
| 5748 |
|
|
13f2 : a0c3 [ 2] ldy #$c3
|
| 5749 |
|
|
13f4 : 08 [ 3] php
|
| 5750 |
|
|
13f5 : cc0802 [ 4] cpy abs1 ;test result
|
| 5751 |
|
|
trap_ne
|
| 5752 |
|
|
13f8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5753 |
|
|
|
| 5754 |
|
|
13fa : 68 [ 4] pla ;load status
|
| 5755 |
|
|
eor_flag 0
|
| 5756 |
|
|
13fb : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5757 |
|
|
|
| 5758 |
|
|
13fd : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5759 |
|
|
trap_ne
|
| 5760 |
|
|
1400 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5761 |
|
|
|
| 5762 |
|
|
set_stat 0
|
| 5763 |
|
|
> load_flag 0
|
| 5764 |
|
|
1402 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5765 |
|
|
>
|
| 5766 |
|
|
1404 : 48 [ 3]> pha ;use stack to load status
|
| 5767 |
|
|
1405 : 28 [ 4]> plp
|
| 5768 |
|
|
|
| 5769 |
|
|
1406 : a082 [ 2] ldy #$82
|
| 5770 |
|
|
1408 : 08 [ 3] php
|
| 5771 |
|
|
1409 : cc0902 [ 4] cpy abs1+1 ;test result
|
| 5772 |
|
|
trap_ne
|
| 5773 |
|
|
140c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5774 |
|
|
|
| 5775 |
|
|
140e : 68 [ 4] pla ;load status
|
| 5776 |
|
|
eor_flag 0
|
| 5777 |
|
|
140f : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5778 |
|
|
|
| 5779 |
|
|
1411 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5780 |
|
|
trap_ne
|
| 5781 |
|
|
1414 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5782 |
|
|
|
| 5783 |
|
|
set_stat 0
|
| 5784 |
|
|
> load_flag 0
|
| 5785 |
|
|
1416 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5786 |
|
|
>
|
| 5787 |
|
|
1418 : 48 [ 3]> pha ;use stack to load status
|
| 5788 |
|
|
1419 : 28 [ 4]> plp
|
| 5789 |
|
|
|
| 5790 |
|
|
141a : a041 [ 2] ldy #$41
|
| 5791 |
|
|
141c : 08 [ 3] php
|
| 5792 |
|
|
141d : cc0a02 [ 4] cpy abs1+2 ;test result
|
| 5793 |
|
|
trap_ne
|
| 5794 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 101
|
| 5795 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5796 |
|
|
|
| 5797 |
|
|
1420 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5798 |
|
|
|
| 5799 |
|
|
1422 : 68 [ 4] pla ;load status
|
| 5800 |
|
|
eor_flag 0
|
| 5801 |
|
|
1423 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5802 |
|
|
|
| 5803 |
|
|
1425 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5804 |
|
|
trap_ne
|
| 5805 |
|
|
1428 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5806 |
|
|
|
| 5807 |
|
|
set_stat 0
|
| 5808 |
|
|
> load_flag 0
|
| 5809 |
|
|
142a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5810 |
|
|
>
|
| 5811 |
|
|
142c : 48 [ 3]> pha ;use stack to load status
|
| 5812 |
|
|
142d : 28 [ 4]> plp
|
| 5813 |
|
|
|
| 5814 |
|
|
142e : a000 [ 2] ldy #0
|
| 5815 |
|
|
1430 : 08 [ 3] php
|
| 5816 |
|
|
1431 : cc0b02 [ 4] cpy abs1+3 ;test result
|
| 5817 |
|
|
trap_ne
|
| 5818 |
|
|
1434 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5819 |
|
|
|
| 5820 |
|
|
1436 : 68 [ 4] pla ;load status
|
| 5821 |
|
|
eor_flag 0
|
| 5822 |
|
|
1437 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 5823 |
|
|
|
| 5824 |
|
|
1439 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5825 |
|
|
trap_ne
|
| 5826 |
|
|
143c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5827 |
|
|
|
| 5828 |
|
|
|
| 5829 |
|
|
set_stat $ff
|
| 5830 |
|
|
> load_flag $ff
|
| 5831 |
|
|
143e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5832 |
|
|
>
|
| 5833 |
|
|
1440 : 48 [ 3]> pha ;use stack to load status
|
| 5834 |
|
|
1441 : 28 [ 4]> plp
|
| 5835 |
|
|
|
| 5836 |
|
|
1442 : a0c3 [ 2] ldy #$c3
|
| 5837 |
|
|
1444 : 08 [ 3] php
|
| 5838 |
|
|
1445 : cc0802 [ 4] cpy abs1 ;test result
|
| 5839 |
|
|
trap_ne
|
| 5840 |
|
|
1448 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5841 |
|
|
|
| 5842 |
|
|
144a : 68 [ 4] pla ;load status
|
| 5843 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5844 |
|
|
144b : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5845 |
|
|
|
| 5846 |
|
|
144d : cd0d02 [ 4] cmp fLDx ;test flags
|
| 5847 |
|
|
trap_ne
|
| 5848 |
|
|
1450 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5849 |
|
|
|
| 5850 |
|
|
set_stat $ff
|
| 5851 |
|
|
> load_flag $ff
|
| 5852 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 102
|
| 5853 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5854 |
|
|
|
| 5855 |
|
|
1452 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5856 |
|
|
>
|
| 5857 |
|
|
1454 : 48 [ 3]> pha ;use stack to load status
|
| 5858 |
|
|
1455 : 28 [ 4]> plp
|
| 5859 |
|
|
|
| 5860 |
|
|
1456 : a082 [ 2] ldy #$82
|
| 5861 |
|
|
1458 : 08 [ 3] php
|
| 5862 |
|
|
1459 : cc0902 [ 4] cpy abs1+1 ;test result
|
| 5863 |
|
|
trap_ne
|
| 5864 |
|
|
145c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5865 |
|
|
|
| 5866 |
|
|
145e : 68 [ 4] pla ;load status
|
| 5867 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5868 |
|
|
145f : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5869 |
|
|
|
| 5870 |
|
|
1461 : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 5871 |
|
|
trap_ne
|
| 5872 |
|
|
1464 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5873 |
|
|
|
| 5874 |
|
|
set_stat $ff
|
| 5875 |
|
|
> load_flag $ff
|
| 5876 |
|
|
1466 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5877 |
|
|
>
|
| 5878 |
|
|
1468 : 48 [ 3]> pha ;use stack to load status
|
| 5879 |
|
|
1469 : 28 [ 4]> plp
|
| 5880 |
|
|
|
| 5881 |
|
|
146a : a041 [ 2] ldy #$41
|
| 5882 |
|
|
146c : 08 [ 3] php
|
| 5883 |
|
|
146d : cc0a02 [ 4] cpy abs1+2 ;test result
|
| 5884 |
|
|
trap_ne
|
| 5885 |
|
|
1470 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5886 |
|
|
|
| 5887 |
|
|
1472 : 68 [ 4] pla ;load status
|
| 5888 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5889 |
|
|
1473 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5890 |
|
|
|
| 5891 |
|
|
1475 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 5892 |
|
|
trap_ne
|
| 5893 |
|
|
1478 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5894 |
|
|
|
| 5895 |
|
|
set_stat $ff
|
| 5896 |
|
|
> load_flag $ff
|
| 5897 |
|
|
147a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 5898 |
|
|
>
|
| 5899 |
|
|
147c : 48 [ 3]> pha ;use stack to load status
|
| 5900 |
|
|
147d : 28 [ 4]> plp
|
| 5901 |
|
|
|
| 5902 |
|
|
147e : a000 [ 2] ldy #0
|
| 5903 |
|
|
1480 : 08 [ 3] php
|
| 5904 |
|
|
1481 : cc0b02 [ 4] cpy abs1+3 ;test result
|
| 5905 |
|
|
trap_ne
|
| 5906 |
|
|
1484 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5907 |
|
|
|
| 5908 |
|
|
1486 : 68 [ 4] pla ;load status
|
| 5909 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 5910 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 103
|
| 5911 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5912 |
|
|
|
| 5913 |
|
|
1487 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 5914 |
|
|
|
| 5915 |
|
|
1489 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 5916 |
|
|
trap_ne
|
| 5917 |
|
|
148c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5918 |
|
|
|
| 5919 |
|
|
|
| 5920 |
|
|
148e : a000 [ 2] ldy #0
|
| 5921 |
|
|
1490 : a50c [ 3] lda zpt
|
| 5922 |
|
|
1492 : 49c3 [ 2] eor #$c3
|
| 5923 |
|
|
1494 : c513 [ 3] cmp zp1
|
| 5924 |
|
|
trap_ne ;store to zp data
|
| 5925 |
|
|
1496 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5926 |
|
|
|
| 5927 |
|
|
1498 : 840c [ 3] sty zpt ;clear
|
| 5928 |
|
|
149a : ad0302 [ 4] lda abst
|
| 5929 |
|
|
149d : 49c3 [ 2] eor #$c3
|
| 5930 |
|
|
149f : cd0802 [ 4] cmp abs1
|
| 5931 |
|
|
trap_ne ;store to abs data
|
| 5932 |
|
|
14a2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5933 |
|
|
|
| 5934 |
|
|
14a4 : 8c0302 [ 4] sty abst ;clear
|
| 5935 |
|
|
14a7 : a50d [ 3] lda zpt+1
|
| 5936 |
|
|
14a9 : 49c3 [ 2] eor #$c3
|
| 5937 |
|
|
14ab : c514 [ 3] cmp zp1+1
|
| 5938 |
|
|
trap_ne ;store to zp+1 data
|
| 5939 |
|
|
14ad : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5940 |
|
|
|
| 5941 |
|
|
14af : 840d [ 3] sty zpt+1 ;clear
|
| 5942 |
|
|
14b1 : ad0402 [ 4] lda abst+1
|
| 5943 |
|
|
14b4 : 49c3 [ 2] eor #$c3
|
| 5944 |
|
|
14b6 : cd0902 [ 4] cmp abs1+1
|
| 5945 |
|
|
trap_ne ;store to abs+1 data
|
| 5946 |
|
|
14b9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5947 |
|
|
|
| 5948 |
|
|
14bb : 8c0402 [ 4] sty abst+1 ;clear
|
| 5949 |
|
|
14be : a50e [ 3] lda zpt+2
|
| 5950 |
|
|
14c0 : 49c3 [ 2] eor #$c3
|
| 5951 |
|
|
14c2 : c515 [ 3] cmp zp1+2
|
| 5952 |
|
|
trap_ne ;store to zp+2 data
|
| 5953 |
|
|
14c4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5954 |
|
|
|
| 5955 |
|
|
14c6 : 840e [ 3] sty zpt+2 ;clear
|
| 5956 |
|
|
14c8 : ad0502 [ 4] lda abst+2
|
| 5957 |
|
|
14cb : 49c3 [ 2] eor #$c3
|
| 5958 |
|
|
14cd : cd0a02 [ 4] cmp abs1+2
|
| 5959 |
|
|
trap_ne ;store to abs+2 data
|
| 5960 |
|
|
14d0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5961 |
|
|
|
| 5962 |
|
|
14d2 : 8c0502 [ 4] sty abst+2 ;clear
|
| 5963 |
|
|
14d5 : a50f [ 3] lda zpt+3
|
| 5964 |
|
|
14d7 : 49c3 [ 2] eor #$c3
|
| 5965 |
|
|
14d9 : c516 [ 3] cmp zp1+3
|
| 5966 |
|
|
trap_ne ;store to zp+3 data
|
| 5967 |
|
|
14db : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5968 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 104
|
| 5969 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 5970 |
|
|
|
| 5971 |
|
|
|
| 5972 |
|
|
14dd : 840f [ 3] sty zpt+3 ;clear
|
| 5973 |
|
|
14df : ad0602 [ 4] lda abst+3
|
| 5974 |
|
|
14e2 : 49c3 [ 2] eor #$c3
|
| 5975 |
|
|
14e4 : cd0b02 [ 4] cmp abs1+3
|
| 5976 |
|
|
trap_ne ;store to abs+3 data
|
| 5977 |
|
|
14e7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5978 |
|
|
|
| 5979 |
|
|
14e9 : 8c0602 [ 4] sty abst+3 ;clear
|
| 5980 |
|
|
next_test
|
| 5981 |
|
|
14ec : ad0002 [ 4]> lda test_case ;previous test
|
| 5982 |
|
|
14ef : c914 [ 2]> cmp #test_num
|
| 5983 |
|
|
> trap_ne ;test is out of sequence
|
| 5984 |
|
|
14f1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 5985 |
|
|
>
|
| 5986 |
|
|
0015 = >test_num = test_num + 1
|
| 5987 |
|
|
14f3 : a915 [ 2]> lda #test_num ;*** this tests' number
|
| 5988 |
|
|
14f5 : 8d0002 [ 4]> sta test_case
|
| 5989 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 5990 |
|
|
|
| 5991 |
|
|
|
| 5992 |
|
|
; testing load / store accumulator LDA / STA all addressing modes
|
| 5993 |
|
|
; LDA / STA - zp,x / abs,x
|
| 5994 |
|
|
14f8 : a203 [ 2] ldx #3
|
| 5995 |
|
|
14fa : tldax
|
| 5996 |
|
|
set_stat 0
|
| 5997 |
|
|
> load_flag 0
|
| 5998 |
|
|
14fa : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 5999 |
|
|
>
|
| 6000 |
|
|
14fc : 48 [ 3]> pha ;use stack to load status
|
| 6001 |
|
|
14fd : 28 [ 4]> plp
|
| 6002 |
|
|
|
| 6003 |
|
|
14fe : b513 [ 4] lda zp1,x
|
| 6004 |
|
|
1500 : 08 [ 3] php ;test stores do not alter flags
|
| 6005 |
|
|
1501 : 49c3 [ 2] eor #$c3
|
| 6006 |
|
|
1503 : 28 [ 4] plp
|
| 6007 |
|
|
1504 : 9d0302 [ 5] sta abst,x
|
| 6008 |
|
|
1507 : 08 [ 3] php ;flags after load/store sequence
|
| 6009 |
|
|
1508 : 49c3 [ 2] eor #$c3
|
| 6010 |
|
|
150a : dd0802 [ 4] cmp abs1,x ;test result
|
| 6011 |
|
|
trap_ne
|
| 6012 |
|
|
150d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6013 |
|
|
|
| 6014 |
|
|
150f : 68 [ 4] pla ;load status
|
| 6015 |
|
|
eor_flag 0
|
| 6016 |
|
|
1510 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6017 |
|
|
|
| 6018 |
|
|
1512 : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 6019 |
|
|
trap_ne
|
| 6020 |
|
|
1515 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6021 |
|
|
|
| 6022 |
|
|
1517 : ca [ 2] dex
|
| 6023 |
|
|
1518 : 10e0 [ 4] bpl tldax
|
| 6024 |
|
|
|
| 6025 |
|
|
151a : a203 [ 2] ldx #3
|
| 6026 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 105
|
| 6027 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6028 |
|
|
|
| 6029 |
|
|
151c : tldax1
|
| 6030 |
|
|
set_stat $ff
|
| 6031 |
|
|
> load_flag $ff
|
| 6032 |
|
|
151c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6033 |
|
|
>
|
| 6034 |
|
|
151e : 48 [ 3]> pha ;use stack to load status
|
| 6035 |
|
|
151f : 28 [ 4]> plp
|
| 6036 |
|
|
|
| 6037 |
|
|
1520 : b513 [ 4] lda zp1,x
|
| 6038 |
|
|
1522 : 08 [ 3] php ;test stores do not alter flags
|
| 6039 |
|
|
1523 : 49c3 [ 2] eor #$c3
|
| 6040 |
|
|
1525 : 28 [ 4] plp
|
| 6041 |
|
|
1526 : 9d0302 [ 5] sta abst,x
|
| 6042 |
|
|
1529 : 08 [ 3] php ;flags after load/store sequence
|
| 6043 |
|
|
152a : 49c3 [ 2] eor #$c3
|
| 6044 |
|
|
152c : dd0802 [ 4] cmp abs1,x ;test result
|
| 6045 |
|
|
trap_ne
|
| 6046 |
|
|
152f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6047 |
|
|
|
| 6048 |
|
|
1531 : 68 [ 4] pla ;load status
|
| 6049 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6050 |
|
|
1532 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6051 |
|
|
|
| 6052 |
|
|
1534 : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 6053 |
|
|
trap_ne
|
| 6054 |
|
|
1537 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6055 |
|
|
|
| 6056 |
|
|
1539 : ca [ 2] dex
|
| 6057 |
|
|
153a : 10e0 [ 3] bpl tldax1
|
| 6058 |
|
|
|
| 6059 |
|
|
153c : a203 [ 2] ldx #3
|
| 6060 |
|
|
153e : tldax2
|
| 6061 |
|
|
set_stat 0
|
| 6062 |
|
|
> load_flag 0
|
| 6063 |
|
|
153e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6064 |
|
|
>
|
| 6065 |
|
|
1540 : 48 [ 3]> pha ;use stack to load status
|
| 6066 |
|
|
1541 : 28 [ 4]> plp
|
| 6067 |
|
|
|
| 6068 |
|
|
1542 : bd0802 [ 4] lda abs1,x
|
| 6069 |
|
|
1545 : 08 [ 3] php ;test stores do not alter flags
|
| 6070 |
|
|
1546 : 49c3 [ 2] eor #$c3
|
| 6071 |
|
|
1548 : 28 [ 4] plp
|
| 6072 |
|
|
1549 : 950c [ 4] sta zpt,x
|
| 6073 |
|
|
154b : 08 [ 3] php ;flags after load/store sequence
|
| 6074 |
|
|
154c : 49c3 [ 2] eor #$c3
|
| 6075 |
|
|
154e : d513 [ 4] cmp zp1,x ;test result
|
| 6076 |
|
|
trap_ne
|
| 6077 |
|
|
1550 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6078 |
|
|
|
| 6079 |
|
|
1552 : 68 [ 4] pla ;load status
|
| 6080 |
|
|
eor_flag 0
|
| 6081 |
|
|
1553 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6082 |
|
|
|
| 6083 |
|
|
1555 : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 6084 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 106
|
| 6085 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6086 |
|
|
|
| 6087 |
|
|
trap_ne
|
| 6088 |
|
|
1558 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6089 |
|
|
|
| 6090 |
|
|
155a : ca [ 2] dex
|
| 6091 |
|
|
155b : 10e1 [ 3] bpl tldax2
|
| 6092 |
|
|
|
| 6093 |
|
|
155d : a203 [ 2] ldx #3
|
| 6094 |
|
|
155f : tldax3
|
| 6095 |
|
|
set_stat $ff
|
| 6096 |
|
|
> load_flag $ff
|
| 6097 |
|
|
155f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6098 |
|
|
>
|
| 6099 |
|
|
1561 : 48 [ 3]> pha ;use stack to load status
|
| 6100 |
|
|
1562 : 28 [ 4]> plp
|
| 6101 |
|
|
|
| 6102 |
|
|
1563 : bd0802 [ 4] lda abs1,x
|
| 6103 |
|
|
1566 : 08 [ 3] php ;test stores do not alter flags
|
| 6104 |
|
|
1567 : 49c3 [ 2] eor #$c3
|
| 6105 |
|
|
1569 : 28 [ 4] plp
|
| 6106 |
|
|
156a : 950c [ 4] sta zpt,x
|
| 6107 |
|
|
156c : 08 [ 3] php ;flags after load/store sequence
|
| 6108 |
|
|
156d : 49c3 [ 2] eor #$c3
|
| 6109 |
|
|
156f : d513 [ 4] cmp zp1,x ;test result
|
| 6110 |
|
|
trap_ne
|
| 6111 |
|
|
1571 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6112 |
|
|
|
| 6113 |
|
|
1573 : 68 [ 4] pla ;load status
|
| 6114 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6115 |
|
|
1574 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6116 |
|
|
|
| 6117 |
|
|
1576 : dd0d02 [ 4] cmp fLDx,x ;test flags
|
| 6118 |
|
|
trap_ne
|
| 6119 |
|
|
1579 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6120 |
|
|
|
| 6121 |
|
|
157b : ca [ 2] dex
|
| 6122 |
|
|
157c : 10e1 [ 3] bpl tldax3
|
| 6123 |
|
|
|
| 6124 |
|
|
157e : a203 [ 2] ldx #3 ;testing store result
|
| 6125 |
|
|
1580 : a000 [ 2] ldy #0
|
| 6126 |
|
|
1582 : b50c [ 4] tstax lda zpt,x
|
| 6127 |
|
|
1584 : 49c3 [ 2] eor #$c3
|
| 6128 |
|
|
1586 : d513 [ 4] cmp zp1,x
|
| 6129 |
|
|
trap_ne ;store to zp,x data
|
| 6130 |
|
|
1588 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6131 |
|
|
|
| 6132 |
|
|
158a : 940c [ 4] sty zpt,x ;clear
|
| 6133 |
|
|
158c : bd0302 [ 4] lda abst,x
|
| 6134 |
|
|
158f : 49c3 [ 2] eor #$c3
|
| 6135 |
|
|
1591 : dd0802 [ 4] cmp abs1,x
|
| 6136 |
|
|
trap_ne ;store to abs,x data
|
| 6137 |
|
|
1594 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6138 |
|
|
|
| 6139 |
|
|
1596 : 8a [ 2] txa
|
| 6140 |
|
|
1597 : 9d0302 [ 5] sta abst,x ;clear
|
| 6141 |
|
|
159a : ca [ 2] dex
|
| 6142 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 107
|
| 6143 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6144 |
|
|
|
| 6145 |
|
|
159b : 10e5 [ 3] bpl tstax
|
| 6146 |
|
|
next_test
|
| 6147 |
|
|
159d : ad0002 [ 4]> lda test_case ;previous test
|
| 6148 |
|
|
15a0 : c915 [ 2]> cmp #test_num
|
| 6149 |
|
|
> trap_ne ;test is out of sequence
|
| 6150 |
|
|
15a2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6151 |
|
|
>
|
| 6152 |
|
|
0016 = >test_num = test_num + 1
|
| 6153 |
|
|
15a4 : a916 [ 2]> lda #test_num ;*** this tests' number
|
| 6154 |
|
|
15a6 : 8d0002 [ 4]> sta test_case
|
| 6155 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 6156 |
|
|
|
| 6157 |
|
|
|
| 6158 |
|
|
; LDA / STA - (zp),y / abs,y / (zp,x)
|
| 6159 |
|
|
15a9 : a003 [ 2] ldy #3
|
| 6160 |
|
|
15ab : tlday
|
| 6161 |
|
|
set_stat 0
|
| 6162 |
|
|
> load_flag 0
|
| 6163 |
|
|
15ab : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6164 |
|
|
>
|
| 6165 |
|
|
15ad : 48 [ 3]> pha ;use stack to load status
|
| 6166 |
|
|
15ae : 28 [ 4]> plp
|
| 6167 |
|
|
|
| 6168 |
|
|
15af : b124 [ 5] lda (ind1),y
|
| 6169 |
|
|
15b1 : 08 [ 3] php ;test stores do not alter flags
|
| 6170 |
|
|
15b2 : 49c3 [ 2] eor #$c3
|
| 6171 |
|
|
15b4 : 28 [ 4] plp
|
| 6172 |
|
|
15b5 : 990302 [ 5] sta abst,y
|
| 6173 |
|
|
15b8 : 08 [ 3] php ;flags after load/store sequence
|
| 6174 |
|
|
15b9 : 49c3 [ 2] eor #$c3
|
| 6175 |
|
|
15bb : d90802 [ 4] cmp abs1,y ;test result
|
| 6176 |
|
|
trap_ne
|
| 6177 |
|
|
15be : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6178 |
|
|
|
| 6179 |
|
|
15c0 : 68 [ 4] pla ;load status
|
| 6180 |
|
|
eor_flag 0
|
| 6181 |
|
|
15c1 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6182 |
|
|
|
| 6183 |
|
|
15c3 : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 6184 |
|
|
trap_ne
|
| 6185 |
|
|
15c6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6186 |
|
|
|
| 6187 |
|
|
15c8 : 88 [ 2] dey
|
| 6188 |
|
|
15c9 : 10e0 [ 3] bpl tlday
|
| 6189 |
|
|
|
| 6190 |
|
|
15cb : a003 [ 2] ldy #3
|
| 6191 |
|
|
15cd : tlday1
|
| 6192 |
|
|
set_stat $ff
|
| 6193 |
|
|
> load_flag $ff
|
| 6194 |
|
|
15cd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6195 |
|
|
>
|
| 6196 |
|
|
15cf : 48 [ 3]> pha ;use stack to load status
|
| 6197 |
|
|
15d0 : 28 [ 4]> plp
|
| 6198 |
|
|
|
| 6199 |
|
|
15d1 : b124 [ 5] lda (ind1),y
|
| 6200 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 108
|
| 6201 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6202 |
|
|
|
| 6203 |
|
|
15d3 : 08 [ 3] php ;test stores do not alter flags
|
| 6204 |
|
|
15d4 : 49c3 [ 2] eor #$c3
|
| 6205 |
|
|
15d6 : 28 [ 4] plp
|
| 6206 |
|
|
15d7 : 990302 [ 5] sta abst,y
|
| 6207 |
|
|
15da : 08 [ 3] php ;flags after load/store sequence
|
| 6208 |
|
|
15db : 49c3 [ 2] eor #$c3
|
| 6209 |
|
|
15dd : d90802 [ 4] cmp abs1,y ;test result
|
| 6210 |
|
|
trap_ne
|
| 6211 |
|
|
15e0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6212 |
|
|
|
| 6213 |
|
|
15e2 : 68 [ 4] pla ;load status
|
| 6214 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6215 |
|
|
15e3 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6216 |
|
|
|
| 6217 |
|
|
15e5 : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 6218 |
|
|
trap_ne
|
| 6219 |
|
|
15e8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6220 |
|
|
|
| 6221 |
|
|
15ea : 88 [ 2] dey
|
| 6222 |
|
|
15eb : 10e0 [ 3] bpl tlday1
|
| 6223 |
|
|
|
| 6224 |
|
|
15ed : a003 [ 2] ldy #3 ;testing store result
|
| 6225 |
|
|
15ef : a200 [ 2] ldx #0
|
| 6226 |
|
|
15f1 : b90302 [ 4] tstay lda abst,y
|
| 6227 |
|
|
15f4 : 49c3 [ 2] eor #$c3
|
| 6228 |
|
|
15f6 : d90802 [ 4] cmp abs1,y
|
| 6229 |
|
|
trap_ne ;store to abs data
|
| 6230 |
|
|
15f9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6231 |
|
|
|
| 6232 |
|
|
15fb : 8a [ 2] txa
|
| 6233 |
|
|
15fc : 990302 [ 5] sta abst,y ;clear
|
| 6234 |
|
|
15ff : 88 [ 2] dey
|
| 6235 |
|
|
1600 : 10ef [ 4] bpl tstay
|
| 6236 |
|
|
|
| 6237 |
|
|
1602 : a003 [ 2] ldy #3
|
| 6238 |
|
|
1604 : tlday2
|
| 6239 |
|
|
set_stat 0
|
| 6240 |
|
|
> load_flag 0
|
| 6241 |
|
|
1604 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6242 |
|
|
>
|
| 6243 |
|
|
1606 : 48 [ 3]> pha ;use stack to load status
|
| 6244 |
|
|
1607 : 28 [ 4]> plp
|
| 6245 |
|
|
|
| 6246 |
|
|
1608 : b90802 [ 4] lda abs1,y
|
| 6247 |
|
|
160b : 08 [ 3] php ;test stores do not alter flags
|
| 6248 |
|
|
160c : 49c3 [ 2] eor #$c3
|
| 6249 |
|
|
160e : 28 [ 4] plp
|
| 6250 |
|
|
160f : 9130 [ 5] sta (indt),y
|
| 6251 |
|
|
1611 : 08 [ 3] php ;flags after load/store sequence
|
| 6252 |
|
|
1612 : 49c3 [ 2] eor #$c3
|
| 6253 |
|
|
1614 : d124 [ 5] cmp (ind1),y ;test result
|
| 6254 |
|
|
trap_ne
|
| 6255 |
|
|
1616 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6256 |
|
|
|
| 6257 |
|
|
1618 : 68 [ 4] pla ;load status
|
| 6258 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 109
|
| 6259 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6260 |
|
|
|
| 6261 |
|
|
eor_flag 0
|
| 6262 |
|
|
1619 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6263 |
|
|
|
| 6264 |
|
|
161b : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 6265 |
|
|
trap_ne
|
| 6266 |
|
|
161e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6267 |
|
|
|
| 6268 |
|
|
1620 : 88 [ 2] dey
|
| 6269 |
|
|
1621 : 10e1 [ 3] bpl tlday2
|
| 6270 |
|
|
|
| 6271 |
|
|
1623 : a003 [ 2] ldy #3
|
| 6272 |
|
|
1625 : tlday3
|
| 6273 |
|
|
set_stat $ff
|
| 6274 |
|
|
> load_flag $ff
|
| 6275 |
|
|
1625 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6276 |
|
|
>
|
| 6277 |
|
|
1627 : 48 [ 3]> pha ;use stack to load status
|
| 6278 |
|
|
1628 : 28 [ 4]> plp
|
| 6279 |
|
|
|
| 6280 |
|
|
1629 : b90802 [ 4] lda abs1,y
|
| 6281 |
|
|
162c : 08 [ 3] php ;test stores do not alter flags
|
| 6282 |
|
|
162d : 49c3 [ 2] eor #$c3
|
| 6283 |
|
|
162f : 28 [ 4] plp
|
| 6284 |
|
|
1630 : 9130 [ 5] sta (indt),y
|
| 6285 |
|
|
1632 : 08 [ 3] php ;flags after load/store sequence
|
| 6286 |
|
|
1633 : 49c3 [ 2] eor #$c3
|
| 6287 |
|
|
1635 : d124 [ 5] cmp (ind1),y ;test result
|
| 6288 |
|
|
trap_ne
|
| 6289 |
|
|
1637 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6290 |
|
|
|
| 6291 |
|
|
1639 : 68 [ 4] pla ;load status
|
| 6292 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6293 |
|
|
163a : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6294 |
|
|
|
| 6295 |
|
|
163c : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 6296 |
|
|
trap_ne
|
| 6297 |
|
|
163f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6298 |
|
|
|
| 6299 |
|
|
1641 : 88 [ 2] dey
|
| 6300 |
|
|
1642 : 10e1 [ 3] bpl tlday3
|
| 6301 |
|
|
|
| 6302 |
|
|
1644 : a003 [ 2] ldy #3 ;testing store result
|
| 6303 |
|
|
1646 : a200 [ 2] ldx #0
|
| 6304 |
|
|
1648 : b90302 [ 4] tstay1 lda abst,y
|
| 6305 |
|
|
164b : 49c3 [ 2] eor #$c3
|
| 6306 |
|
|
164d : d90802 [ 4] cmp abs1,y
|
| 6307 |
|
|
trap_ne ;store to abs data
|
| 6308 |
|
|
1650 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6309 |
|
|
|
| 6310 |
|
|
1652 : 8a [ 2] txa
|
| 6311 |
|
|
1653 : 990302 [ 5] sta abst,y ;clear
|
| 6312 |
|
|
1656 : 88 [ 2] dey
|
| 6313 |
|
|
1657 : 10ef [ 3] bpl tstay1
|
| 6314 |
|
|
|
| 6315 |
|
|
1659 : a206 [ 2] ldx #6
|
| 6316 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 110
|
| 6317 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6318 |
|
|
|
| 6319 |
|
|
165b : a003 [ 2] ldy #3
|
| 6320 |
|
|
165d : tldax4
|
| 6321 |
|
|
set_stat 0
|
| 6322 |
|
|
> load_flag 0
|
| 6323 |
|
|
165d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6324 |
|
|
>
|
| 6325 |
|
|
165f : 48 [ 3]> pha ;use stack to load status
|
| 6326 |
|
|
1660 : 28 [ 4]> plp
|
| 6327 |
|
|
|
| 6328 |
|
|
1661 : a124 [ 6] lda (ind1,x)
|
| 6329 |
|
|
1663 : 08 [ 3] php ;test stores do not alter flags
|
| 6330 |
|
|
1664 : 49c3 [ 2] eor #$c3
|
| 6331 |
|
|
1666 : 28 [ 4] plp
|
| 6332 |
|
|
1667 : 8130 [ 6] sta (indt,x)
|
| 6333 |
|
|
1669 : 08 [ 3] php ;flags after load/store sequence
|
| 6334 |
|
|
166a : 49c3 [ 2] eor #$c3
|
| 6335 |
|
|
166c : d90802 [ 4] cmp abs1,y ;test result
|
| 6336 |
|
|
trap_ne
|
| 6337 |
|
|
166f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6338 |
|
|
|
| 6339 |
|
|
1671 : 68 [ 4] pla ;load status
|
| 6340 |
|
|
eor_flag 0
|
| 6341 |
|
|
1672 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6342 |
|
|
|
| 6343 |
|
|
1674 : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 6344 |
|
|
trap_ne
|
| 6345 |
|
|
1677 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6346 |
|
|
|
| 6347 |
|
|
1679 : ca [ 2] dex
|
| 6348 |
|
|
167a : ca [ 2] dex
|
| 6349 |
|
|
167b : 88 [ 2] dey
|
| 6350 |
|
|
167c : 10df [ 3] bpl tldax4
|
| 6351 |
|
|
|
| 6352 |
|
|
167e : a206 [ 2] ldx #6
|
| 6353 |
|
|
1680 : a003 [ 2] ldy #3
|
| 6354 |
|
|
1682 : tldax5
|
| 6355 |
|
|
set_stat $ff
|
| 6356 |
|
|
> load_flag $ff
|
| 6357 |
|
|
1682 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6358 |
|
|
>
|
| 6359 |
|
|
1684 : 48 [ 3]> pha ;use stack to load status
|
| 6360 |
|
|
1685 : 28 [ 4]> plp
|
| 6361 |
|
|
|
| 6362 |
|
|
1686 : a124 [ 6] lda (ind1,x)
|
| 6363 |
|
|
1688 : 08 [ 3] php ;test stores do not alter flags
|
| 6364 |
|
|
1689 : 49c3 [ 2] eor #$c3
|
| 6365 |
|
|
168b : 28 [ 4] plp
|
| 6366 |
|
|
168c : 8130 [ 6] sta (indt,x)
|
| 6367 |
|
|
168e : 08 [ 3] php ;flags after load/store sequence
|
| 6368 |
|
|
168f : 49c3 [ 2] eor #$c3
|
| 6369 |
|
|
1691 : d90802 [ 4] cmp abs1,y ;test result
|
| 6370 |
|
|
trap_ne
|
| 6371 |
|
|
1694 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6372 |
|
|
|
| 6373 |
|
|
1696 : 68 [ 4] pla ;load status
|
| 6374 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 111
|
| 6375 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6376 |
|
|
|
| 6377 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6378 |
|
|
1697 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6379 |
|
|
|
| 6380 |
|
|
1699 : d90d02 [ 4] cmp fLDx,y ;test flags
|
| 6381 |
|
|
trap_ne
|
| 6382 |
|
|
169c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6383 |
|
|
|
| 6384 |
|
|
169e : ca [ 2] dex
|
| 6385 |
|
|
169f : ca [ 2] dex
|
| 6386 |
|
|
16a0 : 88 [ 2] dey
|
| 6387 |
|
|
16a1 : 10df [ 3] bpl tldax5
|
| 6388 |
|
|
|
| 6389 |
|
|
16a3 : a003 [ 2] ldy #3 ;testing store result
|
| 6390 |
|
|
16a5 : a200 [ 2] ldx #0
|
| 6391 |
|
|
16a7 : b90302 [ 4] tstay2 lda abst,y
|
| 6392 |
|
|
16aa : 49c3 [ 2] eor #$c3
|
| 6393 |
|
|
16ac : d90802 [ 4] cmp abs1,y
|
| 6394 |
|
|
trap_ne ;store to abs data
|
| 6395 |
|
|
16af : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6396 |
|
|
|
| 6397 |
|
|
16b1 : 8a [ 2] txa
|
| 6398 |
|
|
16b2 : 990302 [ 5] sta abst,y ;clear
|
| 6399 |
|
|
16b5 : 88 [ 2] dey
|
| 6400 |
|
|
16b6 : 10ef [ 3] bpl tstay2
|
| 6401 |
|
|
next_test
|
| 6402 |
|
|
16b8 : ad0002 [ 4]> lda test_case ;previous test
|
| 6403 |
|
|
16bb : c916 [ 2]> cmp #test_num
|
| 6404 |
|
|
> trap_ne ;test is out of sequence
|
| 6405 |
|
|
16bd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6406 |
|
|
>
|
| 6407 |
|
|
0017 = >test_num = test_num + 1
|
| 6408 |
|
|
16bf : a917 [ 2]> lda #test_num ;*** this tests' number
|
| 6409 |
|
|
16c1 : 8d0002 [ 4]> sta test_case
|
| 6410 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 6411 |
|
|
|
| 6412 |
|
|
|
| 6413 |
|
|
; indexed wraparound test (only zp should wrap)
|
| 6414 |
|
|
16c4 : a2fd [ 2] ldx #3+$fa
|
| 6415 |
|
|
16c6 : b519 [ 4] tldax6 lda zp1-$fa&$ff,x ;wrap on indexed zp
|
| 6416 |
|
|
16c8 : 9d0901 [ 5] sta abst-$fa,x ;no STX abs,x!
|
| 6417 |
|
|
16cb : ca [ 2] dex
|
| 6418 |
|
|
16cc : e0fa [ 2] cpx #$fa
|
| 6419 |
|
|
16ce : b0f6 [ 3] bcs tldax6
|
| 6420 |
|
|
16d0 : a2fd [ 2] ldx #3+$fa
|
| 6421 |
|
|
16d2 : bd0e01 [ 4] tldax7 lda abs1-$fa,x ;no wrap on indexed abs
|
| 6422 |
|
|
16d5 : 9512 [ 4] sta zpt-$fa&$ff,x
|
| 6423 |
|
|
16d7 : ca [ 2] dex
|
| 6424 |
|
|
16d8 : e0fa [ 2] cpx #$fa
|
| 6425 |
|
|
16da : b0f6 [ 3] bcs tldax7
|
| 6426 |
|
|
|
| 6427 |
|
|
16dc : a203 [ 2] ldx #3 ;testing wraparound result
|
| 6428 |
|
|
16de : a000 [ 2] ldy #0
|
| 6429 |
|
|
16e0 : b50c [ 4] tstax1 lda zpt,x
|
| 6430 |
|
|
16e2 : d513 [ 4] cmp zp1,x
|
| 6431 |
|
|
trap_ne ;store to zp,x data
|
| 6432 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 112
|
| 6433 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6434 |
|
|
|
| 6435 |
|
|
16e4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6436 |
|
|
|
| 6437 |
|
|
16e6 : 940c [ 4] sty zpt,x ;clear
|
| 6438 |
|
|
16e8 : bd0302 [ 4] lda abst,x
|
| 6439 |
|
|
16eb : dd0802 [ 4] cmp abs1,x
|
| 6440 |
|
|
trap_ne ;store to abs,x data
|
| 6441 |
|
|
16ee : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6442 |
|
|
|
| 6443 |
|
|
16f0 : 8a [ 2] txa
|
| 6444 |
|
|
16f1 : 9d0302 [ 5] sta abst,x ;clear
|
| 6445 |
|
|
16f4 : ca [ 2] dex
|
| 6446 |
|
|
16f5 : 10e9 [ 3] bpl tstax1
|
| 6447 |
|
|
|
| 6448 |
|
|
16f7 : a0fb [ 2] ldy #3+$f8
|
| 6449 |
|
|
16f9 : a2fe [ 2] ldx #6+$f8
|
| 6450 |
|
|
16fb : a12c [ 6] tlday4 lda (ind1-$f8&$ff,x) ;wrap on indexed zp indirect
|
| 6451 |
|
|
16fd : 990b01 [ 5] sta abst-$f8,y
|
| 6452 |
|
|
1700 : ca [ 2] dex
|
| 6453 |
|
|
1701 : ca [ 2] dex
|
| 6454 |
|
|
1702 : 88 [ 2] dey
|
| 6455 |
|
|
1703 : c0f8 [ 2] cpy #$f8
|
| 6456 |
|
|
1705 : b0f4 [ 4] bcs tlday4
|
| 6457 |
|
|
1707 : a003 [ 2] ldy #3 ;testing wraparound result
|
| 6458 |
|
|
1709 : a200 [ 2] ldx #0
|
| 6459 |
|
|
170b : b90302 [ 4] tstay4 lda abst,y
|
| 6460 |
|
|
170e : d90802 [ 4] cmp abs1,y
|
| 6461 |
|
|
trap_ne ;store to abs data
|
| 6462 |
|
|
1711 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6463 |
|
|
|
| 6464 |
|
|
1713 : 8a [ 2] txa
|
| 6465 |
|
|
1714 : 990302 [ 5] sta abst,y ;clear
|
| 6466 |
|
|
1717 : 88 [ 2] dey
|
| 6467 |
|
|
1718 : 10f1 [ 3] bpl tstay4
|
| 6468 |
|
|
|
| 6469 |
|
|
171a : a0fb [ 2] ldy #3+$f8
|
| 6470 |
|
|
171c : b91001 [ 4] tlday5 lda abs1-$f8,y ;no wrap on indexed abs
|
| 6471 |
|
|
171f : 9138 [ 5] sta (inwt),y
|
| 6472 |
|
|
1721 : 88 [ 2] dey
|
| 6473 |
|
|
1722 : c0f8 [ 2] cpy #$f8
|
| 6474 |
|
|
1724 : b0f6 [ 3] bcs tlday5
|
| 6475 |
|
|
1726 : a003 [ 2] ldy #3 ;testing wraparound result
|
| 6476 |
|
|
1728 : a200 [ 2] ldx #0
|
| 6477 |
|
|
172a : b90302 [ 4] tstay5 lda abst,y
|
| 6478 |
|
|
172d : d90802 [ 4] cmp abs1,y
|
| 6479 |
|
|
trap_ne ;store to abs data
|
| 6480 |
|
|
1730 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6481 |
|
|
|
| 6482 |
|
|
1732 : 8a [ 2] txa
|
| 6483 |
|
|
1733 : 990302 [ 5] sta abst,y ;clear
|
| 6484 |
|
|
1736 : 88 [ 2] dey
|
| 6485 |
|
|
1737 : 10f1 [ 3] bpl tstay5
|
| 6486 |
|
|
|
| 6487 |
|
|
1739 : a0fb [ 2] ldy #3+$f8
|
| 6488 |
|
|
173b : a2fe [ 2] ldx #6+$f8
|
| 6489 |
|
|
173d : b12e [ 5] tlday6 lda (inw1),y ;no wrap on zp indirect indexed
|
| 6490 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 113
|
| 6491 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6492 |
|
|
|
| 6493 |
|
|
173f : 8138 [ 6] sta (indt-$f8&$ff,x)
|
| 6494 |
|
|
1741 : ca [ 2] dex
|
| 6495 |
|
|
1742 : ca [ 2] dex
|
| 6496 |
|
|
1743 : 88 [ 2] dey
|
| 6497 |
|
|
1744 : c0f8 [ 2] cpy #$f8
|
| 6498 |
|
|
1746 : b0f5 [ 3] bcs tlday6
|
| 6499 |
|
|
1748 : a003 [ 2] ldy #3 ;testing wraparound result
|
| 6500 |
|
|
174a : a200 [ 2] ldx #0
|
| 6501 |
|
|
174c : b90302 [ 4] tstay6 lda abst,y
|
| 6502 |
|
|
174f : d90802 [ 4] cmp abs1,y
|
| 6503 |
|
|
trap_ne ;store to abs data
|
| 6504 |
|
|
1752 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6505 |
|
|
|
| 6506 |
|
|
1754 : 8a [ 2] txa
|
| 6507 |
|
|
1755 : 990302 [ 5] sta abst,y ;clear
|
| 6508 |
|
|
1758 : 88 [ 2] dey
|
| 6509 |
|
|
1759 : 10f1 [ 3] bpl tstay6
|
| 6510 |
|
|
next_test
|
| 6511 |
|
|
175b : ad0002 [ 4]> lda test_case ;previous test
|
| 6512 |
|
|
175e : c917 [ 2]> cmp #test_num
|
| 6513 |
|
|
> trap_ne ;test is out of sequence
|
| 6514 |
|
|
1760 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6515 |
|
|
>
|
| 6516 |
|
|
0018 = >test_num = test_num + 1
|
| 6517 |
|
|
1762 : a918 [ 2]> lda #test_num ;*** this tests' number
|
| 6518 |
|
|
1764 : 8d0002 [ 4]> sta test_case
|
| 6519 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 6520 |
|
|
|
| 6521 |
|
|
|
| 6522 |
|
|
; LDA / STA - zp / abs / #
|
| 6523 |
|
|
set_stat 0
|
| 6524 |
|
|
> load_flag 0
|
| 6525 |
|
|
1767 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6526 |
|
|
>
|
| 6527 |
|
|
1769 : 48 [ 3]> pha ;use stack to load status
|
| 6528 |
|
|
176a : 28 [ 4]> plp
|
| 6529 |
|
|
|
| 6530 |
|
|
176b : a513 [ 3] lda zp1
|
| 6531 |
|
|
176d : 08 [ 3] php ;test stores do not alter flags
|
| 6532 |
|
|
176e : 49c3 [ 2] eor #$c3
|
| 6533 |
|
|
1770 : 28 [ 4] plp
|
| 6534 |
|
|
1771 : 8d0302 [ 4] sta abst
|
| 6535 |
|
|
1774 : 08 [ 3] php ;flags after load/store sequence
|
| 6536 |
|
|
1775 : 49c3 [ 2] eor #$c3
|
| 6537 |
|
|
1777 : c9c3 [ 2] cmp #$c3 ;test result
|
| 6538 |
|
|
trap_ne
|
| 6539 |
|
|
1779 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6540 |
|
|
|
| 6541 |
|
|
177b : 68 [ 4] pla ;load status
|
| 6542 |
|
|
eor_flag 0
|
| 6543 |
|
|
177c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6544 |
|
|
|
| 6545 |
|
|
177e : cd0d02 [ 4] cmp fLDx ;test flags
|
| 6546 |
|
|
trap_ne
|
| 6547 |
|
|
1781 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6548 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 114
|
| 6549 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6550 |
|
|
|
| 6551 |
|
|
|
| 6552 |
|
|
set_stat 0
|
| 6553 |
|
|
> load_flag 0
|
| 6554 |
|
|
1783 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6555 |
|
|
>
|
| 6556 |
|
|
1785 : 48 [ 3]> pha ;use stack to load status
|
| 6557 |
|
|
1786 : 28 [ 4]> plp
|
| 6558 |
|
|
|
| 6559 |
|
|
1787 : a514 [ 3] lda zp1+1
|
| 6560 |
|
|
1789 : 08 [ 3] php ;test stores do not alter flags
|
| 6561 |
|
|
178a : 49c3 [ 2] eor #$c3
|
| 6562 |
|
|
178c : 28 [ 4] plp
|
| 6563 |
|
|
178d : 8d0402 [ 4] sta abst+1
|
| 6564 |
|
|
1790 : 08 [ 3] php ;flags after load/store sequence
|
| 6565 |
|
|
1791 : 49c3 [ 2] eor #$c3
|
| 6566 |
|
|
1793 : c982 [ 2] cmp #$82 ;test result
|
| 6567 |
|
|
trap_ne
|
| 6568 |
|
|
1795 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6569 |
|
|
|
| 6570 |
|
|
1797 : 68 [ 4] pla ;load status
|
| 6571 |
|
|
eor_flag 0
|
| 6572 |
|
|
1798 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6573 |
|
|
|
| 6574 |
|
|
179a : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 6575 |
|
|
trap_ne
|
| 6576 |
|
|
179d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6577 |
|
|
|
| 6578 |
|
|
set_stat 0
|
| 6579 |
|
|
> load_flag 0
|
| 6580 |
|
|
179f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6581 |
|
|
>
|
| 6582 |
|
|
17a1 : 48 [ 3]> pha ;use stack to load status
|
| 6583 |
|
|
17a2 : 28 [ 4]> plp
|
| 6584 |
|
|
|
| 6585 |
|
|
17a3 : a515 [ 3] lda zp1+2
|
| 6586 |
|
|
17a5 : 08 [ 3] php ;test stores do not alter flags
|
| 6587 |
|
|
17a6 : 49c3 [ 2] eor #$c3
|
| 6588 |
|
|
17a8 : 28 [ 4] plp
|
| 6589 |
|
|
17a9 : 8d0502 [ 4] sta abst+2
|
| 6590 |
|
|
17ac : 08 [ 3] php ;flags after load/store sequence
|
| 6591 |
|
|
17ad : 49c3 [ 2] eor #$c3
|
| 6592 |
|
|
17af : c941 [ 2] cmp #$41 ;test result
|
| 6593 |
|
|
trap_ne
|
| 6594 |
|
|
17b1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6595 |
|
|
|
| 6596 |
|
|
17b3 : 68 [ 4] pla ;load status
|
| 6597 |
|
|
eor_flag 0
|
| 6598 |
|
|
17b4 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6599 |
|
|
|
| 6600 |
|
|
17b6 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 6601 |
|
|
trap_ne
|
| 6602 |
|
|
17b9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6603 |
|
|
|
| 6604 |
|
|
set_stat 0
|
| 6605 |
|
|
> load_flag 0
|
| 6606 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 115
|
| 6607 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6608 |
|
|
|
| 6609 |
|
|
17bb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6610 |
|
|
>
|
| 6611 |
|
|
17bd : 48 [ 3]> pha ;use stack to load status
|
| 6612 |
|
|
17be : 28 [ 4]> plp
|
| 6613 |
|
|
|
| 6614 |
|
|
17bf : a516 [ 3] lda zp1+3
|
| 6615 |
|
|
17c1 : 08 [ 3] php ;test stores do not alter flags
|
| 6616 |
|
|
17c2 : 49c3 [ 2] eor #$c3
|
| 6617 |
|
|
17c4 : 28 [ 4] plp
|
| 6618 |
|
|
17c5 : 8d0602 [ 4] sta abst+3
|
| 6619 |
|
|
17c8 : 08 [ 3] php ;flags after load/store sequence
|
| 6620 |
|
|
17c9 : 49c3 [ 2] eor #$c3
|
| 6621 |
|
|
17cb : c900 [ 2] cmp #0 ;test result
|
| 6622 |
|
|
trap_ne
|
| 6623 |
|
|
17cd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6624 |
|
|
|
| 6625 |
|
|
17cf : 68 [ 4] pla ;load status
|
| 6626 |
|
|
eor_flag 0
|
| 6627 |
|
|
17d0 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6628 |
|
|
|
| 6629 |
|
|
17d2 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 6630 |
|
|
trap_ne
|
| 6631 |
|
|
17d5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6632 |
|
|
|
| 6633 |
|
|
set_stat $ff
|
| 6634 |
|
|
> load_flag $ff
|
| 6635 |
|
|
17d7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6636 |
|
|
>
|
| 6637 |
|
|
17d9 : 48 [ 3]> pha ;use stack to load status
|
| 6638 |
|
|
17da : 28 [ 4]> plp
|
| 6639 |
|
|
|
| 6640 |
|
|
17db : a513 [ 3] lda zp1
|
| 6641 |
|
|
17dd : 08 [ 3] php ;test stores do not alter flags
|
| 6642 |
|
|
17de : 49c3 [ 2] eor #$c3
|
| 6643 |
|
|
17e0 : 28 [ 4] plp
|
| 6644 |
|
|
17e1 : 8d0302 [ 4] sta abst
|
| 6645 |
|
|
17e4 : 08 [ 3] php ;flags after load/store sequence
|
| 6646 |
|
|
17e5 : 49c3 [ 2] eor #$c3
|
| 6647 |
|
|
17e7 : c9c3 [ 2] cmp #$c3 ;test result
|
| 6648 |
|
|
trap_ne
|
| 6649 |
|
|
17e9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6650 |
|
|
|
| 6651 |
|
|
17eb : 68 [ 4] pla ;load status
|
| 6652 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6653 |
|
|
17ec : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6654 |
|
|
|
| 6655 |
|
|
17ee : cd0d02 [ 4] cmp fLDx ;test flags
|
| 6656 |
|
|
trap_ne
|
| 6657 |
|
|
17f1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6658 |
|
|
|
| 6659 |
|
|
set_stat $ff
|
| 6660 |
|
|
> load_flag $ff
|
| 6661 |
|
|
17f3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6662 |
|
|
>
|
| 6663 |
|
|
17f5 : 48 [ 3]> pha ;use stack to load status
|
| 6664 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 116
|
| 6665 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6666 |
|
|
|
| 6667 |
|
|
17f6 : 28 [ 4]> plp
|
| 6668 |
|
|
|
| 6669 |
|
|
17f7 : a514 [ 3] lda zp1+1
|
| 6670 |
|
|
17f9 : 08 [ 3] php ;test stores do not alter flags
|
| 6671 |
|
|
17fa : 49c3 [ 2] eor #$c3
|
| 6672 |
|
|
17fc : 28 [ 4] plp
|
| 6673 |
|
|
17fd : 8d0402 [ 4] sta abst+1
|
| 6674 |
|
|
1800 : 08 [ 3] php ;flags after load/store sequence
|
| 6675 |
|
|
1801 : 49c3 [ 2] eor #$c3
|
| 6676 |
|
|
1803 : c982 [ 2] cmp #$82 ;test result
|
| 6677 |
|
|
trap_ne
|
| 6678 |
|
|
1805 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6679 |
|
|
|
| 6680 |
|
|
1807 : 68 [ 4] pla ;load status
|
| 6681 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6682 |
|
|
1808 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6683 |
|
|
|
| 6684 |
|
|
180a : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 6685 |
|
|
trap_ne
|
| 6686 |
|
|
180d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6687 |
|
|
|
| 6688 |
|
|
set_stat $ff
|
| 6689 |
|
|
> load_flag $ff
|
| 6690 |
|
|
180f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6691 |
|
|
>
|
| 6692 |
|
|
1811 : 48 [ 3]> pha ;use stack to load status
|
| 6693 |
|
|
1812 : 28 [ 4]> plp
|
| 6694 |
|
|
|
| 6695 |
|
|
1813 : a515 [ 3] lda zp1+2
|
| 6696 |
|
|
1815 : 08 [ 3] php ;test stores do not alter flags
|
| 6697 |
|
|
1816 : 49c3 [ 2] eor #$c3
|
| 6698 |
|
|
1818 : 28 [ 4] plp
|
| 6699 |
|
|
1819 : 8d0502 [ 4] sta abst+2
|
| 6700 |
|
|
181c : 08 [ 3] php ;flags after load/store sequence
|
| 6701 |
|
|
181d : 49c3 [ 2] eor #$c3
|
| 6702 |
|
|
181f : c941 [ 2] cmp #$41 ;test result
|
| 6703 |
|
|
trap_ne
|
| 6704 |
|
|
1821 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6705 |
|
|
|
| 6706 |
|
|
1823 : 68 [ 4] pla ;load status
|
| 6707 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6708 |
|
|
1824 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6709 |
|
|
|
| 6710 |
|
|
1826 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 6711 |
|
|
trap_ne
|
| 6712 |
|
|
1829 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6713 |
|
|
|
| 6714 |
|
|
set_stat $ff
|
| 6715 |
|
|
> load_flag $ff
|
| 6716 |
|
|
182b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6717 |
|
|
>
|
| 6718 |
|
|
182d : 48 [ 3]> pha ;use stack to load status
|
| 6719 |
|
|
182e : 28 [ 4]> plp
|
| 6720 |
|
|
|
| 6721 |
|
|
182f : a516 [ 3] lda zp1+3
|
| 6722 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 117
|
| 6723 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6724 |
|
|
|
| 6725 |
|
|
1831 : 08 [ 3] php ;test stores do not alter flags
|
| 6726 |
|
|
1832 : 49c3 [ 2] eor #$c3
|
| 6727 |
|
|
1834 : 28 [ 4] plp
|
| 6728 |
|
|
1835 : 8d0602 [ 4] sta abst+3
|
| 6729 |
|
|
1838 : 08 [ 3] php ;flags after load/store sequence
|
| 6730 |
|
|
1839 : 49c3 [ 2] eor #$c3
|
| 6731 |
|
|
183b : c900 [ 2] cmp #0 ;test result
|
| 6732 |
|
|
trap_ne
|
| 6733 |
|
|
183d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6734 |
|
|
|
| 6735 |
|
|
183f : 68 [ 4] pla ;load status
|
| 6736 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6737 |
|
|
1840 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6738 |
|
|
|
| 6739 |
|
|
1842 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 6740 |
|
|
trap_ne
|
| 6741 |
|
|
1845 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6742 |
|
|
|
| 6743 |
|
|
set_stat 0
|
| 6744 |
|
|
> load_flag 0
|
| 6745 |
|
|
1847 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6746 |
|
|
>
|
| 6747 |
|
|
1849 : 48 [ 3]> pha ;use stack to load status
|
| 6748 |
|
|
184a : 28 [ 4]> plp
|
| 6749 |
|
|
|
| 6750 |
|
|
184b : ad0802 [ 4] lda abs1
|
| 6751 |
|
|
184e : 08 [ 3] php ;test stores do not alter flags
|
| 6752 |
|
|
184f : 49c3 [ 2] eor #$c3
|
| 6753 |
|
|
1851 : 28 [ 4] plp
|
| 6754 |
|
|
1852 : 850c [ 3] sta zpt
|
| 6755 |
|
|
1854 : 08 [ 3] php ;flags after load/store sequence
|
| 6756 |
|
|
1855 : 49c3 [ 2] eor #$c3
|
| 6757 |
|
|
1857 : c513 [ 3] cmp zp1 ;test result
|
| 6758 |
|
|
trap_ne
|
| 6759 |
|
|
1859 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6760 |
|
|
|
| 6761 |
|
|
185b : 68 [ 4] pla ;load status
|
| 6762 |
|
|
eor_flag 0
|
| 6763 |
|
|
185c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6764 |
|
|
|
| 6765 |
|
|
185e : cd0d02 [ 4] cmp fLDx ;test flags
|
| 6766 |
|
|
trap_ne
|
| 6767 |
|
|
1861 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6768 |
|
|
|
| 6769 |
|
|
set_stat 0
|
| 6770 |
|
|
> load_flag 0
|
| 6771 |
|
|
1863 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6772 |
|
|
>
|
| 6773 |
|
|
1865 : 48 [ 3]> pha ;use stack to load status
|
| 6774 |
|
|
1866 : 28 [ 4]> plp
|
| 6775 |
|
|
|
| 6776 |
|
|
1867 : ad0902 [ 4] lda abs1+1
|
| 6777 |
|
|
186a : 08 [ 3] php ;test stores do not alter flags
|
| 6778 |
|
|
186b : 49c3 [ 2] eor #$c3
|
| 6779 |
|
|
186d : 28 [ 4] plp
|
| 6780 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 118
|
| 6781 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6782 |
|
|
|
| 6783 |
|
|
186e : 850d [ 3] sta zpt+1
|
| 6784 |
|
|
1870 : 08 [ 3] php ;flags after load/store sequence
|
| 6785 |
|
|
1871 : 49c3 [ 2] eor #$c3
|
| 6786 |
|
|
1873 : c514 [ 3] cmp zp1+1 ;test result
|
| 6787 |
|
|
trap_ne
|
| 6788 |
|
|
1875 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6789 |
|
|
|
| 6790 |
|
|
1877 : 68 [ 4] pla ;load status
|
| 6791 |
|
|
eor_flag 0
|
| 6792 |
|
|
1878 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6793 |
|
|
|
| 6794 |
|
|
187a : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 6795 |
|
|
trap_ne
|
| 6796 |
|
|
187d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6797 |
|
|
|
| 6798 |
|
|
set_stat 0
|
| 6799 |
|
|
> load_flag 0
|
| 6800 |
|
|
187f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6801 |
|
|
>
|
| 6802 |
|
|
1881 : 48 [ 3]> pha ;use stack to load status
|
| 6803 |
|
|
1882 : 28 [ 4]> plp
|
| 6804 |
|
|
|
| 6805 |
|
|
1883 : ad0a02 [ 4] lda abs1+2
|
| 6806 |
|
|
1886 : 08 [ 3] php ;test stores do not alter flags
|
| 6807 |
|
|
1887 : 49c3 [ 2] eor #$c3
|
| 6808 |
|
|
1889 : 28 [ 4] plp
|
| 6809 |
|
|
188a : 850e [ 3] sta zpt+2
|
| 6810 |
|
|
188c : 08 [ 3] php ;flags after load/store sequence
|
| 6811 |
|
|
188d : 49c3 [ 2] eor #$c3
|
| 6812 |
|
|
188f : c515 [ 3] cmp zp1+2 ;test result
|
| 6813 |
|
|
trap_ne
|
| 6814 |
|
|
1891 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6815 |
|
|
|
| 6816 |
|
|
1893 : 68 [ 4] pla ;load status
|
| 6817 |
|
|
eor_flag 0
|
| 6818 |
|
|
1894 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6819 |
|
|
|
| 6820 |
|
|
1896 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 6821 |
|
|
trap_ne
|
| 6822 |
|
|
1899 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6823 |
|
|
|
| 6824 |
|
|
set_stat 0
|
| 6825 |
|
|
> load_flag 0
|
| 6826 |
|
|
189b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6827 |
|
|
>
|
| 6828 |
|
|
189d : 48 [ 3]> pha ;use stack to load status
|
| 6829 |
|
|
189e : 28 [ 4]> plp
|
| 6830 |
|
|
|
| 6831 |
|
|
189f : ad0b02 [ 4] lda abs1+3
|
| 6832 |
|
|
18a2 : 08 [ 3] php ;test stores do not alter flags
|
| 6833 |
|
|
18a3 : 49c3 [ 2] eor #$c3
|
| 6834 |
|
|
18a5 : 28 [ 4] plp
|
| 6835 |
|
|
18a6 : 850f [ 3] sta zpt+3
|
| 6836 |
|
|
18a8 : 08 [ 3] php ;flags after load/store sequence
|
| 6837 |
|
|
18a9 : 49c3 [ 2] eor #$c3
|
| 6838 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 119
|
| 6839 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6840 |
|
|
|
| 6841 |
|
|
18ab : c516 [ 3] cmp zp1+3 ;test result
|
| 6842 |
|
|
trap_ne
|
| 6843 |
|
|
18ad : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6844 |
|
|
|
| 6845 |
|
|
18af : 68 [ 4] pla ;load status
|
| 6846 |
|
|
eor_flag 0
|
| 6847 |
|
|
18b0 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6848 |
|
|
|
| 6849 |
|
|
18b2 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 6850 |
|
|
trap_ne
|
| 6851 |
|
|
18b5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6852 |
|
|
|
| 6853 |
|
|
set_stat $ff
|
| 6854 |
|
|
> load_flag $ff
|
| 6855 |
|
|
18b7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6856 |
|
|
>
|
| 6857 |
|
|
18b9 : 48 [ 3]> pha ;use stack to load status
|
| 6858 |
|
|
18ba : 28 [ 4]> plp
|
| 6859 |
|
|
|
| 6860 |
|
|
18bb : ad0802 [ 4] lda abs1
|
| 6861 |
|
|
18be : 08 [ 3] php ;test stores do not alter flags
|
| 6862 |
|
|
18bf : 49c3 [ 2] eor #$c3
|
| 6863 |
|
|
18c1 : 28 [ 4] plp
|
| 6864 |
|
|
18c2 : 850c [ 3] sta zpt
|
| 6865 |
|
|
18c4 : 08 [ 3] php ;flags after load/store sequence
|
| 6866 |
|
|
18c5 : 49c3 [ 2] eor #$c3
|
| 6867 |
|
|
18c7 : c513 [ 3] cmp zp1 ;test result
|
| 6868 |
|
|
trap_ne
|
| 6869 |
|
|
18c9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6870 |
|
|
|
| 6871 |
|
|
18cb : 68 [ 4] pla ;load status
|
| 6872 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6873 |
|
|
18cc : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6874 |
|
|
|
| 6875 |
|
|
18ce : cd0d02 [ 4] cmp fLDx ;test flags
|
| 6876 |
|
|
trap_ne
|
| 6877 |
|
|
18d1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6878 |
|
|
|
| 6879 |
|
|
set_stat $ff
|
| 6880 |
|
|
> load_flag $ff
|
| 6881 |
|
|
18d3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6882 |
|
|
>
|
| 6883 |
|
|
18d5 : 48 [ 3]> pha ;use stack to load status
|
| 6884 |
|
|
18d6 : 28 [ 4]> plp
|
| 6885 |
|
|
|
| 6886 |
|
|
18d7 : ad0902 [ 4] lda abs1+1
|
| 6887 |
|
|
18da : 08 [ 3] php ;test stores do not alter flags
|
| 6888 |
|
|
18db : 49c3 [ 2] eor #$c3
|
| 6889 |
|
|
18dd : 28 [ 4] plp
|
| 6890 |
|
|
18de : 850d [ 3] sta zpt+1
|
| 6891 |
|
|
18e0 : 08 [ 3] php ;flags after load/store sequence
|
| 6892 |
|
|
18e1 : 49c3 [ 2] eor #$c3
|
| 6893 |
|
|
18e3 : c514 [ 3] cmp zp1+1 ;test result
|
| 6894 |
|
|
trap_ne
|
| 6895 |
|
|
18e5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6896 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 120
|
| 6897 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6898 |
|
|
|
| 6899 |
|
|
|
| 6900 |
|
|
18e7 : 68 [ 4] pla ;load status
|
| 6901 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6902 |
|
|
18e8 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6903 |
|
|
|
| 6904 |
|
|
18ea : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 6905 |
|
|
trap_ne
|
| 6906 |
|
|
18ed : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6907 |
|
|
|
| 6908 |
|
|
set_stat $ff
|
| 6909 |
|
|
> load_flag $ff
|
| 6910 |
|
|
18ef : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6911 |
|
|
>
|
| 6912 |
|
|
18f1 : 48 [ 3]> pha ;use stack to load status
|
| 6913 |
|
|
18f2 : 28 [ 4]> plp
|
| 6914 |
|
|
|
| 6915 |
|
|
18f3 : ad0a02 [ 4] lda abs1+2
|
| 6916 |
|
|
18f6 : 08 [ 3] php ;test stores do not alter flags
|
| 6917 |
|
|
18f7 : 49c3 [ 2] eor #$c3
|
| 6918 |
|
|
18f9 : 28 [ 4] plp
|
| 6919 |
|
|
18fa : 850e [ 3] sta zpt+2
|
| 6920 |
|
|
18fc : 08 [ 3] php ;flags after load/store sequence
|
| 6921 |
|
|
18fd : 49c3 [ 2] eor #$c3
|
| 6922 |
|
|
18ff : c515 [ 3] cmp zp1+2 ;test result
|
| 6923 |
|
|
trap_ne
|
| 6924 |
|
|
1901 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6925 |
|
|
|
| 6926 |
|
|
1903 : 68 [ 4] pla ;load status
|
| 6927 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6928 |
|
|
1904 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6929 |
|
|
|
| 6930 |
|
|
1906 : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 6931 |
|
|
trap_ne
|
| 6932 |
|
|
1909 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6933 |
|
|
|
| 6934 |
|
|
set_stat $ff
|
| 6935 |
|
|
> load_flag $ff
|
| 6936 |
|
|
190b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 6937 |
|
|
>
|
| 6938 |
|
|
190d : 48 [ 3]> pha ;use stack to load status
|
| 6939 |
|
|
190e : 28 [ 4]> plp
|
| 6940 |
|
|
|
| 6941 |
|
|
190f : ad0b02 [ 4] lda abs1+3
|
| 6942 |
|
|
1912 : 08 [ 3] php ;test stores do not alter flags
|
| 6943 |
|
|
1913 : 49c3 [ 2] eor #$c3
|
| 6944 |
|
|
1915 : 28 [ 4] plp
|
| 6945 |
|
|
1916 : 850f [ 3] sta zpt+3
|
| 6946 |
|
|
1918 : 08 [ 3] php ;flags after load/store sequence
|
| 6947 |
|
|
1919 : 49c3 [ 2] eor #$c3
|
| 6948 |
|
|
191b : c516 [ 3] cmp zp1+3 ;test result
|
| 6949 |
|
|
trap_ne
|
| 6950 |
|
|
191d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6951 |
|
|
|
| 6952 |
|
|
191f : 68 [ 4] pla ;load status
|
| 6953 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 6954 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 121
|
| 6955 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 6956 |
|
|
|
| 6957 |
|
|
1920 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 6958 |
|
|
|
| 6959 |
|
|
1922 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 6960 |
|
|
trap_ne
|
| 6961 |
|
|
1925 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6962 |
|
|
|
| 6963 |
|
|
set_stat 0
|
| 6964 |
|
|
> load_flag 0
|
| 6965 |
|
|
1927 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6966 |
|
|
>
|
| 6967 |
|
|
1929 : 48 [ 3]> pha ;use stack to load status
|
| 6968 |
|
|
192a : 28 [ 4]> plp
|
| 6969 |
|
|
|
| 6970 |
|
|
192b : a9c3 [ 2] lda #$c3
|
| 6971 |
|
|
192d : 08 [ 3] php
|
| 6972 |
|
|
192e : cd0802 [ 4] cmp abs1 ;test result
|
| 6973 |
|
|
trap_ne
|
| 6974 |
|
|
1931 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6975 |
|
|
|
| 6976 |
|
|
1933 : 68 [ 4] pla ;load status
|
| 6977 |
|
|
eor_flag 0
|
| 6978 |
|
|
1934 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 6979 |
|
|
|
| 6980 |
|
|
1936 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 6981 |
|
|
trap_ne
|
| 6982 |
|
|
1939 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6983 |
|
|
|
| 6984 |
|
|
set_stat 0
|
| 6985 |
|
|
> load_flag 0
|
| 6986 |
|
|
193b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 6987 |
|
|
>
|
| 6988 |
|
|
193d : 48 [ 3]> pha ;use stack to load status
|
| 6989 |
|
|
193e : 28 [ 4]> plp
|
| 6990 |
|
|
|
| 6991 |
|
|
193f : a982 [ 2] lda #$82
|
| 6992 |
|
|
1941 : 08 [ 3] php
|
| 6993 |
|
|
1942 : cd0902 [ 4] cmp abs1+1 ;test result
|
| 6994 |
|
|
trap_ne
|
| 6995 |
|
|
1945 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 6996 |
|
|
|
| 6997 |
|
|
1947 : 68 [ 4] pla ;load status
|
| 6998 |
|
|
eor_flag 0
|
| 6999 |
|
|
1948 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 7000 |
|
|
|
| 7001 |
|
|
194a : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 7002 |
|
|
trap_ne
|
| 7003 |
|
|
194d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7004 |
|
|
|
| 7005 |
|
|
set_stat 0
|
| 7006 |
|
|
> load_flag 0
|
| 7007 |
|
|
194f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7008 |
|
|
>
|
| 7009 |
|
|
1951 : 48 [ 3]> pha ;use stack to load status
|
| 7010 |
|
|
1952 : 28 [ 4]> plp
|
| 7011 |
|
|
|
| 7012 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 122
|
| 7013 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7014 |
|
|
|
| 7015 |
|
|
1953 : a941 [ 2] lda #$41
|
| 7016 |
|
|
1955 : 08 [ 3] php
|
| 7017 |
|
|
1956 : cd0a02 [ 4] cmp abs1+2 ;test result
|
| 7018 |
|
|
trap_ne
|
| 7019 |
|
|
1959 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7020 |
|
|
|
| 7021 |
|
|
195b : 68 [ 4] pla ;load status
|
| 7022 |
|
|
eor_flag 0
|
| 7023 |
|
|
195c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 7024 |
|
|
|
| 7025 |
|
|
195e : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 7026 |
|
|
trap_ne
|
| 7027 |
|
|
1961 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7028 |
|
|
|
| 7029 |
|
|
set_stat 0
|
| 7030 |
|
|
> load_flag 0
|
| 7031 |
|
|
1963 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7032 |
|
|
>
|
| 7033 |
|
|
1965 : 48 [ 3]> pha ;use stack to load status
|
| 7034 |
|
|
1966 : 28 [ 4]> plp
|
| 7035 |
|
|
|
| 7036 |
|
|
1967 : a900 [ 2] lda #0
|
| 7037 |
|
|
1969 : 08 [ 3] php
|
| 7038 |
|
|
196a : cd0b02 [ 4] cmp abs1+3 ;test result
|
| 7039 |
|
|
trap_ne
|
| 7040 |
|
|
196d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7041 |
|
|
|
| 7042 |
|
|
196f : 68 [ 4] pla ;load status
|
| 7043 |
|
|
eor_flag 0
|
| 7044 |
|
|
1970 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 7045 |
|
|
|
| 7046 |
|
|
1972 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 7047 |
|
|
trap_ne
|
| 7048 |
|
|
1975 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7049 |
|
|
|
| 7050 |
|
|
|
| 7051 |
|
|
set_stat $ff
|
| 7052 |
|
|
> load_flag $ff
|
| 7053 |
|
|
1977 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7054 |
|
|
>
|
| 7055 |
|
|
1979 : 48 [ 3]> pha ;use stack to load status
|
| 7056 |
|
|
197a : 28 [ 4]> plp
|
| 7057 |
|
|
|
| 7058 |
|
|
197b : a9c3 [ 2] lda #$c3
|
| 7059 |
|
|
197d : 08 [ 3] php
|
| 7060 |
|
|
197e : cd0802 [ 4] cmp abs1 ;test result
|
| 7061 |
|
|
trap_ne
|
| 7062 |
|
|
1981 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7063 |
|
|
|
| 7064 |
|
|
1983 : 68 [ 4] pla ;load status
|
| 7065 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 7066 |
|
|
1984 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 7067 |
|
|
|
| 7068 |
|
|
1986 : cd0d02 [ 4] cmp fLDx ;test flags
|
| 7069 |
|
|
trap_ne
|
| 7070 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 123
|
| 7071 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7072 |
|
|
|
| 7073 |
|
|
1989 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7074 |
|
|
|
| 7075 |
|
|
set_stat $ff
|
| 7076 |
|
|
> load_flag $ff
|
| 7077 |
|
|
198b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7078 |
|
|
>
|
| 7079 |
|
|
198d : 48 [ 3]> pha ;use stack to load status
|
| 7080 |
|
|
198e : 28 [ 4]> plp
|
| 7081 |
|
|
|
| 7082 |
|
|
198f : a982 [ 2] lda #$82
|
| 7083 |
|
|
1991 : 08 [ 3] php
|
| 7084 |
|
|
1992 : cd0902 [ 4] cmp abs1+1 ;test result
|
| 7085 |
|
|
trap_ne
|
| 7086 |
|
|
1995 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7087 |
|
|
|
| 7088 |
|
|
1997 : 68 [ 4] pla ;load status
|
| 7089 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 7090 |
|
|
1998 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 7091 |
|
|
|
| 7092 |
|
|
199a : cd0e02 [ 4] cmp fLDx+1 ;test flags
|
| 7093 |
|
|
trap_ne
|
| 7094 |
|
|
199d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7095 |
|
|
|
| 7096 |
|
|
set_stat $ff
|
| 7097 |
|
|
> load_flag $ff
|
| 7098 |
|
|
199f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7099 |
|
|
>
|
| 7100 |
|
|
19a1 : 48 [ 3]> pha ;use stack to load status
|
| 7101 |
|
|
19a2 : 28 [ 4]> plp
|
| 7102 |
|
|
|
| 7103 |
|
|
19a3 : a941 [ 2] lda #$41
|
| 7104 |
|
|
19a5 : 08 [ 3] php
|
| 7105 |
|
|
19a6 : cd0a02 [ 4] cmp abs1+2 ;test result
|
| 7106 |
|
|
trap_ne
|
| 7107 |
|
|
19a9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7108 |
|
|
|
| 7109 |
|
|
19ab : 68 [ 4] pla ;load status
|
| 7110 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 7111 |
|
|
19ac : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 7112 |
|
|
|
| 7113 |
|
|
19ae : cd0f02 [ 4] cmp fLDx+2 ;test flags
|
| 7114 |
|
|
trap_ne
|
| 7115 |
|
|
19b1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7116 |
|
|
|
| 7117 |
|
|
set_stat $ff
|
| 7118 |
|
|
> load_flag $ff
|
| 7119 |
|
|
19b3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7120 |
|
|
>
|
| 7121 |
|
|
19b5 : 48 [ 3]> pha ;use stack to load status
|
| 7122 |
|
|
19b6 : 28 [ 4]> plp
|
| 7123 |
|
|
|
| 7124 |
|
|
19b7 : a900 [ 2] lda #0
|
| 7125 |
|
|
19b9 : 08 [ 3] php
|
| 7126 |
|
|
19ba : cd0b02 [ 4] cmp abs1+3 ;test result
|
| 7127 |
|
|
trap_ne
|
| 7128 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 124
|
| 7129 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7130 |
|
|
|
| 7131 |
|
|
19bd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7132 |
|
|
|
| 7133 |
|
|
19bf : 68 [ 4] pla ;load status
|
| 7134 |
|
|
eor_flag lo~fnz ;mask bits not altered
|
| 7135 |
|
|
19c0 : 497d [ 2]> eor #lo~fnz |fao ;invert expected flags + always on bits
|
| 7136 |
|
|
|
| 7137 |
|
|
19c2 : cd1002 [ 4] cmp fLDx+3 ;test flags
|
| 7138 |
|
|
trap_ne
|
| 7139 |
|
|
19c5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7140 |
|
|
|
| 7141 |
|
|
|
| 7142 |
|
|
19c7 : a200 [ 2] ldx #0
|
| 7143 |
|
|
19c9 : a50c [ 3] lda zpt
|
| 7144 |
|
|
19cb : 49c3 [ 2] eor #$c3
|
| 7145 |
|
|
19cd : c513 [ 3] cmp zp1
|
| 7146 |
|
|
trap_ne ;store to zp data
|
| 7147 |
|
|
19cf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7148 |
|
|
|
| 7149 |
|
|
19d1 : 860c [ 3] stx zpt ;clear
|
| 7150 |
|
|
19d3 : ad0302 [ 4] lda abst
|
| 7151 |
|
|
19d6 : 49c3 [ 2] eor #$c3
|
| 7152 |
|
|
19d8 : cd0802 [ 4] cmp abs1
|
| 7153 |
|
|
trap_ne ;store to abs data
|
| 7154 |
|
|
19db : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7155 |
|
|
|
| 7156 |
|
|
19dd : 8e0302 [ 4] stx abst ;clear
|
| 7157 |
|
|
19e0 : a50d [ 3] lda zpt+1
|
| 7158 |
|
|
19e2 : 49c3 [ 2] eor #$c3
|
| 7159 |
|
|
19e4 : c514 [ 3] cmp zp1+1
|
| 7160 |
|
|
trap_ne ;store to zp data
|
| 7161 |
|
|
19e6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7162 |
|
|
|
| 7163 |
|
|
19e8 : 860d [ 3] stx zpt+1 ;clear
|
| 7164 |
|
|
19ea : ad0402 [ 4] lda abst+1
|
| 7165 |
|
|
19ed : 49c3 [ 2] eor #$c3
|
| 7166 |
|
|
19ef : cd0902 [ 4] cmp abs1+1
|
| 7167 |
|
|
trap_ne ;store to abs data
|
| 7168 |
|
|
19f2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7169 |
|
|
|
| 7170 |
|
|
19f4 : 8e0402 [ 4] stx abst+1 ;clear
|
| 7171 |
|
|
19f7 : a50e [ 3] lda zpt+2
|
| 7172 |
|
|
19f9 : 49c3 [ 2] eor #$c3
|
| 7173 |
|
|
19fb : c515 [ 3] cmp zp1+2
|
| 7174 |
|
|
trap_ne ;store to zp data
|
| 7175 |
|
|
19fd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7176 |
|
|
|
| 7177 |
|
|
19ff : 860e [ 3] stx zpt+2 ;clear
|
| 7178 |
|
|
1a01 : ad0502 [ 4] lda abst+2
|
| 7179 |
|
|
1a04 : 49c3 [ 2] eor #$c3
|
| 7180 |
|
|
1a06 : cd0a02 [ 4] cmp abs1+2
|
| 7181 |
|
|
trap_ne ;store to abs data
|
| 7182 |
|
|
1a09 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7183 |
|
|
|
| 7184 |
|
|
1a0b : 8e0502 [ 4] stx abst+2 ;clear
|
| 7185 |
|
|
1a0e : a50f [ 3] lda zpt+3
|
| 7186 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 125
|
| 7187 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7188 |
|
|
|
| 7189 |
|
|
1a10 : 49c3 [ 2] eor #$c3
|
| 7190 |
|
|
1a12 : c516 [ 3] cmp zp1+3
|
| 7191 |
|
|
trap_ne ;store to zp data
|
| 7192 |
|
|
1a14 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7193 |
|
|
|
| 7194 |
|
|
1a16 : 860f [ 3] stx zpt+3 ;clear
|
| 7195 |
|
|
1a18 : ad0602 [ 4] lda abst+3
|
| 7196 |
|
|
1a1b : 49c3 [ 2] eor #$c3
|
| 7197 |
|
|
1a1d : cd0b02 [ 4] cmp abs1+3
|
| 7198 |
|
|
trap_ne ;store to abs data
|
| 7199 |
|
|
1a20 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7200 |
|
|
|
| 7201 |
|
|
1a22 : 8e0602 [ 4] stx abst+3 ;clear
|
| 7202 |
|
|
next_test
|
| 7203 |
|
|
1a25 : ad0002 [ 4]> lda test_case ;previous test
|
| 7204 |
|
|
1a28 : c918 [ 2]> cmp #test_num
|
| 7205 |
|
|
> trap_ne ;test is out of sequence
|
| 7206 |
|
|
1a2a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7207 |
|
|
>
|
| 7208 |
|
|
0019 = >test_num = test_num + 1
|
| 7209 |
|
|
1a2c : a919 [ 2]> lda #test_num ;*** this tests' number
|
| 7210 |
|
|
1a2e : 8d0002 [ 4]> sta test_case
|
| 7211 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 7212 |
|
|
|
| 7213 |
|
|
|
| 7214 |
|
|
; testing bit test & compares BIT CPX CPY CMP all addressing modes
|
| 7215 |
|
|
; BIT - zp / abs
|
| 7216 |
|
|
set_a $ff,0
|
| 7217 |
|
|
> load_flag 0
|
| 7218 |
|
|
1a31 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7219 |
|
|
>
|
| 7220 |
|
|
1a33 : 48 [ 3]> pha ;use stack to load status
|
| 7221 |
|
|
1a34 : a9ff [ 2]> lda #$ff ;precharge accu
|
| 7222 |
|
|
1a36 : 28 [ 4]> plp
|
| 7223 |
|
|
|
| 7224 |
|
|
1a37 : 2416 [ 3] bit zp1+3 ;00 - should set Z / clear NV
|
| 7225 |
|
|
tst_a $ff,fz
|
| 7226 |
|
|
1a39 : 08 [ 3]> php ;save flags
|
| 7227 |
|
|
1a3a : 08 [ 3]> php
|
| 7228 |
|
|
1a3b : c9ff [ 2]> cmp #$ff ;test result
|
| 7229 |
|
|
> trap_ne
|
| 7230 |
|
|
1a3d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7231 |
|
|
>
|
| 7232 |
|
|
1a3f : 68 [ 4]> pla ;load status
|
| 7233 |
|
|
> cmp_flag fz
|
| 7234 |
|
|
1a40 : c932 [ 2]> cmp #(fz |fao)&m8 ;expected flags + always on bits
|
| 7235 |
|
|
>
|
| 7236 |
|
|
> trap_ne
|
| 7237 |
|
|
1a42 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7238 |
|
|
>
|
| 7239 |
|
|
1a44 : 28 [ 4]> plp ;restore status
|
| 7240 |
|
|
|
| 7241 |
|
|
set_a 1,0
|
| 7242 |
|
|
> load_flag 0
|
| 7243 |
|
|
1a45 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7244 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 126
|
| 7245 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7246 |
|
|
|
| 7247 |
|
|
>
|
| 7248 |
|
|
1a47 : 48 [ 3]> pha ;use stack to load status
|
| 7249 |
|
|
1a48 : a901 [ 2]> lda #1 ;precharge accu
|
| 7250 |
|
|
1a4a : 28 [ 4]> plp
|
| 7251 |
|
|
|
| 7252 |
|
|
1a4b : 2415 [ 3] bit zp1+2 ;41 - should set V (M6) / clear NZ
|
| 7253 |
|
|
tst_a 1,fv
|
| 7254 |
|
|
1a4d : 08 [ 3]> php ;save flags
|
| 7255 |
|
|
1a4e : 08 [ 3]> php
|
| 7256 |
|
|
1a4f : c901 [ 2]> cmp #1 ;test result
|
| 7257 |
|
|
> trap_ne
|
| 7258 |
|
|
1a51 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7259 |
|
|
>
|
| 7260 |
|
|
1a53 : 68 [ 4]> pla ;load status
|
| 7261 |
|
|
> cmp_flag fv
|
| 7262 |
|
|
1a54 : c970 [ 2]> cmp #(fv|fao)&m8 ;expected flags + always on bits
|
| 7263 |
|
|
>
|
| 7264 |
|
|
> trap_ne
|
| 7265 |
|
|
1a56 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7266 |
|
|
>
|
| 7267 |
|
|
1a58 : 28 [ 4]> plp ;restore status
|
| 7268 |
|
|
|
| 7269 |
|
|
set_a 1,0
|
| 7270 |
|
|
> load_flag 0
|
| 7271 |
|
|
1a59 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7272 |
|
|
>
|
| 7273 |
|
|
1a5b : 48 [ 3]> pha ;use stack to load status
|
| 7274 |
|
|
1a5c : a901 [ 2]> lda #1 ;precharge accu
|
| 7275 |
|
|
1a5e : 28 [ 4]> plp
|
| 7276 |
|
|
|
| 7277 |
|
|
1a5f : 2414 [ 3] bit zp1+1 ;82 - should set N (M7) & Z / clear V
|
| 7278 |
|
|
tst_a 1,fnz
|
| 7279 |
|
|
1a61 : 08 [ 3]> php ;save flags
|
| 7280 |
|
|
1a62 : 08 [ 3]> php
|
| 7281 |
|
|
1a63 : c901 [ 2]> cmp #1 ;test result
|
| 7282 |
|
|
> trap_ne
|
| 7283 |
|
|
1a65 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7284 |
|
|
>
|
| 7285 |
|
|
1a67 : 68 [ 4]> pla ;load status
|
| 7286 |
|
|
> cmp_flag fnz
|
| 7287 |
|
|
1a68 : c9b2 [ 2]> cmp #(fnz|fao)&m8 ;expected flags + always on bits
|
| 7288 |
|
|
>
|
| 7289 |
|
|
> trap_ne
|
| 7290 |
|
|
1a6a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7291 |
|
|
>
|
| 7292 |
|
|
1a6c : 28 [ 4]> plp ;restore status
|
| 7293 |
|
|
|
| 7294 |
|
|
set_a 1,0
|
| 7295 |
|
|
> load_flag 0
|
| 7296 |
|
|
1a6d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7297 |
|
|
>
|
| 7298 |
|
|
1a6f : 48 [ 3]> pha ;use stack to load status
|
| 7299 |
|
|
1a70 : a901 [ 2]> lda #1 ;precharge accu
|
| 7300 |
|
|
1a72 : 28 [ 4]> plp
|
| 7301 |
|
|
|
| 7302 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 127
|
| 7303 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7304 |
|
|
|
| 7305 |
|
|
1a73 : 2413 [ 3] bit zp1 ;c3 - should set N (M7) & V (M6) / clear Z
|
| 7306 |
|
|
tst_a 1,fnv
|
| 7307 |
|
|
1a75 : 08 [ 3]> php ;save flags
|
| 7308 |
|
|
1a76 : 08 [ 3]> php
|
| 7309 |
|
|
1a77 : c901 [ 2]> cmp #1 ;test result
|
| 7310 |
|
|
> trap_ne
|
| 7311 |
|
|
1a79 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7312 |
|
|
>
|
| 7313 |
|
|
1a7b : 68 [ 4]> pla ;load status
|
| 7314 |
|
|
> cmp_flag fnv
|
| 7315 |
|
|
1a7c : c9f0 [ 2]> cmp #(fnv|fao)&m8 ;expected flags + always on bits
|
| 7316 |
|
|
>
|
| 7317 |
|
|
> trap_ne
|
| 7318 |
|
|
1a7e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7319 |
|
|
>
|
| 7320 |
|
|
1a80 : 28 [ 4]> plp ;restore status
|
| 7321 |
|
|
|
| 7322 |
|
|
|
| 7323 |
|
|
set_a $ff,$ff
|
| 7324 |
|
|
> load_flag $ff
|
| 7325 |
|
|
1a81 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7326 |
|
|
>
|
| 7327 |
|
|
1a83 : 48 [ 3]> pha ;use stack to load status
|
| 7328 |
|
|
1a84 : a9ff [ 2]> lda #$ff ;precharge accu
|
| 7329 |
|
|
1a86 : 28 [ 4]> plp
|
| 7330 |
|
|
|
| 7331 |
|
|
1a87 : 2416 [ 3] bit zp1+3 ;00 - should set Z / clear NV
|
| 7332 |
|
|
tst_a $ff,~fnv
|
| 7333 |
|
|
1a89 : 08 [ 3]> php ;save flags
|
| 7334 |
|
|
1a8a : 08 [ 3]> php
|
| 7335 |
|
|
1a8b : c9ff [ 2]> cmp #$ff ;test result
|
| 7336 |
|
|
> trap_ne
|
| 7337 |
|
|
1a8d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7338 |
|
|
>
|
| 7339 |
|
|
1a8f : 68 [ 4]> pla ;load status
|
| 7340 |
|
|
> cmp_flag ~fnv
|
| 7341 |
|
|
1a90 : c93f [ 2]> cmp #(~fnv |fao)&m8 ;expected flags + always on bits
|
| 7342 |
|
|
>
|
| 7343 |
|
|
> trap_ne
|
| 7344 |
|
|
1a92 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7345 |
|
|
>
|
| 7346 |
|
|
1a94 : 28 [ 4]> plp ;restore status
|
| 7347 |
|
|
|
| 7348 |
|
|
set_a 1,$ff
|
| 7349 |
|
|
> load_flag $ff
|
| 7350 |
|
|
1a95 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7351 |
|
|
>
|
| 7352 |
|
|
1a97 : 48 [ 3]> pha ;use stack to load status
|
| 7353 |
|
|
1a98 : a901 [ 2]> lda #1 ;precharge accu
|
| 7354 |
|
|
1a9a : 28 [ 4]> plp
|
| 7355 |
|
|
|
| 7356 |
|
|
1a9b : 2415 [ 3] bit zp1+2 ;41 - should set V (M6) / clear NZ
|
| 7357 |
|
|
tst_a 1,~fnz
|
| 7358 |
|
|
1a9d : 08 [ 3]> php ;save flags
|
| 7359 |
|
|
1a9e : 08 [ 3]> php
|
| 7360 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 128
|
| 7361 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7362 |
|
|
|
| 7363 |
|
|
1a9f : c901 [ 2]> cmp #1 ;test result
|
| 7364 |
|
|
> trap_ne
|
| 7365 |
|
|
1aa1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7366 |
|
|
>
|
| 7367 |
|
|
1aa3 : 68 [ 4]> pla ;load status
|
| 7368 |
|
|
> cmp_flag ~fnz
|
| 7369 |
|
|
1aa4 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 7370 |
|
|
>
|
| 7371 |
|
|
> trap_ne
|
| 7372 |
|
|
1aa6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7373 |
|
|
>
|
| 7374 |
|
|
1aa8 : 28 [ 4]> plp ;restore status
|
| 7375 |
|
|
|
| 7376 |
|
|
set_a 1,$ff
|
| 7377 |
|
|
> load_flag $ff
|
| 7378 |
|
|
1aa9 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7379 |
|
|
>
|
| 7380 |
|
|
1aab : 48 [ 3]> pha ;use stack to load status
|
| 7381 |
|
|
1aac : a901 [ 2]> lda #1 ;precharge accu
|
| 7382 |
|
|
1aae : 28 [ 4]> plp
|
| 7383 |
|
|
|
| 7384 |
|
|
1aaf : 2414 [ 3] bit zp1+1 ;82 - should set N (M7) & Z / clear V
|
| 7385 |
|
|
tst_a 1,~fv
|
| 7386 |
|
|
1ab1 : 08 [ 3]> php ;save flags
|
| 7387 |
|
|
1ab2 : 08 [ 3]> php
|
| 7388 |
|
|
1ab3 : c901 [ 2]> cmp #1 ;test result
|
| 7389 |
|
|
> trap_ne
|
| 7390 |
|
|
1ab5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7391 |
|
|
>
|
| 7392 |
|
|
1ab7 : 68 [ 4]> pla ;load status
|
| 7393 |
|
|
> cmp_flag ~fv
|
| 7394 |
|
|
1ab8 : c9bf [ 2]> cmp #(~fv|fao)&m8 ;expected flags + always on bits
|
| 7395 |
|
|
>
|
| 7396 |
|
|
> trap_ne
|
| 7397 |
|
|
1aba : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7398 |
|
|
>
|
| 7399 |
|
|
1abc : 28 [ 4]> plp ;restore status
|
| 7400 |
|
|
|
| 7401 |
|
|
set_a 1,$ff
|
| 7402 |
|
|
> load_flag $ff
|
| 7403 |
|
|
1abd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7404 |
|
|
>
|
| 7405 |
|
|
1abf : 48 [ 3]> pha ;use stack to load status
|
| 7406 |
|
|
1ac0 : a901 [ 2]> lda #1 ;precharge accu
|
| 7407 |
|
|
1ac2 : 28 [ 4]> plp
|
| 7408 |
|
|
|
| 7409 |
|
|
1ac3 : 2413 [ 3] bit zp1 ;c3 - should set N (M7) & V (M6) / clear Z
|
| 7410 |
|
|
tst_a 1,~fz
|
| 7411 |
|
|
1ac5 : 08 [ 3]> php ;save flags
|
| 7412 |
|
|
1ac6 : 08 [ 3]> php
|
| 7413 |
|
|
1ac7 : c901 [ 2]> cmp #1 ;test result
|
| 7414 |
|
|
> trap_ne
|
| 7415 |
|
|
1ac9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7416 |
|
|
>
|
| 7417 |
|
|
1acb : 68 [ 4]> pla ;load status
|
| 7418 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 129
|
| 7419 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7420 |
|
|
|
| 7421 |
|
|
> cmp_flag ~fz
|
| 7422 |
|
|
1acc : c9fd [ 2]> cmp #(~fz|fao)&m8 ;expected flags + always on bits
|
| 7423 |
|
|
>
|
| 7424 |
|
|
> trap_ne
|
| 7425 |
|
|
1ace : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7426 |
|
|
>
|
| 7427 |
|
|
1ad0 : 28 [ 4]> plp ;restore status
|
| 7428 |
|
|
|
| 7429 |
|
|
|
| 7430 |
|
|
set_a $ff,0
|
| 7431 |
|
|
> load_flag 0
|
| 7432 |
|
|
1ad1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7433 |
|
|
>
|
| 7434 |
|
|
1ad3 : 48 [ 3]> pha ;use stack to load status
|
| 7435 |
|
|
1ad4 : a9ff [ 2]> lda #$ff ;precharge accu
|
| 7436 |
|
|
1ad6 : 28 [ 4]> plp
|
| 7437 |
|
|
|
| 7438 |
|
|
1ad7 : 2c0b02 [ 4] bit abs1+3 ;00 - should set Z / clear NV
|
| 7439 |
|
|
tst_a $ff,fz
|
| 7440 |
|
|
1ada : 08 [ 3]> php ;save flags
|
| 7441 |
|
|
1adb : 08 [ 3]> php
|
| 7442 |
|
|
1adc : c9ff [ 2]> cmp #$ff ;test result
|
| 7443 |
|
|
> trap_ne
|
| 7444 |
|
|
1ade : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7445 |
|
|
>
|
| 7446 |
|
|
1ae0 : 68 [ 4]> pla ;load status
|
| 7447 |
|
|
> cmp_flag fz
|
| 7448 |
|
|
1ae1 : c932 [ 2]> cmp #(fz |fao)&m8 ;expected flags + always on bits
|
| 7449 |
|
|
>
|
| 7450 |
|
|
> trap_ne
|
| 7451 |
|
|
1ae3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7452 |
|
|
>
|
| 7453 |
|
|
1ae5 : 28 [ 4]> plp ;restore status
|
| 7454 |
|
|
|
| 7455 |
|
|
set_a 1,0
|
| 7456 |
|
|
> load_flag 0
|
| 7457 |
|
|
1ae6 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7458 |
|
|
>
|
| 7459 |
|
|
1ae8 : 48 [ 3]> pha ;use stack to load status
|
| 7460 |
|
|
1ae9 : a901 [ 2]> lda #1 ;precharge accu
|
| 7461 |
|
|
1aeb : 28 [ 4]> plp
|
| 7462 |
|
|
|
| 7463 |
|
|
1aec : 2c0a02 [ 4] bit abs1+2 ;41 - should set V (M6) / clear NZ
|
| 7464 |
|
|
tst_a 1,fv
|
| 7465 |
|
|
1aef : 08 [ 3]> php ;save flags
|
| 7466 |
|
|
1af0 : 08 [ 3]> php
|
| 7467 |
|
|
1af1 : c901 [ 2]> cmp #1 ;test result
|
| 7468 |
|
|
> trap_ne
|
| 7469 |
|
|
1af3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7470 |
|
|
>
|
| 7471 |
|
|
1af5 : 68 [ 4]> pla ;load status
|
| 7472 |
|
|
> cmp_flag fv
|
| 7473 |
|
|
1af6 : c970 [ 2]> cmp #(fv|fao)&m8 ;expected flags + always on bits
|
| 7474 |
|
|
>
|
| 7475 |
|
|
> trap_ne
|
| 7476 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 130
|
| 7477 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7478 |
|
|
|
| 7479 |
|
|
1af8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7480 |
|
|
>
|
| 7481 |
|
|
1afa : 28 [ 4]> plp ;restore status
|
| 7482 |
|
|
|
| 7483 |
|
|
set_a 1,0
|
| 7484 |
|
|
> load_flag 0
|
| 7485 |
|
|
1afb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7486 |
|
|
>
|
| 7487 |
|
|
1afd : 48 [ 3]> pha ;use stack to load status
|
| 7488 |
|
|
1afe : a901 [ 2]> lda #1 ;precharge accu
|
| 7489 |
|
|
1b00 : 28 [ 4]> plp
|
| 7490 |
|
|
|
| 7491 |
|
|
1b01 : 2c0902 [ 4] bit abs1+1 ;82 - should set N (M7) & Z / clear V
|
| 7492 |
|
|
tst_a 1,fnz
|
| 7493 |
|
|
1b04 : 08 [ 3]> php ;save flags
|
| 7494 |
|
|
1b05 : 08 [ 3]> php
|
| 7495 |
|
|
1b06 : c901 [ 2]> cmp #1 ;test result
|
| 7496 |
|
|
> trap_ne
|
| 7497 |
|
|
1b08 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7498 |
|
|
>
|
| 7499 |
|
|
1b0a : 68 [ 4]> pla ;load status
|
| 7500 |
|
|
> cmp_flag fnz
|
| 7501 |
|
|
1b0b : c9b2 [ 2]> cmp #(fnz|fao)&m8 ;expected flags + always on bits
|
| 7502 |
|
|
>
|
| 7503 |
|
|
> trap_ne
|
| 7504 |
|
|
1b0d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7505 |
|
|
>
|
| 7506 |
|
|
1b0f : 28 [ 4]> plp ;restore status
|
| 7507 |
|
|
|
| 7508 |
|
|
set_a 1,0
|
| 7509 |
|
|
> load_flag 0
|
| 7510 |
|
|
1b10 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7511 |
|
|
>
|
| 7512 |
|
|
1b12 : 48 [ 3]> pha ;use stack to load status
|
| 7513 |
|
|
1b13 : a901 [ 2]> lda #1 ;precharge accu
|
| 7514 |
|
|
1b15 : 28 [ 4]> plp
|
| 7515 |
|
|
|
| 7516 |
|
|
1b16 : 2c0802 [ 4] bit abs1 ;c3 - should set N (M7) & V (M6) / clear Z
|
| 7517 |
|
|
tst_a 1,fnv
|
| 7518 |
|
|
1b19 : 08 [ 3]> php ;save flags
|
| 7519 |
|
|
1b1a : 08 [ 3]> php
|
| 7520 |
|
|
1b1b : c901 [ 2]> cmp #1 ;test result
|
| 7521 |
|
|
> trap_ne
|
| 7522 |
|
|
1b1d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7523 |
|
|
>
|
| 7524 |
|
|
1b1f : 68 [ 4]> pla ;load status
|
| 7525 |
|
|
> cmp_flag fnv
|
| 7526 |
|
|
1b20 : c9f0 [ 2]> cmp #(fnv|fao)&m8 ;expected flags + always on bits
|
| 7527 |
|
|
>
|
| 7528 |
|
|
> trap_ne
|
| 7529 |
|
|
1b22 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7530 |
|
|
>
|
| 7531 |
|
|
1b24 : 28 [ 4]> plp ;restore status
|
| 7532 |
|
|
|
| 7533 |
|
|
|
| 7534 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 131
|
| 7535 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7536 |
|
|
|
| 7537 |
|
|
set_a $ff,$ff
|
| 7538 |
|
|
> load_flag $ff
|
| 7539 |
|
|
1b25 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7540 |
|
|
>
|
| 7541 |
|
|
1b27 : 48 [ 3]> pha ;use stack to load status
|
| 7542 |
|
|
1b28 : a9ff [ 2]> lda #$ff ;precharge accu
|
| 7543 |
|
|
1b2a : 28 [ 4]> plp
|
| 7544 |
|
|
|
| 7545 |
|
|
1b2b : 2c0b02 [ 4] bit abs1+3 ;00 - should set Z / clear NV
|
| 7546 |
|
|
tst_a $ff,~fnv
|
| 7547 |
|
|
1b2e : 08 [ 3]> php ;save flags
|
| 7548 |
|
|
1b2f : 08 [ 3]> php
|
| 7549 |
|
|
1b30 : c9ff [ 2]> cmp #$ff ;test result
|
| 7550 |
|
|
> trap_ne
|
| 7551 |
|
|
1b32 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7552 |
|
|
>
|
| 7553 |
|
|
1b34 : 68 [ 4]> pla ;load status
|
| 7554 |
|
|
> cmp_flag ~fnv
|
| 7555 |
|
|
1b35 : c93f [ 2]> cmp #(~fnv |fao)&m8 ;expected flags + always on bits
|
| 7556 |
|
|
>
|
| 7557 |
|
|
> trap_ne
|
| 7558 |
|
|
1b37 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7559 |
|
|
>
|
| 7560 |
|
|
1b39 : 28 [ 4]> plp ;restore status
|
| 7561 |
|
|
|
| 7562 |
|
|
set_a 1,$ff
|
| 7563 |
|
|
> load_flag $ff
|
| 7564 |
|
|
1b3a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7565 |
|
|
>
|
| 7566 |
|
|
1b3c : 48 [ 3]> pha ;use stack to load status
|
| 7567 |
|
|
1b3d : a901 [ 2]> lda #1 ;precharge accu
|
| 7568 |
|
|
1b3f : 28 [ 4]> plp
|
| 7569 |
|
|
|
| 7570 |
|
|
1b40 : 2c0a02 [ 4] bit abs1+2 ;41 - should set V (M6) / clear NZ
|
| 7571 |
|
|
tst_a 1,~fnz
|
| 7572 |
|
|
1b43 : 08 [ 3]> php ;save flags
|
| 7573 |
|
|
1b44 : 08 [ 3]> php
|
| 7574 |
|
|
1b45 : c901 [ 2]> cmp #1 ;test result
|
| 7575 |
|
|
> trap_ne
|
| 7576 |
|
|
1b47 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7577 |
|
|
>
|
| 7578 |
|
|
1b49 : 68 [ 4]> pla ;load status
|
| 7579 |
|
|
> cmp_flag ~fnz
|
| 7580 |
|
|
1b4a : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 7581 |
|
|
>
|
| 7582 |
|
|
> trap_ne
|
| 7583 |
|
|
1b4c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7584 |
|
|
>
|
| 7585 |
|
|
1b4e : 28 [ 4]> plp ;restore status
|
| 7586 |
|
|
|
| 7587 |
|
|
set_a 1,$ff
|
| 7588 |
|
|
> load_flag $ff
|
| 7589 |
|
|
1b4f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7590 |
|
|
>
|
| 7591 |
|
|
1b51 : 48 [ 3]> pha ;use stack to load status
|
| 7592 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 132
|
| 7593 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7594 |
|
|
|
| 7595 |
|
|
1b52 : a901 [ 2]> lda #1 ;precharge accu
|
| 7596 |
|
|
1b54 : 28 [ 4]> plp
|
| 7597 |
|
|
|
| 7598 |
|
|
1b55 : 2c0902 [ 4] bit abs1+1 ;82 - should set N (M7) & Z / clear V
|
| 7599 |
|
|
tst_a 1,~fv
|
| 7600 |
|
|
1b58 : 08 [ 3]> php ;save flags
|
| 7601 |
|
|
1b59 : 08 [ 3]> php
|
| 7602 |
|
|
1b5a : c901 [ 2]> cmp #1 ;test result
|
| 7603 |
|
|
> trap_ne
|
| 7604 |
|
|
1b5c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7605 |
|
|
>
|
| 7606 |
|
|
1b5e : 68 [ 4]> pla ;load status
|
| 7607 |
|
|
> cmp_flag ~fv
|
| 7608 |
|
|
1b5f : c9bf [ 2]> cmp #(~fv|fao)&m8 ;expected flags + always on bits
|
| 7609 |
|
|
>
|
| 7610 |
|
|
> trap_ne
|
| 7611 |
|
|
1b61 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7612 |
|
|
>
|
| 7613 |
|
|
1b63 : 28 [ 4]> plp ;restore status
|
| 7614 |
|
|
|
| 7615 |
|
|
set_a 1,$ff
|
| 7616 |
|
|
> load_flag $ff
|
| 7617 |
|
|
1b64 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7618 |
|
|
>
|
| 7619 |
|
|
1b66 : 48 [ 3]> pha ;use stack to load status
|
| 7620 |
|
|
1b67 : a901 [ 2]> lda #1 ;precharge accu
|
| 7621 |
|
|
1b69 : 28 [ 4]> plp
|
| 7622 |
|
|
|
| 7623 |
|
|
1b6a : 2c0802 [ 4] bit abs1 ;c3 - should set N (M7) & V (M6) / clear Z
|
| 7624 |
|
|
tst_a 1,~fz
|
| 7625 |
|
|
1b6d : 08 [ 3]> php ;save flags
|
| 7626 |
|
|
1b6e : 08 [ 3]> php
|
| 7627 |
|
|
1b6f : c901 [ 2]> cmp #1 ;test result
|
| 7628 |
|
|
> trap_ne
|
| 7629 |
|
|
1b71 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7630 |
|
|
>
|
| 7631 |
|
|
1b73 : 68 [ 4]> pla ;load status
|
| 7632 |
|
|
> cmp_flag ~fz
|
| 7633 |
|
|
1b74 : c9fd [ 2]> cmp #(~fz|fao)&m8 ;expected flags + always on bits
|
| 7634 |
|
|
>
|
| 7635 |
|
|
> trap_ne
|
| 7636 |
|
|
1b76 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7637 |
|
|
>
|
| 7638 |
|
|
1b78 : 28 [ 4]> plp ;restore status
|
| 7639 |
|
|
|
| 7640 |
|
|
next_test
|
| 7641 |
|
|
1b79 : ad0002 [ 4]> lda test_case ;previous test
|
| 7642 |
|
|
1b7c : c919 [ 2]> cmp #test_num
|
| 7643 |
|
|
> trap_ne ;test is out of sequence
|
| 7644 |
|
|
1b7e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7645 |
|
|
>
|
| 7646 |
|
|
001a = >test_num = test_num + 1
|
| 7647 |
|
|
1b80 : a91a [ 2]> lda #test_num ;*** this tests' number
|
| 7648 |
|
|
1b82 : 8d0002 [ 4]> sta test_case
|
| 7649 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 7650 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 133
|
| 7651 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7652 |
|
|
|
| 7653 |
|
|
|
| 7654 |
|
|
|
| 7655 |
|
|
; CPX - zp / abs / #
|
| 7656 |
|
|
set_x $80,0
|
| 7657 |
|
|
> load_flag 0
|
| 7658 |
|
|
1b85 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7659 |
|
|
>
|
| 7660 |
|
|
1b87 : 48 [ 3]> pha ;use stack to load status
|
| 7661 |
|
|
1b88 : a280 [ 2]> ldx #$80 ;precharge index x
|
| 7662 |
|
|
1b8a : 28 [ 4]> plp
|
| 7663 |
|
|
|
| 7664 |
|
|
1b8b : e417 [ 3] cpx zp7f
|
| 7665 |
|
|
tst_stat fc
|
| 7666 |
|
|
1b8d : 08 [ 3]> php ;save status
|
| 7667 |
|
|
1b8e : 08 [ 3]> php ;use stack to retrieve status
|
| 7668 |
|
|
1b8f : 68 [ 4]> pla
|
| 7669 |
|
|
> cmp_flag fc
|
| 7670 |
|
|
1b90 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 7671 |
|
|
>
|
| 7672 |
|
|
> trap_ne
|
| 7673 |
|
|
1b92 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7674 |
|
|
>
|
| 7675 |
|
|
1b94 : 28 [ 4]> plp ;restore status
|
| 7676 |
|
|
|
| 7677 |
|
|
1b95 : ca [ 2] dex
|
| 7678 |
|
|
1b96 : e417 [ 3] cpx zp7f
|
| 7679 |
|
|
tst_stat fzc
|
| 7680 |
|
|
1b98 : 08 [ 3]> php ;save status
|
| 7681 |
|
|
1b99 : 08 [ 3]> php ;use stack to retrieve status
|
| 7682 |
|
|
1b9a : 68 [ 4]> pla
|
| 7683 |
|
|
> cmp_flag fzc
|
| 7684 |
|
|
1b9b : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 7685 |
|
|
>
|
| 7686 |
|
|
> trap_ne
|
| 7687 |
|
|
1b9d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7688 |
|
|
>
|
| 7689 |
|
|
1b9f : 28 [ 4]> plp ;restore status
|
| 7690 |
|
|
|
| 7691 |
|
|
1ba0 : ca [ 2] dex
|
| 7692 |
|
|
1ba1 : e417 [ 3] cpx zp7f
|
| 7693 |
|
|
tst_x $7e,fn
|
| 7694 |
|
|
1ba3 : 08 [ 3]> php ;save flags
|
| 7695 |
|
|
1ba4 : 08 [ 3]> php
|
| 7696 |
|
|
1ba5 : e07e [ 2]> cpx #$7e ;test result
|
| 7697 |
|
|
> trap_ne
|
| 7698 |
|
|
1ba7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7699 |
|
|
>
|
| 7700 |
|
|
1ba9 : 68 [ 4]> pla ;load status
|
| 7701 |
|
|
> cmp_flag fn
|
| 7702 |
|
|
1baa : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 7703 |
|
|
>
|
| 7704 |
|
|
> trap_ne
|
| 7705 |
|
|
1bac : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7706 |
|
|
>
|
| 7707 |
|
|
1bae : 28 [ 4]> plp ;restore status
|
| 7708 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 134
|
| 7709 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7710 |
|
|
|
| 7711 |
|
|
|
| 7712 |
|
|
set_x $80,$ff
|
| 7713 |
|
|
> load_flag $ff
|
| 7714 |
|
|
1baf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7715 |
|
|
>
|
| 7716 |
|
|
1bb1 : 48 [ 3]> pha ;use stack to load status
|
| 7717 |
|
|
1bb2 : a280 [ 2]> ldx #$80 ;precharge index x
|
| 7718 |
|
|
1bb4 : 28 [ 4]> plp
|
| 7719 |
|
|
|
| 7720 |
|
|
1bb5 : e417 [ 3] cpx zp7f
|
| 7721 |
|
|
tst_stat ~fnz
|
| 7722 |
|
|
1bb7 : 08 [ 3]> php ;save status
|
| 7723 |
|
|
1bb8 : 08 [ 3]> php ;use stack to retrieve status
|
| 7724 |
|
|
1bb9 : 68 [ 4]> pla
|
| 7725 |
|
|
> cmp_flag ~fnz
|
| 7726 |
|
|
1bba : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 7727 |
|
|
>
|
| 7728 |
|
|
> trap_ne
|
| 7729 |
|
|
1bbc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7730 |
|
|
>
|
| 7731 |
|
|
1bbe : 28 [ 4]> plp ;restore status
|
| 7732 |
|
|
|
| 7733 |
|
|
1bbf : ca [ 2] dex
|
| 7734 |
|
|
1bc0 : e417 [ 3] cpx zp7f
|
| 7735 |
|
|
tst_stat ~fn
|
| 7736 |
|
|
1bc2 : 08 [ 3]> php ;save status
|
| 7737 |
|
|
1bc3 : 08 [ 3]> php ;use stack to retrieve status
|
| 7738 |
|
|
1bc4 : 68 [ 4]> pla
|
| 7739 |
|
|
> cmp_flag ~fn
|
| 7740 |
|
|
1bc5 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 7741 |
|
|
>
|
| 7742 |
|
|
> trap_ne
|
| 7743 |
|
|
1bc7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7744 |
|
|
>
|
| 7745 |
|
|
1bc9 : 28 [ 4]> plp ;restore status
|
| 7746 |
|
|
|
| 7747 |
|
|
1bca : ca [ 2] dex
|
| 7748 |
|
|
1bcb : e417 [ 3] cpx zp7f
|
| 7749 |
|
|
tst_x $7e,~fzc
|
| 7750 |
|
|
1bcd : 08 [ 3]> php ;save flags
|
| 7751 |
|
|
1bce : 08 [ 3]> php
|
| 7752 |
|
|
1bcf : e07e [ 2]> cpx #$7e ;test result
|
| 7753 |
|
|
> trap_ne
|
| 7754 |
|
|
1bd1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7755 |
|
|
>
|
| 7756 |
|
|
1bd3 : 68 [ 4]> pla ;load status
|
| 7757 |
|
|
> cmp_flag ~fzc
|
| 7758 |
|
|
1bd4 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 7759 |
|
|
>
|
| 7760 |
|
|
> trap_ne
|
| 7761 |
|
|
1bd6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7762 |
|
|
>
|
| 7763 |
|
|
1bd8 : 28 [ 4]> plp ;restore status
|
| 7764 |
|
|
|
| 7765 |
|
|
|
| 7766 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 135
|
| 7767 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7768 |
|
|
|
| 7769 |
|
|
set_x $80,0
|
| 7770 |
|
|
> load_flag 0
|
| 7771 |
|
|
1bd9 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7772 |
|
|
>
|
| 7773 |
|
|
1bdb : 48 [ 3]> pha ;use stack to load status
|
| 7774 |
|
|
1bdc : a280 [ 2]> ldx #$80 ;precharge index x
|
| 7775 |
|
|
1bde : 28 [ 4]> plp
|
| 7776 |
|
|
|
| 7777 |
|
|
1bdf : ec0c02 [ 4] cpx abs7f
|
| 7778 |
|
|
tst_stat fc
|
| 7779 |
|
|
1be2 : 08 [ 3]> php ;save status
|
| 7780 |
|
|
1be3 : 08 [ 3]> php ;use stack to retrieve status
|
| 7781 |
|
|
1be4 : 68 [ 4]> pla
|
| 7782 |
|
|
> cmp_flag fc
|
| 7783 |
|
|
1be5 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 7784 |
|
|
>
|
| 7785 |
|
|
> trap_ne
|
| 7786 |
|
|
1be7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7787 |
|
|
>
|
| 7788 |
|
|
1be9 : 28 [ 4]> plp ;restore status
|
| 7789 |
|
|
|
| 7790 |
|
|
1bea : ca [ 2] dex
|
| 7791 |
|
|
1beb : ec0c02 [ 4] cpx abs7f
|
| 7792 |
|
|
tst_stat fzc
|
| 7793 |
|
|
1bee : 08 [ 3]> php ;save status
|
| 7794 |
|
|
1bef : 08 [ 3]> php ;use stack to retrieve status
|
| 7795 |
|
|
1bf0 : 68 [ 4]> pla
|
| 7796 |
|
|
> cmp_flag fzc
|
| 7797 |
|
|
1bf1 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 7798 |
|
|
>
|
| 7799 |
|
|
> trap_ne
|
| 7800 |
|
|
1bf3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7801 |
|
|
>
|
| 7802 |
|
|
1bf5 : 28 [ 4]> plp ;restore status
|
| 7803 |
|
|
|
| 7804 |
|
|
1bf6 : ca [ 2] dex
|
| 7805 |
|
|
1bf7 : ec0c02 [ 4] cpx abs7f
|
| 7806 |
|
|
tst_x $7e,fn
|
| 7807 |
|
|
1bfa : 08 [ 3]> php ;save flags
|
| 7808 |
|
|
1bfb : 08 [ 3]> php
|
| 7809 |
|
|
1bfc : e07e [ 2]> cpx #$7e ;test result
|
| 7810 |
|
|
> trap_ne
|
| 7811 |
|
|
1bfe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7812 |
|
|
>
|
| 7813 |
|
|
1c00 : 68 [ 4]> pla ;load status
|
| 7814 |
|
|
> cmp_flag fn
|
| 7815 |
|
|
1c01 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 7816 |
|
|
>
|
| 7817 |
|
|
> trap_ne
|
| 7818 |
|
|
1c03 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7819 |
|
|
>
|
| 7820 |
|
|
1c05 : 28 [ 4]> plp ;restore status
|
| 7821 |
|
|
|
| 7822 |
|
|
set_x $80,$ff
|
| 7823 |
|
|
> load_flag $ff
|
| 7824 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 136
|
| 7825 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7826 |
|
|
|
| 7827 |
|
|
1c06 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7828 |
|
|
>
|
| 7829 |
|
|
1c08 : 48 [ 3]> pha ;use stack to load status
|
| 7830 |
|
|
1c09 : a280 [ 2]> ldx #$80 ;precharge index x
|
| 7831 |
|
|
1c0b : 28 [ 4]> plp
|
| 7832 |
|
|
|
| 7833 |
|
|
1c0c : ec0c02 [ 4] cpx abs7f
|
| 7834 |
|
|
tst_stat ~fnz
|
| 7835 |
|
|
1c0f : 08 [ 3]> php ;save status
|
| 7836 |
|
|
1c10 : 08 [ 3]> php ;use stack to retrieve status
|
| 7837 |
|
|
1c11 : 68 [ 4]> pla
|
| 7838 |
|
|
> cmp_flag ~fnz
|
| 7839 |
|
|
1c12 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 7840 |
|
|
>
|
| 7841 |
|
|
> trap_ne
|
| 7842 |
|
|
1c14 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7843 |
|
|
>
|
| 7844 |
|
|
1c16 : 28 [ 4]> plp ;restore status
|
| 7845 |
|
|
|
| 7846 |
|
|
1c17 : ca [ 2] dex
|
| 7847 |
|
|
1c18 : ec0c02 [ 4] cpx abs7f
|
| 7848 |
|
|
tst_stat ~fn
|
| 7849 |
|
|
1c1b : 08 [ 3]> php ;save status
|
| 7850 |
|
|
1c1c : 08 [ 3]> php ;use stack to retrieve status
|
| 7851 |
|
|
1c1d : 68 [ 4]> pla
|
| 7852 |
|
|
> cmp_flag ~fn
|
| 7853 |
|
|
1c1e : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 7854 |
|
|
>
|
| 7855 |
|
|
> trap_ne
|
| 7856 |
|
|
1c20 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7857 |
|
|
>
|
| 7858 |
|
|
1c22 : 28 [ 4]> plp ;restore status
|
| 7859 |
|
|
|
| 7860 |
|
|
1c23 : ca [ 2] dex
|
| 7861 |
|
|
1c24 : ec0c02 [ 4] cpx abs7f
|
| 7862 |
|
|
tst_x $7e,~fzc
|
| 7863 |
|
|
1c27 : 08 [ 3]> php ;save flags
|
| 7864 |
|
|
1c28 : 08 [ 3]> php
|
| 7865 |
|
|
1c29 : e07e [ 2]> cpx #$7e ;test result
|
| 7866 |
|
|
> trap_ne
|
| 7867 |
|
|
1c2b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7868 |
|
|
>
|
| 7869 |
|
|
1c2d : 68 [ 4]> pla ;load status
|
| 7870 |
|
|
> cmp_flag ~fzc
|
| 7871 |
|
|
1c2e : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 7872 |
|
|
>
|
| 7873 |
|
|
> trap_ne
|
| 7874 |
|
|
1c30 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7875 |
|
|
>
|
| 7876 |
|
|
1c32 : 28 [ 4]> plp ;restore status
|
| 7877 |
|
|
|
| 7878 |
|
|
|
| 7879 |
|
|
set_x $80,0
|
| 7880 |
|
|
> load_flag 0
|
| 7881 |
|
|
1c33 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 7882 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 137
|
| 7883 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7884 |
|
|
|
| 7885 |
|
|
>
|
| 7886 |
|
|
1c35 : 48 [ 3]> pha ;use stack to load status
|
| 7887 |
|
|
1c36 : a280 [ 2]> ldx #$80 ;precharge index x
|
| 7888 |
|
|
1c38 : 28 [ 4]> plp
|
| 7889 |
|
|
|
| 7890 |
|
|
1c39 : e07f [ 2] cpx #$7f
|
| 7891 |
|
|
tst_stat fc
|
| 7892 |
|
|
1c3b : 08 [ 3]> php ;save status
|
| 7893 |
|
|
1c3c : 08 [ 3]> php ;use stack to retrieve status
|
| 7894 |
|
|
1c3d : 68 [ 4]> pla
|
| 7895 |
|
|
> cmp_flag fc
|
| 7896 |
|
|
1c3e : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 7897 |
|
|
>
|
| 7898 |
|
|
> trap_ne
|
| 7899 |
|
|
1c40 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7900 |
|
|
>
|
| 7901 |
|
|
1c42 : 28 [ 4]> plp ;restore status
|
| 7902 |
|
|
|
| 7903 |
|
|
1c43 : ca [ 2] dex
|
| 7904 |
|
|
1c44 : e07f [ 2] cpx #$7f
|
| 7905 |
|
|
tst_stat fzc
|
| 7906 |
|
|
1c46 : 08 [ 3]> php ;save status
|
| 7907 |
|
|
1c47 : 08 [ 3]> php ;use stack to retrieve status
|
| 7908 |
|
|
1c48 : 68 [ 4]> pla
|
| 7909 |
|
|
> cmp_flag fzc
|
| 7910 |
|
|
1c49 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 7911 |
|
|
>
|
| 7912 |
|
|
> trap_ne
|
| 7913 |
|
|
1c4b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7914 |
|
|
>
|
| 7915 |
|
|
1c4d : 28 [ 4]> plp ;restore status
|
| 7916 |
|
|
|
| 7917 |
|
|
1c4e : ca [ 2] dex
|
| 7918 |
|
|
1c4f : e07f [ 2] cpx #$7f
|
| 7919 |
|
|
tst_x $7e,fn
|
| 7920 |
|
|
1c51 : 08 [ 3]> php ;save flags
|
| 7921 |
|
|
1c52 : 08 [ 3]> php
|
| 7922 |
|
|
1c53 : e07e [ 2]> cpx #$7e ;test result
|
| 7923 |
|
|
> trap_ne
|
| 7924 |
|
|
1c55 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7925 |
|
|
>
|
| 7926 |
|
|
1c57 : 68 [ 4]> pla ;load status
|
| 7927 |
|
|
> cmp_flag fn
|
| 7928 |
|
|
1c58 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 7929 |
|
|
>
|
| 7930 |
|
|
> trap_ne
|
| 7931 |
|
|
1c5a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7932 |
|
|
>
|
| 7933 |
|
|
1c5c : 28 [ 4]> plp ;restore status
|
| 7934 |
|
|
|
| 7935 |
|
|
set_x $80,$ff
|
| 7936 |
|
|
> load_flag $ff
|
| 7937 |
|
|
1c5d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 7938 |
|
|
>
|
| 7939 |
|
|
1c5f : 48 [ 3]> pha ;use stack to load status
|
| 7940 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 138
|
| 7941 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 7942 |
|
|
|
| 7943 |
|
|
1c60 : a280 [ 2]> ldx #$80 ;precharge index x
|
| 7944 |
|
|
1c62 : 28 [ 4]> plp
|
| 7945 |
|
|
|
| 7946 |
|
|
1c63 : e07f [ 2] cpx #$7f
|
| 7947 |
|
|
tst_stat ~fnz
|
| 7948 |
|
|
1c65 : 08 [ 3]> php ;save status
|
| 7949 |
|
|
1c66 : 08 [ 3]> php ;use stack to retrieve status
|
| 7950 |
|
|
1c67 : 68 [ 4]> pla
|
| 7951 |
|
|
> cmp_flag ~fnz
|
| 7952 |
|
|
1c68 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 7953 |
|
|
>
|
| 7954 |
|
|
> trap_ne
|
| 7955 |
|
|
1c6a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7956 |
|
|
>
|
| 7957 |
|
|
1c6c : 28 [ 4]> plp ;restore status
|
| 7958 |
|
|
|
| 7959 |
|
|
1c6d : ca [ 2] dex
|
| 7960 |
|
|
1c6e : e07f [ 2] cpx #$7f
|
| 7961 |
|
|
tst_stat ~fn
|
| 7962 |
|
|
1c70 : 08 [ 3]> php ;save status
|
| 7963 |
|
|
1c71 : 08 [ 3]> php ;use stack to retrieve status
|
| 7964 |
|
|
1c72 : 68 [ 4]> pla
|
| 7965 |
|
|
> cmp_flag ~fn
|
| 7966 |
|
|
1c73 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 7967 |
|
|
>
|
| 7968 |
|
|
> trap_ne
|
| 7969 |
|
|
1c75 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7970 |
|
|
>
|
| 7971 |
|
|
1c77 : 28 [ 4]> plp ;restore status
|
| 7972 |
|
|
|
| 7973 |
|
|
1c78 : ca [ 2] dex
|
| 7974 |
|
|
1c79 : e07f [ 2] cpx #$7f
|
| 7975 |
|
|
tst_x $7e,~fzc
|
| 7976 |
|
|
1c7b : 08 [ 3]> php ;save flags
|
| 7977 |
|
|
1c7c : 08 [ 3]> php
|
| 7978 |
|
|
1c7d : e07e [ 2]> cpx #$7e ;test result
|
| 7979 |
|
|
> trap_ne
|
| 7980 |
|
|
1c7f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7981 |
|
|
>
|
| 7982 |
|
|
1c81 : 68 [ 4]> pla ;load status
|
| 7983 |
|
|
> cmp_flag ~fzc
|
| 7984 |
|
|
1c82 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 7985 |
|
|
>
|
| 7986 |
|
|
> trap_ne
|
| 7987 |
|
|
1c84 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7988 |
|
|
>
|
| 7989 |
|
|
1c86 : 28 [ 4]> plp ;restore status
|
| 7990 |
|
|
|
| 7991 |
|
|
next_test
|
| 7992 |
|
|
1c87 : ad0002 [ 4]> lda test_case ;previous test
|
| 7993 |
|
|
1c8a : c91a [ 2]> cmp #test_num
|
| 7994 |
|
|
> trap_ne ;test is out of sequence
|
| 7995 |
|
|
1c8c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 7996 |
|
|
>
|
| 7997 |
|
|
001b = >test_num = test_num + 1
|
| 7998 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 139
|
| 7999 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8000 |
|
|
|
| 8001 |
|
|
1c8e : a91b [ 2]> lda #test_num ;*** this tests' number
|
| 8002 |
|
|
1c90 : 8d0002 [ 4]> sta test_case
|
| 8003 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 8004 |
|
|
|
| 8005 |
|
|
|
| 8006 |
|
|
; CPY - zp / abs / #
|
| 8007 |
|
|
set_y $80,0
|
| 8008 |
|
|
> load_flag 0
|
| 8009 |
|
|
1c93 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8010 |
|
|
>
|
| 8011 |
|
|
1c95 : 48 [ 3]> pha ;use stack to load status
|
| 8012 |
|
|
1c96 : a080 [ 2]> ldy #$80 ;precharge index y
|
| 8013 |
|
|
1c98 : 28 [ 4]> plp
|
| 8014 |
|
|
|
| 8015 |
|
|
1c99 : c417 [ 3] cpy zp7f
|
| 8016 |
|
|
tst_stat fc
|
| 8017 |
|
|
1c9b : 08 [ 3]> php ;save status
|
| 8018 |
|
|
1c9c : 08 [ 3]> php ;use stack to retrieve status
|
| 8019 |
|
|
1c9d : 68 [ 4]> pla
|
| 8020 |
|
|
> cmp_flag fc
|
| 8021 |
|
|
1c9e : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 8022 |
|
|
>
|
| 8023 |
|
|
> trap_ne
|
| 8024 |
|
|
1ca0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8025 |
|
|
>
|
| 8026 |
|
|
1ca2 : 28 [ 4]> plp ;restore status
|
| 8027 |
|
|
|
| 8028 |
|
|
1ca3 : 88 [ 2] dey
|
| 8029 |
|
|
1ca4 : c417 [ 3] cpy zp7f
|
| 8030 |
|
|
tst_stat fzc
|
| 8031 |
|
|
1ca6 : 08 [ 3]> php ;save status
|
| 8032 |
|
|
1ca7 : 08 [ 3]> php ;use stack to retrieve status
|
| 8033 |
|
|
1ca8 : 68 [ 4]> pla
|
| 8034 |
|
|
> cmp_flag fzc
|
| 8035 |
|
|
1ca9 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 8036 |
|
|
>
|
| 8037 |
|
|
> trap_ne
|
| 8038 |
|
|
1cab : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8039 |
|
|
>
|
| 8040 |
|
|
1cad : 28 [ 4]> plp ;restore status
|
| 8041 |
|
|
|
| 8042 |
|
|
1cae : 88 [ 2] dey
|
| 8043 |
|
|
1caf : c417 [ 3] cpy zp7f
|
| 8044 |
|
|
tst_y $7e,fn
|
| 8045 |
|
|
1cb1 : 08 [ 3]> php ;save flags
|
| 8046 |
|
|
1cb2 : 08 [ 3]> php
|
| 8047 |
|
|
1cb3 : c07e [ 2]> cpy #$7e ;test result
|
| 8048 |
|
|
> trap_ne
|
| 8049 |
|
|
1cb5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8050 |
|
|
>
|
| 8051 |
|
|
1cb7 : 68 [ 4]> pla ;load status
|
| 8052 |
|
|
> cmp_flag fn
|
| 8053 |
|
|
1cb8 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 8054 |
|
|
>
|
| 8055 |
|
|
> trap_ne
|
| 8056 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 140
|
| 8057 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8058 |
|
|
|
| 8059 |
|
|
1cba : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8060 |
|
|
>
|
| 8061 |
|
|
1cbc : 28 [ 4]> plp ;restore status
|
| 8062 |
|
|
|
| 8063 |
|
|
set_y $80,$ff
|
| 8064 |
|
|
> load_flag $ff
|
| 8065 |
|
|
1cbd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8066 |
|
|
>
|
| 8067 |
|
|
1cbf : 48 [ 3]> pha ;use stack to load status
|
| 8068 |
|
|
1cc0 : a080 [ 2]> ldy #$80 ;precharge index y
|
| 8069 |
|
|
1cc2 : 28 [ 4]> plp
|
| 8070 |
|
|
|
| 8071 |
|
|
1cc3 : c417 [ 3] cpy zp7f
|
| 8072 |
|
|
tst_stat ~fnz
|
| 8073 |
|
|
1cc5 : 08 [ 3]> php ;save status
|
| 8074 |
|
|
1cc6 : 08 [ 3]> php ;use stack to retrieve status
|
| 8075 |
|
|
1cc7 : 68 [ 4]> pla
|
| 8076 |
|
|
> cmp_flag ~fnz
|
| 8077 |
|
|
1cc8 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 8078 |
|
|
>
|
| 8079 |
|
|
> trap_ne
|
| 8080 |
|
|
1cca : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8081 |
|
|
>
|
| 8082 |
|
|
1ccc : 28 [ 4]> plp ;restore status
|
| 8083 |
|
|
|
| 8084 |
|
|
1ccd : 88 [ 2] dey
|
| 8085 |
|
|
1cce : c417 [ 3] cpy zp7f
|
| 8086 |
|
|
tst_stat ~fn
|
| 8087 |
|
|
1cd0 : 08 [ 3]> php ;save status
|
| 8088 |
|
|
1cd1 : 08 [ 3]> php ;use stack to retrieve status
|
| 8089 |
|
|
1cd2 : 68 [ 4]> pla
|
| 8090 |
|
|
> cmp_flag ~fn
|
| 8091 |
|
|
1cd3 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 8092 |
|
|
>
|
| 8093 |
|
|
> trap_ne
|
| 8094 |
|
|
1cd5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8095 |
|
|
>
|
| 8096 |
|
|
1cd7 : 28 [ 4]> plp ;restore status
|
| 8097 |
|
|
|
| 8098 |
|
|
1cd8 : 88 [ 2] dey
|
| 8099 |
|
|
1cd9 : c417 [ 3] cpy zp7f
|
| 8100 |
|
|
tst_y $7e,~fzc
|
| 8101 |
|
|
1cdb : 08 [ 3]> php ;save flags
|
| 8102 |
|
|
1cdc : 08 [ 3]> php
|
| 8103 |
|
|
1cdd : c07e [ 2]> cpy #$7e ;test result
|
| 8104 |
|
|
> trap_ne
|
| 8105 |
|
|
1cdf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8106 |
|
|
>
|
| 8107 |
|
|
1ce1 : 68 [ 4]> pla ;load status
|
| 8108 |
|
|
> cmp_flag ~fzc
|
| 8109 |
|
|
1ce2 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 8110 |
|
|
>
|
| 8111 |
|
|
> trap_ne
|
| 8112 |
|
|
1ce4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8113 |
|
|
>
|
| 8114 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 141
|
| 8115 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8116 |
|
|
|
| 8117 |
|
|
1ce6 : 28 [ 4]> plp ;restore status
|
| 8118 |
|
|
|
| 8119 |
|
|
|
| 8120 |
|
|
set_y $80,0
|
| 8121 |
|
|
> load_flag 0
|
| 8122 |
|
|
1ce7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8123 |
|
|
>
|
| 8124 |
|
|
1ce9 : 48 [ 3]> pha ;use stack to load status
|
| 8125 |
|
|
1cea : a080 [ 2]> ldy #$80 ;precharge index y
|
| 8126 |
|
|
1cec : 28 [ 4]> plp
|
| 8127 |
|
|
|
| 8128 |
|
|
1ced : cc0c02 [ 4] cpy abs7f
|
| 8129 |
|
|
tst_stat fc
|
| 8130 |
|
|
1cf0 : 08 [ 3]> php ;save status
|
| 8131 |
|
|
1cf1 : 08 [ 3]> php ;use stack to retrieve status
|
| 8132 |
|
|
1cf2 : 68 [ 4]> pla
|
| 8133 |
|
|
> cmp_flag fc
|
| 8134 |
|
|
1cf3 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 8135 |
|
|
>
|
| 8136 |
|
|
> trap_ne
|
| 8137 |
|
|
1cf5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8138 |
|
|
>
|
| 8139 |
|
|
1cf7 : 28 [ 4]> plp ;restore status
|
| 8140 |
|
|
|
| 8141 |
|
|
1cf8 : 88 [ 2] dey
|
| 8142 |
|
|
1cf9 : cc0c02 [ 4] cpy abs7f
|
| 8143 |
|
|
tst_stat fzc
|
| 8144 |
|
|
1cfc : 08 [ 3]> php ;save status
|
| 8145 |
|
|
1cfd : 08 [ 3]> php ;use stack to retrieve status
|
| 8146 |
|
|
1cfe : 68 [ 4]> pla
|
| 8147 |
|
|
> cmp_flag fzc
|
| 8148 |
|
|
1cff : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 8149 |
|
|
>
|
| 8150 |
|
|
> trap_ne
|
| 8151 |
|
|
1d01 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8152 |
|
|
>
|
| 8153 |
|
|
1d03 : 28 [ 4]> plp ;restore status
|
| 8154 |
|
|
|
| 8155 |
|
|
1d04 : 88 [ 2] dey
|
| 8156 |
|
|
1d05 : cc0c02 [ 4] cpy abs7f
|
| 8157 |
|
|
tst_y $7e,fn
|
| 8158 |
|
|
1d08 : 08 [ 3]> php ;save flags
|
| 8159 |
|
|
1d09 : 08 [ 3]> php
|
| 8160 |
|
|
1d0a : c07e [ 2]> cpy #$7e ;test result
|
| 8161 |
|
|
> trap_ne
|
| 8162 |
|
|
1d0c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8163 |
|
|
>
|
| 8164 |
|
|
1d0e : 68 [ 4]> pla ;load status
|
| 8165 |
|
|
> cmp_flag fn
|
| 8166 |
|
|
1d0f : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 8167 |
|
|
>
|
| 8168 |
|
|
> trap_ne
|
| 8169 |
|
|
1d11 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8170 |
|
|
>
|
| 8171 |
|
|
1d13 : 28 [ 4]> plp ;restore status
|
| 8172 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 142
|
| 8173 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8174 |
|
|
|
| 8175 |
|
|
|
| 8176 |
|
|
set_y $80,$ff
|
| 8177 |
|
|
> load_flag $ff
|
| 8178 |
|
|
1d14 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8179 |
|
|
>
|
| 8180 |
|
|
1d16 : 48 [ 3]> pha ;use stack to load status
|
| 8181 |
|
|
1d17 : a080 [ 2]> ldy #$80 ;precharge index y
|
| 8182 |
|
|
1d19 : 28 [ 4]> plp
|
| 8183 |
|
|
|
| 8184 |
|
|
1d1a : cc0c02 [ 4] cpy abs7f
|
| 8185 |
|
|
tst_stat ~fnz
|
| 8186 |
|
|
1d1d : 08 [ 3]> php ;save status
|
| 8187 |
|
|
1d1e : 08 [ 3]> php ;use stack to retrieve status
|
| 8188 |
|
|
1d1f : 68 [ 4]> pla
|
| 8189 |
|
|
> cmp_flag ~fnz
|
| 8190 |
|
|
1d20 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 8191 |
|
|
>
|
| 8192 |
|
|
> trap_ne
|
| 8193 |
|
|
1d22 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8194 |
|
|
>
|
| 8195 |
|
|
1d24 : 28 [ 4]> plp ;restore status
|
| 8196 |
|
|
|
| 8197 |
|
|
1d25 : 88 [ 2] dey
|
| 8198 |
|
|
1d26 : cc0c02 [ 4] cpy abs7f
|
| 8199 |
|
|
tst_stat ~fn
|
| 8200 |
|
|
1d29 : 08 [ 3]> php ;save status
|
| 8201 |
|
|
1d2a : 08 [ 3]> php ;use stack to retrieve status
|
| 8202 |
|
|
1d2b : 68 [ 4]> pla
|
| 8203 |
|
|
> cmp_flag ~fn
|
| 8204 |
|
|
1d2c : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 8205 |
|
|
>
|
| 8206 |
|
|
> trap_ne
|
| 8207 |
|
|
1d2e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8208 |
|
|
>
|
| 8209 |
|
|
1d30 : 28 [ 4]> plp ;restore status
|
| 8210 |
|
|
|
| 8211 |
|
|
1d31 : 88 [ 2] dey
|
| 8212 |
|
|
1d32 : cc0c02 [ 4] cpy abs7f
|
| 8213 |
|
|
tst_y $7e,~fzc
|
| 8214 |
|
|
1d35 : 08 [ 3]> php ;save flags
|
| 8215 |
|
|
1d36 : 08 [ 3]> php
|
| 8216 |
|
|
1d37 : c07e [ 2]> cpy #$7e ;test result
|
| 8217 |
|
|
> trap_ne
|
| 8218 |
|
|
1d39 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8219 |
|
|
>
|
| 8220 |
|
|
1d3b : 68 [ 4]> pla ;load status
|
| 8221 |
|
|
> cmp_flag ~fzc
|
| 8222 |
|
|
1d3c : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 8223 |
|
|
>
|
| 8224 |
|
|
> trap_ne
|
| 8225 |
|
|
1d3e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8226 |
|
|
>
|
| 8227 |
|
|
1d40 : 28 [ 4]> plp ;restore status
|
| 8228 |
|
|
|
| 8229 |
|
|
|
| 8230 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 143
|
| 8231 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8232 |
|
|
|
| 8233 |
|
|
set_y $80,0
|
| 8234 |
|
|
> load_flag 0
|
| 8235 |
|
|
1d41 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8236 |
|
|
>
|
| 8237 |
|
|
1d43 : 48 [ 3]> pha ;use stack to load status
|
| 8238 |
|
|
1d44 : a080 [ 2]> ldy #$80 ;precharge index y
|
| 8239 |
|
|
1d46 : 28 [ 4]> plp
|
| 8240 |
|
|
|
| 8241 |
|
|
1d47 : c07f [ 2] cpy #$7f
|
| 8242 |
|
|
tst_stat fc
|
| 8243 |
|
|
1d49 : 08 [ 3]> php ;save status
|
| 8244 |
|
|
1d4a : 08 [ 3]> php ;use stack to retrieve status
|
| 8245 |
|
|
1d4b : 68 [ 4]> pla
|
| 8246 |
|
|
> cmp_flag fc
|
| 8247 |
|
|
1d4c : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 8248 |
|
|
>
|
| 8249 |
|
|
> trap_ne
|
| 8250 |
|
|
1d4e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8251 |
|
|
>
|
| 8252 |
|
|
1d50 : 28 [ 4]> plp ;restore status
|
| 8253 |
|
|
|
| 8254 |
|
|
1d51 : 88 [ 2] dey
|
| 8255 |
|
|
1d52 : c07f [ 2] cpy #$7f
|
| 8256 |
|
|
tst_stat fzc
|
| 8257 |
|
|
1d54 : 08 [ 3]> php ;save status
|
| 8258 |
|
|
1d55 : 08 [ 3]> php ;use stack to retrieve status
|
| 8259 |
|
|
1d56 : 68 [ 4]> pla
|
| 8260 |
|
|
> cmp_flag fzc
|
| 8261 |
|
|
1d57 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 8262 |
|
|
>
|
| 8263 |
|
|
> trap_ne
|
| 8264 |
|
|
1d59 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8265 |
|
|
>
|
| 8266 |
|
|
1d5b : 28 [ 4]> plp ;restore status
|
| 8267 |
|
|
|
| 8268 |
|
|
1d5c : 88 [ 2] dey
|
| 8269 |
|
|
1d5d : c07f [ 2] cpy #$7f
|
| 8270 |
|
|
tst_y $7e,fn
|
| 8271 |
|
|
1d5f : 08 [ 3]> php ;save flags
|
| 8272 |
|
|
1d60 : 08 [ 3]> php
|
| 8273 |
|
|
1d61 : c07e [ 2]> cpy #$7e ;test result
|
| 8274 |
|
|
> trap_ne
|
| 8275 |
|
|
1d63 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8276 |
|
|
>
|
| 8277 |
|
|
1d65 : 68 [ 4]> pla ;load status
|
| 8278 |
|
|
> cmp_flag fn
|
| 8279 |
|
|
1d66 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 8280 |
|
|
>
|
| 8281 |
|
|
> trap_ne
|
| 8282 |
|
|
1d68 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8283 |
|
|
>
|
| 8284 |
|
|
1d6a : 28 [ 4]> plp ;restore status
|
| 8285 |
|
|
|
| 8286 |
|
|
set_y $80,$ff
|
| 8287 |
|
|
> load_flag $ff
|
| 8288 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 144
|
| 8289 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8290 |
|
|
|
| 8291 |
|
|
1d6b : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8292 |
|
|
>
|
| 8293 |
|
|
1d6d : 48 [ 3]> pha ;use stack to load status
|
| 8294 |
|
|
1d6e : a080 [ 2]> ldy #$80 ;precharge index y
|
| 8295 |
|
|
1d70 : 28 [ 4]> plp
|
| 8296 |
|
|
|
| 8297 |
|
|
1d71 : c07f [ 2] cpy #$7f
|
| 8298 |
|
|
tst_stat ~fnz
|
| 8299 |
|
|
1d73 : 08 [ 3]> php ;save status
|
| 8300 |
|
|
1d74 : 08 [ 3]> php ;use stack to retrieve status
|
| 8301 |
|
|
1d75 : 68 [ 4]> pla
|
| 8302 |
|
|
> cmp_flag ~fnz
|
| 8303 |
|
|
1d76 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 8304 |
|
|
>
|
| 8305 |
|
|
> trap_ne
|
| 8306 |
|
|
1d78 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8307 |
|
|
>
|
| 8308 |
|
|
1d7a : 28 [ 4]> plp ;restore status
|
| 8309 |
|
|
|
| 8310 |
|
|
1d7b : 88 [ 2] dey
|
| 8311 |
|
|
1d7c : c07f [ 2] cpy #$7f
|
| 8312 |
|
|
tst_stat ~fn
|
| 8313 |
|
|
1d7e : 08 [ 3]> php ;save status
|
| 8314 |
|
|
1d7f : 08 [ 3]> php ;use stack to retrieve status
|
| 8315 |
|
|
1d80 : 68 [ 4]> pla
|
| 8316 |
|
|
> cmp_flag ~fn
|
| 8317 |
|
|
1d81 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 8318 |
|
|
>
|
| 8319 |
|
|
> trap_ne
|
| 8320 |
|
|
1d83 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8321 |
|
|
>
|
| 8322 |
|
|
1d85 : 28 [ 4]> plp ;restore status
|
| 8323 |
|
|
|
| 8324 |
|
|
1d86 : 88 [ 2] dey
|
| 8325 |
|
|
1d87 : c07f [ 2] cpy #$7f
|
| 8326 |
|
|
tst_y $7e,~fzc
|
| 8327 |
|
|
1d89 : 08 [ 3]> php ;save flags
|
| 8328 |
|
|
1d8a : 08 [ 3]> php
|
| 8329 |
|
|
1d8b : c07e [ 2]> cpy #$7e ;test result
|
| 8330 |
|
|
> trap_ne
|
| 8331 |
|
|
1d8d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8332 |
|
|
>
|
| 8333 |
|
|
1d8f : 68 [ 4]> pla ;load status
|
| 8334 |
|
|
> cmp_flag ~fzc
|
| 8335 |
|
|
1d90 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 8336 |
|
|
>
|
| 8337 |
|
|
> trap_ne
|
| 8338 |
|
|
1d92 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8339 |
|
|
>
|
| 8340 |
|
|
1d94 : 28 [ 4]> plp ;restore status
|
| 8341 |
|
|
|
| 8342 |
|
|
next_test
|
| 8343 |
|
|
1d95 : ad0002 [ 4]> lda test_case ;previous test
|
| 8344 |
|
|
1d98 : c91b [ 2]> cmp #test_num
|
| 8345 |
|
|
> trap_ne ;test is out of sequence
|
| 8346 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 145
|
| 8347 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8348 |
|
|
|
| 8349 |
|
|
1d9a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8350 |
|
|
>
|
| 8351 |
|
|
001c = >test_num = test_num + 1
|
| 8352 |
|
|
1d9c : a91c [ 2]> lda #test_num ;*** this tests' number
|
| 8353 |
|
|
1d9e : 8d0002 [ 4]> sta test_case
|
| 8354 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 8355 |
|
|
|
| 8356 |
|
|
|
| 8357 |
|
|
; CMP - zp / abs / #
|
| 8358 |
|
|
set_a $80,0
|
| 8359 |
|
|
> load_flag 0
|
| 8360 |
|
|
1da1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8361 |
|
|
>
|
| 8362 |
|
|
1da3 : 48 [ 3]> pha ;use stack to load status
|
| 8363 |
|
|
1da4 : a980 [ 2]> lda #$80 ;precharge accu
|
| 8364 |
|
|
1da6 : 28 [ 4]> plp
|
| 8365 |
|
|
|
| 8366 |
|
|
1da7 : c517 [ 3] cmp zp7f
|
| 8367 |
|
|
tst_a $80,fc
|
| 8368 |
|
|
1da9 : 08 [ 3]> php ;save flags
|
| 8369 |
|
|
1daa : 08 [ 3]> php
|
| 8370 |
|
|
1dab : c980 [ 2]> cmp #$80 ;test result
|
| 8371 |
|
|
> trap_ne
|
| 8372 |
|
|
1dad : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8373 |
|
|
>
|
| 8374 |
|
|
1daf : 68 [ 4]> pla ;load status
|
| 8375 |
|
|
> cmp_flag fc
|
| 8376 |
|
|
1db0 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 8377 |
|
|
>
|
| 8378 |
|
|
> trap_ne
|
| 8379 |
|
|
1db2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8380 |
|
|
>
|
| 8381 |
|
|
1db4 : 28 [ 4]> plp ;restore status
|
| 8382 |
|
|
|
| 8383 |
|
|
set_a $7f,0
|
| 8384 |
|
|
> load_flag 0
|
| 8385 |
|
|
1db5 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8386 |
|
|
>
|
| 8387 |
|
|
1db7 : 48 [ 3]> pha ;use stack to load status
|
| 8388 |
|
|
1db8 : a97f [ 2]> lda #$7f ;precharge accu
|
| 8389 |
|
|
1dba : 28 [ 4]> plp
|
| 8390 |
|
|
|
| 8391 |
|
|
1dbb : c517 [ 3] cmp zp7f
|
| 8392 |
|
|
tst_a $7f,fzc
|
| 8393 |
|
|
1dbd : 08 [ 3]> php ;save flags
|
| 8394 |
|
|
1dbe : 08 [ 3]> php
|
| 8395 |
|
|
1dbf : c97f [ 2]> cmp #$7f ;test result
|
| 8396 |
|
|
> trap_ne
|
| 8397 |
|
|
1dc1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8398 |
|
|
>
|
| 8399 |
|
|
1dc3 : 68 [ 4]> pla ;load status
|
| 8400 |
|
|
> cmp_flag fzc
|
| 8401 |
|
|
1dc4 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 8402 |
|
|
>
|
| 8403 |
|
|
> trap_ne
|
| 8404 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 146
|
| 8405 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8406 |
|
|
|
| 8407 |
|
|
1dc6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8408 |
|
|
>
|
| 8409 |
|
|
1dc8 : 28 [ 4]> plp ;restore status
|
| 8410 |
|
|
|
| 8411 |
|
|
set_a $7e,0
|
| 8412 |
|
|
> load_flag 0
|
| 8413 |
|
|
1dc9 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8414 |
|
|
>
|
| 8415 |
|
|
1dcb : 48 [ 3]> pha ;use stack to load status
|
| 8416 |
|
|
1dcc : a97e [ 2]> lda #$7e ;precharge accu
|
| 8417 |
|
|
1dce : 28 [ 4]> plp
|
| 8418 |
|
|
|
| 8419 |
|
|
1dcf : c517 [ 3] cmp zp7f
|
| 8420 |
|
|
tst_a $7e,fn
|
| 8421 |
|
|
1dd1 : 08 [ 3]> php ;save flags
|
| 8422 |
|
|
1dd2 : 08 [ 3]> php
|
| 8423 |
|
|
1dd3 : c97e [ 2]> cmp #$7e ;test result
|
| 8424 |
|
|
> trap_ne
|
| 8425 |
|
|
1dd5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8426 |
|
|
>
|
| 8427 |
|
|
1dd7 : 68 [ 4]> pla ;load status
|
| 8428 |
|
|
> cmp_flag fn
|
| 8429 |
|
|
1dd8 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 8430 |
|
|
>
|
| 8431 |
|
|
> trap_ne
|
| 8432 |
|
|
1dda : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8433 |
|
|
>
|
| 8434 |
|
|
1ddc : 28 [ 4]> plp ;restore status
|
| 8435 |
|
|
|
| 8436 |
|
|
set_a $80,$ff
|
| 8437 |
|
|
> load_flag $ff
|
| 8438 |
|
|
1ddd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8439 |
|
|
>
|
| 8440 |
|
|
1ddf : 48 [ 3]> pha ;use stack to load status
|
| 8441 |
|
|
1de0 : a980 [ 2]> lda #$80 ;precharge accu
|
| 8442 |
|
|
1de2 : 28 [ 4]> plp
|
| 8443 |
|
|
|
| 8444 |
|
|
1de3 : c517 [ 3] cmp zp7f
|
| 8445 |
|
|
tst_a $80,~fnz
|
| 8446 |
|
|
1de5 : 08 [ 3]> php ;save flags
|
| 8447 |
|
|
1de6 : 08 [ 3]> php
|
| 8448 |
|
|
1de7 : c980 [ 2]> cmp #$80 ;test result
|
| 8449 |
|
|
> trap_ne
|
| 8450 |
|
|
1de9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8451 |
|
|
>
|
| 8452 |
|
|
1deb : 68 [ 4]> pla ;load status
|
| 8453 |
|
|
> cmp_flag ~fnz
|
| 8454 |
|
|
1dec : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 8455 |
|
|
>
|
| 8456 |
|
|
> trap_ne
|
| 8457 |
|
|
1dee : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8458 |
|
|
>
|
| 8459 |
|
|
1df0 : 28 [ 4]> plp ;restore status
|
| 8460 |
|
|
|
| 8461 |
|
|
set_a $7f,$ff
|
| 8462 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 147
|
| 8463 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8464 |
|
|
|
| 8465 |
|
|
> load_flag $ff
|
| 8466 |
|
|
1df1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8467 |
|
|
>
|
| 8468 |
|
|
1df3 : 48 [ 3]> pha ;use stack to load status
|
| 8469 |
|
|
1df4 : a97f [ 2]> lda #$7f ;precharge accu
|
| 8470 |
|
|
1df6 : 28 [ 4]> plp
|
| 8471 |
|
|
|
| 8472 |
|
|
1df7 : c517 [ 3] cmp zp7f
|
| 8473 |
|
|
tst_a $7f,~fn
|
| 8474 |
|
|
1df9 : 08 [ 3]> php ;save flags
|
| 8475 |
|
|
1dfa : 08 [ 3]> php
|
| 8476 |
|
|
1dfb : c97f [ 2]> cmp #$7f ;test result
|
| 8477 |
|
|
> trap_ne
|
| 8478 |
|
|
1dfd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8479 |
|
|
>
|
| 8480 |
|
|
1dff : 68 [ 4]> pla ;load status
|
| 8481 |
|
|
> cmp_flag ~fn
|
| 8482 |
|
|
1e00 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 8483 |
|
|
>
|
| 8484 |
|
|
> trap_ne
|
| 8485 |
|
|
1e02 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8486 |
|
|
>
|
| 8487 |
|
|
1e04 : 28 [ 4]> plp ;restore status
|
| 8488 |
|
|
|
| 8489 |
|
|
set_a $7e,$ff
|
| 8490 |
|
|
> load_flag $ff
|
| 8491 |
|
|
1e05 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8492 |
|
|
>
|
| 8493 |
|
|
1e07 : 48 [ 3]> pha ;use stack to load status
|
| 8494 |
|
|
1e08 : a97e [ 2]> lda #$7e ;precharge accu
|
| 8495 |
|
|
1e0a : 28 [ 4]> plp
|
| 8496 |
|
|
|
| 8497 |
|
|
1e0b : c517 [ 3] cmp zp7f
|
| 8498 |
|
|
tst_a $7e,~fzc
|
| 8499 |
|
|
1e0d : 08 [ 3]> php ;save flags
|
| 8500 |
|
|
1e0e : 08 [ 3]> php
|
| 8501 |
|
|
1e0f : c97e [ 2]> cmp #$7e ;test result
|
| 8502 |
|
|
> trap_ne
|
| 8503 |
|
|
1e11 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8504 |
|
|
>
|
| 8505 |
|
|
1e13 : 68 [ 4]> pla ;load status
|
| 8506 |
|
|
> cmp_flag ~fzc
|
| 8507 |
|
|
1e14 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 8508 |
|
|
>
|
| 8509 |
|
|
> trap_ne
|
| 8510 |
|
|
1e16 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8511 |
|
|
>
|
| 8512 |
|
|
1e18 : 28 [ 4]> plp ;restore status
|
| 8513 |
|
|
|
| 8514 |
|
|
|
| 8515 |
|
|
set_a $80,0
|
| 8516 |
|
|
> load_flag 0
|
| 8517 |
|
|
1e19 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8518 |
|
|
>
|
| 8519 |
|
|
1e1b : 48 [ 3]> pha ;use stack to load status
|
| 8520 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 148
|
| 8521 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8522 |
|
|
|
| 8523 |
|
|
1e1c : a980 [ 2]> lda #$80 ;precharge accu
|
| 8524 |
|
|
1e1e : 28 [ 4]> plp
|
| 8525 |
|
|
|
| 8526 |
|
|
1e1f : cd0c02 [ 4] cmp abs7f
|
| 8527 |
|
|
tst_a $80,fc
|
| 8528 |
|
|
1e22 : 08 [ 3]> php ;save flags
|
| 8529 |
|
|
1e23 : 08 [ 3]> php
|
| 8530 |
|
|
1e24 : c980 [ 2]> cmp #$80 ;test result
|
| 8531 |
|
|
> trap_ne
|
| 8532 |
|
|
1e26 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8533 |
|
|
>
|
| 8534 |
|
|
1e28 : 68 [ 4]> pla ;load status
|
| 8535 |
|
|
> cmp_flag fc
|
| 8536 |
|
|
1e29 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 8537 |
|
|
>
|
| 8538 |
|
|
> trap_ne
|
| 8539 |
|
|
1e2b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8540 |
|
|
>
|
| 8541 |
|
|
1e2d : 28 [ 4]> plp ;restore status
|
| 8542 |
|
|
|
| 8543 |
|
|
set_a $7f,0
|
| 8544 |
|
|
> load_flag 0
|
| 8545 |
|
|
1e2e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8546 |
|
|
>
|
| 8547 |
|
|
1e30 : 48 [ 3]> pha ;use stack to load status
|
| 8548 |
|
|
1e31 : a97f [ 2]> lda #$7f ;precharge accu
|
| 8549 |
|
|
1e33 : 28 [ 4]> plp
|
| 8550 |
|
|
|
| 8551 |
|
|
1e34 : cd0c02 [ 4] cmp abs7f
|
| 8552 |
|
|
tst_a $7f,fzc
|
| 8553 |
|
|
1e37 : 08 [ 3]> php ;save flags
|
| 8554 |
|
|
1e38 : 08 [ 3]> php
|
| 8555 |
|
|
1e39 : c97f [ 2]> cmp #$7f ;test result
|
| 8556 |
|
|
> trap_ne
|
| 8557 |
|
|
1e3b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8558 |
|
|
>
|
| 8559 |
|
|
1e3d : 68 [ 4]> pla ;load status
|
| 8560 |
|
|
> cmp_flag fzc
|
| 8561 |
|
|
1e3e : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 8562 |
|
|
>
|
| 8563 |
|
|
> trap_ne
|
| 8564 |
|
|
1e40 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8565 |
|
|
>
|
| 8566 |
|
|
1e42 : 28 [ 4]> plp ;restore status
|
| 8567 |
|
|
|
| 8568 |
|
|
set_a $7e,0
|
| 8569 |
|
|
> load_flag 0
|
| 8570 |
|
|
1e43 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8571 |
|
|
>
|
| 8572 |
|
|
1e45 : 48 [ 3]> pha ;use stack to load status
|
| 8573 |
|
|
1e46 : a97e [ 2]> lda #$7e ;precharge accu
|
| 8574 |
|
|
1e48 : 28 [ 4]> plp
|
| 8575 |
|
|
|
| 8576 |
|
|
1e49 : cd0c02 [ 4] cmp abs7f
|
| 8577 |
|
|
tst_a $7e,fn
|
| 8578 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 149
|
| 8579 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8580 |
|
|
|
| 8581 |
|
|
1e4c : 08 [ 3]> php ;save flags
|
| 8582 |
|
|
1e4d : 08 [ 3]> php
|
| 8583 |
|
|
1e4e : c97e [ 2]> cmp #$7e ;test result
|
| 8584 |
|
|
> trap_ne
|
| 8585 |
|
|
1e50 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8586 |
|
|
>
|
| 8587 |
|
|
1e52 : 68 [ 4]> pla ;load status
|
| 8588 |
|
|
> cmp_flag fn
|
| 8589 |
|
|
1e53 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 8590 |
|
|
>
|
| 8591 |
|
|
> trap_ne
|
| 8592 |
|
|
1e55 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8593 |
|
|
>
|
| 8594 |
|
|
1e57 : 28 [ 4]> plp ;restore status
|
| 8595 |
|
|
|
| 8596 |
|
|
set_a $80,$ff
|
| 8597 |
|
|
> load_flag $ff
|
| 8598 |
|
|
1e58 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8599 |
|
|
>
|
| 8600 |
|
|
1e5a : 48 [ 3]> pha ;use stack to load status
|
| 8601 |
|
|
1e5b : a980 [ 2]> lda #$80 ;precharge accu
|
| 8602 |
|
|
1e5d : 28 [ 4]> plp
|
| 8603 |
|
|
|
| 8604 |
|
|
1e5e : cd0c02 [ 4] cmp abs7f
|
| 8605 |
|
|
tst_a $80,~fnz
|
| 8606 |
|
|
1e61 : 08 [ 3]> php ;save flags
|
| 8607 |
|
|
1e62 : 08 [ 3]> php
|
| 8608 |
|
|
1e63 : c980 [ 2]> cmp #$80 ;test result
|
| 8609 |
|
|
> trap_ne
|
| 8610 |
|
|
1e65 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8611 |
|
|
>
|
| 8612 |
|
|
1e67 : 68 [ 4]> pla ;load status
|
| 8613 |
|
|
> cmp_flag ~fnz
|
| 8614 |
|
|
1e68 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 8615 |
|
|
>
|
| 8616 |
|
|
> trap_ne
|
| 8617 |
|
|
1e6a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8618 |
|
|
>
|
| 8619 |
|
|
1e6c : 28 [ 4]> plp ;restore status
|
| 8620 |
|
|
|
| 8621 |
|
|
set_a $7f,$ff
|
| 8622 |
|
|
> load_flag $ff
|
| 8623 |
|
|
1e6d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8624 |
|
|
>
|
| 8625 |
|
|
1e6f : 48 [ 3]> pha ;use stack to load status
|
| 8626 |
|
|
1e70 : a97f [ 2]> lda #$7f ;precharge accu
|
| 8627 |
|
|
1e72 : 28 [ 4]> plp
|
| 8628 |
|
|
|
| 8629 |
|
|
1e73 : cd0c02 [ 4] cmp abs7f
|
| 8630 |
|
|
tst_a $7f,~fn
|
| 8631 |
|
|
1e76 : 08 [ 3]> php ;save flags
|
| 8632 |
|
|
1e77 : 08 [ 3]> php
|
| 8633 |
|
|
1e78 : c97f [ 2]> cmp #$7f ;test result
|
| 8634 |
|
|
> trap_ne
|
| 8635 |
|
|
1e7a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8636 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 150
|
| 8637 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8638 |
|
|
|
| 8639 |
|
|
>
|
| 8640 |
|
|
1e7c : 68 [ 4]> pla ;load status
|
| 8641 |
|
|
> cmp_flag ~fn
|
| 8642 |
|
|
1e7d : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 8643 |
|
|
>
|
| 8644 |
|
|
> trap_ne
|
| 8645 |
|
|
1e7f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8646 |
|
|
>
|
| 8647 |
|
|
1e81 : 28 [ 4]> plp ;restore status
|
| 8648 |
|
|
|
| 8649 |
|
|
set_a $7e,$ff
|
| 8650 |
|
|
> load_flag $ff
|
| 8651 |
|
|
1e82 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8652 |
|
|
>
|
| 8653 |
|
|
1e84 : 48 [ 3]> pha ;use stack to load status
|
| 8654 |
|
|
1e85 : a97e [ 2]> lda #$7e ;precharge accu
|
| 8655 |
|
|
1e87 : 28 [ 4]> plp
|
| 8656 |
|
|
|
| 8657 |
|
|
1e88 : cd0c02 [ 4] cmp abs7f
|
| 8658 |
|
|
tst_a $7e,~fzc
|
| 8659 |
|
|
1e8b : 08 [ 3]> php ;save flags
|
| 8660 |
|
|
1e8c : 08 [ 3]> php
|
| 8661 |
|
|
1e8d : c97e [ 2]> cmp #$7e ;test result
|
| 8662 |
|
|
> trap_ne
|
| 8663 |
|
|
1e8f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8664 |
|
|
>
|
| 8665 |
|
|
1e91 : 68 [ 4]> pla ;load status
|
| 8666 |
|
|
> cmp_flag ~fzc
|
| 8667 |
|
|
1e92 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 8668 |
|
|
>
|
| 8669 |
|
|
> trap_ne
|
| 8670 |
|
|
1e94 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8671 |
|
|
>
|
| 8672 |
|
|
1e96 : 28 [ 4]> plp ;restore status
|
| 8673 |
|
|
|
| 8674 |
|
|
|
| 8675 |
|
|
set_a $80,0
|
| 8676 |
|
|
> load_flag 0
|
| 8677 |
|
|
1e97 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8678 |
|
|
>
|
| 8679 |
|
|
1e99 : 48 [ 3]> pha ;use stack to load status
|
| 8680 |
|
|
1e9a : a980 [ 2]> lda #$80 ;precharge accu
|
| 8681 |
|
|
1e9c : 28 [ 4]> plp
|
| 8682 |
|
|
|
| 8683 |
|
|
1e9d : c97f [ 2] cmp #$7f
|
| 8684 |
|
|
tst_a $80,fc
|
| 8685 |
|
|
1e9f : 08 [ 3]> php ;save flags
|
| 8686 |
|
|
1ea0 : 08 [ 3]> php
|
| 8687 |
|
|
1ea1 : c980 [ 2]> cmp #$80 ;test result
|
| 8688 |
|
|
> trap_ne
|
| 8689 |
|
|
1ea3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8690 |
|
|
>
|
| 8691 |
|
|
1ea5 : 68 [ 4]> pla ;load status
|
| 8692 |
|
|
> cmp_flag fc
|
| 8693 |
|
|
1ea6 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 8694 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 151
|
| 8695 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8696 |
|
|
|
| 8697 |
|
|
>
|
| 8698 |
|
|
> trap_ne
|
| 8699 |
|
|
1ea8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8700 |
|
|
>
|
| 8701 |
|
|
1eaa : 28 [ 4]> plp ;restore status
|
| 8702 |
|
|
|
| 8703 |
|
|
set_a $7f,0
|
| 8704 |
|
|
> load_flag 0
|
| 8705 |
|
|
1eab : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8706 |
|
|
>
|
| 8707 |
|
|
1ead : 48 [ 3]> pha ;use stack to load status
|
| 8708 |
|
|
1eae : a97f [ 2]> lda #$7f ;precharge accu
|
| 8709 |
|
|
1eb0 : 28 [ 4]> plp
|
| 8710 |
|
|
|
| 8711 |
|
|
1eb1 : c97f [ 2] cmp #$7f
|
| 8712 |
|
|
tst_a $7f,fzc
|
| 8713 |
|
|
1eb3 : 08 [ 3]> php ;save flags
|
| 8714 |
|
|
1eb4 : 08 [ 3]> php
|
| 8715 |
|
|
1eb5 : c97f [ 2]> cmp #$7f ;test result
|
| 8716 |
|
|
> trap_ne
|
| 8717 |
|
|
1eb7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8718 |
|
|
>
|
| 8719 |
|
|
1eb9 : 68 [ 4]> pla ;load status
|
| 8720 |
|
|
> cmp_flag fzc
|
| 8721 |
|
|
1eba : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 8722 |
|
|
>
|
| 8723 |
|
|
> trap_ne
|
| 8724 |
|
|
1ebc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8725 |
|
|
>
|
| 8726 |
|
|
1ebe : 28 [ 4]> plp ;restore status
|
| 8727 |
|
|
|
| 8728 |
|
|
set_a $7e,0
|
| 8729 |
|
|
> load_flag 0
|
| 8730 |
|
|
1ebf : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8731 |
|
|
>
|
| 8732 |
|
|
1ec1 : 48 [ 3]> pha ;use stack to load status
|
| 8733 |
|
|
1ec2 : a97e [ 2]> lda #$7e ;precharge accu
|
| 8734 |
|
|
1ec4 : 28 [ 4]> plp
|
| 8735 |
|
|
|
| 8736 |
|
|
1ec5 : c97f [ 2] cmp #$7f
|
| 8737 |
|
|
tst_a $7e,fn
|
| 8738 |
|
|
1ec7 : 08 [ 3]> php ;save flags
|
| 8739 |
|
|
1ec8 : 08 [ 3]> php
|
| 8740 |
|
|
1ec9 : c97e [ 2]> cmp #$7e ;test result
|
| 8741 |
|
|
> trap_ne
|
| 8742 |
|
|
1ecb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8743 |
|
|
>
|
| 8744 |
|
|
1ecd : 68 [ 4]> pla ;load status
|
| 8745 |
|
|
> cmp_flag fn
|
| 8746 |
|
|
1ece : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 8747 |
|
|
>
|
| 8748 |
|
|
> trap_ne
|
| 8749 |
|
|
1ed0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8750 |
|
|
>
|
| 8751 |
|
|
1ed2 : 28 [ 4]> plp ;restore status
|
| 8752 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 152
|
| 8753 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8754 |
|
|
|
| 8755 |
|
|
|
| 8756 |
|
|
set_a $80,$ff
|
| 8757 |
|
|
> load_flag $ff
|
| 8758 |
|
|
1ed3 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8759 |
|
|
>
|
| 8760 |
|
|
1ed5 : 48 [ 3]> pha ;use stack to load status
|
| 8761 |
|
|
1ed6 : a980 [ 2]> lda #$80 ;precharge accu
|
| 8762 |
|
|
1ed8 : 28 [ 4]> plp
|
| 8763 |
|
|
|
| 8764 |
|
|
1ed9 : c97f [ 2] cmp #$7f
|
| 8765 |
|
|
tst_a $80,~fnz
|
| 8766 |
|
|
1edb : 08 [ 3]> php ;save flags
|
| 8767 |
|
|
1edc : 08 [ 3]> php
|
| 8768 |
|
|
1edd : c980 [ 2]> cmp #$80 ;test result
|
| 8769 |
|
|
> trap_ne
|
| 8770 |
|
|
1edf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8771 |
|
|
>
|
| 8772 |
|
|
1ee1 : 68 [ 4]> pla ;load status
|
| 8773 |
|
|
> cmp_flag ~fnz
|
| 8774 |
|
|
1ee2 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 8775 |
|
|
>
|
| 8776 |
|
|
> trap_ne
|
| 8777 |
|
|
1ee4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8778 |
|
|
>
|
| 8779 |
|
|
1ee6 : 28 [ 4]> plp ;restore status
|
| 8780 |
|
|
|
| 8781 |
|
|
set_a $7f,$ff
|
| 8782 |
|
|
> load_flag $ff
|
| 8783 |
|
|
1ee7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8784 |
|
|
>
|
| 8785 |
|
|
1ee9 : 48 [ 3]> pha ;use stack to load status
|
| 8786 |
|
|
1eea : a97f [ 2]> lda #$7f ;precharge accu
|
| 8787 |
|
|
1eec : 28 [ 4]> plp
|
| 8788 |
|
|
|
| 8789 |
|
|
1eed : c97f [ 2] cmp #$7f
|
| 8790 |
|
|
tst_a $7f,~fn
|
| 8791 |
|
|
1eef : 08 [ 3]> php ;save flags
|
| 8792 |
|
|
1ef0 : 08 [ 3]> php
|
| 8793 |
|
|
1ef1 : c97f [ 2]> cmp #$7f ;test result
|
| 8794 |
|
|
> trap_ne
|
| 8795 |
|
|
1ef3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8796 |
|
|
>
|
| 8797 |
|
|
1ef5 : 68 [ 4]> pla ;load status
|
| 8798 |
|
|
> cmp_flag ~fn
|
| 8799 |
|
|
1ef6 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 8800 |
|
|
>
|
| 8801 |
|
|
> trap_ne
|
| 8802 |
|
|
1ef8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8803 |
|
|
>
|
| 8804 |
|
|
1efa : 28 [ 4]> plp ;restore status
|
| 8805 |
|
|
|
| 8806 |
|
|
set_a $7e,$ff
|
| 8807 |
|
|
> load_flag $ff
|
| 8808 |
|
|
1efb : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8809 |
|
|
>
|
| 8810 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 153
|
| 8811 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8812 |
|
|
|
| 8813 |
|
|
1efd : 48 [ 3]> pha ;use stack to load status
|
| 8814 |
|
|
1efe : a97e [ 2]> lda #$7e ;precharge accu
|
| 8815 |
|
|
1f00 : 28 [ 4]> plp
|
| 8816 |
|
|
|
| 8817 |
|
|
1f01 : c97f [ 2] cmp #$7f
|
| 8818 |
|
|
tst_a $7e,~fzc
|
| 8819 |
|
|
1f03 : 08 [ 3]> php ;save flags
|
| 8820 |
|
|
1f04 : 08 [ 3]> php
|
| 8821 |
|
|
1f05 : c97e [ 2]> cmp #$7e ;test result
|
| 8822 |
|
|
> trap_ne
|
| 8823 |
|
|
1f07 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8824 |
|
|
>
|
| 8825 |
|
|
1f09 : 68 [ 4]> pla ;load status
|
| 8826 |
|
|
> cmp_flag ~fzc
|
| 8827 |
|
|
1f0a : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 8828 |
|
|
>
|
| 8829 |
|
|
> trap_ne
|
| 8830 |
|
|
1f0c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8831 |
|
|
>
|
| 8832 |
|
|
1f0e : 28 [ 4]> plp ;restore status
|
| 8833 |
|
|
|
| 8834 |
|
|
|
| 8835 |
|
|
1f0f : a204 [ 2] ldx #4 ;with indexing by X
|
| 8836 |
|
|
set_a $80,0
|
| 8837 |
|
|
> load_flag 0
|
| 8838 |
|
|
1f11 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8839 |
|
|
>
|
| 8840 |
|
|
1f13 : 48 [ 3]> pha ;use stack to load status
|
| 8841 |
|
|
1f14 : a980 [ 2]> lda #$80 ;precharge accu
|
| 8842 |
|
|
1f16 : 28 [ 4]> plp
|
| 8843 |
|
|
|
| 8844 |
|
|
1f17 : d513 [ 4] cmp zp1,x
|
| 8845 |
|
|
tst_a $80,fc
|
| 8846 |
|
|
1f19 : 08 [ 3]> php ;save flags
|
| 8847 |
|
|
1f1a : 08 [ 3]> php
|
| 8848 |
|
|
1f1b : c980 [ 2]> cmp #$80 ;test result
|
| 8849 |
|
|
> trap_ne
|
| 8850 |
|
|
1f1d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8851 |
|
|
>
|
| 8852 |
|
|
1f1f : 68 [ 4]> pla ;load status
|
| 8853 |
|
|
> cmp_flag fc
|
| 8854 |
|
|
1f20 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 8855 |
|
|
>
|
| 8856 |
|
|
> trap_ne
|
| 8857 |
|
|
1f22 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8858 |
|
|
>
|
| 8859 |
|
|
1f24 : 28 [ 4]> plp ;restore status
|
| 8860 |
|
|
|
| 8861 |
|
|
set_a $7f,0
|
| 8862 |
|
|
> load_flag 0
|
| 8863 |
|
|
1f25 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8864 |
|
|
>
|
| 8865 |
|
|
1f27 : 48 [ 3]> pha ;use stack to load status
|
| 8866 |
|
|
1f28 : a97f [ 2]> lda #$7f ;precharge accu
|
| 8867 |
|
|
1f2a : 28 [ 4]> plp
|
| 8868 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 154
|
| 8869 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8870 |
|
|
|
| 8871 |
|
|
|
| 8872 |
|
|
1f2b : d513 [ 4] cmp zp1,x
|
| 8873 |
|
|
tst_a $7f,fzc
|
| 8874 |
|
|
1f2d : 08 [ 3]> php ;save flags
|
| 8875 |
|
|
1f2e : 08 [ 3]> php
|
| 8876 |
|
|
1f2f : c97f [ 2]> cmp #$7f ;test result
|
| 8877 |
|
|
> trap_ne
|
| 8878 |
|
|
1f31 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8879 |
|
|
>
|
| 8880 |
|
|
1f33 : 68 [ 4]> pla ;load status
|
| 8881 |
|
|
> cmp_flag fzc
|
| 8882 |
|
|
1f34 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 8883 |
|
|
>
|
| 8884 |
|
|
> trap_ne
|
| 8885 |
|
|
1f36 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8886 |
|
|
>
|
| 8887 |
|
|
1f38 : 28 [ 4]> plp ;restore status
|
| 8888 |
|
|
|
| 8889 |
|
|
set_a $7e,0
|
| 8890 |
|
|
> load_flag 0
|
| 8891 |
|
|
1f39 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8892 |
|
|
>
|
| 8893 |
|
|
1f3b : 48 [ 3]> pha ;use stack to load status
|
| 8894 |
|
|
1f3c : a97e [ 2]> lda #$7e ;precharge accu
|
| 8895 |
|
|
1f3e : 28 [ 4]> plp
|
| 8896 |
|
|
|
| 8897 |
|
|
1f3f : d513 [ 4] cmp zp1,x
|
| 8898 |
|
|
tst_a $7e,fn
|
| 8899 |
|
|
1f41 : 08 [ 3]> php ;save flags
|
| 8900 |
|
|
1f42 : 08 [ 3]> php
|
| 8901 |
|
|
1f43 : c97e [ 2]> cmp #$7e ;test result
|
| 8902 |
|
|
> trap_ne
|
| 8903 |
|
|
1f45 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8904 |
|
|
>
|
| 8905 |
|
|
1f47 : 68 [ 4]> pla ;load status
|
| 8906 |
|
|
> cmp_flag fn
|
| 8907 |
|
|
1f48 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 8908 |
|
|
>
|
| 8909 |
|
|
> trap_ne
|
| 8910 |
|
|
1f4a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8911 |
|
|
>
|
| 8912 |
|
|
1f4c : 28 [ 4]> plp ;restore status
|
| 8913 |
|
|
|
| 8914 |
|
|
set_a $80,$ff
|
| 8915 |
|
|
> load_flag $ff
|
| 8916 |
|
|
1f4d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8917 |
|
|
>
|
| 8918 |
|
|
1f4f : 48 [ 3]> pha ;use stack to load status
|
| 8919 |
|
|
1f50 : a980 [ 2]> lda #$80 ;precharge accu
|
| 8920 |
|
|
1f52 : 28 [ 4]> plp
|
| 8921 |
|
|
|
| 8922 |
|
|
1f53 : d513 [ 4] cmp zp1,x
|
| 8923 |
|
|
tst_a $80,~fnz
|
| 8924 |
|
|
1f55 : 08 [ 3]> php ;save flags
|
| 8925 |
|
|
1f56 : 08 [ 3]> php
|
| 8926 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 155
|
| 8927 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8928 |
|
|
|
| 8929 |
|
|
1f57 : c980 [ 2]> cmp #$80 ;test result
|
| 8930 |
|
|
> trap_ne
|
| 8931 |
|
|
1f59 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8932 |
|
|
>
|
| 8933 |
|
|
1f5b : 68 [ 4]> pla ;load status
|
| 8934 |
|
|
> cmp_flag ~fnz
|
| 8935 |
|
|
1f5c : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 8936 |
|
|
>
|
| 8937 |
|
|
> trap_ne
|
| 8938 |
|
|
1f5e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8939 |
|
|
>
|
| 8940 |
|
|
1f60 : 28 [ 4]> plp ;restore status
|
| 8941 |
|
|
|
| 8942 |
|
|
set_a $7f,$ff
|
| 8943 |
|
|
> load_flag $ff
|
| 8944 |
|
|
1f61 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8945 |
|
|
>
|
| 8946 |
|
|
1f63 : 48 [ 3]> pha ;use stack to load status
|
| 8947 |
|
|
1f64 : a97f [ 2]> lda #$7f ;precharge accu
|
| 8948 |
|
|
1f66 : 28 [ 4]> plp
|
| 8949 |
|
|
|
| 8950 |
|
|
1f67 : d513 [ 4] cmp zp1,x
|
| 8951 |
|
|
tst_a $7f,~fn
|
| 8952 |
|
|
1f69 : 08 [ 3]> php ;save flags
|
| 8953 |
|
|
1f6a : 08 [ 3]> php
|
| 8954 |
|
|
1f6b : c97f [ 2]> cmp #$7f ;test result
|
| 8955 |
|
|
> trap_ne
|
| 8956 |
|
|
1f6d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8957 |
|
|
>
|
| 8958 |
|
|
1f6f : 68 [ 4]> pla ;load status
|
| 8959 |
|
|
> cmp_flag ~fn
|
| 8960 |
|
|
1f70 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 8961 |
|
|
>
|
| 8962 |
|
|
> trap_ne
|
| 8963 |
|
|
1f72 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8964 |
|
|
>
|
| 8965 |
|
|
1f74 : 28 [ 4]> plp ;restore status
|
| 8966 |
|
|
|
| 8967 |
|
|
set_a $7e,$ff
|
| 8968 |
|
|
> load_flag $ff
|
| 8969 |
|
|
1f75 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 8970 |
|
|
>
|
| 8971 |
|
|
1f77 : 48 [ 3]> pha ;use stack to load status
|
| 8972 |
|
|
1f78 : a97e [ 2]> lda #$7e ;precharge accu
|
| 8973 |
|
|
1f7a : 28 [ 4]> plp
|
| 8974 |
|
|
|
| 8975 |
|
|
1f7b : d513 [ 4] cmp zp1,x
|
| 8976 |
|
|
tst_a $7e,~fzc
|
| 8977 |
|
|
1f7d : 08 [ 3]> php ;save flags
|
| 8978 |
|
|
1f7e : 08 [ 3]> php
|
| 8979 |
|
|
1f7f : c97e [ 2]> cmp #$7e ;test result
|
| 8980 |
|
|
> trap_ne
|
| 8981 |
|
|
1f81 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8982 |
|
|
>
|
| 8983 |
|
|
1f83 : 68 [ 4]> pla ;load status
|
| 8984 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 156
|
| 8985 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 8986 |
|
|
|
| 8987 |
|
|
> cmp_flag ~fzc
|
| 8988 |
|
|
1f84 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 8989 |
|
|
>
|
| 8990 |
|
|
> trap_ne
|
| 8991 |
|
|
1f86 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 8992 |
|
|
>
|
| 8993 |
|
|
1f88 : 28 [ 4]> plp ;restore status
|
| 8994 |
|
|
|
| 8995 |
|
|
|
| 8996 |
|
|
set_a $80,0
|
| 8997 |
|
|
> load_flag 0
|
| 8998 |
|
|
1f89 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 8999 |
|
|
>
|
| 9000 |
|
|
1f8b : 48 [ 3]> pha ;use stack to load status
|
| 9001 |
|
|
1f8c : a980 [ 2]> lda #$80 ;precharge accu
|
| 9002 |
|
|
1f8e : 28 [ 4]> plp
|
| 9003 |
|
|
|
| 9004 |
|
|
1f8f : dd0802 [ 4] cmp abs1,x
|
| 9005 |
|
|
tst_a $80,fc
|
| 9006 |
|
|
1f92 : 08 [ 3]> php ;save flags
|
| 9007 |
|
|
1f93 : 08 [ 3]> php
|
| 9008 |
|
|
1f94 : c980 [ 2]> cmp #$80 ;test result
|
| 9009 |
|
|
> trap_ne
|
| 9010 |
|
|
1f96 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9011 |
|
|
>
|
| 9012 |
|
|
1f98 : 68 [ 4]> pla ;load status
|
| 9013 |
|
|
> cmp_flag fc
|
| 9014 |
|
|
1f99 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 9015 |
|
|
>
|
| 9016 |
|
|
> trap_ne
|
| 9017 |
|
|
1f9b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9018 |
|
|
>
|
| 9019 |
|
|
1f9d : 28 [ 4]> plp ;restore status
|
| 9020 |
|
|
|
| 9021 |
|
|
set_a $7f,0
|
| 9022 |
|
|
> load_flag 0
|
| 9023 |
|
|
1f9e : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9024 |
|
|
>
|
| 9025 |
|
|
1fa0 : 48 [ 3]> pha ;use stack to load status
|
| 9026 |
|
|
1fa1 : a97f [ 2]> lda #$7f ;precharge accu
|
| 9027 |
|
|
1fa3 : 28 [ 4]> plp
|
| 9028 |
|
|
|
| 9029 |
|
|
1fa4 : dd0802 [ 4] cmp abs1,x
|
| 9030 |
|
|
tst_a $7f,fzc
|
| 9031 |
|
|
1fa7 : 08 [ 3]> php ;save flags
|
| 9032 |
|
|
1fa8 : 08 [ 3]> php
|
| 9033 |
|
|
1fa9 : c97f [ 2]> cmp #$7f ;test result
|
| 9034 |
|
|
> trap_ne
|
| 9035 |
|
|
1fab : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9036 |
|
|
>
|
| 9037 |
|
|
1fad : 68 [ 4]> pla ;load status
|
| 9038 |
|
|
> cmp_flag fzc
|
| 9039 |
|
|
1fae : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 9040 |
|
|
>
|
| 9041 |
|
|
> trap_ne
|
| 9042 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 157
|
| 9043 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9044 |
|
|
|
| 9045 |
|
|
1fb0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9046 |
|
|
>
|
| 9047 |
|
|
1fb2 : 28 [ 4]> plp ;restore status
|
| 9048 |
|
|
|
| 9049 |
|
|
set_a $7e,0
|
| 9050 |
|
|
> load_flag 0
|
| 9051 |
|
|
1fb3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9052 |
|
|
>
|
| 9053 |
|
|
1fb5 : 48 [ 3]> pha ;use stack to load status
|
| 9054 |
|
|
1fb6 : a97e [ 2]> lda #$7e ;precharge accu
|
| 9055 |
|
|
1fb8 : 28 [ 4]> plp
|
| 9056 |
|
|
|
| 9057 |
|
|
1fb9 : dd0802 [ 4] cmp abs1,x
|
| 9058 |
|
|
tst_a $7e,fn
|
| 9059 |
|
|
1fbc : 08 [ 3]> php ;save flags
|
| 9060 |
|
|
1fbd : 08 [ 3]> php
|
| 9061 |
|
|
1fbe : c97e [ 2]> cmp #$7e ;test result
|
| 9062 |
|
|
> trap_ne
|
| 9063 |
|
|
1fc0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9064 |
|
|
>
|
| 9065 |
|
|
1fc2 : 68 [ 4]> pla ;load status
|
| 9066 |
|
|
> cmp_flag fn
|
| 9067 |
|
|
1fc3 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 9068 |
|
|
>
|
| 9069 |
|
|
> trap_ne
|
| 9070 |
|
|
1fc5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9071 |
|
|
>
|
| 9072 |
|
|
1fc7 : 28 [ 4]> plp ;restore status
|
| 9073 |
|
|
|
| 9074 |
|
|
set_a $80,$ff
|
| 9075 |
|
|
> load_flag $ff
|
| 9076 |
|
|
1fc8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9077 |
|
|
>
|
| 9078 |
|
|
1fca : 48 [ 3]> pha ;use stack to load status
|
| 9079 |
|
|
1fcb : a980 [ 2]> lda #$80 ;precharge accu
|
| 9080 |
|
|
1fcd : 28 [ 4]> plp
|
| 9081 |
|
|
|
| 9082 |
|
|
1fce : dd0802 [ 4] cmp abs1,x
|
| 9083 |
|
|
tst_a $80,~fnz
|
| 9084 |
|
|
1fd1 : 08 [ 3]> php ;save flags
|
| 9085 |
|
|
1fd2 : 08 [ 3]> php
|
| 9086 |
|
|
1fd3 : c980 [ 2]> cmp #$80 ;test result
|
| 9087 |
|
|
> trap_ne
|
| 9088 |
|
|
1fd5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9089 |
|
|
>
|
| 9090 |
|
|
1fd7 : 68 [ 4]> pla ;load status
|
| 9091 |
|
|
> cmp_flag ~fnz
|
| 9092 |
|
|
1fd8 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 9093 |
|
|
>
|
| 9094 |
|
|
> trap_ne
|
| 9095 |
|
|
1fda : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9096 |
|
|
>
|
| 9097 |
|
|
1fdc : 28 [ 4]> plp ;restore status
|
| 9098 |
|
|
|
| 9099 |
|
|
set_a $7f,$ff
|
| 9100 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 158
|
| 9101 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9102 |
|
|
|
| 9103 |
|
|
> load_flag $ff
|
| 9104 |
|
|
1fdd : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9105 |
|
|
>
|
| 9106 |
|
|
1fdf : 48 [ 3]> pha ;use stack to load status
|
| 9107 |
|
|
1fe0 : a97f [ 2]> lda #$7f ;precharge accu
|
| 9108 |
|
|
1fe2 : 28 [ 4]> plp
|
| 9109 |
|
|
|
| 9110 |
|
|
1fe3 : dd0802 [ 4] cmp abs1,x
|
| 9111 |
|
|
tst_a $7f,~fn
|
| 9112 |
|
|
1fe6 : 08 [ 3]> php ;save flags
|
| 9113 |
|
|
1fe7 : 08 [ 3]> php
|
| 9114 |
|
|
1fe8 : c97f [ 2]> cmp #$7f ;test result
|
| 9115 |
|
|
> trap_ne
|
| 9116 |
|
|
1fea : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9117 |
|
|
>
|
| 9118 |
|
|
1fec : 68 [ 4]> pla ;load status
|
| 9119 |
|
|
> cmp_flag ~fn
|
| 9120 |
|
|
1fed : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 9121 |
|
|
>
|
| 9122 |
|
|
> trap_ne
|
| 9123 |
|
|
1fef : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9124 |
|
|
>
|
| 9125 |
|
|
1ff1 : 28 [ 4]> plp ;restore status
|
| 9126 |
|
|
|
| 9127 |
|
|
set_a $7e,$ff
|
| 9128 |
|
|
> load_flag $ff
|
| 9129 |
|
|
1ff2 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9130 |
|
|
>
|
| 9131 |
|
|
1ff4 : 48 [ 3]> pha ;use stack to load status
|
| 9132 |
|
|
1ff5 : a97e [ 2]> lda #$7e ;precharge accu
|
| 9133 |
|
|
1ff7 : 28 [ 4]> plp
|
| 9134 |
|
|
|
| 9135 |
|
|
1ff8 : dd0802 [ 4] cmp abs1,x
|
| 9136 |
|
|
tst_a $7e,~fzc
|
| 9137 |
|
|
1ffb : 08 [ 3]> php ;save flags
|
| 9138 |
|
|
1ffc : 08 [ 3]> php
|
| 9139 |
|
|
1ffd : c97e [ 2]> cmp #$7e ;test result
|
| 9140 |
|
|
> trap_ne
|
| 9141 |
|
|
1fff : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9142 |
|
|
>
|
| 9143 |
|
|
2001 : 68 [ 4]> pla ;load status
|
| 9144 |
|
|
> cmp_flag ~fzc
|
| 9145 |
|
|
2002 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 9146 |
|
|
>
|
| 9147 |
|
|
> trap_ne
|
| 9148 |
|
|
2004 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9149 |
|
|
>
|
| 9150 |
|
|
2006 : 28 [ 4]> plp ;restore status
|
| 9151 |
|
|
|
| 9152 |
|
|
|
| 9153 |
|
|
2007 : a004 [ 2] ldy #4 ;with indexing by Y
|
| 9154 |
|
|
2009 : a208 [ 2] ldx #8 ;with indexed indirect
|
| 9155 |
|
|
set_a $80,0
|
| 9156 |
|
|
> load_flag 0
|
| 9157 |
|
|
200b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9158 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 159
|
| 9159 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9160 |
|
|
|
| 9161 |
|
|
>
|
| 9162 |
|
|
200d : 48 [ 3]> pha ;use stack to load status
|
| 9163 |
|
|
200e : a980 [ 2]> lda #$80 ;precharge accu
|
| 9164 |
|
|
2010 : 28 [ 4]> plp
|
| 9165 |
|
|
|
| 9166 |
|
|
2011 : d90802 [ 4] cmp abs1,y
|
| 9167 |
|
|
tst_a $80,fc
|
| 9168 |
|
|
2014 : 08 [ 3]> php ;save flags
|
| 9169 |
|
|
2015 : 08 [ 3]> php
|
| 9170 |
|
|
2016 : c980 [ 2]> cmp #$80 ;test result
|
| 9171 |
|
|
> trap_ne
|
| 9172 |
|
|
2018 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9173 |
|
|
>
|
| 9174 |
|
|
201a : 68 [ 4]> pla ;load status
|
| 9175 |
|
|
> cmp_flag fc
|
| 9176 |
|
|
201b : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 9177 |
|
|
>
|
| 9178 |
|
|
> trap_ne
|
| 9179 |
|
|
201d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9180 |
|
|
>
|
| 9181 |
|
|
201f : 28 [ 4]> plp ;restore status
|
| 9182 |
|
|
|
| 9183 |
|
|
set_a $7f,0
|
| 9184 |
|
|
> load_flag 0
|
| 9185 |
|
|
2020 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9186 |
|
|
>
|
| 9187 |
|
|
2022 : 48 [ 3]> pha ;use stack to load status
|
| 9188 |
|
|
2023 : a97f [ 2]> lda #$7f ;precharge accu
|
| 9189 |
|
|
2025 : 28 [ 4]> plp
|
| 9190 |
|
|
|
| 9191 |
|
|
2026 : d90802 [ 4] cmp abs1,y
|
| 9192 |
|
|
tst_a $7f,fzc
|
| 9193 |
|
|
2029 : 08 [ 3]> php ;save flags
|
| 9194 |
|
|
202a : 08 [ 3]> php
|
| 9195 |
|
|
202b : c97f [ 2]> cmp #$7f ;test result
|
| 9196 |
|
|
> trap_ne
|
| 9197 |
|
|
202d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9198 |
|
|
>
|
| 9199 |
|
|
202f : 68 [ 4]> pla ;load status
|
| 9200 |
|
|
> cmp_flag fzc
|
| 9201 |
|
|
2030 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 9202 |
|
|
>
|
| 9203 |
|
|
> trap_ne
|
| 9204 |
|
|
2032 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9205 |
|
|
>
|
| 9206 |
|
|
2034 : 28 [ 4]> plp ;restore status
|
| 9207 |
|
|
|
| 9208 |
|
|
set_a $7e,0
|
| 9209 |
|
|
> load_flag 0
|
| 9210 |
|
|
2035 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9211 |
|
|
>
|
| 9212 |
|
|
2037 : 48 [ 3]> pha ;use stack to load status
|
| 9213 |
|
|
2038 : a97e [ 2]> lda #$7e ;precharge accu
|
| 9214 |
|
|
203a : 28 [ 4]> plp
|
| 9215 |
|
|
|
| 9216 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 160
|
| 9217 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9218 |
|
|
|
| 9219 |
|
|
203b : d90802 [ 4] cmp abs1,y
|
| 9220 |
|
|
tst_a $7e,fn
|
| 9221 |
|
|
203e : 08 [ 3]> php ;save flags
|
| 9222 |
|
|
203f : 08 [ 3]> php
|
| 9223 |
|
|
2040 : c97e [ 2]> cmp #$7e ;test result
|
| 9224 |
|
|
> trap_ne
|
| 9225 |
|
|
2042 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9226 |
|
|
>
|
| 9227 |
|
|
2044 : 68 [ 4]> pla ;load status
|
| 9228 |
|
|
> cmp_flag fn
|
| 9229 |
|
|
2045 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 9230 |
|
|
>
|
| 9231 |
|
|
> trap_ne
|
| 9232 |
|
|
2047 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9233 |
|
|
>
|
| 9234 |
|
|
2049 : 28 [ 4]> plp ;restore status
|
| 9235 |
|
|
|
| 9236 |
|
|
set_a $80,$ff
|
| 9237 |
|
|
> load_flag $ff
|
| 9238 |
|
|
204a : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9239 |
|
|
>
|
| 9240 |
|
|
204c : 48 [ 3]> pha ;use stack to load status
|
| 9241 |
|
|
204d : a980 [ 2]> lda #$80 ;precharge accu
|
| 9242 |
|
|
204f : 28 [ 4]> plp
|
| 9243 |
|
|
|
| 9244 |
|
|
2050 : d90802 [ 4] cmp abs1,y
|
| 9245 |
|
|
tst_a $80,~fnz
|
| 9246 |
|
|
2053 : 08 [ 3]> php ;save flags
|
| 9247 |
|
|
2054 : 08 [ 3]> php
|
| 9248 |
|
|
2055 : c980 [ 2]> cmp #$80 ;test result
|
| 9249 |
|
|
> trap_ne
|
| 9250 |
|
|
2057 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9251 |
|
|
>
|
| 9252 |
|
|
2059 : 68 [ 4]> pla ;load status
|
| 9253 |
|
|
> cmp_flag ~fnz
|
| 9254 |
|
|
205a : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 9255 |
|
|
>
|
| 9256 |
|
|
> trap_ne
|
| 9257 |
|
|
205c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9258 |
|
|
>
|
| 9259 |
|
|
205e : 28 [ 4]> plp ;restore status
|
| 9260 |
|
|
|
| 9261 |
|
|
set_a $7f,$ff
|
| 9262 |
|
|
> load_flag $ff
|
| 9263 |
|
|
205f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9264 |
|
|
>
|
| 9265 |
|
|
2061 : 48 [ 3]> pha ;use stack to load status
|
| 9266 |
|
|
2062 : a97f [ 2]> lda #$7f ;precharge accu
|
| 9267 |
|
|
2064 : 28 [ 4]> plp
|
| 9268 |
|
|
|
| 9269 |
|
|
2065 : d90802 [ 4] cmp abs1,y
|
| 9270 |
|
|
tst_a $7f,~fn
|
| 9271 |
|
|
2068 : 08 [ 3]> php ;save flags
|
| 9272 |
|
|
2069 : 08 [ 3]> php
|
| 9273 |
|
|
206a : c97f [ 2]> cmp #$7f ;test result
|
| 9274 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 161
|
| 9275 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9276 |
|
|
|
| 9277 |
|
|
> trap_ne
|
| 9278 |
|
|
206c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9279 |
|
|
>
|
| 9280 |
|
|
206e : 68 [ 4]> pla ;load status
|
| 9281 |
|
|
> cmp_flag ~fn
|
| 9282 |
|
|
206f : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 9283 |
|
|
>
|
| 9284 |
|
|
> trap_ne
|
| 9285 |
|
|
2071 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9286 |
|
|
>
|
| 9287 |
|
|
2073 : 28 [ 4]> plp ;restore status
|
| 9288 |
|
|
|
| 9289 |
|
|
set_a $7e,$ff
|
| 9290 |
|
|
> load_flag $ff
|
| 9291 |
|
|
2074 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9292 |
|
|
>
|
| 9293 |
|
|
2076 : 48 [ 3]> pha ;use stack to load status
|
| 9294 |
|
|
2077 : a97e [ 2]> lda #$7e ;precharge accu
|
| 9295 |
|
|
2079 : 28 [ 4]> plp
|
| 9296 |
|
|
|
| 9297 |
|
|
207a : d90802 [ 4] cmp abs1,y
|
| 9298 |
|
|
tst_a $7e,~fzc
|
| 9299 |
|
|
207d : 08 [ 3]> php ;save flags
|
| 9300 |
|
|
207e : 08 [ 3]> php
|
| 9301 |
|
|
207f : c97e [ 2]> cmp #$7e ;test result
|
| 9302 |
|
|
> trap_ne
|
| 9303 |
|
|
2081 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9304 |
|
|
>
|
| 9305 |
|
|
2083 : 68 [ 4]> pla ;load status
|
| 9306 |
|
|
> cmp_flag ~fzc
|
| 9307 |
|
|
2084 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 9308 |
|
|
>
|
| 9309 |
|
|
> trap_ne
|
| 9310 |
|
|
2086 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9311 |
|
|
>
|
| 9312 |
|
|
2088 : 28 [ 4]> plp ;restore status
|
| 9313 |
|
|
|
| 9314 |
|
|
|
| 9315 |
|
|
set_a $80,0
|
| 9316 |
|
|
> load_flag 0
|
| 9317 |
|
|
2089 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9318 |
|
|
>
|
| 9319 |
|
|
208b : 48 [ 3]> pha ;use stack to load status
|
| 9320 |
|
|
208c : a980 [ 2]> lda #$80 ;precharge accu
|
| 9321 |
|
|
208e : 28 [ 4]> plp
|
| 9322 |
|
|
|
| 9323 |
|
|
208f : c124 [ 6] cmp (ind1,x)
|
| 9324 |
|
|
tst_a $80,fc
|
| 9325 |
|
|
2091 : 08 [ 3]> php ;save flags
|
| 9326 |
|
|
2092 : 08 [ 3]> php
|
| 9327 |
|
|
2093 : c980 [ 2]> cmp #$80 ;test result
|
| 9328 |
|
|
> trap_ne
|
| 9329 |
|
|
2095 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9330 |
|
|
>
|
| 9331 |
|
|
2097 : 68 [ 4]> pla ;load status
|
| 9332 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 162
|
| 9333 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9334 |
|
|
|
| 9335 |
|
|
> cmp_flag fc
|
| 9336 |
|
|
2098 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 9337 |
|
|
>
|
| 9338 |
|
|
> trap_ne
|
| 9339 |
|
|
209a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9340 |
|
|
>
|
| 9341 |
|
|
209c : 28 [ 4]> plp ;restore status
|
| 9342 |
|
|
|
| 9343 |
|
|
set_a $7f,0
|
| 9344 |
|
|
> load_flag 0
|
| 9345 |
|
|
209d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9346 |
|
|
>
|
| 9347 |
|
|
209f : 48 [ 3]> pha ;use stack to load status
|
| 9348 |
|
|
20a0 : a97f [ 2]> lda #$7f ;precharge accu
|
| 9349 |
|
|
20a2 : 28 [ 4]> plp
|
| 9350 |
|
|
|
| 9351 |
|
|
20a3 : c124 [ 6] cmp (ind1,x)
|
| 9352 |
|
|
tst_a $7f,fzc
|
| 9353 |
|
|
20a5 : 08 [ 3]> php ;save flags
|
| 9354 |
|
|
20a6 : 08 [ 3]> php
|
| 9355 |
|
|
20a7 : c97f [ 2]> cmp #$7f ;test result
|
| 9356 |
|
|
> trap_ne
|
| 9357 |
|
|
20a9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9358 |
|
|
>
|
| 9359 |
|
|
20ab : 68 [ 4]> pla ;load status
|
| 9360 |
|
|
> cmp_flag fzc
|
| 9361 |
|
|
20ac : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 9362 |
|
|
>
|
| 9363 |
|
|
> trap_ne
|
| 9364 |
|
|
20ae : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9365 |
|
|
>
|
| 9366 |
|
|
20b0 : 28 [ 4]> plp ;restore status
|
| 9367 |
|
|
|
| 9368 |
|
|
set_a $7e,0
|
| 9369 |
|
|
> load_flag 0
|
| 9370 |
|
|
20b1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9371 |
|
|
>
|
| 9372 |
|
|
20b3 : 48 [ 3]> pha ;use stack to load status
|
| 9373 |
|
|
20b4 : a97e [ 2]> lda #$7e ;precharge accu
|
| 9374 |
|
|
20b6 : 28 [ 4]> plp
|
| 9375 |
|
|
|
| 9376 |
|
|
20b7 : c124 [ 6] cmp (ind1,x)
|
| 9377 |
|
|
tst_a $7e,fn
|
| 9378 |
|
|
20b9 : 08 [ 3]> php ;save flags
|
| 9379 |
|
|
20ba : 08 [ 3]> php
|
| 9380 |
|
|
20bb : c97e [ 2]> cmp #$7e ;test result
|
| 9381 |
|
|
> trap_ne
|
| 9382 |
|
|
20bd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9383 |
|
|
>
|
| 9384 |
|
|
20bf : 68 [ 4]> pla ;load status
|
| 9385 |
|
|
> cmp_flag fn
|
| 9386 |
|
|
20c0 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 9387 |
|
|
>
|
| 9388 |
|
|
> trap_ne
|
| 9389 |
|
|
20c2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9390 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 163
|
| 9391 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9392 |
|
|
|
| 9393 |
|
|
>
|
| 9394 |
|
|
20c4 : 28 [ 4]> plp ;restore status
|
| 9395 |
|
|
|
| 9396 |
|
|
set_a $80,$ff
|
| 9397 |
|
|
> load_flag $ff
|
| 9398 |
|
|
20c5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9399 |
|
|
>
|
| 9400 |
|
|
20c7 : 48 [ 3]> pha ;use stack to load status
|
| 9401 |
|
|
20c8 : a980 [ 2]> lda #$80 ;precharge accu
|
| 9402 |
|
|
20ca : 28 [ 4]> plp
|
| 9403 |
|
|
|
| 9404 |
|
|
20cb : c124 [ 6] cmp (ind1,x)
|
| 9405 |
|
|
tst_a $80,~fnz
|
| 9406 |
|
|
20cd : 08 [ 3]> php ;save flags
|
| 9407 |
|
|
20ce : 08 [ 3]> php
|
| 9408 |
|
|
20cf : c980 [ 2]> cmp #$80 ;test result
|
| 9409 |
|
|
> trap_ne
|
| 9410 |
|
|
20d1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9411 |
|
|
>
|
| 9412 |
|
|
20d3 : 68 [ 4]> pla ;load status
|
| 9413 |
|
|
> cmp_flag ~fnz
|
| 9414 |
|
|
20d4 : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 9415 |
|
|
>
|
| 9416 |
|
|
> trap_ne
|
| 9417 |
|
|
20d6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9418 |
|
|
>
|
| 9419 |
|
|
20d8 : 28 [ 4]> plp ;restore status
|
| 9420 |
|
|
|
| 9421 |
|
|
set_a $7f,$ff
|
| 9422 |
|
|
> load_flag $ff
|
| 9423 |
|
|
20d9 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9424 |
|
|
>
|
| 9425 |
|
|
20db : 48 [ 3]> pha ;use stack to load status
|
| 9426 |
|
|
20dc : a97f [ 2]> lda #$7f ;precharge accu
|
| 9427 |
|
|
20de : 28 [ 4]> plp
|
| 9428 |
|
|
|
| 9429 |
|
|
20df : c124 [ 6] cmp (ind1,x)
|
| 9430 |
|
|
tst_a $7f,~fn
|
| 9431 |
|
|
20e1 : 08 [ 3]> php ;save flags
|
| 9432 |
|
|
20e2 : 08 [ 3]> php
|
| 9433 |
|
|
20e3 : c97f [ 2]> cmp #$7f ;test result
|
| 9434 |
|
|
> trap_ne
|
| 9435 |
|
|
20e5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9436 |
|
|
>
|
| 9437 |
|
|
20e7 : 68 [ 4]> pla ;load status
|
| 9438 |
|
|
> cmp_flag ~fn
|
| 9439 |
|
|
20e8 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 9440 |
|
|
>
|
| 9441 |
|
|
> trap_ne
|
| 9442 |
|
|
20ea : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9443 |
|
|
>
|
| 9444 |
|
|
20ec : 28 [ 4]> plp ;restore status
|
| 9445 |
|
|
|
| 9446 |
|
|
set_a $7e,$ff
|
| 9447 |
|
|
> load_flag $ff
|
| 9448 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 164
|
| 9449 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9450 |
|
|
|
| 9451 |
|
|
20ed : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9452 |
|
|
>
|
| 9453 |
|
|
20ef : 48 [ 3]> pha ;use stack to load status
|
| 9454 |
|
|
20f0 : a97e [ 2]> lda #$7e ;precharge accu
|
| 9455 |
|
|
20f2 : 28 [ 4]> plp
|
| 9456 |
|
|
|
| 9457 |
|
|
20f3 : c124 [ 6] cmp (ind1,x)
|
| 9458 |
|
|
tst_a $7e,~fzc
|
| 9459 |
|
|
20f5 : 08 [ 3]> php ;save flags
|
| 9460 |
|
|
20f6 : 08 [ 3]> php
|
| 9461 |
|
|
20f7 : c97e [ 2]> cmp #$7e ;test result
|
| 9462 |
|
|
> trap_ne
|
| 9463 |
|
|
20f9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9464 |
|
|
>
|
| 9465 |
|
|
20fb : 68 [ 4]> pla ;load status
|
| 9466 |
|
|
> cmp_flag ~fzc
|
| 9467 |
|
|
20fc : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 9468 |
|
|
>
|
| 9469 |
|
|
> trap_ne
|
| 9470 |
|
|
20fe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9471 |
|
|
>
|
| 9472 |
|
|
2100 : 28 [ 4]> plp ;restore status
|
| 9473 |
|
|
|
| 9474 |
|
|
|
| 9475 |
|
|
set_a $80,0
|
| 9476 |
|
|
> load_flag 0
|
| 9477 |
|
|
2101 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9478 |
|
|
>
|
| 9479 |
|
|
2103 : 48 [ 3]> pha ;use stack to load status
|
| 9480 |
|
|
2104 : a980 [ 2]> lda #$80 ;precharge accu
|
| 9481 |
|
|
2106 : 28 [ 4]> plp
|
| 9482 |
|
|
|
| 9483 |
|
|
2107 : d124 [ 5] cmp (ind1),y
|
| 9484 |
|
|
tst_a $80,fc
|
| 9485 |
|
|
2109 : 08 [ 3]> php ;save flags
|
| 9486 |
|
|
210a : 08 [ 3]> php
|
| 9487 |
|
|
210b : c980 [ 2]> cmp #$80 ;test result
|
| 9488 |
|
|
> trap_ne
|
| 9489 |
|
|
210d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9490 |
|
|
>
|
| 9491 |
|
|
210f : 68 [ 4]> pla ;load status
|
| 9492 |
|
|
> cmp_flag fc
|
| 9493 |
|
|
2110 : c931 [ 2]> cmp #(fc|fao)&m8 ;expected flags + always on bits
|
| 9494 |
|
|
>
|
| 9495 |
|
|
> trap_ne
|
| 9496 |
|
|
2112 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9497 |
|
|
>
|
| 9498 |
|
|
2114 : 28 [ 4]> plp ;restore status
|
| 9499 |
|
|
|
| 9500 |
|
|
set_a $7f,0
|
| 9501 |
|
|
> load_flag 0
|
| 9502 |
|
|
2115 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9503 |
|
|
>
|
| 9504 |
|
|
2117 : 48 [ 3]> pha ;use stack to load status
|
| 9505 |
|
|
2118 : a97f [ 2]> lda #$7f ;precharge accu
|
| 9506 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 165
|
| 9507 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9508 |
|
|
|
| 9509 |
|
|
211a : 28 [ 4]> plp
|
| 9510 |
|
|
|
| 9511 |
|
|
211b : d124 [ 5] cmp (ind1),y
|
| 9512 |
|
|
tst_a $7f,fzc
|
| 9513 |
|
|
211d : 08 [ 3]> php ;save flags
|
| 9514 |
|
|
211e : 08 [ 3]> php
|
| 9515 |
|
|
211f : c97f [ 2]> cmp #$7f ;test result
|
| 9516 |
|
|
> trap_ne
|
| 9517 |
|
|
2121 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9518 |
|
|
>
|
| 9519 |
|
|
2123 : 68 [ 4]> pla ;load status
|
| 9520 |
|
|
> cmp_flag fzc
|
| 9521 |
|
|
2124 : c933 [ 2]> cmp #(fzc|fao)&m8 ;expected flags + always on bits
|
| 9522 |
|
|
>
|
| 9523 |
|
|
> trap_ne
|
| 9524 |
|
|
2126 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9525 |
|
|
>
|
| 9526 |
|
|
2128 : 28 [ 4]> plp ;restore status
|
| 9527 |
|
|
|
| 9528 |
|
|
set_a $7e,0
|
| 9529 |
|
|
> load_flag 0
|
| 9530 |
|
|
2129 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9531 |
|
|
>
|
| 9532 |
|
|
212b : 48 [ 3]> pha ;use stack to load status
|
| 9533 |
|
|
212c : a97e [ 2]> lda #$7e ;precharge accu
|
| 9534 |
|
|
212e : 28 [ 4]> plp
|
| 9535 |
|
|
|
| 9536 |
|
|
212f : d124 [ 5] cmp (ind1),y
|
| 9537 |
|
|
tst_a $7e,fn
|
| 9538 |
|
|
2131 : 08 [ 3]> php ;save flags
|
| 9539 |
|
|
2132 : 08 [ 3]> php
|
| 9540 |
|
|
2133 : c97e [ 2]> cmp #$7e ;test result
|
| 9541 |
|
|
> trap_ne
|
| 9542 |
|
|
2135 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9543 |
|
|
>
|
| 9544 |
|
|
2137 : 68 [ 4]> pla ;load status
|
| 9545 |
|
|
> cmp_flag fn
|
| 9546 |
|
|
2138 : c9b0 [ 2]> cmp #(fn|fao)&m8 ;expected flags + always on bits
|
| 9547 |
|
|
>
|
| 9548 |
|
|
> trap_ne
|
| 9549 |
|
|
213a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9550 |
|
|
>
|
| 9551 |
|
|
213c : 28 [ 4]> plp ;restore status
|
| 9552 |
|
|
|
| 9553 |
|
|
set_a $80,$ff
|
| 9554 |
|
|
> load_flag $ff
|
| 9555 |
|
|
213d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9556 |
|
|
>
|
| 9557 |
|
|
213f : 48 [ 3]> pha ;use stack to load status
|
| 9558 |
|
|
2140 : a980 [ 2]> lda #$80 ;precharge accu
|
| 9559 |
|
|
2142 : 28 [ 4]> plp
|
| 9560 |
|
|
|
| 9561 |
|
|
2143 : d124 [ 5] cmp (ind1),y
|
| 9562 |
|
|
tst_a $80,~fnz
|
| 9563 |
|
|
2145 : 08 [ 3]> php ;save flags
|
| 9564 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 166
|
| 9565 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9566 |
|
|
|
| 9567 |
|
|
2146 : 08 [ 3]> php
|
| 9568 |
|
|
2147 : c980 [ 2]> cmp #$80 ;test result
|
| 9569 |
|
|
> trap_ne
|
| 9570 |
|
|
2149 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9571 |
|
|
>
|
| 9572 |
|
|
214b : 68 [ 4]> pla ;load status
|
| 9573 |
|
|
> cmp_flag ~fnz
|
| 9574 |
|
|
214c : c97d [ 2]> cmp #(~fnz|fao)&m8 ;expected flags + always on bits
|
| 9575 |
|
|
>
|
| 9576 |
|
|
> trap_ne
|
| 9577 |
|
|
214e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9578 |
|
|
>
|
| 9579 |
|
|
2150 : 28 [ 4]> plp ;restore status
|
| 9580 |
|
|
|
| 9581 |
|
|
set_a $7f,$ff
|
| 9582 |
|
|
> load_flag $ff
|
| 9583 |
|
|
2151 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9584 |
|
|
>
|
| 9585 |
|
|
2153 : 48 [ 3]> pha ;use stack to load status
|
| 9586 |
|
|
2154 : a97f [ 2]> lda #$7f ;precharge accu
|
| 9587 |
|
|
2156 : 28 [ 4]> plp
|
| 9588 |
|
|
|
| 9589 |
|
|
2157 : d124 [ 5] cmp (ind1),y
|
| 9590 |
|
|
tst_a $7f,~fn
|
| 9591 |
|
|
2159 : 08 [ 3]> php ;save flags
|
| 9592 |
|
|
215a : 08 [ 3]> php
|
| 9593 |
|
|
215b : c97f [ 2]> cmp #$7f ;test result
|
| 9594 |
|
|
> trap_ne
|
| 9595 |
|
|
215d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9596 |
|
|
>
|
| 9597 |
|
|
215f : 68 [ 4]> pla ;load status
|
| 9598 |
|
|
> cmp_flag ~fn
|
| 9599 |
|
|
2160 : c97f [ 2]> cmp #(~fn|fao)&m8 ;expected flags + always on bits
|
| 9600 |
|
|
>
|
| 9601 |
|
|
> trap_ne
|
| 9602 |
|
|
2162 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9603 |
|
|
>
|
| 9604 |
|
|
2164 : 28 [ 4]> plp ;restore status
|
| 9605 |
|
|
|
| 9606 |
|
|
set_a $7e,$ff
|
| 9607 |
|
|
> load_flag $ff
|
| 9608 |
|
|
2165 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9609 |
|
|
>
|
| 9610 |
|
|
2167 : 48 [ 3]> pha ;use stack to load status
|
| 9611 |
|
|
2168 : a97e [ 2]> lda #$7e ;precharge accu
|
| 9612 |
|
|
216a : 28 [ 4]> plp
|
| 9613 |
|
|
|
| 9614 |
|
|
216b : d124 [ 5] cmp (ind1),y
|
| 9615 |
|
|
tst_a $7e,~fzc
|
| 9616 |
|
|
216d : 08 [ 3]> php ;save flags
|
| 9617 |
|
|
216e : 08 [ 3]> php
|
| 9618 |
|
|
216f : c97e [ 2]> cmp #$7e ;test result
|
| 9619 |
|
|
> trap_ne
|
| 9620 |
|
|
2171 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9621 |
|
|
>
|
| 9622 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 167
|
| 9623 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9624 |
|
|
|
| 9625 |
|
|
2173 : 68 [ 4]> pla ;load status
|
| 9626 |
|
|
> cmp_flag ~fzc
|
| 9627 |
|
|
2174 : c9fc [ 2]> cmp #(~fzc|fao)&m8 ;expected flags + always on bits
|
| 9628 |
|
|
>
|
| 9629 |
|
|
> trap_ne
|
| 9630 |
|
|
2176 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9631 |
|
|
>
|
| 9632 |
|
|
2178 : 28 [ 4]> plp ;restore status
|
| 9633 |
|
|
|
| 9634 |
|
|
next_test
|
| 9635 |
|
|
2179 : ad0002 [ 4]> lda test_case ;previous test
|
| 9636 |
|
|
217c : c91c [ 2]> cmp #test_num
|
| 9637 |
|
|
> trap_ne ;test is out of sequence
|
| 9638 |
|
|
217e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9639 |
|
|
>
|
| 9640 |
|
|
001d = >test_num = test_num + 1
|
| 9641 |
|
|
2180 : a91d [ 2]> lda #test_num ;*** this tests' number
|
| 9642 |
|
|
2182 : 8d0002 [ 4]> sta test_case
|
| 9643 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 9644 |
|
|
|
| 9645 |
|
|
|
| 9646 |
|
|
; testing shifts - ASL LSR ROL ROR all addressing modes
|
| 9647 |
|
|
; shifts - accumulator
|
| 9648 |
|
|
2185 : a203 [ 2] ldx #3
|
| 9649 |
|
|
2187 : tasl
|
| 9650 |
|
|
set_ax zp1,0
|
| 9651 |
|
|
> load_flag 0
|
| 9652 |
|
|
2187 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9653 |
|
|
>
|
| 9654 |
|
|
2189 : 48 [ 3]> pha ;use stack to load status
|
| 9655 |
|
|
218a : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9656 |
|
|
218c : 28 [ 4]> plp
|
| 9657 |
|
|
|
| 9658 |
|
|
218d : 0a [ 2] asl a
|
| 9659 |
|
|
tst_ax rASL,fASL,0
|
| 9660 |
|
|
218e : 08 [ 3]> php ;save flags
|
| 9661 |
|
|
218f : dd1102 [ 4]> cmp rASL,x ;test result
|
| 9662 |
|
|
> trap_ne
|
| 9663 |
|
|
2192 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9664 |
|
|
>
|
| 9665 |
|
|
2194 : 68 [ 4]> pla ;load status
|
| 9666 |
|
|
> eor_flag 0
|
| 9667 |
|
|
2195 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 9668 |
|
|
>
|
| 9669 |
|
|
2197 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 9670 |
|
|
> trap_ne ;
|
| 9671 |
|
|
219a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9672 |
|
|
>
|
| 9673 |
|
|
|
| 9674 |
|
|
219c : ca [ 2] dex
|
| 9675 |
|
|
219d : 10e8 [ 3] bpl tasl
|
| 9676 |
|
|
219f : a203 [ 2] ldx #3
|
| 9677 |
|
|
21a1 : tasl1
|
| 9678 |
|
|
set_ax zp1,$ff
|
| 9679 |
|
|
> load_flag $ff
|
| 9680 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 168
|
| 9681 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9682 |
|
|
|
| 9683 |
|
|
21a1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9684 |
|
|
>
|
| 9685 |
|
|
21a3 : 48 [ 3]> pha ;use stack to load status
|
| 9686 |
|
|
21a4 : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9687 |
|
|
21a6 : 28 [ 4]> plp
|
| 9688 |
|
|
|
| 9689 |
|
|
21a7 : 0a [ 2] asl a
|
| 9690 |
|
|
tst_ax rASL,fASL,$ff-fnzc
|
| 9691 |
|
|
21a8 : 08 [ 3]> php ;save flags
|
| 9692 |
|
|
21a9 : dd1102 [ 4]> cmp rASL,x ;test result
|
| 9693 |
|
|
> trap_ne
|
| 9694 |
|
|
21ac : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9695 |
|
|
>
|
| 9696 |
|
|
21ae : 68 [ 4]> pla ;load status
|
| 9697 |
|
|
> eor_flag $ff-fnzc
|
| 9698 |
|
|
21af : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 9699 |
|
|
>
|
| 9700 |
|
|
21b1 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 9701 |
|
|
> trap_ne ;
|
| 9702 |
|
|
21b4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9703 |
|
|
>
|
| 9704 |
|
|
|
| 9705 |
|
|
21b6 : ca [ 2] dex
|
| 9706 |
|
|
21b7 : 10e8 [ 3] bpl tasl1
|
| 9707 |
|
|
|
| 9708 |
|
|
21b9 : a203 [ 2] ldx #3
|
| 9709 |
|
|
21bb : tlsr
|
| 9710 |
|
|
set_ax zp1,0
|
| 9711 |
|
|
> load_flag 0
|
| 9712 |
|
|
21bb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9713 |
|
|
>
|
| 9714 |
|
|
21bd : 48 [ 3]> pha ;use stack to load status
|
| 9715 |
|
|
21be : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9716 |
|
|
21c0 : 28 [ 4]> plp
|
| 9717 |
|
|
|
| 9718 |
|
|
21c1 : 4a [ 2] lsr a
|
| 9719 |
|
|
tst_ax rLSR,fLSR,0
|
| 9720 |
|
|
21c2 : 08 [ 3]> php ;save flags
|
| 9721 |
|
|
21c3 : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 9722 |
|
|
> trap_ne
|
| 9723 |
|
|
21c6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9724 |
|
|
>
|
| 9725 |
|
|
21c8 : 68 [ 4]> pla ;load status
|
| 9726 |
|
|
> eor_flag 0
|
| 9727 |
|
|
21c9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 9728 |
|
|
>
|
| 9729 |
|
|
21cb : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 9730 |
|
|
> trap_ne ;
|
| 9731 |
|
|
21ce : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9732 |
|
|
>
|
| 9733 |
|
|
|
| 9734 |
|
|
21d0 : ca [ 2] dex
|
| 9735 |
|
|
21d1 : 10e8 [ 3] bpl tlsr
|
| 9736 |
|
|
21d3 : a203 [ 2] ldx #3
|
| 9737 |
|
|
21d5 : tlsr1
|
| 9738 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 169
|
| 9739 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9740 |
|
|
|
| 9741 |
|
|
set_ax zp1,$ff
|
| 9742 |
|
|
> load_flag $ff
|
| 9743 |
|
|
21d5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9744 |
|
|
>
|
| 9745 |
|
|
21d7 : 48 [ 3]> pha ;use stack to load status
|
| 9746 |
|
|
21d8 : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9747 |
|
|
21da : 28 [ 4]> plp
|
| 9748 |
|
|
|
| 9749 |
|
|
21db : 4a [ 2] lsr a
|
| 9750 |
|
|
tst_ax rLSR,fLSR,$ff-fnzc
|
| 9751 |
|
|
21dc : 08 [ 3]> php ;save flags
|
| 9752 |
|
|
21dd : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 9753 |
|
|
> trap_ne
|
| 9754 |
|
|
21e0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9755 |
|
|
>
|
| 9756 |
|
|
21e2 : 68 [ 4]> pla ;load status
|
| 9757 |
|
|
> eor_flag $ff-fnzc
|
| 9758 |
|
|
21e3 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 9759 |
|
|
>
|
| 9760 |
|
|
21e5 : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 9761 |
|
|
> trap_ne ;
|
| 9762 |
|
|
21e8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9763 |
|
|
>
|
| 9764 |
|
|
|
| 9765 |
|
|
21ea : ca [ 2] dex
|
| 9766 |
|
|
21eb : 10e8 [ 3] bpl tlsr1
|
| 9767 |
|
|
|
| 9768 |
|
|
21ed : a203 [ 2] ldx #3
|
| 9769 |
|
|
21ef : trol
|
| 9770 |
|
|
set_ax zp1,0
|
| 9771 |
|
|
> load_flag 0
|
| 9772 |
|
|
21ef : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9773 |
|
|
>
|
| 9774 |
|
|
21f1 : 48 [ 3]> pha ;use stack to load status
|
| 9775 |
|
|
21f2 : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9776 |
|
|
21f4 : 28 [ 4]> plp
|
| 9777 |
|
|
|
| 9778 |
|
|
21f5 : 2a [ 2] rol a
|
| 9779 |
|
|
tst_ax rROL,fROL,0
|
| 9780 |
|
|
21f6 : 08 [ 3]> php ;save flags
|
| 9781 |
|
|
21f7 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 9782 |
|
|
> trap_ne
|
| 9783 |
|
|
21fa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9784 |
|
|
>
|
| 9785 |
|
|
21fc : 68 [ 4]> pla ;load status
|
| 9786 |
|
|
> eor_flag 0
|
| 9787 |
|
|
21fd : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 9788 |
|
|
>
|
| 9789 |
|
|
21ff : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 9790 |
|
|
> trap_ne ;
|
| 9791 |
|
|
2202 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9792 |
|
|
>
|
| 9793 |
|
|
|
| 9794 |
|
|
2204 : ca [ 2] dex
|
| 9795 |
|
|
2205 : 10e8 [ 4] bpl trol
|
| 9796 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 170
|
| 9797 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9798 |
|
|
|
| 9799 |
|
|
2207 : a203 [ 2] ldx #3
|
| 9800 |
|
|
2209 : trol1
|
| 9801 |
|
|
set_ax zp1,$ff-fc
|
| 9802 |
|
|
> load_flag $ff-fc
|
| 9803 |
|
|
2209 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 9804 |
|
|
>
|
| 9805 |
|
|
220b : 48 [ 3]> pha ;use stack to load status
|
| 9806 |
|
|
220c : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9807 |
|
|
220e : 28 [ 4]> plp
|
| 9808 |
|
|
|
| 9809 |
|
|
220f : 2a [ 2] rol a
|
| 9810 |
|
|
tst_ax rROL,fROL,$ff-fnzc
|
| 9811 |
|
|
2210 : 08 [ 3]> php ;save flags
|
| 9812 |
|
|
2211 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 9813 |
|
|
> trap_ne
|
| 9814 |
|
|
2214 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9815 |
|
|
>
|
| 9816 |
|
|
2216 : 68 [ 4]> pla ;load status
|
| 9817 |
|
|
> eor_flag $ff-fnzc
|
| 9818 |
|
|
2217 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 9819 |
|
|
>
|
| 9820 |
|
|
2219 : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 9821 |
|
|
> trap_ne ;
|
| 9822 |
|
|
221c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9823 |
|
|
>
|
| 9824 |
|
|
|
| 9825 |
|
|
221e : ca [ 2] dex
|
| 9826 |
|
|
221f : 10e8 [ 3] bpl trol1
|
| 9827 |
|
|
|
| 9828 |
|
|
2221 : a203 [ 2] ldx #3
|
| 9829 |
|
|
2223 : trolc
|
| 9830 |
|
|
set_ax zp1,fc
|
| 9831 |
|
|
> load_flag fc
|
| 9832 |
|
|
2223 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 9833 |
|
|
>
|
| 9834 |
|
|
2225 : 48 [ 3]> pha ;use stack to load status
|
| 9835 |
|
|
2226 : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9836 |
|
|
2228 : 28 [ 4]> plp
|
| 9837 |
|
|
|
| 9838 |
|
|
2229 : 2a [ 2] rol a
|
| 9839 |
|
|
tst_ax rROLc,fROLc,0
|
| 9840 |
|
|
222a : 08 [ 3]> php ;save flags
|
| 9841 |
|
|
222b : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 9842 |
|
|
> trap_ne
|
| 9843 |
|
|
222e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9844 |
|
|
>
|
| 9845 |
|
|
2230 : 68 [ 4]> pla ;load status
|
| 9846 |
|
|
> eor_flag 0
|
| 9847 |
|
|
2231 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 9848 |
|
|
>
|
| 9849 |
|
|
2233 : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 9850 |
|
|
> trap_ne ;
|
| 9851 |
|
|
2236 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9852 |
|
|
>
|
| 9853 |
|
|
|
| 9854 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 171
|
| 9855 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9856 |
|
|
|
| 9857 |
|
|
2238 : ca [ 2] dex
|
| 9858 |
|
|
2239 : 10e8 [ 3] bpl trolc
|
| 9859 |
|
|
223b : a203 [ 2] ldx #3
|
| 9860 |
|
|
223d : trolc1
|
| 9861 |
|
|
set_ax zp1,$ff
|
| 9862 |
|
|
> load_flag $ff
|
| 9863 |
|
|
223d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9864 |
|
|
>
|
| 9865 |
|
|
223f : 48 [ 3]> pha ;use stack to load status
|
| 9866 |
|
|
2240 : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9867 |
|
|
2242 : 28 [ 4]> plp
|
| 9868 |
|
|
|
| 9869 |
|
|
2243 : 2a [ 2] rol a
|
| 9870 |
|
|
tst_ax rROLc,fROLc,$ff-fnzc
|
| 9871 |
|
|
2244 : 08 [ 3]> php ;save flags
|
| 9872 |
|
|
2245 : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 9873 |
|
|
> trap_ne
|
| 9874 |
|
|
2248 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9875 |
|
|
>
|
| 9876 |
|
|
224a : 68 [ 4]> pla ;load status
|
| 9877 |
|
|
> eor_flag $ff-fnzc
|
| 9878 |
|
|
224b : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 9879 |
|
|
>
|
| 9880 |
|
|
224d : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 9881 |
|
|
> trap_ne ;
|
| 9882 |
|
|
2250 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9883 |
|
|
>
|
| 9884 |
|
|
|
| 9885 |
|
|
2252 : ca [ 2] dex
|
| 9886 |
|
|
2253 : 10e8 [ 3] bpl trolc1
|
| 9887 |
|
|
|
| 9888 |
|
|
2255 : a203 [ 2] ldx #3
|
| 9889 |
|
|
2257 : tror
|
| 9890 |
|
|
set_ax zp1,0
|
| 9891 |
|
|
> load_flag 0
|
| 9892 |
|
|
2257 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 9893 |
|
|
>
|
| 9894 |
|
|
2259 : 48 [ 3]> pha ;use stack to load status
|
| 9895 |
|
|
225a : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9896 |
|
|
225c : 28 [ 4]> plp
|
| 9897 |
|
|
|
| 9898 |
|
|
225d : 6a [ 2] ror a
|
| 9899 |
|
|
tst_ax rROR,fROR,0
|
| 9900 |
|
|
225e : 08 [ 3]> php ;save flags
|
| 9901 |
|
|
225f : dd1902 [ 4]> cmp rROR,x ;test result
|
| 9902 |
|
|
> trap_ne
|
| 9903 |
|
|
2262 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9904 |
|
|
>
|
| 9905 |
|
|
2264 : 68 [ 4]> pla ;load status
|
| 9906 |
|
|
> eor_flag 0
|
| 9907 |
|
|
2265 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 9908 |
|
|
>
|
| 9909 |
|
|
2267 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 9910 |
|
|
> trap_ne ;
|
| 9911 |
|
|
226a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9912 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 172
|
| 9913 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9914 |
|
|
|
| 9915 |
|
|
>
|
| 9916 |
|
|
|
| 9917 |
|
|
226c : ca [ 2] dex
|
| 9918 |
|
|
226d : 10e8 [ 3] bpl tror
|
| 9919 |
|
|
226f : a203 [ 2] ldx #3
|
| 9920 |
|
|
2271 : tror1
|
| 9921 |
|
|
set_ax zp1,$ff-fc
|
| 9922 |
|
|
> load_flag $ff-fc
|
| 9923 |
|
|
2271 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 9924 |
|
|
>
|
| 9925 |
|
|
2273 : 48 [ 3]> pha ;use stack to load status
|
| 9926 |
|
|
2274 : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9927 |
|
|
2276 : 28 [ 4]> plp
|
| 9928 |
|
|
|
| 9929 |
|
|
2277 : 6a [ 2] ror a
|
| 9930 |
|
|
tst_ax rROR,fROR,$ff-fnzc
|
| 9931 |
|
|
2278 : 08 [ 3]> php ;save flags
|
| 9932 |
|
|
2279 : dd1902 [ 4]> cmp rROR,x ;test result
|
| 9933 |
|
|
> trap_ne
|
| 9934 |
|
|
227c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9935 |
|
|
>
|
| 9936 |
|
|
227e : 68 [ 4]> pla ;load status
|
| 9937 |
|
|
> eor_flag $ff-fnzc
|
| 9938 |
|
|
227f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 9939 |
|
|
>
|
| 9940 |
|
|
2281 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 9941 |
|
|
> trap_ne ;
|
| 9942 |
|
|
2284 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9943 |
|
|
>
|
| 9944 |
|
|
|
| 9945 |
|
|
2286 : ca [ 2] dex
|
| 9946 |
|
|
2287 : 10e8 [ 3] bpl tror1
|
| 9947 |
|
|
|
| 9948 |
|
|
2289 : a203 [ 2] ldx #3
|
| 9949 |
|
|
228b : trorc
|
| 9950 |
|
|
set_ax zp1,fc
|
| 9951 |
|
|
> load_flag fc
|
| 9952 |
|
|
228b : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 9953 |
|
|
>
|
| 9954 |
|
|
228d : 48 [ 3]> pha ;use stack to load status
|
| 9955 |
|
|
228e : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9956 |
|
|
2290 : 28 [ 4]> plp
|
| 9957 |
|
|
|
| 9958 |
|
|
2291 : 6a [ 2] ror a
|
| 9959 |
|
|
tst_ax rRORc,fRORc,0
|
| 9960 |
|
|
2292 : 08 [ 3]> php ;save flags
|
| 9961 |
|
|
2293 : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 9962 |
|
|
> trap_ne
|
| 9963 |
|
|
2296 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9964 |
|
|
>
|
| 9965 |
|
|
2298 : 68 [ 4]> pla ;load status
|
| 9966 |
|
|
> eor_flag 0
|
| 9967 |
|
|
2299 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 9968 |
|
|
>
|
| 9969 |
|
|
229b : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 9970 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 173
|
| 9971 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 9972 |
|
|
|
| 9973 |
|
|
> trap_ne ;
|
| 9974 |
|
|
229e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9975 |
|
|
>
|
| 9976 |
|
|
|
| 9977 |
|
|
22a0 : ca [ 2] dex
|
| 9978 |
|
|
22a1 : 10e8 [ 3] bpl trorc
|
| 9979 |
|
|
22a3 : a203 [ 2] ldx #3
|
| 9980 |
|
|
22a5 : trorc1
|
| 9981 |
|
|
set_ax zp1,$ff
|
| 9982 |
|
|
> load_flag $ff
|
| 9983 |
|
|
22a5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 9984 |
|
|
>
|
| 9985 |
|
|
22a7 : 48 [ 3]> pha ;use stack to load status
|
| 9986 |
|
|
22a8 : b513 [ 4]> lda zp1,x ;precharge accu
|
| 9987 |
|
|
22aa : 28 [ 4]> plp
|
| 9988 |
|
|
|
| 9989 |
|
|
22ab : 6a [ 2] ror a
|
| 9990 |
|
|
tst_ax rRORc,fRORc,$ff-fnzc
|
| 9991 |
|
|
22ac : 08 [ 3]> php ;save flags
|
| 9992 |
|
|
22ad : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 9993 |
|
|
> trap_ne
|
| 9994 |
|
|
22b0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 9995 |
|
|
>
|
| 9996 |
|
|
22b2 : 68 [ 4]> pla ;load status
|
| 9997 |
|
|
> eor_flag $ff-fnzc
|
| 9998 |
|
|
22b3 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 9999 |
|
|
>
|
| 10000 |
|
|
22b5 : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 10001 |
|
|
> trap_ne ;
|
| 10002 |
|
|
22b8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10003 |
|
|
>
|
| 10004 |
|
|
|
| 10005 |
|
|
22ba : ca [ 2] dex
|
| 10006 |
|
|
22bb : 10e8 [ 3] bpl trorc1
|
| 10007 |
|
|
next_test
|
| 10008 |
|
|
22bd : ad0002 [ 4]> lda test_case ;previous test
|
| 10009 |
|
|
22c0 : c91d [ 2]> cmp #test_num
|
| 10010 |
|
|
> trap_ne ;test is out of sequence
|
| 10011 |
|
|
22c2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10012 |
|
|
>
|
| 10013 |
|
|
001e = >test_num = test_num + 1
|
| 10014 |
|
|
22c4 : a91e [ 2]> lda #test_num ;*** this tests' number
|
| 10015 |
|
|
22c6 : 8d0002 [ 4]> sta test_case
|
| 10016 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 10017 |
|
|
|
| 10018 |
|
|
|
| 10019 |
|
|
; shifts - zeropage
|
| 10020 |
|
|
22c9 : a203 [ 2] ldx #3
|
| 10021 |
|
|
22cb : tasl2
|
| 10022 |
|
|
set_z zp1,0
|
| 10023 |
|
|
> load_flag 0
|
| 10024 |
|
|
22cb : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10025 |
|
|
>
|
| 10026 |
|
|
22cd : 48 [ 3]> pha ;use stack to load status
|
| 10027 |
|
|
22ce : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10028 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 174
|
| 10029 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10030 |
|
|
|
| 10031 |
|
|
22d0 : 850c [ 3]> sta zpt
|
| 10032 |
|
|
22d2 : 28 [ 4]> plp
|
| 10033 |
|
|
|
| 10034 |
|
|
22d3 : 060c [ 5] asl zpt
|
| 10035 |
|
|
tst_z rASL,fASL,0
|
| 10036 |
|
|
22d5 : 08 [ 3]> php ;save flags
|
| 10037 |
|
|
22d6 : a50c [ 3]> lda zpt
|
| 10038 |
|
|
22d8 : dd1102 [ 4]> cmp rASL,x ;test result
|
| 10039 |
|
|
> trap_ne
|
| 10040 |
|
|
22db : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10041 |
|
|
>
|
| 10042 |
|
|
22dd : 68 [ 4]> pla ;load status
|
| 10043 |
|
|
> eor_flag 0
|
| 10044 |
|
|
22de : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10045 |
|
|
>
|
| 10046 |
|
|
22e0 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 10047 |
|
|
> trap_ne
|
| 10048 |
|
|
22e3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10049 |
|
|
>
|
| 10050 |
|
|
|
| 10051 |
|
|
22e5 : ca [ 2] dex
|
| 10052 |
|
|
22e6 : 10e3 [ 3] bpl tasl2
|
| 10053 |
|
|
22e8 : a203 [ 2] ldx #3
|
| 10054 |
|
|
22ea : tasl3
|
| 10055 |
|
|
set_z zp1,$ff
|
| 10056 |
|
|
> load_flag $ff
|
| 10057 |
|
|
22ea : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10058 |
|
|
>
|
| 10059 |
|
|
22ec : 48 [ 3]> pha ;use stack to load status
|
| 10060 |
|
|
22ed : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10061 |
|
|
22ef : 850c [ 3]> sta zpt
|
| 10062 |
|
|
22f1 : 28 [ 4]> plp
|
| 10063 |
|
|
|
| 10064 |
|
|
22f2 : 060c [ 5] asl zpt
|
| 10065 |
|
|
tst_z rASL,fASL,$ff-fnzc
|
| 10066 |
|
|
22f4 : 08 [ 3]> php ;save flags
|
| 10067 |
|
|
22f5 : a50c [ 3]> lda zpt
|
| 10068 |
|
|
22f7 : dd1102 [ 4]> cmp rASL,x ;test result
|
| 10069 |
|
|
> trap_ne
|
| 10070 |
|
|
22fa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10071 |
|
|
>
|
| 10072 |
|
|
22fc : 68 [ 4]> pla ;load status
|
| 10073 |
|
|
> eor_flag $ff-fnzc
|
| 10074 |
|
|
22fd : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10075 |
|
|
>
|
| 10076 |
|
|
22ff : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 10077 |
|
|
> trap_ne
|
| 10078 |
|
|
2302 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10079 |
|
|
>
|
| 10080 |
|
|
|
| 10081 |
|
|
2304 : ca [ 2] dex
|
| 10082 |
|
|
2305 : 10e3 [ 4] bpl tasl3
|
| 10083 |
|
|
|
| 10084 |
|
|
2307 : a203 [ 2] ldx #3
|
| 10085 |
|
|
2309 : tlsr2
|
| 10086 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 175
|
| 10087 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10088 |
|
|
|
| 10089 |
|
|
set_z zp1,0
|
| 10090 |
|
|
> load_flag 0
|
| 10091 |
|
|
2309 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10092 |
|
|
>
|
| 10093 |
|
|
230b : 48 [ 3]> pha ;use stack to load status
|
| 10094 |
|
|
230c : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10095 |
|
|
230e : 850c [ 3]> sta zpt
|
| 10096 |
|
|
2310 : 28 [ 4]> plp
|
| 10097 |
|
|
|
| 10098 |
|
|
2311 : 460c [ 5] lsr zpt
|
| 10099 |
|
|
tst_z rLSR,fLSR,0
|
| 10100 |
|
|
2313 : 08 [ 3]> php ;save flags
|
| 10101 |
|
|
2314 : a50c [ 3]> lda zpt
|
| 10102 |
|
|
2316 : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 10103 |
|
|
> trap_ne
|
| 10104 |
|
|
2319 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10105 |
|
|
>
|
| 10106 |
|
|
231b : 68 [ 4]> pla ;load status
|
| 10107 |
|
|
> eor_flag 0
|
| 10108 |
|
|
231c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10109 |
|
|
>
|
| 10110 |
|
|
231e : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 10111 |
|
|
> trap_ne
|
| 10112 |
|
|
2321 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10113 |
|
|
>
|
| 10114 |
|
|
|
| 10115 |
|
|
2323 : ca [ 2] dex
|
| 10116 |
|
|
2324 : 10e3 [ 3] bpl tlsr2
|
| 10117 |
|
|
2326 : a203 [ 2] ldx #3
|
| 10118 |
|
|
2328 : tlsr3
|
| 10119 |
|
|
set_z zp1,$ff
|
| 10120 |
|
|
> load_flag $ff
|
| 10121 |
|
|
2328 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10122 |
|
|
>
|
| 10123 |
|
|
232a : 48 [ 3]> pha ;use stack to load status
|
| 10124 |
|
|
232b : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10125 |
|
|
232d : 850c [ 3]> sta zpt
|
| 10126 |
|
|
232f : 28 [ 4]> plp
|
| 10127 |
|
|
|
| 10128 |
|
|
2330 : 460c [ 5] lsr zpt
|
| 10129 |
|
|
tst_z rLSR,fLSR,$ff-fnzc
|
| 10130 |
|
|
2332 : 08 [ 3]> php ;save flags
|
| 10131 |
|
|
2333 : a50c [ 3]> lda zpt
|
| 10132 |
|
|
2335 : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 10133 |
|
|
> trap_ne
|
| 10134 |
|
|
2338 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10135 |
|
|
>
|
| 10136 |
|
|
233a : 68 [ 4]> pla ;load status
|
| 10137 |
|
|
> eor_flag $ff-fnzc
|
| 10138 |
|
|
233b : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10139 |
|
|
>
|
| 10140 |
|
|
233d : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 10141 |
|
|
> trap_ne
|
| 10142 |
|
|
2340 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10143 |
|
|
>
|
| 10144 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 176
|
| 10145 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10146 |
|
|
|
| 10147 |
|
|
|
| 10148 |
|
|
2342 : ca [ 2] dex
|
| 10149 |
|
|
2343 : 10e3 [ 3] bpl tlsr3
|
| 10150 |
|
|
|
| 10151 |
|
|
2345 : a203 [ 2] ldx #3
|
| 10152 |
|
|
2347 : trol2
|
| 10153 |
|
|
set_z zp1,0
|
| 10154 |
|
|
> load_flag 0
|
| 10155 |
|
|
2347 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10156 |
|
|
>
|
| 10157 |
|
|
2349 : 48 [ 3]> pha ;use stack to load status
|
| 10158 |
|
|
234a : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10159 |
|
|
234c : 850c [ 3]> sta zpt
|
| 10160 |
|
|
234e : 28 [ 4]> plp
|
| 10161 |
|
|
|
| 10162 |
|
|
234f : 260c [ 5] rol zpt
|
| 10163 |
|
|
tst_z rROL,fROL,0
|
| 10164 |
|
|
2351 : 08 [ 3]> php ;save flags
|
| 10165 |
|
|
2352 : a50c [ 3]> lda zpt
|
| 10166 |
|
|
2354 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 10167 |
|
|
> trap_ne
|
| 10168 |
|
|
2357 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10169 |
|
|
>
|
| 10170 |
|
|
2359 : 68 [ 4]> pla ;load status
|
| 10171 |
|
|
> eor_flag 0
|
| 10172 |
|
|
235a : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10173 |
|
|
>
|
| 10174 |
|
|
235c : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 10175 |
|
|
> trap_ne
|
| 10176 |
|
|
235f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10177 |
|
|
>
|
| 10178 |
|
|
|
| 10179 |
|
|
2361 : ca [ 2] dex
|
| 10180 |
|
|
2362 : 10e3 [ 3] bpl trol2
|
| 10181 |
|
|
2364 : a203 [ 2] ldx #3
|
| 10182 |
|
|
2366 : trol3
|
| 10183 |
|
|
set_z zp1,$ff-fc
|
| 10184 |
|
|
> load_flag $ff-fc
|
| 10185 |
|
|
2366 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 10186 |
|
|
>
|
| 10187 |
|
|
2368 : 48 [ 3]> pha ;use stack to load status
|
| 10188 |
|
|
2369 : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10189 |
|
|
236b : 850c [ 3]> sta zpt
|
| 10190 |
|
|
236d : 28 [ 4]> plp
|
| 10191 |
|
|
|
| 10192 |
|
|
236e : 260c [ 5] rol zpt
|
| 10193 |
|
|
tst_z rROL,fROL,$ff-fnzc
|
| 10194 |
|
|
2370 : 08 [ 3]> php ;save flags
|
| 10195 |
|
|
2371 : a50c [ 3]> lda zpt
|
| 10196 |
|
|
2373 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 10197 |
|
|
> trap_ne
|
| 10198 |
|
|
2376 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10199 |
|
|
>
|
| 10200 |
|
|
2378 : 68 [ 4]> pla ;load status
|
| 10201 |
|
|
> eor_flag $ff-fnzc
|
| 10202 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 177
|
| 10203 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10204 |
|
|
|
| 10205 |
|
|
2379 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10206 |
|
|
>
|
| 10207 |
|
|
237b : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 10208 |
|
|
> trap_ne
|
| 10209 |
|
|
237e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10210 |
|
|
>
|
| 10211 |
|
|
|
| 10212 |
|
|
2380 : ca [ 2] dex
|
| 10213 |
|
|
2381 : 10e3 [ 3] bpl trol3
|
| 10214 |
|
|
|
| 10215 |
|
|
2383 : a203 [ 2] ldx #3
|
| 10216 |
|
|
2385 : trolc2
|
| 10217 |
|
|
set_z zp1,fc
|
| 10218 |
|
|
> load_flag fc
|
| 10219 |
|
|
2385 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 10220 |
|
|
>
|
| 10221 |
|
|
2387 : 48 [ 3]> pha ;use stack to load status
|
| 10222 |
|
|
2388 : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10223 |
|
|
238a : 850c [ 3]> sta zpt
|
| 10224 |
|
|
238c : 28 [ 4]> plp
|
| 10225 |
|
|
|
| 10226 |
|
|
238d : 260c [ 5] rol zpt
|
| 10227 |
|
|
tst_z rROLc,fROLc,0
|
| 10228 |
|
|
238f : 08 [ 3]> php ;save flags
|
| 10229 |
|
|
2390 : a50c [ 3]> lda zpt
|
| 10230 |
|
|
2392 : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 10231 |
|
|
> trap_ne
|
| 10232 |
|
|
2395 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10233 |
|
|
>
|
| 10234 |
|
|
2397 : 68 [ 4]> pla ;load status
|
| 10235 |
|
|
> eor_flag 0
|
| 10236 |
|
|
2398 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10237 |
|
|
>
|
| 10238 |
|
|
239a : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 10239 |
|
|
> trap_ne
|
| 10240 |
|
|
239d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10241 |
|
|
>
|
| 10242 |
|
|
|
| 10243 |
|
|
239f : ca [ 2] dex
|
| 10244 |
|
|
23a0 : 10e3 [ 3] bpl trolc2
|
| 10245 |
|
|
23a2 : a203 [ 2] ldx #3
|
| 10246 |
|
|
23a4 : trolc3
|
| 10247 |
|
|
set_z zp1,$ff
|
| 10248 |
|
|
> load_flag $ff
|
| 10249 |
|
|
23a4 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10250 |
|
|
>
|
| 10251 |
|
|
23a6 : 48 [ 3]> pha ;use stack to load status
|
| 10252 |
|
|
23a7 : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10253 |
|
|
23a9 : 850c [ 3]> sta zpt
|
| 10254 |
|
|
23ab : 28 [ 4]> plp
|
| 10255 |
|
|
|
| 10256 |
|
|
23ac : 260c [ 5] rol zpt
|
| 10257 |
|
|
tst_z rROLc,fROLc,$ff-fnzc
|
| 10258 |
|
|
23ae : 08 [ 3]> php ;save flags
|
| 10259 |
|
|
23af : a50c [ 3]> lda zpt
|
| 10260 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 178
|
| 10261 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10262 |
|
|
|
| 10263 |
|
|
23b1 : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 10264 |
|
|
> trap_ne
|
| 10265 |
|
|
23b4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10266 |
|
|
>
|
| 10267 |
|
|
23b6 : 68 [ 4]> pla ;load status
|
| 10268 |
|
|
> eor_flag $ff-fnzc
|
| 10269 |
|
|
23b7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10270 |
|
|
>
|
| 10271 |
|
|
23b9 : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 10272 |
|
|
> trap_ne
|
| 10273 |
|
|
23bc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10274 |
|
|
>
|
| 10275 |
|
|
|
| 10276 |
|
|
23be : ca [ 2] dex
|
| 10277 |
|
|
23bf : 10e3 [ 3] bpl trolc3
|
| 10278 |
|
|
|
| 10279 |
|
|
23c1 : a203 [ 2] ldx #3
|
| 10280 |
|
|
23c3 : tror2
|
| 10281 |
|
|
set_z zp1,0
|
| 10282 |
|
|
> load_flag 0
|
| 10283 |
|
|
23c3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10284 |
|
|
>
|
| 10285 |
|
|
23c5 : 48 [ 3]> pha ;use stack to load status
|
| 10286 |
|
|
23c6 : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10287 |
|
|
23c8 : 850c [ 3]> sta zpt
|
| 10288 |
|
|
23ca : 28 [ 4]> plp
|
| 10289 |
|
|
|
| 10290 |
|
|
23cb : 660c [ 5] ror zpt
|
| 10291 |
|
|
tst_z rROR,fROR,0
|
| 10292 |
|
|
23cd : 08 [ 3]> php ;save flags
|
| 10293 |
|
|
23ce : a50c [ 3]> lda zpt
|
| 10294 |
|
|
23d0 : dd1902 [ 4]> cmp rROR,x ;test result
|
| 10295 |
|
|
> trap_ne
|
| 10296 |
|
|
23d3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10297 |
|
|
>
|
| 10298 |
|
|
23d5 : 68 [ 4]> pla ;load status
|
| 10299 |
|
|
> eor_flag 0
|
| 10300 |
|
|
23d6 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10301 |
|
|
>
|
| 10302 |
|
|
23d8 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 10303 |
|
|
> trap_ne
|
| 10304 |
|
|
23db : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10305 |
|
|
>
|
| 10306 |
|
|
|
| 10307 |
|
|
23dd : ca [ 2] dex
|
| 10308 |
|
|
23de : 10e3 [ 3] bpl tror2
|
| 10309 |
|
|
23e0 : a203 [ 2] ldx #3
|
| 10310 |
|
|
23e2 : tror3
|
| 10311 |
|
|
set_z zp1,$ff-fc
|
| 10312 |
|
|
> load_flag $ff-fc
|
| 10313 |
|
|
23e2 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 10314 |
|
|
>
|
| 10315 |
|
|
23e4 : 48 [ 3]> pha ;use stack to load status
|
| 10316 |
|
|
23e5 : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10317 |
|
|
23e7 : 850c [ 3]> sta zpt
|
| 10318 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 179
|
| 10319 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10320 |
|
|
|
| 10321 |
|
|
23e9 : 28 [ 4]> plp
|
| 10322 |
|
|
|
| 10323 |
|
|
23ea : 660c [ 5] ror zpt
|
| 10324 |
|
|
tst_z rROR,fROR,$ff-fnzc
|
| 10325 |
|
|
23ec : 08 [ 3]> php ;save flags
|
| 10326 |
|
|
23ed : a50c [ 3]> lda zpt
|
| 10327 |
|
|
23ef : dd1902 [ 4]> cmp rROR,x ;test result
|
| 10328 |
|
|
> trap_ne
|
| 10329 |
|
|
23f2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10330 |
|
|
>
|
| 10331 |
|
|
23f4 : 68 [ 4]> pla ;load status
|
| 10332 |
|
|
> eor_flag $ff-fnzc
|
| 10333 |
|
|
23f5 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10334 |
|
|
>
|
| 10335 |
|
|
23f7 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 10336 |
|
|
> trap_ne
|
| 10337 |
|
|
23fa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10338 |
|
|
>
|
| 10339 |
|
|
|
| 10340 |
|
|
23fc : ca [ 2] dex
|
| 10341 |
|
|
23fd : 10e3 [ 3] bpl tror3
|
| 10342 |
|
|
|
| 10343 |
|
|
23ff : a203 [ 2] ldx #3
|
| 10344 |
|
|
2401 : trorc2
|
| 10345 |
|
|
set_z zp1,fc
|
| 10346 |
|
|
> load_flag fc
|
| 10347 |
|
|
2401 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 10348 |
|
|
>
|
| 10349 |
|
|
2403 : 48 [ 3]> pha ;use stack to load status
|
| 10350 |
|
|
2404 : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10351 |
|
|
2406 : 850c [ 3]> sta zpt
|
| 10352 |
|
|
2408 : 28 [ 4]> plp
|
| 10353 |
|
|
|
| 10354 |
|
|
2409 : 660c [ 5] ror zpt
|
| 10355 |
|
|
tst_z rRORc,fRORc,0
|
| 10356 |
|
|
240b : 08 [ 3]> php ;save flags
|
| 10357 |
|
|
240c : a50c [ 3]> lda zpt
|
| 10358 |
|
|
240e : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 10359 |
|
|
> trap_ne
|
| 10360 |
|
|
2411 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10361 |
|
|
>
|
| 10362 |
|
|
2413 : 68 [ 4]> pla ;load status
|
| 10363 |
|
|
> eor_flag 0
|
| 10364 |
|
|
2414 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10365 |
|
|
>
|
| 10366 |
|
|
2416 : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 10367 |
|
|
> trap_ne
|
| 10368 |
|
|
2419 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10369 |
|
|
>
|
| 10370 |
|
|
|
| 10371 |
|
|
241b : ca [ 2] dex
|
| 10372 |
|
|
241c : 10e3 [ 3] bpl trorc2
|
| 10373 |
|
|
241e : a203 [ 2] ldx #3
|
| 10374 |
|
|
2420 : trorc3
|
| 10375 |
|
|
set_z zp1,$ff
|
| 10376 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 180
|
| 10377 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10378 |
|
|
|
| 10379 |
|
|
> load_flag $ff
|
| 10380 |
|
|
2420 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10381 |
|
|
>
|
| 10382 |
|
|
2422 : 48 [ 3]> pha ;use stack to load status
|
| 10383 |
|
|
2423 : b513 [ 4]> lda zp1,x ;load to zeropage
|
| 10384 |
|
|
2425 : 850c [ 3]> sta zpt
|
| 10385 |
|
|
2427 : 28 [ 4]> plp
|
| 10386 |
|
|
|
| 10387 |
|
|
2428 : 660c [ 5] ror zpt
|
| 10388 |
|
|
tst_z rRORc,fRORc,$ff-fnzc
|
| 10389 |
|
|
242a : 08 [ 3]> php ;save flags
|
| 10390 |
|
|
242b : a50c [ 3]> lda zpt
|
| 10391 |
|
|
242d : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 10392 |
|
|
> trap_ne
|
| 10393 |
|
|
2430 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10394 |
|
|
>
|
| 10395 |
|
|
2432 : 68 [ 4]> pla ;load status
|
| 10396 |
|
|
> eor_flag $ff-fnzc
|
| 10397 |
|
|
2433 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10398 |
|
|
>
|
| 10399 |
|
|
2435 : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 10400 |
|
|
> trap_ne
|
| 10401 |
|
|
2438 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10402 |
|
|
>
|
| 10403 |
|
|
|
| 10404 |
|
|
243a : ca [ 2] dex
|
| 10405 |
|
|
243b : 10e3 [ 3] bpl trorc3
|
| 10406 |
|
|
next_test
|
| 10407 |
|
|
243d : ad0002 [ 4]> lda test_case ;previous test
|
| 10408 |
|
|
2440 : c91e [ 2]> cmp #test_num
|
| 10409 |
|
|
> trap_ne ;test is out of sequence
|
| 10410 |
|
|
2442 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10411 |
|
|
>
|
| 10412 |
|
|
001f = >test_num = test_num + 1
|
| 10413 |
|
|
2444 : a91f [ 2]> lda #test_num ;*** this tests' number
|
| 10414 |
|
|
2446 : 8d0002 [ 4]> sta test_case
|
| 10415 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 10416 |
|
|
|
| 10417 |
|
|
|
| 10418 |
|
|
; shifts - absolute
|
| 10419 |
|
|
2449 : a203 [ 2] ldx #3
|
| 10420 |
|
|
244b : tasl4
|
| 10421 |
|
|
set_abs zp1,0
|
| 10422 |
|
|
> load_flag 0
|
| 10423 |
|
|
244b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10424 |
|
|
>
|
| 10425 |
|
|
244d : 48 [ 3]> pha ;use stack to load status
|
| 10426 |
|
|
244e : b513 [ 4]> lda zp1,x ;load to memory
|
| 10427 |
|
|
2450 : 8d0302 [ 4]> sta abst
|
| 10428 |
|
|
2453 : 28 [ 4]> plp
|
| 10429 |
|
|
|
| 10430 |
|
|
2454 : 0e0302 [ 6] asl abst
|
| 10431 |
|
|
tst_abs rASL,fASL,0
|
| 10432 |
|
|
2457 : 08 [ 3]> php ;save flags
|
| 10433 |
|
|
2458 : ad0302 [ 4]> lda abst
|
| 10434 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 181
|
| 10435 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10436 |
|
|
|
| 10437 |
|
|
245b : dd1102 [ 4]> cmp rASL,x ;test result
|
| 10438 |
|
|
> trap_ne
|
| 10439 |
|
|
245e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10440 |
|
|
>
|
| 10441 |
|
|
2460 : 68 [ 4]> pla ;load status
|
| 10442 |
|
|
> eor_flag 0
|
| 10443 |
|
|
2461 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10444 |
|
|
>
|
| 10445 |
|
|
2463 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 10446 |
|
|
> trap_ne
|
| 10447 |
|
|
2466 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10448 |
|
|
>
|
| 10449 |
|
|
|
| 10450 |
|
|
2468 : ca [ 2] dex
|
| 10451 |
|
|
2469 : 10e0 [ 3] bpl tasl4
|
| 10452 |
|
|
246b : a203 [ 2] ldx #3
|
| 10453 |
|
|
246d : tasl5
|
| 10454 |
|
|
set_abs zp1,$ff
|
| 10455 |
|
|
> load_flag $ff
|
| 10456 |
|
|
246d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10457 |
|
|
>
|
| 10458 |
|
|
246f : 48 [ 3]> pha ;use stack to load status
|
| 10459 |
|
|
2470 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10460 |
|
|
2472 : 8d0302 [ 4]> sta abst
|
| 10461 |
|
|
2475 : 28 [ 4]> plp
|
| 10462 |
|
|
|
| 10463 |
|
|
2476 : 0e0302 [ 6] asl abst
|
| 10464 |
|
|
tst_abs rASL,fASL,$ff-fnzc
|
| 10465 |
|
|
2479 : 08 [ 3]> php ;save flags
|
| 10466 |
|
|
247a : ad0302 [ 4]> lda abst
|
| 10467 |
|
|
247d : dd1102 [ 4]> cmp rASL,x ;test result
|
| 10468 |
|
|
> trap_ne
|
| 10469 |
|
|
2480 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10470 |
|
|
>
|
| 10471 |
|
|
2482 : 68 [ 4]> pla ;load status
|
| 10472 |
|
|
> eor_flag $ff-fnzc
|
| 10473 |
|
|
2483 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10474 |
|
|
>
|
| 10475 |
|
|
2485 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 10476 |
|
|
> trap_ne
|
| 10477 |
|
|
2488 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10478 |
|
|
>
|
| 10479 |
|
|
|
| 10480 |
|
|
248a : ca [ 2] dex
|
| 10481 |
|
|
248b : 10e0 [ 3] bpl tasl5
|
| 10482 |
|
|
|
| 10483 |
|
|
248d : a203 [ 2] ldx #3
|
| 10484 |
|
|
248f : tlsr4
|
| 10485 |
|
|
set_abs zp1,0
|
| 10486 |
|
|
> load_flag 0
|
| 10487 |
|
|
248f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10488 |
|
|
>
|
| 10489 |
|
|
2491 : 48 [ 3]> pha ;use stack to load status
|
| 10490 |
|
|
2492 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10491 |
|
|
2494 : 8d0302 [ 4]> sta abst
|
| 10492 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 182
|
| 10493 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10494 |
|
|
|
| 10495 |
|
|
2497 : 28 [ 4]> plp
|
| 10496 |
|
|
|
| 10497 |
|
|
2498 : 4e0302 [ 6] lsr abst
|
| 10498 |
|
|
tst_abs rLSR,fLSR,0
|
| 10499 |
|
|
249b : 08 [ 3]> php ;save flags
|
| 10500 |
|
|
249c : ad0302 [ 4]> lda abst
|
| 10501 |
|
|
249f : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 10502 |
|
|
> trap_ne
|
| 10503 |
|
|
24a2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10504 |
|
|
>
|
| 10505 |
|
|
24a4 : 68 [ 4]> pla ;load status
|
| 10506 |
|
|
> eor_flag 0
|
| 10507 |
|
|
24a5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10508 |
|
|
>
|
| 10509 |
|
|
24a7 : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 10510 |
|
|
> trap_ne
|
| 10511 |
|
|
24aa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10512 |
|
|
>
|
| 10513 |
|
|
|
| 10514 |
|
|
24ac : ca [ 2] dex
|
| 10515 |
|
|
24ad : 10e0 [ 3] bpl tlsr4
|
| 10516 |
|
|
24af : a203 [ 2] ldx #3
|
| 10517 |
|
|
24b1 : tlsr5
|
| 10518 |
|
|
set_abs zp1,$ff
|
| 10519 |
|
|
> load_flag $ff
|
| 10520 |
|
|
24b1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10521 |
|
|
>
|
| 10522 |
|
|
24b3 : 48 [ 3]> pha ;use stack to load status
|
| 10523 |
|
|
24b4 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10524 |
|
|
24b6 : 8d0302 [ 4]> sta abst
|
| 10525 |
|
|
24b9 : 28 [ 4]> plp
|
| 10526 |
|
|
|
| 10527 |
|
|
24ba : 4e0302 [ 6] lsr abst
|
| 10528 |
|
|
tst_abs rLSR,fLSR,$ff-fnzc
|
| 10529 |
|
|
24bd : 08 [ 3]> php ;save flags
|
| 10530 |
|
|
24be : ad0302 [ 4]> lda abst
|
| 10531 |
|
|
24c1 : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 10532 |
|
|
> trap_ne
|
| 10533 |
|
|
24c4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10534 |
|
|
>
|
| 10535 |
|
|
24c6 : 68 [ 4]> pla ;load status
|
| 10536 |
|
|
> eor_flag $ff-fnzc
|
| 10537 |
|
|
24c7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10538 |
|
|
>
|
| 10539 |
|
|
24c9 : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 10540 |
|
|
> trap_ne
|
| 10541 |
|
|
24cc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10542 |
|
|
>
|
| 10543 |
|
|
|
| 10544 |
|
|
24ce : ca [ 2] dex
|
| 10545 |
|
|
24cf : 10e0 [ 3] bpl tlsr5
|
| 10546 |
|
|
|
| 10547 |
|
|
24d1 : a203 [ 2] ldx #3
|
| 10548 |
|
|
24d3 : trol4
|
| 10549 |
|
|
set_abs zp1,0
|
| 10550 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 183
|
| 10551 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10552 |
|
|
|
| 10553 |
|
|
> load_flag 0
|
| 10554 |
|
|
24d3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10555 |
|
|
>
|
| 10556 |
|
|
24d5 : 48 [ 3]> pha ;use stack to load status
|
| 10557 |
|
|
24d6 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10558 |
|
|
24d8 : 8d0302 [ 4]> sta abst
|
| 10559 |
|
|
24db : 28 [ 4]> plp
|
| 10560 |
|
|
|
| 10561 |
|
|
24dc : 2e0302 [ 6] rol abst
|
| 10562 |
|
|
tst_abs rROL,fROL,0
|
| 10563 |
|
|
24df : 08 [ 3]> php ;save flags
|
| 10564 |
|
|
24e0 : ad0302 [ 4]> lda abst
|
| 10565 |
|
|
24e3 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 10566 |
|
|
> trap_ne
|
| 10567 |
|
|
24e6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10568 |
|
|
>
|
| 10569 |
|
|
24e8 : 68 [ 4]> pla ;load status
|
| 10570 |
|
|
> eor_flag 0
|
| 10571 |
|
|
24e9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10572 |
|
|
>
|
| 10573 |
|
|
24eb : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 10574 |
|
|
> trap_ne
|
| 10575 |
|
|
24ee : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10576 |
|
|
>
|
| 10577 |
|
|
|
| 10578 |
|
|
24f0 : ca [ 2] dex
|
| 10579 |
|
|
24f1 : 10e0 [ 3] bpl trol4
|
| 10580 |
|
|
24f3 : a203 [ 2] ldx #3
|
| 10581 |
|
|
24f5 : trol5
|
| 10582 |
|
|
set_abs zp1,$ff-fc
|
| 10583 |
|
|
> load_flag $ff-fc
|
| 10584 |
|
|
24f5 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 10585 |
|
|
>
|
| 10586 |
|
|
24f7 : 48 [ 3]> pha ;use stack to load status
|
| 10587 |
|
|
24f8 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10588 |
|
|
24fa : 8d0302 [ 4]> sta abst
|
| 10589 |
|
|
24fd : 28 [ 4]> plp
|
| 10590 |
|
|
|
| 10591 |
|
|
24fe : 2e0302 [ 6] rol abst
|
| 10592 |
|
|
tst_abs rROL,fROL,$ff-fnzc
|
| 10593 |
|
|
2501 : 08 [ 3]> php ;save flags
|
| 10594 |
|
|
2502 : ad0302 [ 4]> lda abst
|
| 10595 |
|
|
2505 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 10596 |
|
|
> trap_ne
|
| 10597 |
|
|
2508 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10598 |
|
|
>
|
| 10599 |
|
|
250a : 68 [ 4]> pla ;load status
|
| 10600 |
|
|
> eor_flag $ff-fnzc
|
| 10601 |
|
|
250b : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10602 |
|
|
>
|
| 10603 |
|
|
250d : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 10604 |
|
|
> trap_ne
|
| 10605 |
|
|
2510 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10606 |
|
|
>
|
| 10607 |
|
|
|
| 10608 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 184
|
| 10609 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10610 |
|
|
|
| 10611 |
|
|
2512 : ca [ 2] dex
|
| 10612 |
|
|
2513 : 10e0 [ 4] bpl trol5
|
| 10613 |
|
|
|
| 10614 |
|
|
2515 : a203 [ 2] ldx #3
|
| 10615 |
|
|
2517 : trolc4
|
| 10616 |
|
|
set_abs zp1,fc
|
| 10617 |
|
|
> load_flag fc
|
| 10618 |
|
|
2517 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 10619 |
|
|
>
|
| 10620 |
|
|
2519 : 48 [ 3]> pha ;use stack to load status
|
| 10621 |
|
|
251a : b513 [ 4]> lda zp1,x ;load to memory
|
| 10622 |
|
|
251c : 8d0302 [ 4]> sta abst
|
| 10623 |
|
|
251f : 28 [ 4]> plp
|
| 10624 |
|
|
|
| 10625 |
|
|
2520 : 2e0302 [ 6] rol abst
|
| 10626 |
|
|
tst_abs rROLc,fROLc,0
|
| 10627 |
|
|
2523 : 08 [ 3]> php ;save flags
|
| 10628 |
|
|
2524 : ad0302 [ 4]> lda abst
|
| 10629 |
|
|
2527 : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 10630 |
|
|
> trap_ne
|
| 10631 |
|
|
252a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10632 |
|
|
>
|
| 10633 |
|
|
252c : 68 [ 4]> pla ;load status
|
| 10634 |
|
|
> eor_flag 0
|
| 10635 |
|
|
252d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10636 |
|
|
>
|
| 10637 |
|
|
252f : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 10638 |
|
|
> trap_ne
|
| 10639 |
|
|
2532 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10640 |
|
|
>
|
| 10641 |
|
|
|
| 10642 |
|
|
2534 : ca [ 2] dex
|
| 10643 |
|
|
2535 : 10e0 [ 3] bpl trolc4
|
| 10644 |
|
|
2537 : a203 [ 2] ldx #3
|
| 10645 |
|
|
2539 : trolc5
|
| 10646 |
|
|
set_abs zp1,$ff
|
| 10647 |
|
|
> load_flag $ff
|
| 10648 |
|
|
2539 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10649 |
|
|
>
|
| 10650 |
|
|
253b : 48 [ 3]> pha ;use stack to load status
|
| 10651 |
|
|
253c : b513 [ 4]> lda zp1,x ;load to memory
|
| 10652 |
|
|
253e : 8d0302 [ 4]> sta abst
|
| 10653 |
|
|
2541 : 28 [ 4]> plp
|
| 10654 |
|
|
|
| 10655 |
|
|
2542 : 2e0302 [ 6] rol abst
|
| 10656 |
|
|
tst_abs rROLc,fROLc,$ff-fnzc
|
| 10657 |
|
|
2545 : 08 [ 3]> php ;save flags
|
| 10658 |
|
|
2546 : ad0302 [ 4]> lda abst
|
| 10659 |
|
|
2549 : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 10660 |
|
|
> trap_ne
|
| 10661 |
|
|
254c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10662 |
|
|
>
|
| 10663 |
|
|
254e : 68 [ 4]> pla ;load status
|
| 10664 |
|
|
> eor_flag $ff-fnzc
|
| 10665 |
|
|
254f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10666 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 185
|
| 10667 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10668 |
|
|
|
| 10669 |
|
|
>
|
| 10670 |
|
|
2551 : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 10671 |
|
|
> trap_ne
|
| 10672 |
|
|
2554 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10673 |
|
|
>
|
| 10674 |
|
|
|
| 10675 |
|
|
2556 : ca [ 2] dex
|
| 10676 |
|
|
2557 : 10e0 [ 3] bpl trolc5
|
| 10677 |
|
|
|
| 10678 |
|
|
2559 : a203 [ 2] ldx #3
|
| 10679 |
|
|
255b : tror4
|
| 10680 |
|
|
set_abs zp1,0
|
| 10681 |
|
|
> load_flag 0
|
| 10682 |
|
|
255b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10683 |
|
|
>
|
| 10684 |
|
|
255d : 48 [ 3]> pha ;use stack to load status
|
| 10685 |
|
|
255e : b513 [ 4]> lda zp1,x ;load to memory
|
| 10686 |
|
|
2560 : 8d0302 [ 4]> sta abst
|
| 10687 |
|
|
2563 : 28 [ 4]> plp
|
| 10688 |
|
|
|
| 10689 |
|
|
2564 : 6e0302 [ 6] ror abst
|
| 10690 |
|
|
tst_abs rROR,fROR,0
|
| 10691 |
|
|
2567 : 08 [ 3]> php ;save flags
|
| 10692 |
|
|
2568 : ad0302 [ 4]> lda abst
|
| 10693 |
|
|
256b : dd1902 [ 4]> cmp rROR,x ;test result
|
| 10694 |
|
|
> trap_ne
|
| 10695 |
|
|
256e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10696 |
|
|
>
|
| 10697 |
|
|
2570 : 68 [ 4]> pla ;load status
|
| 10698 |
|
|
> eor_flag 0
|
| 10699 |
|
|
2571 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10700 |
|
|
>
|
| 10701 |
|
|
2573 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 10702 |
|
|
> trap_ne
|
| 10703 |
|
|
2576 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10704 |
|
|
>
|
| 10705 |
|
|
|
| 10706 |
|
|
2578 : ca [ 2] dex
|
| 10707 |
|
|
2579 : 10e0 [ 3] bpl tror4
|
| 10708 |
|
|
257b : a203 [ 2] ldx #3
|
| 10709 |
|
|
257d : tror5
|
| 10710 |
|
|
set_abs zp1,$ff-fc
|
| 10711 |
|
|
> load_flag $ff-fc
|
| 10712 |
|
|
257d : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 10713 |
|
|
>
|
| 10714 |
|
|
257f : 48 [ 3]> pha ;use stack to load status
|
| 10715 |
|
|
2580 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10716 |
|
|
2582 : 8d0302 [ 4]> sta abst
|
| 10717 |
|
|
2585 : 28 [ 4]> plp
|
| 10718 |
|
|
|
| 10719 |
|
|
2586 : 6e0302 [ 6] ror abst
|
| 10720 |
|
|
tst_abs rROR,fROR,$ff-fnzc
|
| 10721 |
|
|
2589 : 08 [ 3]> php ;save flags
|
| 10722 |
|
|
258a : ad0302 [ 4]> lda abst
|
| 10723 |
|
|
258d : dd1902 [ 4]> cmp rROR,x ;test result
|
| 10724 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 186
|
| 10725 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10726 |
|
|
|
| 10727 |
|
|
> trap_ne
|
| 10728 |
|
|
2590 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10729 |
|
|
>
|
| 10730 |
|
|
2592 : 68 [ 4]> pla ;load status
|
| 10731 |
|
|
> eor_flag $ff-fnzc
|
| 10732 |
|
|
2593 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10733 |
|
|
>
|
| 10734 |
|
|
2595 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 10735 |
|
|
> trap_ne
|
| 10736 |
|
|
2598 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10737 |
|
|
>
|
| 10738 |
|
|
|
| 10739 |
|
|
259a : ca [ 2] dex
|
| 10740 |
|
|
259b : 10e0 [ 3] bpl tror5
|
| 10741 |
|
|
|
| 10742 |
|
|
259d : a203 [ 2] ldx #3
|
| 10743 |
|
|
259f : trorc4
|
| 10744 |
|
|
set_abs zp1,fc
|
| 10745 |
|
|
> load_flag fc
|
| 10746 |
|
|
259f : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 10747 |
|
|
>
|
| 10748 |
|
|
25a1 : 48 [ 3]> pha ;use stack to load status
|
| 10749 |
|
|
25a2 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10750 |
|
|
25a4 : 8d0302 [ 4]> sta abst
|
| 10751 |
|
|
25a7 : 28 [ 4]> plp
|
| 10752 |
|
|
|
| 10753 |
|
|
25a8 : 6e0302 [ 6] ror abst
|
| 10754 |
|
|
tst_abs rRORc,fRORc,0
|
| 10755 |
|
|
25ab : 08 [ 3]> php ;save flags
|
| 10756 |
|
|
25ac : ad0302 [ 4]> lda abst
|
| 10757 |
|
|
25af : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 10758 |
|
|
> trap_ne
|
| 10759 |
|
|
25b2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10760 |
|
|
>
|
| 10761 |
|
|
25b4 : 68 [ 4]> pla ;load status
|
| 10762 |
|
|
> eor_flag 0
|
| 10763 |
|
|
25b5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10764 |
|
|
>
|
| 10765 |
|
|
25b7 : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 10766 |
|
|
> trap_ne
|
| 10767 |
|
|
25ba : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10768 |
|
|
>
|
| 10769 |
|
|
|
| 10770 |
|
|
25bc : ca [ 2] dex
|
| 10771 |
|
|
25bd : 10e0 [ 3] bpl trorc4
|
| 10772 |
|
|
25bf : a203 [ 2] ldx #3
|
| 10773 |
|
|
25c1 : trorc5
|
| 10774 |
|
|
set_abs zp1,$ff
|
| 10775 |
|
|
> load_flag $ff
|
| 10776 |
|
|
25c1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10777 |
|
|
>
|
| 10778 |
|
|
25c3 : 48 [ 3]> pha ;use stack to load status
|
| 10779 |
|
|
25c4 : b513 [ 4]> lda zp1,x ;load to memory
|
| 10780 |
|
|
25c6 : 8d0302 [ 4]> sta abst
|
| 10781 |
|
|
25c9 : 28 [ 4]> plp
|
| 10782 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 187
|
| 10783 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10784 |
|
|
|
| 10785 |
|
|
|
| 10786 |
|
|
25ca : 6e0302 [ 6] ror abst
|
| 10787 |
|
|
tst_abs rRORc,fRORc,$ff-fnzc
|
| 10788 |
|
|
25cd : 08 [ 3]> php ;save flags
|
| 10789 |
|
|
25ce : ad0302 [ 4]> lda abst
|
| 10790 |
|
|
25d1 : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 10791 |
|
|
> trap_ne
|
| 10792 |
|
|
25d4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10793 |
|
|
>
|
| 10794 |
|
|
25d6 : 68 [ 4]> pla ;load status
|
| 10795 |
|
|
> eor_flag $ff-fnzc
|
| 10796 |
|
|
25d7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10797 |
|
|
>
|
| 10798 |
|
|
25d9 : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 10799 |
|
|
> trap_ne
|
| 10800 |
|
|
25dc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10801 |
|
|
>
|
| 10802 |
|
|
|
| 10803 |
|
|
25de : ca [ 2] dex
|
| 10804 |
|
|
25df : 10e0 [ 3] bpl trorc5
|
| 10805 |
|
|
next_test
|
| 10806 |
|
|
25e1 : ad0002 [ 4]> lda test_case ;previous test
|
| 10807 |
|
|
25e4 : c91f [ 2]> cmp #test_num
|
| 10808 |
|
|
> trap_ne ;test is out of sequence
|
| 10809 |
|
|
25e6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10810 |
|
|
>
|
| 10811 |
|
|
0020 = >test_num = test_num + 1
|
| 10812 |
|
|
25e8 : a920 [ 2]> lda #test_num ;*** this tests' number
|
| 10813 |
|
|
25ea : 8d0002 [ 4]> sta test_case
|
| 10814 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 10815 |
|
|
|
| 10816 |
|
|
|
| 10817 |
|
|
; shifts - zp indexed
|
| 10818 |
|
|
25ed : a203 [ 2] ldx #3
|
| 10819 |
|
|
25ef : tasl6
|
| 10820 |
|
|
set_zx zp1,0
|
| 10821 |
|
|
> load_flag 0
|
| 10822 |
|
|
25ef : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10823 |
|
|
>
|
| 10824 |
|
|
25f1 : 48 [ 3]> pha ;use stack to load status
|
| 10825 |
|
|
25f2 : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 10826 |
|
|
25f4 : 950c [ 4]> sta zpt,x
|
| 10827 |
|
|
25f6 : 28 [ 4]> plp
|
| 10828 |
|
|
|
| 10829 |
|
|
25f7 : 160c [ 6] asl zpt,x
|
| 10830 |
|
|
tst_zx rASL,fASL,0
|
| 10831 |
|
|
25f9 : 08 [ 3]> php ;save flags
|
| 10832 |
|
|
25fa : b50c [ 4]> lda zpt,x
|
| 10833 |
|
|
25fc : dd1102 [ 4]> cmp rASL,x ;test result
|
| 10834 |
|
|
> trap_ne
|
| 10835 |
|
|
25ff : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10836 |
|
|
>
|
| 10837 |
|
|
2601 : 68 [ 4]> pla ;load status
|
| 10838 |
|
|
> eor_flag 0
|
| 10839 |
|
|
2602 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10840 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 188
|
| 10841 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10842 |
|
|
|
| 10843 |
|
|
>
|
| 10844 |
|
|
2604 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 10845 |
|
|
> trap_ne
|
| 10846 |
|
|
2607 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10847 |
|
|
>
|
| 10848 |
|
|
|
| 10849 |
|
|
2609 : ca [ 2] dex
|
| 10850 |
|
|
260a : 10e3 [ 4] bpl tasl6
|
| 10851 |
|
|
260c : a203 [ 2] ldx #3
|
| 10852 |
|
|
260e : tasl7
|
| 10853 |
|
|
set_zx zp1,$ff
|
| 10854 |
|
|
> load_flag $ff
|
| 10855 |
|
|
260e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10856 |
|
|
>
|
| 10857 |
|
|
2610 : 48 [ 3]> pha ;use stack to load status
|
| 10858 |
|
|
2611 : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 10859 |
|
|
2613 : 950c [ 4]> sta zpt,x
|
| 10860 |
|
|
2615 : 28 [ 4]> plp
|
| 10861 |
|
|
|
| 10862 |
|
|
2616 : 160c [ 6] asl zpt,x
|
| 10863 |
|
|
tst_zx rASL,fASL,$ff-fnzc
|
| 10864 |
|
|
2618 : 08 [ 3]> php ;save flags
|
| 10865 |
|
|
2619 : b50c [ 4]> lda zpt,x
|
| 10866 |
|
|
261b : dd1102 [ 4]> cmp rASL,x ;test result
|
| 10867 |
|
|
> trap_ne
|
| 10868 |
|
|
261e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10869 |
|
|
>
|
| 10870 |
|
|
2620 : 68 [ 4]> pla ;load status
|
| 10871 |
|
|
> eor_flag $ff-fnzc
|
| 10872 |
|
|
2621 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10873 |
|
|
>
|
| 10874 |
|
|
2623 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 10875 |
|
|
> trap_ne
|
| 10876 |
|
|
2626 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10877 |
|
|
>
|
| 10878 |
|
|
|
| 10879 |
|
|
2628 : ca [ 2] dex
|
| 10880 |
|
|
2629 : 10e3 [ 3] bpl tasl7
|
| 10881 |
|
|
|
| 10882 |
|
|
262b : a203 [ 2] ldx #3
|
| 10883 |
|
|
262d : tlsr6
|
| 10884 |
|
|
set_zx zp1,0
|
| 10885 |
|
|
> load_flag 0
|
| 10886 |
|
|
262d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10887 |
|
|
>
|
| 10888 |
|
|
262f : 48 [ 3]> pha ;use stack to load status
|
| 10889 |
|
|
2630 : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 10890 |
|
|
2632 : 950c [ 4]> sta zpt,x
|
| 10891 |
|
|
2634 : 28 [ 4]> plp
|
| 10892 |
|
|
|
| 10893 |
|
|
2635 : 560c [ 6] lsr zpt,x
|
| 10894 |
|
|
tst_zx rLSR,fLSR,0
|
| 10895 |
|
|
2637 : 08 [ 3]> php ;save flags
|
| 10896 |
|
|
2638 : b50c [ 4]> lda zpt,x
|
| 10897 |
|
|
263a : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 10898 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 189
|
| 10899 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10900 |
|
|
|
| 10901 |
|
|
> trap_ne
|
| 10902 |
|
|
263d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10903 |
|
|
>
|
| 10904 |
|
|
263f : 68 [ 4]> pla ;load status
|
| 10905 |
|
|
> eor_flag 0
|
| 10906 |
|
|
2640 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10907 |
|
|
>
|
| 10908 |
|
|
2642 : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 10909 |
|
|
> trap_ne
|
| 10910 |
|
|
2645 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10911 |
|
|
>
|
| 10912 |
|
|
|
| 10913 |
|
|
2647 : ca [ 2] dex
|
| 10914 |
|
|
2648 : 10e3 [ 3] bpl tlsr6
|
| 10915 |
|
|
264a : a203 [ 2] ldx #3
|
| 10916 |
|
|
264c : tlsr7
|
| 10917 |
|
|
set_zx zp1,$ff
|
| 10918 |
|
|
> load_flag $ff
|
| 10919 |
|
|
264c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 10920 |
|
|
>
|
| 10921 |
|
|
264e : 48 [ 3]> pha ;use stack to load status
|
| 10922 |
|
|
264f : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 10923 |
|
|
2651 : 950c [ 4]> sta zpt,x
|
| 10924 |
|
|
2653 : 28 [ 4]> plp
|
| 10925 |
|
|
|
| 10926 |
|
|
2654 : 560c [ 6] lsr zpt,x
|
| 10927 |
|
|
tst_zx rLSR,fLSR,$ff-fnzc
|
| 10928 |
|
|
2656 : 08 [ 3]> php ;save flags
|
| 10929 |
|
|
2657 : b50c [ 4]> lda zpt,x
|
| 10930 |
|
|
2659 : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 10931 |
|
|
> trap_ne
|
| 10932 |
|
|
265c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10933 |
|
|
>
|
| 10934 |
|
|
265e : 68 [ 4]> pla ;load status
|
| 10935 |
|
|
> eor_flag $ff-fnzc
|
| 10936 |
|
|
265f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 10937 |
|
|
>
|
| 10938 |
|
|
2661 : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 10939 |
|
|
> trap_ne
|
| 10940 |
|
|
2664 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10941 |
|
|
>
|
| 10942 |
|
|
|
| 10943 |
|
|
2666 : ca [ 2] dex
|
| 10944 |
|
|
2667 : 10e3 [ 3] bpl tlsr7
|
| 10945 |
|
|
|
| 10946 |
|
|
2669 : a203 [ 2] ldx #3
|
| 10947 |
|
|
266b : trol6
|
| 10948 |
|
|
set_zx zp1,0
|
| 10949 |
|
|
> load_flag 0
|
| 10950 |
|
|
266b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 10951 |
|
|
>
|
| 10952 |
|
|
266d : 48 [ 3]> pha ;use stack to load status
|
| 10953 |
|
|
266e : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 10954 |
|
|
2670 : 950c [ 4]> sta zpt,x
|
| 10955 |
|
|
2672 : 28 [ 4]> plp
|
| 10956 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 190
|
| 10957 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 10958 |
|
|
|
| 10959 |
|
|
|
| 10960 |
|
|
2673 : 360c [ 6] rol zpt,x
|
| 10961 |
|
|
tst_zx rROL,fROL,0
|
| 10962 |
|
|
2675 : 08 [ 3]> php ;save flags
|
| 10963 |
|
|
2676 : b50c [ 4]> lda zpt,x
|
| 10964 |
|
|
2678 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 10965 |
|
|
> trap_ne
|
| 10966 |
|
|
267b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10967 |
|
|
>
|
| 10968 |
|
|
267d : 68 [ 4]> pla ;load status
|
| 10969 |
|
|
> eor_flag 0
|
| 10970 |
|
|
267e : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 10971 |
|
|
>
|
| 10972 |
|
|
2680 : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 10973 |
|
|
> trap_ne
|
| 10974 |
|
|
2683 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10975 |
|
|
>
|
| 10976 |
|
|
|
| 10977 |
|
|
2685 : ca [ 2] dex
|
| 10978 |
|
|
2686 : 10e3 [ 3] bpl trol6
|
| 10979 |
|
|
2688 : a203 [ 2] ldx #3
|
| 10980 |
|
|
268a : trol7
|
| 10981 |
|
|
set_zx zp1,$ff-fc
|
| 10982 |
|
|
> load_flag $ff-fc
|
| 10983 |
|
|
268a : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 10984 |
|
|
>
|
| 10985 |
|
|
268c : 48 [ 3]> pha ;use stack to load status
|
| 10986 |
|
|
268d : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 10987 |
|
|
268f : 950c [ 4]> sta zpt,x
|
| 10988 |
|
|
2691 : 28 [ 4]> plp
|
| 10989 |
|
|
|
| 10990 |
|
|
2692 : 360c [ 6] rol zpt,x
|
| 10991 |
|
|
tst_zx rROL,fROL,$ff-fnzc
|
| 10992 |
|
|
2694 : 08 [ 3]> php ;save flags
|
| 10993 |
|
|
2695 : b50c [ 4]> lda zpt,x
|
| 10994 |
|
|
2697 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 10995 |
|
|
> trap_ne
|
| 10996 |
|
|
269a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 10997 |
|
|
>
|
| 10998 |
|
|
269c : 68 [ 4]> pla ;load status
|
| 10999 |
|
|
> eor_flag $ff-fnzc
|
| 11000 |
|
|
269d : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11001 |
|
|
>
|
| 11002 |
|
|
269f : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 11003 |
|
|
> trap_ne
|
| 11004 |
|
|
26a2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11005 |
|
|
>
|
| 11006 |
|
|
|
| 11007 |
|
|
26a4 : ca [ 2] dex
|
| 11008 |
|
|
26a5 : 10e3 [ 3] bpl trol7
|
| 11009 |
|
|
|
| 11010 |
|
|
26a7 : a203 [ 2] ldx #3
|
| 11011 |
|
|
26a9 : trolc6
|
| 11012 |
|
|
set_zx zp1,fc
|
| 11013 |
|
|
> load_flag fc
|
| 11014 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 191
|
| 11015 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11016 |
|
|
|
| 11017 |
|
|
26a9 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 11018 |
|
|
>
|
| 11019 |
|
|
26ab : 48 [ 3]> pha ;use stack to load status
|
| 11020 |
|
|
26ac : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 11021 |
|
|
26ae : 950c [ 4]> sta zpt,x
|
| 11022 |
|
|
26b0 : 28 [ 4]> plp
|
| 11023 |
|
|
|
| 11024 |
|
|
26b1 : 360c [ 6] rol zpt,x
|
| 11025 |
|
|
tst_zx rROLc,fROLc,0
|
| 11026 |
|
|
26b3 : 08 [ 3]> php ;save flags
|
| 11027 |
|
|
26b4 : b50c [ 4]> lda zpt,x
|
| 11028 |
|
|
26b6 : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 11029 |
|
|
> trap_ne
|
| 11030 |
|
|
26b9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11031 |
|
|
>
|
| 11032 |
|
|
26bb : 68 [ 4]> pla ;load status
|
| 11033 |
|
|
> eor_flag 0
|
| 11034 |
|
|
26bc : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11035 |
|
|
>
|
| 11036 |
|
|
26be : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 11037 |
|
|
> trap_ne
|
| 11038 |
|
|
26c1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11039 |
|
|
>
|
| 11040 |
|
|
|
| 11041 |
|
|
26c3 : ca [ 2] dex
|
| 11042 |
|
|
26c4 : 10e3 [ 3] bpl trolc6
|
| 11043 |
|
|
26c6 : a203 [ 2] ldx #3
|
| 11044 |
|
|
26c8 : trolc7
|
| 11045 |
|
|
set_zx zp1,$ff
|
| 11046 |
|
|
> load_flag $ff
|
| 11047 |
|
|
26c8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11048 |
|
|
>
|
| 11049 |
|
|
26ca : 48 [ 3]> pha ;use stack to load status
|
| 11050 |
|
|
26cb : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 11051 |
|
|
26cd : 950c [ 4]> sta zpt,x
|
| 11052 |
|
|
26cf : 28 [ 4]> plp
|
| 11053 |
|
|
|
| 11054 |
|
|
26d0 : 360c [ 6] rol zpt,x
|
| 11055 |
|
|
tst_zx rROLc,fROLc,$ff-fnzc
|
| 11056 |
|
|
26d2 : 08 [ 3]> php ;save flags
|
| 11057 |
|
|
26d3 : b50c [ 4]> lda zpt,x
|
| 11058 |
|
|
26d5 : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 11059 |
|
|
> trap_ne
|
| 11060 |
|
|
26d8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11061 |
|
|
>
|
| 11062 |
|
|
26da : 68 [ 4]> pla ;load status
|
| 11063 |
|
|
> eor_flag $ff-fnzc
|
| 11064 |
|
|
26db : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11065 |
|
|
>
|
| 11066 |
|
|
26dd : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 11067 |
|
|
> trap_ne
|
| 11068 |
|
|
26e0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11069 |
|
|
>
|
| 11070 |
|
|
|
| 11071 |
|
|
26e2 : ca [ 2] dex
|
| 11072 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 192
|
| 11073 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11074 |
|
|
|
| 11075 |
|
|
26e3 : 10e3 [ 3] bpl trolc7
|
| 11076 |
|
|
|
| 11077 |
|
|
26e5 : a203 [ 2] ldx #3
|
| 11078 |
|
|
26e7 : tror6
|
| 11079 |
|
|
set_zx zp1,0
|
| 11080 |
|
|
> load_flag 0
|
| 11081 |
|
|
26e7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11082 |
|
|
>
|
| 11083 |
|
|
26e9 : 48 [ 3]> pha ;use stack to load status
|
| 11084 |
|
|
26ea : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 11085 |
|
|
26ec : 950c [ 4]> sta zpt,x
|
| 11086 |
|
|
26ee : 28 [ 4]> plp
|
| 11087 |
|
|
|
| 11088 |
|
|
26ef : 760c [ 6] ror zpt,x
|
| 11089 |
|
|
tst_zx rROR,fROR,0
|
| 11090 |
|
|
26f1 : 08 [ 3]> php ;save flags
|
| 11091 |
|
|
26f2 : b50c [ 4]> lda zpt,x
|
| 11092 |
|
|
26f4 : dd1902 [ 4]> cmp rROR,x ;test result
|
| 11093 |
|
|
> trap_ne
|
| 11094 |
|
|
26f7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11095 |
|
|
>
|
| 11096 |
|
|
26f9 : 68 [ 4]> pla ;load status
|
| 11097 |
|
|
> eor_flag 0
|
| 11098 |
|
|
26fa : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11099 |
|
|
>
|
| 11100 |
|
|
26fc : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 11101 |
|
|
> trap_ne
|
| 11102 |
|
|
26ff : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11103 |
|
|
>
|
| 11104 |
|
|
|
| 11105 |
|
|
2701 : ca [ 2] dex
|
| 11106 |
|
|
2702 : 10e3 [ 4] bpl tror6
|
| 11107 |
|
|
2704 : a203 [ 2] ldx #3
|
| 11108 |
|
|
2706 : tror7
|
| 11109 |
|
|
set_zx zp1,$ff-fc
|
| 11110 |
|
|
> load_flag $ff-fc
|
| 11111 |
|
|
2706 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 11112 |
|
|
>
|
| 11113 |
|
|
2708 : 48 [ 3]> pha ;use stack to load status
|
| 11114 |
|
|
2709 : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 11115 |
|
|
270b : 950c [ 4]> sta zpt,x
|
| 11116 |
|
|
270d : 28 [ 4]> plp
|
| 11117 |
|
|
|
| 11118 |
|
|
270e : 760c [ 6] ror zpt,x
|
| 11119 |
|
|
tst_zx rROR,fROR,$ff-fnzc
|
| 11120 |
|
|
2710 : 08 [ 3]> php ;save flags
|
| 11121 |
|
|
2711 : b50c [ 4]> lda zpt,x
|
| 11122 |
|
|
2713 : dd1902 [ 4]> cmp rROR,x ;test result
|
| 11123 |
|
|
> trap_ne
|
| 11124 |
|
|
2716 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11125 |
|
|
>
|
| 11126 |
|
|
2718 : 68 [ 4]> pla ;load status
|
| 11127 |
|
|
> eor_flag $ff-fnzc
|
| 11128 |
|
|
2719 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11129 |
|
|
>
|
| 11130 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 193
|
| 11131 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11132 |
|
|
|
| 11133 |
|
|
271b : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 11134 |
|
|
> trap_ne
|
| 11135 |
|
|
271e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11136 |
|
|
>
|
| 11137 |
|
|
|
| 11138 |
|
|
2720 : ca [ 2] dex
|
| 11139 |
|
|
2721 : 10e3 [ 3] bpl tror7
|
| 11140 |
|
|
|
| 11141 |
|
|
2723 : a203 [ 2] ldx #3
|
| 11142 |
|
|
2725 : trorc6
|
| 11143 |
|
|
set_zx zp1,fc
|
| 11144 |
|
|
> load_flag fc
|
| 11145 |
|
|
2725 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 11146 |
|
|
>
|
| 11147 |
|
|
2727 : 48 [ 3]> pha ;use stack to load status
|
| 11148 |
|
|
2728 : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 11149 |
|
|
272a : 950c [ 4]> sta zpt,x
|
| 11150 |
|
|
272c : 28 [ 4]> plp
|
| 11151 |
|
|
|
| 11152 |
|
|
272d : 760c [ 6] ror zpt,x
|
| 11153 |
|
|
tst_zx rRORc,fRORc,0
|
| 11154 |
|
|
272f : 08 [ 3]> php ;save flags
|
| 11155 |
|
|
2730 : b50c [ 4]> lda zpt,x
|
| 11156 |
|
|
2732 : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 11157 |
|
|
> trap_ne
|
| 11158 |
|
|
2735 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11159 |
|
|
>
|
| 11160 |
|
|
2737 : 68 [ 4]> pla ;load status
|
| 11161 |
|
|
> eor_flag 0
|
| 11162 |
|
|
2738 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11163 |
|
|
>
|
| 11164 |
|
|
273a : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 11165 |
|
|
> trap_ne
|
| 11166 |
|
|
273d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11167 |
|
|
>
|
| 11168 |
|
|
|
| 11169 |
|
|
273f : ca [ 2] dex
|
| 11170 |
|
|
2740 : 10e3 [ 3] bpl trorc6
|
| 11171 |
|
|
2742 : a203 [ 2] ldx #3
|
| 11172 |
|
|
2744 : trorc7
|
| 11173 |
|
|
set_zx zp1,$ff
|
| 11174 |
|
|
> load_flag $ff
|
| 11175 |
|
|
2744 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11176 |
|
|
>
|
| 11177 |
|
|
2746 : 48 [ 3]> pha ;use stack to load status
|
| 11178 |
|
|
2747 : b513 [ 4]> lda zp1,x ;load to indexed zeropage
|
| 11179 |
|
|
2749 : 950c [ 4]> sta zpt,x
|
| 11180 |
|
|
274b : 28 [ 4]> plp
|
| 11181 |
|
|
|
| 11182 |
|
|
274c : 760c [ 6] ror zpt,x
|
| 11183 |
|
|
tst_zx rRORc,fRORc,$ff-fnzc
|
| 11184 |
|
|
274e : 08 [ 3]> php ;save flags
|
| 11185 |
|
|
274f : b50c [ 4]> lda zpt,x
|
| 11186 |
|
|
2751 : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 11187 |
|
|
> trap_ne
|
| 11188 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 194
|
| 11189 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11190 |
|
|
|
| 11191 |
|
|
2754 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11192 |
|
|
>
|
| 11193 |
|
|
2756 : 68 [ 4]> pla ;load status
|
| 11194 |
|
|
> eor_flag $ff-fnzc
|
| 11195 |
|
|
2757 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11196 |
|
|
>
|
| 11197 |
|
|
2759 : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 11198 |
|
|
> trap_ne
|
| 11199 |
|
|
275c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11200 |
|
|
>
|
| 11201 |
|
|
|
| 11202 |
|
|
275e : ca [ 2] dex
|
| 11203 |
|
|
275f : 10e3 [ 3] bpl trorc7
|
| 11204 |
|
|
next_test
|
| 11205 |
|
|
2761 : ad0002 [ 4]> lda test_case ;previous test
|
| 11206 |
|
|
2764 : c920 [ 2]> cmp #test_num
|
| 11207 |
|
|
> trap_ne ;test is out of sequence
|
| 11208 |
|
|
2766 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11209 |
|
|
>
|
| 11210 |
|
|
0021 = >test_num = test_num + 1
|
| 11211 |
|
|
2768 : a921 [ 2]> lda #test_num ;*** this tests' number
|
| 11212 |
|
|
276a : 8d0002 [ 4]> sta test_case
|
| 11213 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 11214 |
|
|
|
| 11215 |
|
|
|
| 11216 |
|
|
; shifts - abs indexed
|
| 11217 |
|
|
276d : a203 [ 2] ldx #3
|
| 11218 |
|
|
276f : tasl8
|
| 11219 |
|
|
set_absx zp1,0
|
| 11220 |
|
|
> load_flag 0
|
| 11221 |
|
|
276f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11222 |
|
|
>
|
| 11223 |
|
|
2771 : 48 [ 3]> pha ;use stack to load status
|
| 11224 |
|
|
2772 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11225 |
|
|
2774 : 9d0302 [ 5]> sta abst,x
|
| 11226 |
|
|
2777 : 28 [ 4]> plp
|
| 11227 |
|
|
|
| 11228 |
|
|
2778 : 1e0302 [ 6] asl abst,x
|
| 11229 |
|
|
tst_absx rASL,fASL,0
|
| 11230 |
|
|
277b : 08 [ 3]> php ;save flags
|
| 11231 |
|
|
277c : bd0302 [ 4]> lda abst,x
|
| 11232 |
|
|
277f : dd1102 [ 4]> cmp rASL,x ;test result
|
| 11233 |
|
|
> trap_ne
|
| 11234 |
|
|
2782 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11235 |
|
|
>
|
| 11236 |
|
|
2784 : 68 [ 4]> pla ;load status
|
| 11237 |
|
|
> eor_flag 0
|
| 11238 |
|
|
2785 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11239 |
|
|
>
|
| 11240 |
|
|
2787 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 11241 |
|
|
> trap_ne
|
| 11242 |
|
|
278a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11243 |
|
|
>
|
| 11244 |
|
|
|
| 11245 |
|
|
278c : ca [ 2] dex
|
| 11246 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 195
|
| 11247 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11248 |
|
|
|
| 11249 |
|
|
278d : 10e0 [ 3] bpl tasl8
|
| 11250 |
|
|
278f : a203 [ 2] ldx #3
|
| 11251 |
|
|
2791 : tasl9
|
| 11252 |
|
|
set_absx zp1,$ff
|
| 11253 |
|
|
> load_flag $ff
|
| 11254 |
|
|
2791 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11255 |
|
|
>
|
| 11256 |
|
|
2793 : 48 [ 3]> pha ;use stack to load status
|
| 11257 |
|
|
2794 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11258 |
|
|
2796 : 9d0302 [ 5]> sta abst,x
|
| 11259 |
|
|
2799 : 28 [ 4]> plp
|
| 11260 |
|
|
|
| 11261 |
|
|
279a : 1e0302 [ 6] asl abst,x
|
| 11262 |
|
|
tst_absx rASL,fASL,$ff-fnzc
|
| 11263 |
|
|
279d : 08 [ 3]> php ;save flags
|
| 11264 |
|
|
279e : bd0302 [ 4]> lda abst,x
|
| 11265 |
|
|
27a1 : dd1102 [ 4]> cmp rASL,x ;test result
|
| 11266 |
|
|
> trap_ne
|
| 11267 |
|
|
27a4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11268 |
|
|
>
|
| 11269 |
|
|
27a6 : 68 [ 4]> pla ;load status
|
| 11270 |
|
|
> eor_flag $ff-fnzc
|
| 11271 |
|
|
27a7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11272 |
|
|
>
|
| 11273 |
|
|
27a9 : dd2102 [ 4]> cmp fASL,x ;test flags
|
| 11274 |
|
|
> trap_ne
|
| 11275 |
|
|
27ac : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11276 |
|
|
>
|
| 11277 |
|
|
|
| 11278 |
|
|
27ae : ca [ 2] dex
|
| 11279 |
|
|
27af : 10e0 [ 3] bpl tasl9
|
| 11280 |
|
|
|
| 11281 |
|
|
27b1 : a203 [ 2] ldx #3
|
| 11282 |
|
|
27b3 : tlsr8
|
| 11283 |
|
|
set_absx zp1,0
|
| 11284 |
|
|
> load_flag 0
|
| 11285 |
|
|
27b3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11286 |
|
|
>
|
| 11287 |
|
|
27b5 : 48 [ 3]> pha ;use stack to load status
|
| 11288 |
|
|
27b6 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11289 |
|
|
27b8 : 9d0302 [ 5]> sta abst,x
|
| 11290 |
|
|
27bb : 28 [ 4]> plp
|
| 11291 |
|
|
|
| 11292 |
|
|
27bc : 5e0302 [ 6] lsr abst,x
|
| 11293 |
|
|
tst_absx rLSR,fLSR,0
|
| 11294 |
|
|
27bf : 08 [ 3]> php ;save flags
|
| 11295 |
|
|
27c0 : bd0302 [ 4]> lda abst,x
|
| 11296 |
|
|
27c3 : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 11297 |
|
|
> trap_ne
|
| 11298 |
|
|
27c6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11299 |
|
|
>
|
| 11300 |
|
|
27c8 : 68 [ 4]> pla ;load status
|
| 11301 |
|
|
> eor_flag 0
|
| 11302 |
|
|
27c9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11303 |
|
|
>
|
| 11304 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 196
|
| 11305 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11306 |
|
|
|
| 11307 |
|
|
27cb : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 11308 |
|
|
> trap_ne
|
| 11309 |
|
|
27ce : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11310 |
|
|
>
|
| 11311 |
|
|
|
| 11312 |
|
|
27d0 : ca [ 2] dex
|
| 11313 |
|
|
27d1 : 10e0 [ 3] bpl tlsr8
|
| 11314 |
|
|
27d3 : a203 [ 2] ldx #3
|
| 11315 |
|
|
27d5 : tlsr9
|
| 11316 |
|
|
set_absx zp1,$ff
|
| 11317 |
|
|
> load_flag $ff
|
| 11318 |
|
|
27d5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11319 |
|
|
>
|
| 11320 |
|
|
27d7 : 48 [ 3]> pha ;use stack to load status
|
| 11321 |
|
|
27d8 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11322 |
|
|
27da : 9d0302 [ 5]> sta abst,x
|
| 11323 |
|
|
27dd : 28 [ 4]> plp
|
| 11324 |
|
|
|
| 11325 |
|
|
27de : 5e0302 [ 6] lsr abst,x
|
| 11326 |
|
|
tst_absx rLSR,fLSR,$ff-fnzc
|
| 11327 |
|
|
27e1 : 08 [ 3]> php ;save flags
|
| 11328 |
|
|
27e2 : bd0302 [ 4]> lda abst,x
|
| 11329 |
|
|
27e5 : dd1902 [ 4]> cmp rLSR,x ;test result
|
| 11330 |
|
|
> trap_ne
|
| 11331 |
|
|
27e8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11332 |
|
|
>
|
| 11333 |
|
|
27ea : 68 [ 4]> pla ;load status
|
| 11334 |
|
|
> eor_flag $ff-fnzc
|
| 11335 |
|
|
27eb : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11336 |
|
|
>
|
| 11337 |
|
|
27ed : dd2902 [ 4]> cmp fLSR,x ;test flags
|
| 11338 |
|
|
> trap_ne
|
| 11339 |
|
|
27f0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11340 |
|
|
>
|
| 11341 |
|
|
|
| 11342 |
|
|
27f2 : ca [ 2] dex
|
| 11343 |
|
|
27f3 : 10e0 [ 3] bpl tlsr9
|
| 11344 |
|
|
|
| 11345 |
|
|
27f5 : a203 [ 2] ldx #3
|
| 11346 |
|
|
27f7 : trol8
|
| 11347 |
|
|
set_absx zp1,0
|
| 11348 |
|
|
> load_flag 0
|
| 11349 |
|
|
27f7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11350 |
|
|
>
|
| 11351 |
|
|
27f9 : 48 [ 3]> pha ;use stack to load status
|
| 11352 |
|
|
27fa : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11353 |
|
|
27fc : 9d0302 [ 5]> sta abst,x
|
| 11354 |
|
|
27ff : 28 [ 4]> plp
|
| 11355 |
|
|
|
| 11356 |
|
|
2800 : 3e0302 [ 6] rol abst,x
|
| 11357 |
|
|
tst_absx rROL,fROL,0
|
| 11358 |
|
|
2803 : 08 [ 3]> php ;save flags
|
| 11359 |
|
|
2804 : bd0302 [ 4]> lda abst,x
|
| 11360 |
|
|
2807 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 11361 |
|
|
> trap_ne
|
| 11362 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 197
|
| 11363 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11364 |
|
|
|
| 11365 |
|
|
280a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11366 |
|
|
>
|
| 11367 |
|
|
280c : 68 [ 4]> pla ;load status
|
| 11368 |
|
|
> eor_flag 0
|
| 11369 |
|
|
280d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11370 |
|
|
>
|
| 11371 |
|
|
280f : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 11372 |
|
|
> trap_ne
|
| 11373 |
|
|
2812 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11374 |
|
|
>
|
| 11375 |
|
|
|
| 11376 |
|
|
2814 : ca [ 2] dex
|
| 11377 |
|
|
2815 : 10e0 [ 4] bpl trol8
|
| 11378 |
|
|
2817 : a203 [ 2] ldx #3
|
| 11379 |
|
|
2819 : trol9
|
| 11380 |
|
|
set_absx zp1,$ff-fc
|
| 11381 |
|
|
> load_flag $ff-fc
|
| 11382 |
|
|
2819 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 11383 |
|
|
>
|
| 11384 |
|
|
281b : 48 [ 3]> pha ;use stack to load status
|
| 11385 |
|
|
281c : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11386 |
|
|
281e : 9d0302 [ 5]> sta abst,x
|
| 11387 |
|
|
2821 : 28 [ 4]> plp
|
| 11388 |
|
|
|
| 11389 |
|
|
2822 : 3e0302 [ 6] rol abst,x
|
| 11390 |
|
|
tst_absx rROL,fROL,$ff-fnzc
|
| 11391 |
|
|
2825 : 08 [ 3]> php ;save flags
|
| 11392 |
|
|
2826 : bd0302 [ 4]> lda abst,x
|
| 11393 |
|
|
2829 : dd1102 [ 4]> cmp rROL,x ;test result
|
| 11394 |
|
|
> trap_ne
|
| 11395 |
|
|
282c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11396 |
|
|
>
|
| 11397 |
|
|
282e : 68 [ 4]> pla ;load status
|
| 11398 |
|
|
> eor_flag $ff-fnzc
|
| 11399 |
|
|
282f : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11400 |
|
|
>
|
| 11401 |
|
|
2831 : dd2102 [ 4]> cmp fROL,x ;test flags
|
| 11402 |
|
|
> trap_ne
|
| 11403 |
|
|
2834 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11404 |
|
|
>
|
| 11405 |
|
|
|
| 11406 |
|
|
2836 : ca [ 2] dex
|
| 11407 |
|
|
2837 : 10e0 [ 3] bpl trol9
|
| 11408 |
|
|
|
| 11409 |
|
|
2839 : a203 [ 2] ldx #3
|
| 11410 |
|
|
283b : trolc8
|
| 11411 |
|
|
set_absx zp1,fc
|
| 11412 |
|
|
> load_flag fc
|
| 11413 |
|
|
283b : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 11414 |
|
|
>
|
| 11415 |
|
|
283d : 48 [ 3]> pha ;use stack to load status
|
| 11416 |
|
|
283e : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11417 |
|
|
2840 : 9d0302 [ 5]> sta abst,x
|
| 11418 |
|
|
2843 : 28 [ 4]> plp
|
| 11419 |
|
|
|
| 11420 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 198
|
| 11421 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11422 |
|
|
|
| 11423 |
|
|
2844 : 3e0302 [ 6] rol abst,x
|
| 11424 |
|
|
tst_absx rROLc,fROLc,0
|
| 11425 |
|
|
2847 : 08 [ 3]> php ;save flags
|
| 11426 |
|
|
2848 : bd0302 [ 4]> lda abst,x
|
| 11427 |
|
|
284b : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 11428 |
|
|
> trap_ne
|
| 11429 |
|
|
284e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11430 |
|
|
>
|
| 11431 |
|
|
2850 : 68 [ 4]> pla ;load status
|
| 11432 |
|
|
> eor_flag 0
|
| 11433 |
|
|
2851 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11434 |
|
|
>
|
| 11435 |
|
|
2853 : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 11436 |
|
|
> trap_ne
|
| 11437 |
|
|
2856 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11438 |
|
|
>
|
| 11439 |
|
|
|
| 11440 |
|
|
2858 : ca [ 2] dex
|
| 11441 |
|
|
2859 : 10e0 [ 3] bpl trolc8
|
| 11442 |
|
|
285b : a203 [ 2] ldx #3
|
| 11443 |
|
|
285d : trolc9
|
| 11444 |
|
|
set_absx zp1,$ff
|
| 11445 |
|
|
> load_flag $ff
|
| 11446 |
|
|
285d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11447 |
|
|
>
|
| 11448 |
|
|
285f : 48 [ 3]> pha ;use stack to load status
|
| 11449 |
|
|
2860 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11450 |
|
|
2862 : 9d0302 [ 5]> sta abst,x
|
| 11451 |
|
|
2865 : 28 [ 4]> plp
|
| 11452 |
|
|
|
| 11453 |
|
|
2866 : 3e0302 [ 6] rol abst,x
|
| 11454 |
|
|
tst_absx rROLc,fROLc,$ff-fnzc
|
| 11455 |
|
|
2869 : 08 [ 3]> php ;save flags
|
| 11456 |
|
|
286a : bd0302 [ 4]> lda abst,x
|
| 11457 |
|
|
286d : dd1502 [ 4]> cmp rROLc,x ;test result
|
| 11458 |
|
|
> trap_ne
|
| 11459 |
|
|
2870 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11460 |
|
|
>
|
| 11461 |
|
|
2872 : 68 [ 4]> pla ;load status
|
| 11462 |
|
|
> eor_flag $ff-fnzc
|
| 11463 |
|
|
2873 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11464 |
|
|
>
|
| 11465 |
|
|
2875 : dd2502 [ 4]> cmp fROLc,x ;test flags
|
| 11466 |
|
|
> trap_ne
|
| 11467 |
|
|
2878 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11468 |
|
|
>
|
| 11469 |
|
|
|
| 11470 |
|
|
287a : ca [ 2] dex
|
| 11471 |
|
|
287b : 10e0 [ 3] bpl trolc9
|
| 11472 |
|
|
|
| 11473 |
|
|
287d : a203 [ 2] ldx #3
|
| 11474 |
|
|
287f : tror8
|
| 11475 |
|
|
set_absx zp1,0
|
| 11476 |
|
|
> load_flag 0
|
| 11477 |
|
|
287f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11478 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 199
|
| 11479 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11480 |
|
|
|
| 11481 |
|
|
>
|
| 11482 |
|
|
2881 : 48 [ 3]> pha ;use stack to load status
|
| 11483 |
|
|
2882 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11484 |
|
|
2884 : 9d0302 [ 5]> sta abst,x
|
| 11485 |
|
|
2887 : 28 [ 4]> plp
|
| 11486 |
|
|
|
| 11487 |
|
|
2888 : 7e0302 [ 6] ror abst,x
|
| 11488 |
|
|
tst_absx rROR,fROR,0
|
| 11489 |
|
|
288b : 08 [ 3]> php ;save flags
|
| 11490 |
|
|
288c : bd0302 [ 4]> lda abst,x
|
| 11491 |
|
|
288f : dd1902 [ 4]> cmp rROR,x ;test result
|
| 11492 |
|
|
> trap_ne
|
| 11493 |
|
|
2892 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11494 |
|
|
>
|
| 11495 |
|
|
2894 : 68 [ 4]> pla ;load status
|
| 11496 |
|
|
> eor_flag 0
|
| 11497 |
|
|
2895 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11498 |
|
|
>
|
| 11499 |
|
|
2897 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 11500 |
|
|
> trap_ne
|
| 11501 |
|
|
289a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11502 |
|
|
>
|
| 11503 |
|
|
|
| 11504 |
|
|
289c : ca [ 2] dex
|
| 11505 |
|
|
289d : 10e0 [ 3] bpl tror8
|
| 11506 |
|
|
289f : a203 [ 2] ldx #3
|
| 11507 |
|
|
28a1 : tror9
|
| 11508 |
|
|
set_absx zp1,$ff-fc
|
| 11509 |
|
|
> load_flag $ff-fc
|
| 11510 |
|
|
28a1 : a9fe [ 2]> lda #$ff-fc ;allow test to change I-flag (no mask)
|
| 11511 |
|
|
>
|
| 11512 |
|
|
28a3 : 48 [ 3]> pha ;use stack to load status
|
| 11513 |
|
|
28a4 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11514 |
|
|
28a6 : 9d0302 [ 5]> sta abst,x
|
| 11515 |
|
|
28a9 : 28 [ 4]> plp
|
| 11516 |
|
|
|
| 11517 |
|
|
28aa : 7e0302 [ 6] ror abst,x
|
| 11518 |
|
|
tst_absx rROR,fROR,$ff-fnzc
|
| 11519 |
|
|
28ad : 08 [ 3]> php ;save flags
|
| 11520 |
|
|
28ae : bd0302 [ 4]> lda abst,x
|
| 11521 |
|
|
28b1 : dd1902 [ 4]> cmp rROR,x ;test result
|
| 11522 |
|
|
> trap_ne
|
| 11523 |
|
|
28b4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11524 |
|
|
>
|
| 11525 |
|
|
28b6 : 68 [ 4]> pla ;load status
|
| 11526 |
|
|
> eor_flag $ff-fnzc
|
| 11527 |
|
|
28b7 : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11528 |
|
|
>
|
| 11529 |
|
|
28b9 : dd2902 [ 4]> cmp fROR,x ;test flags
|
| 11530 |
|
|
> trap_ne
|
| 11531 |
|
|
28bc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11532 |
|
|
>
|
| 11533 |
|
|
|
| 11534 |
|
|
28be : ca [ 2] dex
|
| 11535 |
|
|
28bf : 10e0 [ 3] bpl tror9
|
| 11536 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 200
|
| 11537 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11538 |
|
|
|
| 11539 |
|
|
|
| 11540 |
|
|
28c1 : a203 [ 2] ldx #3
|
| 11541 |
|
|
28c3 : trorc8
|
| 11542 |
|
|
set_absx zp1,fc
|
| 11543 |
|
|
> load_flag fc
|
| 11544 |
|
|
28c3 : a901 [ 2]> lda #fc ;allow test to change I-flag (no mask)
|
| 11545 |
|
|
>
|
| 11546 |
|
|
28c5 : 48 [ 3]> pha ;use stack to load status
|
| 11547 |
|
|
28c6 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11548 |
|
|
28c8 : 9d0302 [ 5]> sta abst,x
|
| 11549 |
|
|
28cb : 28 [ 4]> plp
|
| 11550 |
|
|
|
| 11551 |
|
|
28cc : 7e0302 [ 6] ror abst,x
|
| 11552 |
|
|
tst_absx rRORc,fRORc,0
|
| 11553 |
|
|
28cf : 08 [ 3]> php ;save flags
|
| 11554 |
|
|
28d0 : bd0302 [ 4]> lda abst,x
|
| 11555 |
|
|
28d3 : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 11556 |
|
|
> trap_ne
|
| 11557 |
|
|
28d6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11558 |
|
|
>
|
| 11559 |
|
|
28d8 : 68 [ 4]> pla ;load status
|
| 11560 |
|
|
> eor_flag 0
|
| 11561 |
|
|
28d9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11562 |
|
|
>
|
| 11563 |
|
|
28db : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 11564 |
|
|
> trap_ne
|
| 11565 |
|
|
28de : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11566 |
|
|
>
|
| 11567 |
|
|
|
| 11568 |
|
|
28e0 : ca [ 2] dex
|
| 11569 |
|
|
28e1 : 10e0 [ 3] bpl trorc8
|
| 11570 |
|
|
28e3 : a203 [ 2] ldx #3
|
| 11571 |
|
|
28e5 : trorc9
|
| 11572 |
|
|
set_absx zp1,$ff
|
| 11573 |
|
|
> load_flag $ff
|
| 11574 |
|
|
28e5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11575 |
|
|
>
|
| 11576 |
|
|
28e7 : 48 [ 3]> pha ;use stack to load status
|
| 11577 |
|
|
28e8 : b513 [ 4]> lda zp1,x ;load to indexed memory
|
| 11578 |
|
|
28ea : 9d0302 [ 5]> sta abst,x
|
| 11579 |
|
|
28ed : 28 [ 4]> plp
|
| 11580 |
|
|
|
| 11581 |
|
|
28ee : 7e0302 [ 6] ror abst,x
|
| 11582 |
|
|
tst_absx rRORc,fRORc,$ff-fnzc
|
| 11583 |
|
|
28f1 : 08 [ 3]> php ;save flags
|
| 11584 |
|
|
28f2 : bd0302 [ 4]> lda abst,x
|
| 11585 |
|
|
28f5 : dd1d02 [ 4]> cmp rRORc,x ;test result
|
| 11586 |
|
|
> trap_ne
|
| 11587 |
|
|
28f8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11588 |
|
|
>
|
| 11589 |
|
|
28fa : 68 [ 4]> pla ;load status
|
| 11590 |
|
|
> eor_flag $ff-fnzc
|
| 11591 |
|
|
28fb : 497c [ 2]> eor #$ff-fnzc|fao ;invert expected flags + always on bits
|
| 11592 |
|
|
>
|
| 11593 |
|
|
28fd : dd2d02 [ 4]> cmp fRORc,x ;test flags
|
| 11594 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 201
|
| 11595 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11596 |
|
|
|
| 11597 |
|
|
> trap_ne
|
| 11598 |
|
|
2900 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11599 |
|
|
>
|
| 11600 |
|
|
|
| 11601 |
|
|
2902 : ca [ 2] dex
|
| 11602 |
|
|
2903 : 10e0 [ 4] bpl trorc9
|
| 11603 |
|
|
next_test
|
| 11604 |
|
|
2905 : ad0002 [ 4]> lda test_case ;previous test
|
| 11605 |
|
|
2908 : c921 [ 2]> cmp #test_num
|
| 11606 |
|
|
> trap_ne ;test is out of sequence
|
| 11607 |
|
|
290a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11608 |
|
|
>
|
| 11609 |
|
|
0022 = >test_num = test_num + 1
|
| 11610 |
|
|
290c : a922 [ 2]> lda #test_num ;*** this tests' number
|
| 11611 |
|
|
290e : 8d0002 [ 4]> sta test_case
|
| 11612 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 11613 |
|
|
|
| 11614 |
|
|
|
| 11615 |
|
|
; testing memory increment/decrement - INC DEC all addressing modes
|
| 11616 |
|
|
; zeropage
|
| 11617 |
|
|
2911 : a200 [ 2] ldx #0
|
| 11618 |
|
|
2913 : a97e [ 2] lda #$7e
|
| 11619 |
|
|
2915 : 850c [ 3] sta zpt
|
| 11620 |
|
|
2917 : tinc
|
| 11621 |
|
|
set_stat 0
|
| 11622 |
|
|
> load_flag 0
|
| 11623 |
|
|
2917 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11624 |
|
|
>
|
| 11625 |
|
|
2919 : 48 [ 3]> pha ;use stack to load status
|
| 11626 |
|
|
291a : 28 [ 4]> plp
|
| 11627 |
|
|
|
| 11628 |
|
|
291b : e60c [ 5] inc zpt
|
| 11629 |
|
|
tst_z rINC,fINC,0
|
| 11630 |
|
|
291d : 08 [ 3]> php ;save flags
|
| 11631 |
|
|
291e : a50c [ 3]> lda zpt
|
| 11632 |
|
|
2920 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11633 |
|
|
> trap_ne
|
| 11634 |
|
|
2923 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11635 |
|
|
>
|
| 11636 |
|
|
2925 : 68 [ 4]> pla ;load status
|
| 11637 |
|
|
> eor_flag 0
|
| 11638 |
|
|
2926 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11639 |
|
|
>
|
| 11640 |
|
|
2928 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11641 |
|
|
> trap_ne
|
| 11642 |
|
|
292b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11643 |
|
|
>
|
| 11644 |
|
|
|
| 11645 |
|
|
292d : e8 [ 2] inx
|
| 11646 |
|
|
292e : e002 [ 2] cpx #2
|
| 11647 |
|
|
2930 : d004 [ 3] bne tinc1
|
| 11648 |
|
|
2932 : a9fe [ 2] lda #$fe
|
| 11649 |
|
|
2934 : 850c [ 3] sta zpt
|
| 11650 |
|
|
2936 : e005 [ 2] tinc1 cpx #5
|
| 11651 |
|
|
2938 : d0dd [ 3] bne tinc
|
| 11652 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 202
|
| 11653 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11654 |
|
|
|
| 11655 |
|
|
293a : ca [ 2] dex
|
| 11656 |
|
|
293b : e60c [ 5] inc zpt
|
| 11657 |
|
|
293d : tdec
|
| 11658 |
|
|
set_stat 0
|
| 11659 |
|
|
> load_flag 0
|
| 11660 |
|
|
293d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11661 |
|
|
>
|
| 11662 |
|
|
293f : 48 [ 3]> pha ;use stack to load status
|
| 11663 |
|
|
2940 : 28 [ 4]> plp
|
| 11664 |
|
|
|
| 11665 |
|
|
2941 : c60c [ 5] dec zpt
|
| 11666 |
|
|
tst_z rINC,fINC,0
|
| 11667 |
|
|
2943 : 08 [ 3]> php ;save flags
|
| 11668 |
|
|
2944 : a50c [ 3]> lda zpt
|
| 11669 |
|
|
2946 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11670 |
|
|
> trap_ne
|
| 11671 |
|
|
2949 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11672 |
|
|
>
|
| 11673 |
|
|
294b : 68 [ 4]> pla ;load status
|
| 11674 |
|
|
> eor_flag 0
|
| 11675 |
|
|
294c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11676 |
|
|
>
|
| 11677 |
|
|
294e : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11678 |
|
|
> trap_ne
|
| 11679 |
|
|
2951 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11680 |
|
|
>
|
| 11681 |
|
|
|
| 11682 |
|
|
2953 : ca [ 2] dex
|
| 11683 |
|
|
2954 : 300a [ 3] bmi tdec1
|
| 11684 |
|
|
2956 : e001 [ 2] cpx #1
|
| 11685 |
|
|
2958 : d0e3 [ 3] bne tdec
|
| 11686 |
|
|
295a : a981 [ 2] lda #$81
|
| 11687 |
|
|
295c : 850c [ 3] sta zpt
|
| 11688 |
|
|
295e : d0dd [ 3] bne tdec
|
| 11689 |
|
|
2960 : tdec1
|
| 11690 |
|
|
2960 : a200 [ 2] ldx #0
|
| 11691 |
|
|
2962 : a97e [ 2] lda #$7e
|
| 11692 |
|
|
2964 : 850c [ 3] sta zpt
|
| 11693 |
|
|
2966 : tinc10
|
| 11694 |
|
|
set_stat $ff
|
| 11695 |
|
|
> load_flag $ff
|
| 11696 |
|
|
2966 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11697 |
|
|
>
|
| 11698 |
|
|
2968 : 48 [ 3]> pha ;use stack to load status
|
| 11699 |
|
|
2969 : 28 [ 4]> plp
|
| 11700 |
|
|
|
| 11701 |
|
|
296a : e60c [ 5] inc zpt
|
| 11702 |
|
|
tst_z rINC,fINC,$ff-fnz
|
| 11703 |
|
|
296c : 08 [ 3]> php ;save flags
|
| 11704 |
|
|
296d : a50c [ 3]> lda zpt
|
| 11705 |
|
|
296f : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11706 |
|
|
> trap_ne
|
| 11707 |
|
|
2972 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11708 |
|
|
>
|
| 11709 |
|
|
2974 : 68 [ 4]> pla ;load status
|
| 11710 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 203
|
| 11711 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11712 |
|
|
|
| 11713 |
|
|
> eor_flag $ff-fnz
|
| 11714 |
|
|
2975 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 11715 |
|
|
>
|
| 11716 |
|
|
2977 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11717 |
|
|
> trap_ne
|
| 11718 |
|
|
297a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11719 |
|
|
>
|
| 11720 |
|
|
|
| 11721 |
|
|
297c : e8 [ 2] inx
|
| 11722 |
|
|
297d : e002 [ 2] cpx #2
|
| 11723 |
|
|
297f : d004 [ 3] bne tinc11
|
| 11724 |
|
|
2981 : a9fe [ 2] lda #$fe
|
| 11725 |
|
|
2983 : 850c [ 3] sta zpt
|
| 11726 |
|
|
2985 : e005 [ 2] tinc11 cpx #5
|
| 11727 |
|
|
2987 : d0dd [ 3] bne tinc10
|
| 11728 |
|
|
2989 : ca [ 2] dex
|
| 11729 |
|
|
298a : e60c [ 5] inc zpt
|
| 11730 |
|
|
298c : tdec10
|
| 11731 |
|
|
set_stat $ff
|
| 11732 |
|
|
> load_flag $ff
|
| 11733 |
|
|
298c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11734 |
|
|
>
|
| 11735 |
|
|
298e : 48 [ 3]> pha ;use stack to load status
|
| 11736 |
|
|
298f : 28 [ 4]> plp
|
| 11737 |
|
|
|
| 11738 |
|
|
2990 : c60c [ 5] dec zpt
|
| 11739 |
|
|
tst_z rINC,fINC,$ff-fnz
|
| 11740 |
|
|
2992 : 08 [ 3]> php ;save flags
|
| 11741 |
|
|
2993 : a50c [ 3]> lda zpt
|
| 11742 |
|
|
2995 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11743 |
|
|
> trap_ne
|
| 11744 |
|
|
2998 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11745 |
|
|
>
|
| 11746 |
|
|
299a : 68 [ 4]> pla ;load status
|
| 11747 |
|
|
> eor_flag $ff-fnz
|
| 11748 |
|
|
299b : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 11749 |
|
|
>
|
| 11750 |
|
|
299d : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11751 |
|
|
> trap_ne
|
| 11752 |
|
|
29a0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11753 |
|
|
>
|
| 11754 |
|
|
|
| 11755 |
|
|
29a2 : ca [ 2] dex
|
| 11756 |
|
|
29a3 : 300a [ 3] bmi tdec11
|
| 11757 |
|
|
29a5 : e001 [ 2] cpx #1
|
| 11758 |
|
|
29a7 : d0e3 [ 3] bne tdec10
|
| 11759 |
|
|
29a9 : a981 [ 2] lda #$81
|
| 11760 |
|
|
29ab : 850c [ 3] sta zpt
|
| 11761 |
|
|
29ad : d0dd [ 3] bne tdec10
|
| 11762 |
|
|
29af : tdec11
|
| 11763 |
|
|
next_test
|
| 11764 |
|
|
29af : ad0002 [ 4]> lda test_case ;previous test
|
| 11765 |
|
|
29b2 : c922 [ 2]> cmp #test_num
|
| 11766 |
|
|
> trap_ne ;test is out of sequence
|
| 11767 |
|
|
29b4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11768 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 204
|
| 11769 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11770 |
|
|
|
| 11771 |
|
|
>
|
| 11772 |
|
|
0023 = >test_num = test_num + 1
|
| 11773 |
|
|
29b6 : a923 [ 2]> lda #test_num ;*** this tests' number
|
| 11774 |
|
|
29b8 : 8d0002 [ 4]> sta test_case
|
| 11775 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 11776 |
|
|
|
| 11777 |
|
|
|
| 11778 |
|
|
; absolute memory
|
| 11779 |
|
|
29bb : a200 [ 2] ldx #0
|
| 11780 |
|
|
29bd : a97e [ 2] lda #$7e
|
| 11781 |
|
|
29bf : 8d0302 [ 4] sta abst
|
| 11782 |
|
|
29c2 : tinc2
|
| 11783 |
|
|
set_stat 0
|
| 11784 |
|
|
> load_flag 0
|
| 11785 |
|
|
29c2 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11786 |
|
|
>
|
| 11787 |
|
|
29c4 : 48 [ 3]> pha ;use stack to load status
|
| 11788 |
|
|
29c5 : 28 [ 4]> plp
|
| 11789 |
|
|
|
| 11790 |
|
|
29c6 : ee0302 [ 6] inc abst
|
| 11791 |
|
|
tst_abs rINC,fINC,0
|
| 11792 |
|
|
29c9 : 08 [ 3]> php ;save flags
|
| 11793 |
|
|
29ca : ad0302 [ 4]> lda abst
|
| 11794 |
|
|
29cd : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11795 |
|
|
> trap_ne
|
| 11796 |
|
|
29d0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11797 |
|
|
>
|
| 11798 |
|
|
29d2 : 68 [ 4]> pla ;load status
|
| 11799 |
|
|
> eor_flag 0
|
| 11800 |
|
|
29d3 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11801 |
|
|
>
|
| 11802 |
|
|
29d5 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11803 |
|
|
> trap_ne
|
| 11804 |
|
|
29d8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11805 |
|
|
>
|
| 11806 |
|
|
|
| 11807 |
|
|
29da : e8 [ 2] inx
|
| 11808 |
|
|
29db : e002 [ 2] cpx #2
|
| 11809 |
|
|
29dd : d005 [ 3] bne tinc3
|
| 11810 |
|
|
29df : a9fe [ 2] lda #$fe
|
| 11811 |
|
|
29e1 : 8d0302 [ 4] sta abst
|
| 11812 |
|
|
29e4 : e005 [ 2] tinc3 cpx #5
|
| 11813 |
|
|
29e6 : d0da [ 3] bne tinc2
|
| 11814 |
|
|
29e8 : ca [ 2] dex
|
| 11815 |
|
|
29e9 : ee0302 [ 6] inc abst
|
| 11816 |
|
|
29ec : tdec2
|
| 11817 |
|
|
set_stat 0
|
| 11818 |
|
|
> load_flag 0
|
| 11819 |
|
|
29ec : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11820 |
|
|
>
|
| 11821 |
|
|
29ee : 48 [ 3]> pha ;use stack to load status
|
| 11822 |
|
|
29ef : 28 [ 4]> plp
|
| 11823 |
|
|
|
| 11824 |
|
|
29f0 : ce0302 [ 6] dec abst
|
| 11825 |
|
|
tst_abs rINC,fINC,0
|
| 11826 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 205
|
| 11827 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11828 |
|
|
|
| 11829 |
|
|
29f3 : 08 [ 3]> php ;save flags
|
| 11830 |
|
|
29f4 : ad0302 [ 4]> lda abst
|
| 11831 |
|
|
29f7 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11832 |
|
|
> trap_ne
|
| 11833 |
|
|
29fa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11834 |
|
|
>
|
| 11835 |
|
|
29fc : 68 [ 4]> pla ;load status
|
| 11836 |
|
|
> eor_flag 0
|
| 11837 |
|
|
29fd : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11838 |
|
|
>
|
| 11839 |
|
|
29ff : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11840 |
|
|
> trap_ne
|
| 11841 |
|
|
2a02 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11842 |
|
|
>
|
| 11843 |
|
|
|
| 11844 |
|
|
2a04 : ca [ 2] dex
|
| 11845 |
|
|
2a05 : 300b [ 3] bmi tdec3
|
| 11846 |
|
|
2a07 : e001 [ 2] cpx #1
|
| 11847 |
|
|
2a09 : d0e1 [ 4] bne tdec2
|
| 11848 |
|
|
2a0b : a981 [ 2] lda #$81
|
| 11849 |
|
|
2a0d : 8d0302 [ 4] sta abst
|
| 11850 |
|
|
2a10 : d0da [ 4] bne tdec2
|
| 11851 |
|
|
2a12 : tdec3
|
| 11852 |
|
|
2a12 : a200 [ 2] ldx #0
|
| 11853 |
|
|
2a14 : a97e [ 2] lda #$7e
|
| 11854 |
|
|
2a16 : 8d0302 [ 4] sta abst
|
| 11855 |
|
|
2a19 : tinc12
|
| 11856 |
|
|
set_stat $ff
|
| 11857 |
|
|
> load_flag $ff
|
| 11858 |
|
|
2a19 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11859 |
|
|
>
|
| 11860 |
|
|
2a1b : 48 [ 3]> pha ;use stack to load status
|
| 11861 |
|
|
2a1c : 28 [ 4]> plp
|
| 11862 |
|
|
|
| 11863 |
|
|
2a1d : ee0302 [ 6] inc abst
|
| 11864 |
|
|
tst_abs rINC,fINC,$ff-fnz
|
| 11865 |
|
|
2a20 : 08 [ 3]> php ;save flags
|
| 11866 |
|
|
2a21 : ad0302 [ 4]> lda abst
|
| 11867 |
|
|
2a24 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11868 |
|
|
> trap_ne
|
| 11869 |
|
|
2a27 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11870 |
|
|
>
|
| 11871 |
|
|
2a29 : 68 [ 4]> pla ;load status
|
| 11872 |
|
|
> eor_flag $ff-fnz
|
| 11873 |
|
|
2a2a : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 11874 |
|
|
>
|
| 11875 |
|
|
2a2c : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11876 |
|
|
> trap_ne
|
| 11877 |
|
|
2a2f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11878 |
|
|
>
|
| 11879 |
|
|
|
| 11880 |
|
|
2a31 : e8 [ 2] inx
|
| 11881 |
|
|
2a32 : e002 [ 2] cpx #2
|
| 11882 |
|
|
2a34 : d005 [ 3] bne tinc13
|
| 11883 |
|
|
2a36 : a9fe [ 2] lda #$fe
|
| 11884 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 206
|
| 11885 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11886 |
|
|
|
| 11887 |
|
|
2a38 : 8d0302 [ 4] sta abst
|
| 11888 |
|
|
2a3b : e005 [ 2] tinc13 cpx #5
|
| 11889 |
|
|
2a3d : d0da [ 3] bne tinc12
|
| 11890 |
|
|
2a3f : ca [ 2] dex
|
| 11891 |
|
|
2a40 : ee0302 [ 6] inc abst
|
| 11892 |
|
|
2a43 : tdec12
|
| 11893 |
|
|
set_stat $ff
|
| 11894 |
|
|
> load_flag $ff
|
| 11895 |
|
|
2a43 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 11896 |
|
|
>
|
| 11897 |
|
|
2a45 : 48 [ 3]> pha ;use stack to load status
|
| 11898 |
|
|
2a46 : 28 [ 4]> plp
|
| 11899 |
|
|
|
| 11900 |
|
|
2a47 : ce0302 [ 6] dec abst
|
| 11901 |
|
|
tst_abs rINC,fINC,$ff-fnz
|
| 11902 |
|
|
2a4a : 08 [ 3]> php ;save flags
|
| 11903 |
|
|
2a4b : ad0302 [ 4]> lda abst
|
| 11904 |
|
|
2a4e : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11905 |
|
|
> trap_ne
|
| 11906 |
|
|
2a51 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11907 |
|
|
>
|
| 11908 |
|
|
2a53 : 68 [ 4]> pla ;load status
|
| 11909 |
|
|
> eor_flag $ff-fnz
|
| 11910 |
|
|
2a54 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 11911 |
|
|
>
|
| 11912 |
|
|
2a56 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11913 |
|
|
> trap_ne
|
| 11914 |
|
|
2a59 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11915 |
|
|
>
|
| 11916 |
|
|
|
| 11917 |
|
|
2a5b : ca [ 2] dex
|
| 11918 |
|
|
2a5c : 300b [ 3] bmi tdec13
|
| 11919 |
|
|
2a5e : e001 [ 2] cpx #1
|
| 11920 |
|
|
2a60 : d0e1 [ 3] bne tdec12
|
| 11921 |
|
|
2a62 : a981 [ 2] lda #$81
|
| 11922 |
|
|
2a64 : 8d0302 [ 4] sta abst
|
| 11923 |
|
|
2a67 : d0da [ 3] bne tdec12
|
| 11924 |
|
|
2a69 : tdec13
|
| 11925 |
|
|
next_test
|
| 11926 |
|
|
2a69 : ad0002 [ 4]> lda test_case ;previous test
|
| 11927 |
|
|
2a6c : c923 [ 2]> cmp #test_num
|
| 11928 |
|
|
> trap_ne ;test is out of sequence
|
| 11929 |
|
|
2a6e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11930 |
|
|
>
|
| 11931 |
|
|
0024 = >test_num = test_num + 1
|
| 11932 |
|
|
2a70 : a924 [ 2]> lda #test_num ;*** this tests' number
|
| 11933 |
|
|
2a72 : 8d0002 [ 4]> sta test_case
|
| 11934 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 11935 |
|
|
|
| 11936 |
|
|
|
| 11937 |
|
|
; zeropage indexed
|
| 11938 |
|
|
2a75 : a200 [ 2] ldx #0
|
| 11939 |
|
|
2a77 : a97e [ 2] lda #$7e
|
| 11940 |
|
|
2a79 : 950c [ 4] tinc4 sta zpt,x
|
| 11941 |
|
|
set_stat 0
|
| 11942 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 207
|
| 11943 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 11944 |
|
|
|
| 11945 |
|
|
> load_flag 0
|
| 11946 |
|
|
2a7b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11947 |
|
|
>
|
| 11948 |
|
|
2a7d : 48 [ 3]> pha ;use stack to load status
|
| 11949 |
|
|
2a7e : 28 [ 4]> plp
|
| 11950 |
|
|
|
| 11951 |
|
|
2a7f : f60c [ 6] inc zpt,x
|
| 11952 |
|
|
tst_zx rINC,fINC,0
|
| 11953 |
|
|
2a81 : 08 [ 3]> php ;save flags
|
| 11954 |
|
|
2a82 : b50c [ 4]> lda zpt,x
|
| 11955 |
|
|
2a84 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11956 |
|
|
> trap_ne
|
| 11957 |
|
|
2a87 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11958 |
|
|
>
|
| 11959 |
|
|
2a89 : 68 [ 4]> pla ;load status
|
| 11960 |
|
|
> eor_flag 0
|
| 11961 |
|
|
2a8a : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11962 |
|
|
>
|
| 11963 |
|
|
2a8c : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11964 |
|
|
> trap_ne
|
| 11965 |
|
|
2a8f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11966 |
|
|
>
|
| 11967 |
|
|
|
| 11968 |
|
|
2a91 : b50c [ 4] lda zpt,x
|
| 11969 |
|
|
2a93 : e8 [ 2] inx
|
| 11970 |
|
|
2a94 : e002 [ 2] cpx #2
|
| 11971 |
|
|
2a96 : d002 [ 3] bne tinc5
|
| 11972 |
|
|
2a98 : a9fe [ 2] lda #$fe
|
| 11973 |
|
|
2a9a : e005 [ 2] tinc5 cpx #5
|
| 11974 |
|
|
2a9c : d0db [ 3] bne tinc4
|
| 11975 |
|
|
2a9e : ca [ 2] dex
|
| 11976 |
|
|
2a9f : a902 [ 2] lda #2
|
| 11977 |
|
|
2aa1 : 950c [ 4] tdec4 sta zpt,x
|
| 11978 |
|
|
set_stat 0
|
| 11979 |
|
|
> load_flag 0
|
| 11980 |
|
|
2aa3 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 11981 |
|
|
>
|
| 11982 |
|
|
2aa5 : 48 [ 3]> pha ;use stack to load status
|
| 11983 |
|
|
2aa6 : 28 [ 4]> plp
|
| 11984 |
|
|
|
| 11985 |
|
|
2aa7 : d60c [ 6] dec zpt,x
|
| 11986 |
|
|
tst_zx rINC,fINC,0
|
| 11987 |
|
|
2aa9 : 08 [ 3]> php ;save flags
|
| 11988 |
|
|
2aaa : b50c [ 4]> lda zpt,x
|
| 11989 |
|
|
2aac : dd3102 [ 4]> cmp rINC,x ;test result
|
| 11990 |
|
|
> trap_ne
|
| 11991 |
|
|
2aaf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 11992 |
|
|
>
|
| 11993 |
|
|
2ab1 : 68 [ 4]> pla ;load status
|
| 11994 |
|
|
> eor_flag 0
|
| 11995 |
|
|
2ab2 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 11996 |
|
|
>
|
| 11997 |
|
|
2ab4 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 11998 |
|
|
> trap_ne
|
| 11999 |
|
|
2ab7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12000 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 208
|
| 12001 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12002 |
|
|
|
| 12003 |
|
|
>
|
| 12004 |
|
|
|
| 12005 |
|
|
2ab9 : b50c [ 4] lda zpt,x
|
| 12006 |
|
|
2abb : ca [ 2] dex
|
| 12007 |
|
|
2abc : 3008 [ 3] bmi tdec5
|
| 12008 |
|
|
2abe : e001 [ 2] cpx #1
|
| 12009 |
|
|
2ac0 : d0df [ 3] bne tdec4
|
| 12010 |
|
|
2ac2 : a981 [ 2] lda #$81
|
| 12011 |
|
|
2ac4 : d0db [ 3] bne tdec4
|
| 12012 |
|
|
2ac6 : tdec5
|
| 12013 |
|
|
2ac6 : a200 [ 2] ldx #0
|
| 12014 |
|
|
2ac8 : a97e [ 2] lda #$7e
|
| 12015 |
|
|
2aca : 950c [ 4] tinc14 sta zpt,x
|
| 12016 |
|
|
set_stat $ff
|
| 12017 |
|
|
> load_flag $ff
|
| 12018 |
|
|
2acc : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12019 |
|
|
>
|
| 12020 |
|
|
2ace : 48 [ 3]> pha ;use stack to load status
|
| 12021 |
|
|
2acf : 28 [ 4]> plp
|
| 12022 |
|
|
|
| 12023 |
|
|
2ad0 : f60c [ 6] inc zpt,x
|
| 12024 |
|
|
tst_zx rINC,fINC,$ff-fnz
|
| 12025 |
|
|
2ad2 : 08 [ 3]> php ;save flags
|
| 12026 |
|
|
2ad3 : b50c [ 4]> lda zpt,x
|
| 12027 |
|
|
2ad5 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 12028 |
|
|
> trap_ne
|
| 12029 |
|
|
2ad8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12030 |
|
|
>
|
| 12031 |
|
|
2ada : 68 [ 4]> pla ;load status
|
| 12032 |
|
|
> eor_flag $ff-fnz
|
| 12033 |
|
|
2adb : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12034 |
|
|
>
|
| 12035 |
|
|
2add : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 12036 |
|
|
> trap_ne
|
| 12037 |
|
|
2ae0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12038 |
|
|
>
|
| 12039 |
|
|
|
| 12040 |
|
|
2ae2 : b50c [ 4] lda zpt,x
|
| 12041 |
|
|
2ae4 : e8 [ 2] inx
|
| 12042 |
|
|
2ae5 : e002 [ 2] cpx #2
|
| 12043 |
|
|
2ae7 : d002 [ 3] bne tinc15
|
| 12044 |
|
|
2ae9 : a9fe [ 2] lda #$fe
|
| 12045 |
|
|
2aeb : e005 [ 2] tinc15 cpx #5
|
| 12046 |
|
|
2aed : d0db [ 3] bne tinc14
|
| 12047 |
|
|
2aef : ca [ 2] dex
|
| 12048 |
|
|
2af0 : a902 [ 2] lda #2
|
| 12049 |
|
|
2af2 : 950c [ 4] tdec14 sta zpt,x
|
| 12050 |
|
|
set_stat $ff
|
| 12051 |
|
|
> load_flag $ff
|
| 12052 |
|
|
2af4 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12053 |
|
|
>
|
| 12054 |
|
|
2af6 : 48 [ 3]> pha ;use stack to load status
|
| 12055 |
|
|
2af7 : 28 [ 4]> plp
|
| 12056 |
|
|
|
| 12057 |
|
|
2af8 : d60c [ 6] dec zpt,x
|
| 12058 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 209
|
| 12059 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12060 |
|
|
|
| 12061 |
|
|
tst_zx rINC,fINC,$ff-fnz
|
| 12062 |
|
|
2afa : 08 [ 3]> php ;save flags
|
| 12063 |
|
|
2afb : b50c [ 4]> lda zpt,x
|
| 12064 |
|
|
2afd : dd3102 [ 4]> cmp rINC,x ;test result
|
| 12065 |
|
|
> trap_ne
|
| 12066 |
|
|
2b00 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12067 |
|
|
>
|
| 12068 |
|
|
2b02 : 68 [ 4]> pla ;load status
|
| 12069 |
|
|
> eor_flag $ff-fnz
|
| 12070 |
|
|
2b03 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12071 |
|
|
>
|
| 12072 |
|
|
2b05 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 12073 |
|
|
> trap_ne
|
| 12074 |
|
|
2b08 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12075 |
|
|
>
|
| 12076 |
|
|
|
| 12077 |
|
|
2b0a : b50c [ 4] lda zpt,x
|
| 12078 |
|
|
2b0c : ca [ 2] dex
|
| 12079 |
|
|
2b0d : 3008 [ 3] bmi tdec15
|
| 12080 |
|
|
2b0f : e001 [ 2] cpx #1
|
| 12081 |
|
|
2b11 : d0df [ 4] bne tdec14
|
| 12082 |
|
|
2b13 : a981 [ 2] lda #$81
|
| 12083 |
|
|
2b15 : d0db [ 4] bne tdec14
|
| 12084 |
|
|
2b17 : tdec15
|
| 12085 |
|
|
next_test
|
| 12086 |
|
|
2b17 : ad0002 [ 4]> lda test_case ;previous test
|
| 12087 |
|
|
2b1a : c924 [ 2]> cmp #test_num
|
| 12088 |
|
|
> trap_ne ;test is out of sequence
|
| 12089 |
|
|
2b1c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12090 |
|
|
>
|
| 12091 |
|
|
0025 = >test_num = test_num + 1
|
| 12092 |
|
|
2b1e : a925 [ 2]> lda #test_num ;*** this tests' number
|
| 12093 |
|
|
2b20 : 8d0002 [ 4]> sta test_case
|
| 12094 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 12095 |
|
|
|
| 12096 |
|
|
|
| 12097 |
|
|
; memory indexed
|
| 12098 |
|
|
2b23 : a200 [ 2] ldx #0
|
| 12099 |
|
|
2b25 : a97e [ 2] lda #$7e
|
| 12100 |
|
|
2b27 : 9d0302 [ 5] tinc6 sta abst,x
|
| 12101 |
|
|
set_stat 0
|
| 12102 |
|
|
> load_flag 0
|
| 12103 |
|
|
2b2a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12104 |
|
|
>
|
| 12105 |
|
|
2b2c : 48 [ 3]> pha ;use stack to load status
|
| 12106 |
|
|
2b2d : 28 [ 4]> plp
|
| 12107 |
|
|
|
| 12108 |
|
|
2b2e : fe0302 [ 6] inc abst,x
|
| 12109 |
|
|
tst_absx rINC,fINC,0
|
| 12110 |
|
|
2b31 : 08 [ 3]> php ;save flags
|
| 12111 |
|
|
2b32 : bd0302 [ 4]> lda abst,x
|
| 12112 |
|
|
2b35 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 12113 |
|
|
> trap_ne
|
| 12114 |
|
|
2b38 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12115 |
|
|
>
|
| 12116 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 210
|
| 12117 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12118 |
|
|
|
| 12119 |
|
|
2b3a : 68 [ 4]> pla ;load status
|
| 12120 |
|
|
> eor_flag 0
|
| 12121 |
|
|
2b3b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12122 |
|
|
>
|
| 12123 |
|
|
2b3d : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 12124 |
|
|
> trap_ne
|
| 12125 |
|
|
2b40 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12126 |
|
|
>
|
| 12127 |
|
|
|
| 12128 |
|
|
2b42 : bd0302 [ 4] lda abst,x
|
| 12129 |
|
|
2b45 : e8 [ 2] inx
|
| 12130 |
|
|
2b46 : e002 [ 2] cpx #2
|
| 12131 |
|
|
2b48 : d002 [ 3] bne tinc7
|
| 12132 |
|
|
2b4a : a9fe [ 2] lda #$fe
|
| 12133 |
|
|
2b4c : e005 [ 2] tinc7 cpx #5
|
| 12134 |
|
|
2b4e : d0d7 [ 3] bne tinc6
|
| 12135 |
|
|
2b50 : ca [ 2] dex
|
| 12136 |
|
|
2b51 : a902 [ 2] lda #2
|
| 12137 |
|
|
2b53 : 9d0302 [ 5] tdec6 sta abst,x
|
| 12138 |
|
|
set_stat 0
|
| 12139 |
|
|
> load_flag 0
|
| 12140 |
|
|
2b56 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12141 |
|
|
>
|
| 12142 |
|
|
2b58 : 48 [ 3]> pha ;use stack to load status
|
| 12143 |
|
|
2b59 : 28 [ 4]> plp
|
| 12144 |
|
|
|
| 12145 |
|
|
2b5a : de0302 [ 6] dec abst,x
|
| 12146 |
|
|
tst_absx rINC,fINC,0
|
| 12147 |
|
|
2b5d : 08 [ 3]> php ;save flags
|
| 12148 |
|
|
2b5e : bd0302 [ 4]> lda abst,x
|
| 12149 |
|
|
2b61 : dd3102 [ 4]> cmp rINC,x ;test result
|
| 12150 |
|
|
> trap_ne
|
| 12151 |
|
|
2b64 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12152 |
|
|
>
|
| 12153 |
|
|
2b66 : 68 [ 4]> pla ;load status
|
| 12154 |
|
|
> eor_flag 0
|
| 12155 |
|
|
2b67 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12156 |
|
|
>
|
| 12157 |
|
|
2b69 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 12158 |
|
|
> trap_ne
|
| 12159 |
|
|
2b6c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12160 |
|
|
>
|
| 12161 |
|
|
|
| 12162 |
|
|
2b6e : bd0302 [ 4] lda abst,x
|
| 12163 |
|
|
2b71 : ca [ 2] dex
|
| 12164 |
|
|
2b72 : 3008 [ 3] bmi tdec7
|
| 12165 |
|
|
2b74 : e001 [ 2] cpx #1
|
| 12166 |
|
|
2b76 : d0db [ 3] bne tdec6
|
| 12167 |
|
|
2b78 : a981 [ 2] lda #$81
|
| 12168 |
|
|
2b7a : d0d7 [ 3] bne tdec6
|
| 12169 |
|
|
2b7c : tdec7
|
| 12170 |
|
|
2b7c : a200 [ 2] ldx #0
|
| 12171 |
|
|
2b7e : a97e [ 2] lda #$7e
|
| 12172 |
|
|
2b80 : 9d0302 [ 5] tinc16 sta abst,x
|
| 12173 |
|
|
set_stat $ff
|
| 12174 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 211
|
| 12175 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12176 |
|
|
|
| 12177 |
|
|
> load_flag $ff
|
| 12178 |
|
|
2b83 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12179 |
|
|
>
|
| 12180 |
|
|
2b85 : 48 [ 3]> pha ;use stack to load status
|
| 12181 |
|
|
2b86 : 28 [ 4]> plp
|
| 12182 |
|
|
|
| 12183 |
|
|
2b87 : fe0302 [ 6] inc abst,x
|
| 12184 |
|
|
tst_absx rINC,fINC,$ff-fnz
|
| 12185 |
|
|
2b8a : 08 [ 3]> php ;save flags
|
| 12186 |
|
|
2b8b : bd0302 [ 4]> lda abst,x
|
| 12187 |
|
|
2b8e : dd3102 [ 4]> cmp rINC,x ;test result
|
| 12188 |
|
|
> trap_ne
|
| 12189 |
|
|
2b91 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12190 |
|
|
>
|
| 12191 |
|
|
2b93 : 68 [ 4]> pla ;load status
|
| 12192 |
|
|
> eor_flag $ff-fnz
|
| 12193 |
|
|
2b94 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12194 |
|
|
>
|
| 12195 |
|
|
2b96 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 12196 |
|
|
> trap_ne
|
| 12197 |
|
|
2b99 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12198 |
|
|
>
|
| 12199 |
|
|
|
| 12200 |
|
|
2b9b : bd0302 [ 4] lda abst,x
|
| 12201 |
|
|
2b9e : e8 [ 2] inx
|
| 12202 |
|
|
2b9f : e002 [ 2] cpx #2
|
| 12203 |
|
|
2ba1 : d002 [ 3] bne tinc17
|
| 12204 |
|
|
2ba3 : a9fe [ 2] lda #$fe
|
| 12205 |
|
|
2ba5 : e005 [ 2] tinc17 cpx #5
|
| 12206 |
|
|
2ba7 : d0d7 [ 3] bne tinc16
|
| 12207 |
|
|
2ba9 : ca [ 2] dex
|
| 12208 |
|
|
2baa : a902 [ 2] lda #2
|
| 12209 |
|
|
2bac : 9d0302 [ 5] tdec16 sta abst,x
|
| 12210 |
|
|
set_stat $ff
|
| 12211 |
|
|
> load_flag $ff
|
| 12212 |
|
|
2baf : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12213 |
|
|
>
|
| 12214 |
|
|
2bb1 : 48 [ 3]> pha ;use stack to load status
|
| 12215 |
|
|
2bb2 : 28 [ 4]> plp
|
| 12216 |
|
|
|
| 12217 |
|
|
2bb3 : de0302 [ 6] dec abst,x
|
| 12218 |
|
|
tst_absx rINC,fINC,$ff-fnz
|
| 12219 |
|
|
2bb6 : 08 [ 3]> php ;save flags
|
| 12220 |
|
|
2bb7 : bd0302 [ 4]> lda abst,x
|
| 12221 |
|
|
2bba : dd3102 [ 4]> cmp rINC,x ;test result
|
| 12222 |
|
|
> trap_ne
|
| 12223 |
|
|
2bbd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12224 |
|
|
>
|
| 12225 |
|
|
2bbf : 68 [ 4]> pla ;load status
|
| 12226 |
|
|
> eor_flag $ff-fnz
|
| 12227 |
|
|
2bc0 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12228 |
|
|
>
|
| 12229 |
|
|
2bc2 : dd3602 [ 4]> cmp fINC,x ;test flags
|
| 12230 |
|
|
> trap_ne
|
| 12231 |
|
|
2bc5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12232 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 212
|
| 12233 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12234 |
|
|
|
| 12235 |
|
|
>
|
| 12236 |
|
|
|
| 12237 |
|
|
2bc7 : bd0302 [ 4] lda abst,x
|
| 12238 |
|
|
2bca : ca [ 2] dex
|
| 12239 |
|
|
2bcb : 3008 [ 3] bmi tdec17
|
| 12240 |
|
|
2bcd : e001 [ 2] cpx #1
|
| 12241 |
|
|
2bcf : d0db [ 3] bne tdec16
|
| 12242 |
|
|
2bd1 : a981 [ 2] lda #$81
|
| 12243 |
|
|
2bd3 : d0d7 [ 3] bne tdec16
|
| 12244 |
|
|
2bd5 : tdec17
|
| 12245 |
|
|
next_test
|
| 12246 |
|
|
2bd5 : ad0002 [ 4]> lda test_case ;previous test
|
| 12247 |
|
|
2bd8 : c925 [ 2]> cmp #test_num
|
| 12248 |
|
|
> trap_ne ;test is out of sequence
|
| 12249 |
|
|
2bda : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12250 |
|
|
>
|
| 12251 |
|
|
0026 = >test_num = test_num + 1
|
| 12252 |
|
|
2bdc : a926 [ 2]> lda #test_num ;*** this tests' number
|
| 12253 |
|
|
2bde : 8d0002 [ 4]> sta test_case
|
| 12254 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 12255 |
|
|
|
| 12256 |
|
|
|
| 12257 |
|
|
; testing logical instructions - AND EOR ORA all addressing modes
|
| 12258 |
|
|
; AND
|
| 12259 |
|
|
2be1 : a203 [ 2] ldx #3 ;immediate - self modifying code
|
| 12260 |
|
|
2be3 : b51c [ 4] tand lda zpAN,x
|
| 12261 |
|
|
2be5 : 8df02b [ 4] sta tandi1
|
| 12262 |
|
|
set_ax absANa,0
|
| 12263 |
|
|
> load_flag 0
|
| 12264 |
|
|
2be8 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12265 |
|
|
>
|
| 12266 |
|
|
2bea : 48 [ 3]> pha ;use stack to load status
|
| 12267 |
|
|
2beb : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12268 |
|
|
2bee : 28 [ 4]> plp
|
| 12269 |
|
|
|
| 12270 |
|
|
2bf0 = tandi1 equ *+1 ;target for immediate operand
|
| 12271 |
|
|
2bef : 2963 [ 2] and #99
|
| 12272 |
|
|
tst_ax absrlo,absflo,0
|
| 12273 |
|
|
2bf1 : 08 [ 3]> php ;save flags
|
| 12274 |
|
|
2bf2 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12275 |
|
|
> trap_ne
|
| 12276 |
|
|
2bf5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12277 |
|
|
>
|
| 12278 |
|
|
2bf7 : 68 [ 4]> pla ;load status
|
| 12279 |
|
|
> eor_flag 0
|
| 12280 |
|
|
2bf8 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12281 |
|
|
>
|
| 12282 |
|
|
2bfa : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12283 |
|
|
> trap_ne ;
|
| 12284 |
|
|
2bfd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12285 |
|
|
>
|
| 12286 |
|
|
|
| 12287 |
|
|
2bff : ca [ 2] dex
|
| 12288 |
|
|
2c00 : 10e1 [ 4] bpl tand
|
| 12289 |
|
|
2c02 : a203 [ 2] ldx #3
|
| 12290 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 213
|
| 12291 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12292 |
|
|
|
| 12293 |
|
|
2c04 : b51c [ 4] tand1 lda zpAN,x
|
| 12294 |
|
|
2c06 : 8d112c [ 4] sta tandi2
|
| 12295 |
|
|
set_ax absANa,$ff
|
| 12296 |
|
|
> load_flag $ff
|
| 12297 |
|
|
2c09 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12298 |
|
|
>
|
| 12299 |
|
|
2c0b : 48 [ 3]> pha ;use stack to load status
|
| 12300 |
|
|
2c0c : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12301 |
|
|
2c0f : 28 [ 4]> plp
|
| 12302 |
|
|
|
| 12303 |
|
|
2c11 = tandi2 equ *+1 ;target for immediate operand
|
| 12304 |
|
|
2c10 : 2963 [ 2] and #99
|
| 12305 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12306 |
|
|
2c12 : 08 [ 3]> php ;save flags
|
| 12307 |
|
|
2c13 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12308 |
|
|
> trap_ne
|
| 12309 |
|
|
2c16 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12310 |
|
|
>
|
| 12311 |
|
|
2c18 : 68 [ 4]> pla ;load status
|
| 12312 |
|
|
> eor_flag $ff-fnz
|
| 12313 |
|
|
2c19 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12314 |
|
|
>
|
| 12315 |
|
|
2c1b : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12316 |
|
|
> trap_ne ;
|
| 12317 |
|
|
2c1e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12318 |
|
|
>
|
| 12319 |
|
|
|
| 12320 |
|
|
2c20 : ca [ 2] dex
|
| 12321 |
|
|
2c21 : 10e1 [ 3] bpl tand1
|
| 12322 |
|
|
|
| 12323 |
|
|
2c23 : a203 [ 2] ldx #3 ;zp
|
| 12324 |
|
|
2c25 : b51c [ 4] tand2 lda zpAN,x
|
| 12325 |
|
|
2c27 : 850c [ 3] sta zpt
|
| 12326 |
|
|
set_ax absANa,0
|
| 12327 |
|
|
> load_flag 0
|
| 12328 |
|
|
2c29 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12329 |
|
|
>
|
| 12330 |
|
|
2c2b : 48 [ 3]> pha ;use stack to load status
|
| 12331 |
|
|
2c2c : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12332 |
|
|
2c2f : 28 [ 4]> plp
|
| 12333 |
|
|
|
| 12334 |
|
|
2c30 : 250c [ 3] and zpt
|
| 12335 |
|
|
tst_ax absrlo,absflo,0
|
| 12336 |
|
|
2c32 : 08 [ 3]> php ;save flags
|
| 12337 |
|
|
2c33 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12338 |
|
|
> trap_ne
|
| 12339 |
|
|
2c36 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12340 |
|
|
>
|
| 12341 |
|
|
2c38 : 68 [ 4]> pla ;load status
|
| 12342 |
|
|
> eor_flag 0
|
| 12343 |
|
|
2c39 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12344 |
|
|
>
|
| 12345 |
|
|
2c3b : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12346 |
|
|
> trap_ne ;
|
| 12347 |
|
|
2c3e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12348 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 214
|
| 12349 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12350 |
|
|
|
| 12351 |
|
|
>
|
| 12352 |
|
|
|
| 12353 |
|
|
2c40 : ca [ 2] dex
|
| 12354 |
|
|
2c41 : 10e2 [ 3] bpl tand2
|
| 12355 |
|
|
2c43 : a203 [ 2] ldx #3
|
| 12356 |
|
|
2c45 : b51c [ 4] tand3 lda zpAN,x
|
| 12357 |
|
|
2c47 : 850c [ 3] sta zpt
|
| 12358 |
|
|
set_ax absANa,$ff
|
| 12359 |
|
|
> load_flag $ff
|
| 12360 |
|
|
2c49 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12361 |
|
|
>
|
| 12362 |
|
|
2c4b : 48 [ 3]> pha ;use stack to load status
|
| 12363 |
|
|
2c4c : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12364 |
|
|
2c4f : 28 [ 4]> plp
|
| 12365 |
|
|
|
| 12366 |
|
|
2c50 : 250c [ 3] and zpt
|
| 12367 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12368 |
|
|
2c52 : 08 [ 3]> php ;save flags
|
| 12369 |
|
|
2c53 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12370 |
|
|
> trap_ne
|
| 12371 |
|
|
2c56 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12372 |
|
|
>
|
| 12373 |
|
|
2c58 : 68 [ 4]> pla ;load status
|
| 12374 |
|
|
> eor_flag $ff-fnz
|
| 12375 |
|
|
2c59 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12376 |
|
|
>
|
| 12377 |
|
|
2c5b : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12378 |
|
|
> trap_ne ;
|
| 12379 |
|
|
2c5e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12380 |
|
|
>
|
| 12381 |
|
|
|
| 12382 |
|
|
2c60 : ca [ 2] dex
|
| 12383 |
|
|
2c61 : 10e2 [ 3] bpl tand3
|
| 12384 |
|
|
|
| 12385 |
|
|
2c63 : a203 [ 2] ldx #3 ;abs
|
| 12386 |
|
|
2c65 : b51c [ 4] tand4 lda zpAN,x
|
| 12387 |
|
|
2c67 : 8d0302 [ 4] sta abst
|
| 12388 |
|
|
set_ax absANa,0
|
| 12389 |
|
|
> load_flag 0
|
| 12390 |
|
|
2c6a : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12391 |
|
|
>
|
| 12392 |
|
|
2c6c : 48 [ 3]> pha ;use stack to load status
|
| 12393 |
|
|
2c6d : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12394 |
|
|
2c70 : 28 [ 4]> plp
|
| 12395 |
|
|
|
| 12396 |
|
|
2c71 : 2d0302 [ 4] and abst
|
| 12397 |
|
|
tst_ax absrlo,absflo,0
|
| 12398 |
|
|
2c74 : 08 [ 3]> php ;save flags
|
| 12399 |
|
|
2c75 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12400 |
|
|
> trap_ne
|
| 12401 |
|
|
2c78 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12402 |
|
|
>
|
| 12403 |
|
|
2c7a : 68 [ 4]> pla ;load status
|
| 12404 |
|
|
> eor_flag 0
|
| 12405 |
|
|
2c7b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12406 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 215
|
| 12407 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12408 |
|
|
|
| 12409 |
|
|
>
|
| 12410 |
|
|
2c7d : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12411 |
|
|
> trap_ne ;
|
| 12412 |
|
|
2c80 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12413 |
|
|
>
|
| 12414 |
|
|
|
| 12415 |
|
|
2c82 : ca [ 2] dex
|
| 12416 |
|
|
2c83 : 10e0 [ 3] bpl tand4
|
| 12417 |
|
|
2c85 : a203 [ 2] ldx #3
|
| 12418 |
|
|
2c87 : b51c [ 4] tand5 lda zpAN,x
|
| 12419 |
|
|
2c89 : 8d0302 [ 4] sta abst
|
| 12420 |
|
|
set_ax absANa,$ff
|
| 12421 |
|
|
> load_flag $ff
|
| 12422 |
|
|
2c8c : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12423 |
|
|
>
|
| 12424 |
|
|
2c8e : 48 [ 3]> pha ;use stack to load status
|
| 12425 |
|
|
2c8f : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12426 |
|
|
2c92 : 28 [ 4]> plp
|
| 12427 |
|
|
|
| 12428 |
|
|
2c93 : 2d0302 [ 4] and abst
|
| 12429 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12430 |
|
|
2c96 : 08 [ 3]> php ;save flags
|
| 12431 |
|
|
2c97 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12432 |
|
|
> trap_ne
|
| 12433 |
|
|
2c9a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12434 |
|
|
>
|
| 12435 |
|
|
2c9c : 68 [ 4]> pla ;load status
|
| 12436 |
|
|
> eor_flag $ff-fnz
|
| 12437 |
|
|
2c9d : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12438 |
|
|
>
|
| 12439 |
|
|
2c9f : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12440 |
|
|
> trap_ne ;
|
| 12441 |
|
|
2ca2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12442 |
|
|
>
|
| 12443 |
|
|
|
| 12444 |
|
|
2ca4 : ca [ 2] dex
|
| 12445 |
|
|
2ca5 : 1002 [ 3] bpl tand6
|
| 12446 |
|
|
|
| 12447 |
|
|
2ca7 : a203 [ 2] ldx #3 ;zp,x
|
| 12448 |
|
|
2ca9 : tand6
|
| 12449 |
|
|
set_ax absANa,0
|
| 12450 |
|
|
> load_flag 0
|
| 12451 |
|
|
2ca9 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12452 |
|
|
>
|
| 12453 |
|
|
2cab : 48 [ 3]> pha ;use stack to load status
|
| 12454 |
|
|
2cac : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12455 |
|
|
2caf : 28 [ 4]> plp
|
| 12456 |
|
|
|
| 12457 |
|
|
2cb0 : 351c [ 4] and zpAN,x
|
| 12458 |
|
|
tst_ax absrlo,absflo,0
|
| 12459 |
|
|
2cb2 : 08 [ 3]> php ;save flags
|
| 12460 |
|
|
2cb3 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12461 |
|
|
> trap_ne
|
| 12462 |
|
|
2cb6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12463 |
|
|
>
|
| 12464 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 216
|
| 12465 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12466 |
|
|
|
| 12467 |
|
|
2cb8 : 68 [ 4]> pla ;load status
|
| 12468 |
|
|
> eor_flag 0
|
| 12469 |
|
|
2cb9 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12470 |
|
|
>
|
| 12471 |
|
|
2cbb : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12472 |
|
|
> trap_ne ;
|
| 12473 |
|
|
2cbe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12474 |
|
|
>
|
| 12475 |
|
|
|
| 12476 |
|
|
2cc0 : ca [ 2] dex
|
| 12477 |
|
|
2cc1 : 10e6 [ 3] bpl tand6
|
| 12478 |
|
|
2cc3 : a203 [ 2] ldx #3
|
| 12479 |
|
|
2cc5 : tand7
|
| 12480 |
|
|
set_ax absANa,$ff
|
| 12481 |
|
|
> load_flag $ff
|
| 12482 |
|
|
2cc5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12483 |
|
|
>
|
| 12484 |
|
|
2cc7 : 48 [ 3]> pha ;use stack to load status
|
| 12485 |
|
|
2cc8 : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12486 |
|
|
2ccb : 28 [ 4]> plp
|
| 12487 |
|
|
|
| 12488 |
|
|
2ccc : 351c [ 4] and zpAN,x
|
| 12489 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12490 |
|
|
2cce : 08 [ 3]> php ;save flags
|
| 12491 |
|
|
2ccf : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12492 |
|
|
> trap_ne
|
| 12493 |
|
|
2cd2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12494 |
|
|
>
|
| 12495 |
|
|
2cd4 : 68 [ 4]> pla ;load status
|
| 12496 |
|
|
> eor_flag $ff-fnz
|
| 12497 |
|
|
2cd5 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12498 |
|
|
>
|
| 12499 |
|
|
2cd7 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12500 |
|
|
> trap_ne ;
|
| 12501 |
|
|
2cda : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12502 |
|
|
>
|
| 12503 |
|
|
|
| 12504 |
|
|
2cdc : ca [ 2] dex
|
| 12505 |
|
|
2cdd : 10e6 [ 3] bpl tand7
|
| 12506 |
|
|
|
| 12507 |
|
|
2cdf : a203 [ 2] ldx #3 ;abs,x
|
| 12508 |
|
|
2ce1 : tand8
|
| 12509 |
|
|
set_ax absANa,0
|
| 12510 |
|
|
> load_flag 0
|
| 12511 |
|
|
2ce1 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12512 |
|
|
>
|
| 12513 |
|
|
2ce3 : 48 [ 3]> pha ;use stack to load status
|
| 12514 |
|
|
2ce4 : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12515 |
|
|
2ce7 : 28 [ 4]> plp
|
| 12516 |
|
|
|
| 12517 |
|
|
2ce8 : 3d3f02 [ 4] and absAN,x
|
| 12518 |
|
|
tst_ax absrlo,absflo,0
|
| 12519 |
|
|
2ceb : 08 [ 3]> php ;save flags
|
| 12520 |
|
|
2cec : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12521 |
|
|
> trap_ne
|
| 12522 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 217
|
| 12523 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12524 |
|
|
|
| 12525 |
|
|
2cef : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12526 |
|
|
>
|
| 12527 |
|
|
2cf1 : 68 [ 4]> pla ;load status
|
| 12528 |
|
|
> eor_flag 0
|
| 12529 |
|
|
2cf2 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12530 |
|
|
>
|
| 12531 |
|
|
2cf4 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12532 |
|
|
> trap_ne ;
|
| 12533 |
|
|
2cf7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12534 |
|
|
>
|
| 12535 |
|
|
|
| 12536 |
|
|
2cf9 : ca [ 2] dex
|
| 12537 |
|
|
2cfa : 10e5 [ 3] bpl tand8
|
| 12538 |
|
|
2cfc : a203 [ 2] ldx #3
|
| 12539 |
|
|
2cfe : tand9
|
| 12540 |
|
|
set_ax absANa,$ff
|
| 12541 |
|
|
> load_flag $ff
|
| 12542 |
|
|
2cfe : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12543 |
|
|
>
|
| 12544 |
|
|
2d00 : 48 [ 3]> pha ;use stack to load status
|
| 12545 |
|
|
2d01 : bd4b02 [ 4]> lda absANa,x ;precharge accu
|
| 12546 |
|
|
2d04 : 28 [ 4]> plp
|
| 12547 |
|
|
|
| 12548 |
|
|
2d05 : 3d3f02 [ 4] and absAN,x
|
| 12549 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12550 |
|
|
2d08 : 08 [ 3]> php ;save flags
|
| 12551 |
|
|
2d09 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12552 |
|
|
> trap_ne
|
| 12553 |
|
|
2d0c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12554 |
|
|
>
|
| 12555 |
|
|
2d0e : 68 [ 4]> pla ;load status
|
| 12556 |
|
|
> eor_flag $ff-fnz
|
| 12557 |
|
|
2d0f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12558 |
|
|
>
|
| 12559 |
|
|
2d11 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12560 |
|
|
> trap_ne ;
|
| 12561 |
|
|
2d14 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12562 |
|
|
>
|
| 12563 |
|
|
|
| 12564 |
|
|
2d16 : ca [ 2] dex
|
| 12565 |
|
|
2d17 : 10e5 [ 4] bpl tand9
|
| 12566 |
|
|
|
| 12567 |
|
|
2d19 : a003 [ 2] ldy #3 ;abs,y
|
| 12568 |
|
|
2d1b : tand10
|
| 12569 |
|
|
set_ay absANa,0
|
| 12570 |
|
|
> load_flag 0
|
| 12571 |
|
|
2d1b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12572 |
|
|
>
|
| 12573 |
|
|
2d1d : 48 [ 3]> pha ;use stack to load status
|
| 12574 |
|
|
2d1e : b94b02 [ 4]> lda absANa,y ;precharge accu
|
| 12575 |
|
|
2d21 : 28 [ 4]> plp
|
| 12576 |
|
|
|
| 12577 |
|
|
2d22 : 393f02 [ 4] and absAN,y
|
| 12578 |
|
|
tst_ay absrlo,absflo,0
|
| 12579 |
|
|
2d25 : 08 [ 3]> php ;save flags
|
| 12580 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 218
|
| 12581 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12582 |
|
|
|
| 12583 |
|
|
2d26 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 12584 |
|
|
> trap_ne ;
|
| 12585 |
|
|
2d29 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12586 |
|
|
>
|
| 12587 |
|
|
2d2b : 68 [ 4]> pla ;load status
|
| 12588 |
|
|
> eor_flag 0
|
| 12589 |
|
|
2d2c : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12590 |
|
|
>
|
| 12591 |
|
|
2d2e : d95702 [ 4]> cmp absflo,y ;test flags
|
| 12592 |
|
|
> trap_ne
|
| 12593 |
|
|
2d31 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12594 |
|
|
>
|
| 12595 |
|
|
|
| 12596 |
|
|
2d33 : 88 [ 2] dey
|
| 12597 |
|
|
2d34 : 10e5 [ 3] bpl tand10
|
| 12598 |
|
|
2d36 : a003 [ 2] ldy #3
|
| 12599 |
|
|
2d38 : tand11
|
| 12600 |
|
|
set_ay absANa,$ff
|
| 12601 |
|
|
> load_flag $ff
|
| 12602 |
|
|
2d38 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12603 |
|
|
>
|
| 12604 |
|
|
2d3a : 48 [ 3]> pha ;use stack to load status
|
| 12605 |
|
|
2d3b : b94b02 [ 4]> lda absANa,y ;precharge accu
|
| 12606 |
|
|
2d3e : 28 [ 4]> plp
|
| 12607 |
|
|
|
| 12608 |
|
|
2d3f : 393f02 [ 4] and absAN,y
|
| 12609 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 12610 |
|
|
2d42 : 08 [ 3]> php ;save flags
|
| 12611 |
|
|
2d43 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 12612 |
|
|
> trap_ne ;
|
| 12613 |
|
|
2d46 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12614 |
|
|
>
|
| 12615 |
|
|
2d48 : 68 [ 4]> pla ;load status
|
| 12616 |
|
|
> eor_flag $ff-fnz
|
| 12617 |
|
|
2d49 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12618 |
|
|
>
|
| 12619 |
|
|
2d4b : d95702 [ 4]> cmp absflo,y ;test flags
|
| 12620 |
|
|
> trap_ne
|
| 12621 |
|
|
2d4e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12622 |
|
|
>
|
| 12623 |
|
|
|
| 12624 |
|
|
2d50 : 88 [ 2] dey
|
| 12625 |
|
|
2d51 : 10e5 [ 3] bpl tand11
|
| 12626 |
|
|
|
| 12627 |
|
|
2d53 : a206 [ 2] ldx #6 ;(zp,x)
|
| 12628 |
|
|
2d55 : a003 [ 2] ldy #3
|
| 12629 |
|
|
2d57 : tand12
|
| 12630 |
|
|
set_ay absANa,0
|
| 12631 |
|
|
> load_flag 0
|
| 12632 |
|
|
2d57 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12633 |
|
|
>
|
| 12634 |
|
|
2d59 : 48 [ 3]> pha ;use stack to load status
|
| 12635 |
|
|
2d5a : b94b02 [ 4]> lda absANa,y ;precharge accu
|
| 12636 |
|
|
2d5d : 28 [ 4]> plp
|
| 12637 |
|
|
|
| 12638 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 219
|
| 12639 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12640 |
|
|
|
| 12641 |
|
|
2d5e : 213a [ 6] and (indAN,x)
|
| 12642 |
|
|
tst_ay absrlo,absflo,0
|
| 12643 |
|
|
2d60 : 08 [ 3]> php ;save flags
|
| 12644 |
|
|
2d61 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 12645 |
|
|
> trap_ne ;
|
| 12646 |
|
|
2d64 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12647 |
|
|
>
|
| 12648 |
|
|
2d66 : 68 [ 4]> pla ;load status
|
| 12649 |
|
|
> eor_flag 0
|
| 12650 |
|
|
2d67 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12651 |
|
|
>
|
| 12652 |
|
|
2d69 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 12653 |
|
|
> trap_ne
|
| 12654 |
|
|
2d6c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12655 |
|
|
>
|
| 12656 |
|
|
|
| 12657 |
|
|
2d6e : ca [ 2] dex
|
| 12658 |
|
|
2d6f : ca [ 2] dex
|
| 12659 |
|
|
2d70 : 88 [ 2] dey
|
| 12660 |
|
|
2d71 : 10e4 [ 3] bpl tand12
|
| 12661 |
|
|
2d73 : a206 [ 2] ldx #6
|
| 12662 |
|
|
2d75 : a003 [ 2] ldy #3
|
| 12663 |
|
|
2d77 : tand13
|
| 12664 |
|
|
set_ay absANa,$ff
|
| 12665 |
|
|
> load_flag $ff
|
| 12666 |
|
|
2d77 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12667 |
|
|
>
|
| 12668 |
|
|
2d79 : 48 [ 3]> pha ;use stack to load status
|
| 12669 |
|
|
2d7a : b94b02 [ 4]> lda absANa,y ;precharge accu
|
| 12670 |
|
|
2d7d : 28 [ 4]> plp
|
| 12671 |
|
|
|
| 12672 |
|
|
2d7e : 213a [ 6] and (indAN,x)
|
| 12673 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 12674 |
|
|
2d80 : 08 [ 3]> php ;save flags
|
| 12675 |
|
|
2d81 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 12676 |
|
|
> trap_ne ;
|
| 12677 |
|
|
2d84 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12678 |
|
|
>
|
| 12679 |
|
|
2d86 : 68 [ 4]> pla ;load status
|
| 12680 |
|
|
> eor_flag $ff-fnz
|
| 12681 |
|
|
2d87 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12682 |
|
|
>
|
| 12683 |
|
|
2d89 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 12684 |
|
|
> trap_ne
|
| 12685 |
|
|
2d8c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12686 |
|
|
>
|
| 12687 |
|
|
|
| 12688 |
|
|
2d8e : ca [ 2] dex
|
| 12689 |
|
|
2d8f : ca [ 2] dex
|
| 12690 |
|
|
2d90 : 88 [ 2] dey
|
| 12691 |
|
|
2d91 : 10e4 [ 3] bpl tand13
|
| 12692 |
|
|
|
| 12693 |
|
|
2d93 : a003 [ 2] ldy #3 ;(zp),y
|
| 12694 |
|
|
2d95 : tand14
|
| 12695 |
|
|
set_ay absANa,0
|
| 12696 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 220
|
| 12697 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12698 |
|
|
|
| 12699 |
|
|
> load_flag 0
|
| 12700 |
|
|
2d95 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12701 |
|
|
>
|
| 12702 |
|
|
2d97 : 48 [ 3]> pha ;use stack to load status
|
| 12703 |
|
|
2d98 : b94b02 [ 4]> lda absANa,y ;precharge accu
|
| 12704 |
|
|
2d9b : 28 [ 4]> plp
|
| 12705 |
|
|
|
| 12706 |
|
|
2d9c : 313a [ 5] and (indAN),y
|
| 12707 |
|
|
tst_ay absrlo,absflo,0
|
| 12708 |
|
|
2d9e : 08 [ 3]> php ;save flags
|
| 12709 |
|
|
2d9f : d95302 [ 4]> cmp absrlo,y ;test result
|
| 12710 |
|
|
> trap_ne ;
|
| 12711 |
|
|
2da2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12712 |
|
|
>
|
| 12713 |
|
|
2da4 : 68 [ 4]> pla ;load status
|
| 12714 |
|
|
> eor_flag 0
|
| 12715 |
|
|
2da5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12716 |
|
|
>
|
| 12717 |
|
|
2da7 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 12718 |
|
|
> trap_ne
|
| 12719 |
|
|
2daa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12720 |
|
|
>
|
| 12721 |
|
|
|
| 12722 |
|
|
2dac : 88 [ 2] dey
|
| 12723 |
|
|
2dad : 10e6 [ 3] bpl tand14
|
| 12724 |
|
|
2daf : a003 [ 2] ldy #3
|
| 12725 |
|
|
2db1 : tand15
|
| 12726 |
|
|
set_ay absANa,$ff
|
| 12727 |
|
|
> load_flag $ff
|
| 12728 |
|
|
2db1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12729 |
|
|
>
|
| 12730 |
|
|
2db3 : 48 [ 3]> pha ;use stack to load status
|
| 12731 |
|
|
2db4 : b94b02 [ 4]> lda absANa,y ;precharge accu
|
| 12732 |
|
|
2db7 : 28 [ 4]> plp
|
| 12733 |
|
|
|
| 12734 |
|
|
2db8 : 313a [ 5] and (indAN),y
|
| 12735 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 12736 |
|
|
2dba : 08 [ 3]> php ;save flags
|
| 12737 |
|
|
2dbb : d95302 [ 4]> cmp absrlo,y ;test result
|
| 12738 |
|
|
> trap_ne ;
|
| 12739 |
|
|
2dbe : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12740 |
|
|
>
|
| 12741 |
|
|
2dc0 : 68 [ 4]> pla ;load status
|
| 12742 |
|
|
> eor_flag $ff-fnz
|
| 12743 |
|
|
2dc1 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12744 |
|
|
>
|
| 12745 |
|
|
2dc3 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 12746 |
|
|
> trap_ne
|
| 12747 |
|
|
2dc6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12748 |
|
|
>
|
| 12749 |
|
|
|
| 12750 |
|
|
2dc8 : 88 [ 2] dey
|
| 12751 |
|
|
2dc9 : 10e6 [ 3] bpl tand15
|
| 12752 |
|
|
next_test
|
| 12753 |
|
|
2dcb : ad0002 [ 4]> lda test_case ;previous test
|
| 12754 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 221
|
| 12755 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12756 |
|
|
|
| 12757 |
|
|
2dce : c926 [ 2]> cmp #test_num
|
| 12758 |
|
|
> trap_ne ;test is out of sequence
|
| 12759 |
|
|
2dd0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12760 |
|
|
>
|
| 12761 |
|
|
0027 = >test_num = test_num + 1
|
| 12762 |
|
|
2dd2 : a927 [ 2]> lda #test_num ;*** this tests' number
|
| 12763 |
|
|
2dd4 : 8d0002 [ 4]> sta test_case
|
| 12764 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 12765 |
|
|
|
| 12766 |
|
|
|
| 12767 |
|
|
; EOR
|
| 12768 |
|
|
2dd7 : a203 [ 2] ldx #3 ;immediate - self modifying code
|
| 12769 |
|
|
2dd9 : b520 [ 4] teor lda zpEO,x
|
| 12770 |
|
|
2ddb : 8de62d [ 4] sta teori1
|
| 12771 |
|
|
set_ax absEOa,0
|
| 12772 |
|
|
> load_flag 0
|
| 12773 |
|
|
2dde : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12774 |
|
|
>
|
| 12775 |
|
|
2de0 : 48 [ 3]> pha ;use stack to load status
|
| 12776 |
|
|
2de1 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12777 |
|
|
2de4 : 28 [ 4]> plp
|
| 12778 |
|
|
|
| 12779 |
|
|
2de6 = teori1 equ *+1 ;target for immediate operand
|
| 12780 |
|
|
2de5 : 4963 [ 2] eor #99
|
| 12781 |
|
|
tst_ax absrlo,absflo,0
|
| 12782 |
|
|
2de7 : 08 [ 3]> php ;save flags
|
| 12783 |
|
|
2de8 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12784 |
|
|
> trap_ne
|
| 12785 |
|
|
2deb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12786 |
|
|
>
|
| 12787 |
|
|
2ded : 68 [ 4]> pla ;load status
|
| 12788 |
|
|
> eor_flag 0
|
| 12789 |
|
|
2dee : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12790 |
|
|
>
|
| 12791 |
|
|
2df0 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12792 |
|
|
> trap_ne ;
|
| 12793 |
|
|
2df3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12794 |
|
|
>
|
| 12795 |
|
|
|
| 12796 |
|
|
2df5 : ca [ 2] dex
|
| 12797 |
|
|
2df6 : 10e1 [ 3] bpl teor
|
| 12798 |
|
|
2df8 : a203 [ 2] ldx #3
|
| 12799 |
|
|
2dfa : b520 [ 4] teor1 lda zpEO,x
|
| 12800 |
|
|
2dfc : 8d072e [ 4] sta teori2
|
| 12801 |
|
|
set_ax absEOa,$ff
|
| 12802 |
|
|
> load_flag $ff
|
| 12803 |
|
|
2dff : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12804 |
|
|
>
|
| 12805 |
|
|
2e01 : 48 [ 3]> pha ;use stack to load status
|
| 12806 |
|
|
2e02 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12807 |
|
|
2e05 : 28 [ 4]> plp
|
| 12808 |
|
|
|
| 12809 |
|
|
2e07 = teori2 equ *+1 ;target for immediate operand
|
| 12810 |
|
|
2e06 : 4963 [ 2] eor #99
|
| 12811 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12812 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 222
|
| 12813 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12814 |
|
|
|
| 12815 |
|
|
2e08 : 08 [ 3]> php ;save flags
|
| 12816 |
|
|
2e09 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12817 |
|
|
> trap_ne
|
| 12818 |
|
|
2e0c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12819 |
|
|
>
|
| 12820 |
|
|
2e0e : 68 [ 4]> pla ;load status
|
| 12821 |
|
|
> eor_flag $ff-fnz
|
| 12822 |
|
|
2e0f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12823 |
|
|
>
|
| 12824 |
|
|
2e11 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12825 |
|
|
> trap_ne ;
|
| 12826 |
|
|
2e14 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12827 |
|
|
>
|
| 12828 |
|
|
|
| 12829 |
|
|
2e16 : ca [ 2] dex
|
| 12830 |
|
|
2e17 : 10e1 [ 4] bpl teor1
|
| 12831 |
|
|
|
| 12832 |
|
|
2e19 : a203 [ 2] ldx #3 ;zp
|
| 12833 |
|
|
2e1b : b520 [ 4] teor2 lda zpEO,x
|
| 12834 |
|
|
2e1d : 850c [ 3] sta zpt
|
| 12835 |
|
|
set_ax absEOa,0
|
| 12836 |
|
|
> load_flag 0
|
| 12837 |
|
|
2e1f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12838 |
|
|
>
|
| 12839 |
|
|
2e21 : 48 [ 3]> pha ;use stack to load status
|
| 12840 |
|
|
2e22 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12841 |
|
|
2e25 : 28 [ 4]> plp
|
| 12842 |
|
|
|
| 12843 |
|
|
2e26 : 450c [ 3] eor zpt
|
| 12844 |
|
|
tst_ax absrlo,absflo,0
|
| 12845 |
|
|
2e28 : 08 [ 3]> php ;save flags
|
| 12846 |
|
|
2e29 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12847 |
|
|
> trap_ne
|
| 12848 |
|
|
2e2c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12849 |
|
|
>
|
| 12850 |
|
|
2e2e : 68 [ 4]> pla ;load status
|
| 12851 |
|
|
> eor_flag 0
|
| 12852 |
|
|
2e2f : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12853 |
|
|
>
|
| 12854 |
|
|
2e31 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12855 |
|
|
> trap_ne ;
|
| 12856 |
|
|
2e34 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12857 |
|
|
>
|
| 12858 |
|
|
|
| 12859 |
|
|
2e36 : ca [ 2] dex
|
| 12860 |
|
|
2e37 : 10e2 [ 3] bpl teor2
|
| 12861 |
|
|
2e39 : a203 [ 2] ldx #3
|
| 12862 |
|
|
2e3b : b520 [ 4] teor3 lda zpEO,x
|
| 12863 |
|
|
2e3d : 850c [ 3] sta zpt
|
| 12864 |
|
|
set_ax absEOa,$ff
|
| 12865 |
|
|
> load_flag $ff
|
| 12866 |
|
|
2e3f : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12867 |
|
|
>
|
| 12868 |
|
|
2e41 : 48 [ 3]> pha ;use stack to load status
|
| 12869 |
|
|
2e42 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12870 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 223
|
| 12871 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12872 |
|
|
|
| 12873 |
|
|
2e45 : 28 [ 4]> plp
|
| 12874 |
|
|
|
| 12875 |
|
|
2e46 : 450c [ 3] eor zpt
|
| 12876 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12877 |
|
|
2e48 : 08 [ 3]> php ;save flags
|
| 12878 |
|
|
2e49 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12879 |
|
|
> trap_ne
|
| 12880 |
|
|
2e4c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12881 |
|
|
>
|
| 12882 |
|
|
2e4e : 68 [ 4]> pla ;load status
|
| 12883 |
|
|
> eor_flag $ff-fnz
|
| 12884 |
|
|
2e4f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12885 |
|
|
>
|
| 12886 |
|
|
2e51 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12887 |
|
|
> trap_ne ;
|
| 12888 |
|
|
2e54 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12889 |
|
|
>
|
| 12890 |
|
|
|
| 12891 |
|
|
2e56 : ca [ 2] dex
|
| 12892 |
|
|
2e57 : 10e2 [ 3] bpl teor3
|
| 12893 |
|
|
|
| 12894 |
|
|
2e59 : a203 [ 2] ldx #3 ;abs
|
| 12895 |
|
|
2e5b : b520 [ 4] teor4 lda zpEO,x
|
| 12896 |
|
|
2e5d : 8d0302 [ 4] sta abst
|
| 12897 |
|
|
set_ax absEOa,0
|
| 12898 |
|
|
> load_flag 0
|
| 12899 |
|
|
2e60 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12900 |
|
|
>
|
| 12901 |
|
|
2e62 : 48 [ 3]> pha ;use stack to load status
|
| 12902 |
|
|
2e63 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12903 |
|
|
2e66 : 28 [ 4]> plp
|
| 12904 |
|
|
|
| 12905 |
|
|
2e67 : 4d0302 [ 4] eor abst
|
| 12906 |
|
|
tst_ax absrlo,absflo,0
|
| 12907 |
|
|
2e6a : 08 [ 3]> php ;save flags
|
| 12908 |
|
|
2e6b : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12909 |
|
|
> trap_ne
|
| 12910 |
|
|
2e6e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12911 |
|
|
>
|
| 12912 |
|
|
2e70 : 68 [ 4]> pla ;load status
|
| 12913 |
|
|
> eor_flag 0
|
| 12914 |
|
|
2e71 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12915 |
|
|
>
|
| 12916 |
|
|
2e73 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12917 |
|
|
> trap_ne ;
|
| 12918 |
|
|
2e76 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12919 |
|
|
>
|
| 12920 |
|
|
|
| 12921 |
|
|
2e78 : ca [ 2] dex
|
| 12922 |
|
|
2e79 : 10e0 [ 3] bpl teor4
|
| 12923 |
|
|
2e7b : a203 [ 2] ldx #3
|
| 12924 |
|
|
2e7d : b520 [ 4] teor5 lda zpEO,x
|
| 12925 |
|
|
2e7f : 8d0302 [ 4] sta abst
|
| 12926 |
|
|
set_ax absEOa,$ff
|
| 12927 |
|
|
> load_flag $ff
|
| 12928 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 224
|
| 12929 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12930 |
|
|
|
| 12931 |
|
|
2e82 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12932 |
|
|
>
|
| 12933 |
|
|
2e84 : 48 [ 3]> pha ;use stack to load status
|
| 12934 |
|
|
2e85 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12935 |
|
|
2e88 : 28 [ 4]> plp
|
| 12936 |
|
|
|
| 12937 |
|
|
2e89 : 4d0302 [ 4] eor abst
|
| 12938 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12939 |
|
|
2e8c : 08 [ 3]> php ;save flags
|
| 12940 |
|
|
2e8d : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12941 |
|
|
> trap_ne
|
| 12942 |
|
|
2e90 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12943 |
|
|
>
|
| 12944 |
|
|
2e92 : 68 [ 4]> pla ;load status
|
| 12945 |
|
|
> eor_flag $ff-fnz
|
| 12946 |
|
|
2e93 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 12947 |
|
|
>
|
| 12948 |
|
|
2e95 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12949 |
|
|
> trap_ne ;
|
| 12950 |
|
|
2e98 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12951 |
|
|
>
|
| 12952 |
|
|
|
| 12953 |
|
|
2e9a : ca [ 2] dex
|
| 12954 |
|
|
2e9b : 1002 [ 3] bpl teor6
|
| 12955 |
|
|
|
| 12956 |
|
|
2e9d : a203 [ 2] ldx #3 ;zp,x
|
| 12957 |
|
|
2e9f : teor6
|
| 12958 |
|
|
set_ax absEOa,0
|
| 12959 |
|
|
> load_flag 0
|
| 12960 |
|
|
2e9f : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 12961 |
|
|
>
|
| 12962 |
|
|
2ea1 : 48 [ 3]> pha ;use stack to load status
|
| 12963 |
|
|
2ea2 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12964 |
|
|
2ea5 : 28 [ 4]> plp
|
| 12965 |
|
|
|
| 12966 |
|
|
2ea6 : 5520 [ 4] eor zpEO,x
|
| 12967 |
|
|
tst_ax absrlo,absflo,0
|
| 12968 |
|
|
2ea8 : 08 [ 3]> php ;save flags
|
| 12969 |
|
|
2ea9 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 12970 |
|
|
> trap_ne
|
| 12971 |
|
|
2eac : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12972 |
|
|
>
|
| 12973 |
|
|
2eae : 68 [ 4]> pla ;load status
|
| 12974 |
|
|
> eor_flag 0
|
| 12975 |
|
|
2eaf : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 12976 |
|
|
>
|
| 12977 |
|
|
2eb1 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 12978 |
|
|
> trap_ne ;
|
| 12979 |
|
|
2eb4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 12980 |
|
|
>
|
| 12981 |
|
|
|
| 12982 |
|
|
2eb6 : ca [ 2] dex
|
| 12983 |
|
|
2eb7 : 10e6 [ 3] bpl teor6
|
| 12984 |
|
|
2eb9 : a203 [ 2] ldx #3
|
| 12985 |
|
|
2ebb : teor7
|
| 12986 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 225
|
| 12987 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 12988 |
|
|
|
| 12989 |
|
|
set_ax absEOa,$ff
|
| 12990 |
|
|
> load_flag $ff
|
| 12991 |
|
|
2ebb : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 12992 |
|
|
>
|
| 12993 |
|
|
2ebd : 48 [ 3]> pha ;use stack to load status
|
| 12994 |
|
|
2ebe : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 12995 |
|
|
2ec1 : 28 [ 4]> plp
|
| 12996 |
|
|
|
| 12997 |
|
|
2ec2 : 5520 [ 4] eor zpEO,x
|
| 12998 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 12999 |
|
|
2ec4 : 08 [ 3]> php ;save flags
|
| 13000 |
|
|
2ec5 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13001 |
|
|
> trap_ne
|
| 13002 |
|
|
2ec8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13003 |
|
|
>
|
| 13004 |
|
|
2eca : 68 [ 4]> pla ;load status
|
| 13005 |
|
|
> eor_flag $ff-fnz
|
| 13006 |
|
|
2ecb : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13007 |
|
|
>
|
| 13008 |
|
|
2ecd : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13009 |
|
|
> trap_ne ;
|
| 13010 |
|
|
2ed0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13011 |
|
|
>
|
| 13012 |
|
|
|
| 13013 |
|
|
2ed2 : ca [ 2] dex
|
| 13014 |
|
|
2ed3 : 10e6 [ 3] bpl teor7
|
| 13015 |
|
|
|
| 13016 |
|
|
2ed5 : a203 [ 2] ldx #3 ;abs,x
|
| 13017 |
|
|
2ed7 : teor8
|
| 13018 |
|
|
set_ax absEOa,0
|
| 13019 |
|
|
> load_flag 0
|
| 13020 |
|
|
2ed7 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13021 |
|
|
>
|
| 13022 |
|
|
2ed9 : 48 [ 3]> pha ;use stack to load status
|
| 13023 |
|
|
2eda : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 13024 |
|
|
2edd : 28 [ 4]> plp
|
| 13025 |
|
|
|
| 13026 |
|
|
2ede : 5d4302 [ 4] eor absEO,x
|
| 13027 |
|
|
tst_ax absrlo,absflo,0
|
| 13028 |
|
|
2ee1 : 08 [ 3]> php ;save flags
|
| 13029 |
|
|
2ee2 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13030 |
|
|
> trap_ne
|
| 13031 |
|
|
2ee5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13032 |
|
|
>
|
| 13033 |
|
|
2ee7 : 68 [ 4]> pla ;load status
|
| 13034 |
|
|
> eor_flag 0
|
| 13035 |
|
|
2ee8 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13036 |
|
|
>
|
| 13037 |
|
|
2eea : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13038 |
|
|
> trap_ne ;
|
| 13039 |
|
|
2eed : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13040 |
|
|
>
|
| 13041 |
|
|
|
| 13042 |
|
|
2eef : ca [ 2] dex
|
| 13043 |
|
|
2ef0 : 10e5 [ 3] bpl teor8
|
| 13044 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 226
|
| 13045 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13046 |
|
|
|
| 13047 |
|
|
2ef2 : a203 [ 2] ldx #3
|
| 13048 |
|
|
2ef4 : teor9
|
| 13049 |
|
|
set_ax absEOa,$ff
|
| 13050 |
|
|
> load_flag $ff
|
| 13051 |
|
|
2ef4 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13052 |
|
|
>
|
| 13053 |
|
|
2ef6 : 48 [ 3]> pha ;use stack to load status
|
| 13054 |
|
|
2ef7 : bd4f02 [ 4]> lda absEOa,x ;precharge accu
|
| 13055 |
|
|
2efa : 28 [ 4]> plp
|
| 13056 |
|
|
|
| 13057 |
|
|
2efb : 5d4302 [ 4] eor absEO,x
|
| 13058 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 13059 |
|
|
2efe : 08 [ 3]> php ;save flags
|
| 13060 |
|
|
2eff : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13061 |
|
|
> trap_ne
|
| 13062 |
|
|
2f02 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13063 |
|
|
>
|
| 13064 |
|
|
2f04 : 68 [ 4]> pla ;load status
|
| 13065 |
|
|
> eor_flag $ff-fnz
|
| 13066 |
|
|
2f05 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13067 |
|
|
>
|
| 13068 |
|
|
2f07 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13069 |
|
|
> trap_ne ;
|
| 13070 |
|
|
2f0a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13071 |
|
|
>
|
| 13072 |
|
|
|
| 13073 |
|
|
2f0c : ca [ 2] dex
|
| 13074 |
|
|
2f0d : 10e5 [ 4] bpl teor9
|
| 13075 |
|
|
|
| 13076 |
|
|
2f0f : a003 [ 2] ldy #3 ;abs,y
|
| 13077 |
|
|
2f11 : teor10
|
| 13078 |
|
|
set_ay absEOa,0
|
| 13079 |
|
|
> load_flag 0
|
| 13080 |
|
|
2f11 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13081 |
|
|
>
|
| 13082 |
|
|
2f13 : 48 [ 3]> pha ;use stack to load status
|
| 13083 |
|
|
2f14 : b94f02 [ 4]> lda absEOa,y ;precharge accu
|
| 13084 |
|
|
2f17 : 28 [ 4]> plp
|
| 13085 |
|
|
|
| 13086 |
|
|
2f18 : 594302 [ 4] eor absEO,y
|
| 13087 |
|
|
tst_ay absrlo,absflo,0
|
| 13088 |
|
|
2f1b : 08 [ 3]> php ;save flags
|
| 13089 |
|
|
2f1c : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13090 |
|
|
> trap_ne ;
|
| 13091 |
|
|
2f1f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13092 |
|
|
>
|
| 13093 |
|
|
2f21 : 68 [ 4]> pla ;load status
|
| 13094 |
|
|
> eor_flag 0
|
| 13095 |
|
|
2f22 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13096 |
|
|
>
|
| 13097 |
|
|
2f24 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13098 |
|
|
> trap_ne
|
| 13099 |
|
|
2f27 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13100 |
|
|
>
|
| 13101 |
|
|
|
| 13102 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 227
|
| 13103 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13104 |
|
|
|
| 13105 |
|
|
2f29 : 88 [ 2] dey
|
| 13106 |
|
|
2f2a : 10e5 [ 3] bpl teor10
|
| 13107 |
|
|
2f2c : a003 [ 2] ldy #3
|
| 13108 |
|
|
2f2e : teor11
|
| 13109 |
|
|
set_ay absEOa,$ff
|
| 13110 |
|
|
> load_flag $ff
|
| 13111 |
|
|
2f2e : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13112 |
|
|
>
|
| 13113 |
|
|
2f30 : 48 [ 3]> pha ;use stack to load status
|
| 13114 |
|
|
2f31 : b94f02 [ 4]> lda absEOa,y ;precharge accu
|
| 13115 |
|
|
2f34 : 28 [ 4]> plp
|
| 13116 |
|
|
|
| 13117 |
|
|
2f35 : 594302 [ 4] eor absEO,y
|
| 13118 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 13119 |
|
|
2f38 : 08 [ 3]> php ;save flags
|
| 13120 |
|
|
2f39 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13121 |
|
|
> trap_ne ;
|
| 13122 |
|
|
2f3c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13123 |
|
|
>
|
| 13124 |
|
|
2f3e : 68 [ 4]> pla ;load status
|
| 13125 |
|
|
> eor_flag $ff-fnz
|
| 13126 |
|
|
2f3f : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13127 |
|
|
>
|
| 13128 |
|
|
2f41 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13129 |
|
|
> trap_ne
|
| 13130 |
|
|
2f44 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13131 |
|
|
>
|
| 13132 |
|
|
|
| 13133 |
|
|
2f46 : 88 [ 2] dey
|
| 13134 |
|
|
2f47 : 10e5 [ 3] bpl teor11
|
| 13135 |
|
|
|
| 13136 |
|
|
2f49 : a206 [ 2] ldx #6 ;(zp,x)
|
| 13137 |
|
|
2f4b : a003 [ 2] ldy #3
|
| 13138 |
|
|
2f4d : teor12
|
| 13139 |
|
|
set_ay absEOa,0
|
| 13140 |
|
|
> load_flag 0
|
| 13141 |
|
|
2f4d : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13142 |
|
|
>
|
| 13143 |
|
|
2f4f : 48 [ 3]> pha ;use stack to load status
|
| 13144 |
|
|
2f50 : b94f02 [ 4]> lda absEOa,y ;precharge accu
|
| 13145 |
|
|
2f53 : 28 [ 4]> plp
|
| 13146 |
|
|
|
| 13147 |
|
|
2f54 : 4142 [ 6] eor (indEO,x)
|
| 13148 |
|
|
tst_ay absrlo,absflo,0
|
| 13149 |
|
|
2f56 : 08 [ 3]> php ;save flags
|
| 13150 |
|
|
2f57 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13151 |
|
|
> trap_ne ;
|
| 13152 |
|
|
2f5a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13153 |
|
|
>
|
| 13154 |
|
|
2f5c : 68 [ 4]> pla ;load status
|
| 13155 |
|
|
> eor_flag 0
|
| 13156 |
|
|
2f5d : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13157 |
|
|
>
|
| 13158 |
|
|
2f5f : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13159 |
|
|
> trap_ne
|
| 13160 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 228
|
| 13161 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13162 |
|
|
|
| 13163 |
|
|
2f62 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13164 |
|
|
>
|
| 13165 |
|
|
|
| 13166 |
|
|
2f64 : ca [ 2] dex
|
| 13167 |
|
|
2f65 : ca [ 2] dex
|
| 13168 |
|
|
2f66 : 88 [ 2] dey
|
| 13169 |
|
|
2f67 : 10e4 [ 3] bpl teor12
|
| 13170 |
|
|
2f69 : a206 [ 2] ldx #6
|
| 13171 |
|
|
2f6b : a003 [ 2] ldy #3
|
| 13172 |
|
|
2f6d : teor13
|
| 13173 |
|
|
set_ay absEOa,$ff
|
| 13174 |
|
|
> load_flag $ff
|
| 13175 |
|
|
2f6d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13176 |
|
|
>
|
| 13177 |
|
|
2f6f : 48 [ 3]> pha ;use stack to load status
|
| 13178 |
|
|
2f70 : b94f02 [ 4]> lda absEOa,y ;precharge accu
|
| 13179 |
|
|
2f73 : 28 [ 4]> plp
|
| 13180 |
|
|
|
| 13181 |
|
|
2f74 : 4142 [ 6] eor (indEO,x)
|
| 13182 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 13183 |
|
|
2f76 : 08 [ 3]> php ;save flags
|
| 13184 |
|
|
2f77 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13185 |
|
|
> trap_ne ;
|
| 13186 |
|
|
2f7a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13187 |
|
|
>
|
| 13188 |
|
|
2f7c : 68 [ 4]> pla ;load status
|
| 13189 |
|
|
> eor_flag $ff-fnz
|
| 13190 |
|
|
2f7d : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13191 |
|
|
>
|
| 13192 |
|
|
2f7f : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13193 |
|
|
> trap_ne
|
| 13194 |
|
|
2f82 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13195 |
|
|
>
|
| 13196 |
|
|
|
| 13197 |
|
|
2f84 : ca [ 2] dex
|
| 13198 |
|
|
2f85 : ca [ 2] dex
|
| 13199 |
|
|
2f86 : 88 [ 2] dey
|
| 13200 |
|
|
2f87 : 10e4 [ 3] bpl teor13
|
| 13201 |
|
|
|
| 13202 |
|
|
2f89 : a003 [ 2] ldy #3 ;(zp),y
|
| 13203 |
|
|
2f8b : teor14
|
| 13204 |
|
|
set_ay absEOa,0
|
| 13205 |
|
|
> load_flag 0
|
| 13206 |
|
|
2f8b : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13207 |
|
|
>
|
| 13208 |
|
|
2f8d : 48 [ 3]> pha ;use stack to load status
|
| 13209 |
|
|
2f8e : b94f02 [ 4]> lda absEOa,y ;precharge accu
|
| 13210 |
|
|
2f91 : 28 [ 4]> plp
|
| 13211 |
|
|
|
| 13212 |
|
|
2f92 : 5142 [ 5] eor (indEO),y
|
| 13213 |
|
|
tst_ay absrlo,absflo,0
|
| 13214 |
|
|
2f94 : 08 [ 3]> php ;save flags
|
| 13215 |
|
|
2f95 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13216 |
|
|
> trap_ne ;
|
| 13217 |
|
|
2f98 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13218 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 229
|
| 13219 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13220 |
|
|
|
| 13221 |
|
|
>
|
| 13222 |
|
|
2f9a : 68 [ 4]> pla ;load status
|
| 13223 |
|
|
> eor_flag 0
|
| 13224 |
|
|
2f9b : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13225 |
|
|
>
|
| 13226 |
|
|
2f9d : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13227 |
|
|
> trap_ne
|
| 13228 |
|
|
2fa0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13229 |
|
|
>
|
| 13230 |
|
|
|
| 13231 |
|
|
2fa2 : 88 [ 2] dey
|
| 13232 |
|
|
2fa3 : 10e6 [ 3] bpl teor14
|
| 13233 |
|
|
2fa5 : a003 [ 2] ldy #3
|
| 13234 |
|
|
2fa7 : teor15
|
| 13235 |
|
|
set_ay absEOa,$ff
|
| 13236 |
|
|
> load_flag $ff
|
| 13237 |
|
|
2fa7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13238 |
|
|
>
|
| 13239 |
|
|
2fa9 : 48 [ 3]> pha ;use stack to load status
|
| 13240 |
|
|
2faa : b94f02 [ 4]> lda absEOa,y ;precharge accu
|
| 13241 |
|
|
2fad : 28 [ 4]> plp
|
| 13242 |
|
|
|
| 13243 |
|
|
2fae : 5142 [ 5] eor (indEO),y
|
| 13244 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 13245 |
|
|
2fb0 : 08 [ 3]> php ;save flags
|
| 13246 |
|
|
2fb1 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13247 |
|
|
> trap_ne ;
|
| 13248 |
|
|
2fb4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13249 |
|
|
>
|
| 13250 |
|
|
2fb6 : 68 [ 4]> pla ;load status
|
| 13251 |
|
|
> eor_flag $ff-fnz
|
| 13252 |
|
|
2fb7 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13253 |
|
|
>
|
| 13254 |
|
|
2fb9 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13255 |
|
|
> trap_ne
|
| 13256 |
|
|
2fbc : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13257 |
|
|
>
|
| 13258 |
|
|
|
| 13259 |
|
|
2fbe : 88 [ 2] dey
|
| 13260 |
|
|
2fbf : 10e6 [ 3] bpl teor15
|
| 13261 |
|
|
next_test
|
| 13262 |
|
|
2fc1 : ad0002 [ 4]> lda test_case ;previous test
|
| 13263 |
|
|
2fc4 : c927 [ 2]> cmp #test_num
|
| 13264 |
|
|
> trap_ne ;test is out of sequence
|
| 13265 |
|
|
2fc6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13266 |
|
|
>
|
| 13267 |
|
|
0028 = >test_num = test_num + 1
|
| 13268 |
|
|
2fc8 : a928 [ 2]> lda #test_num ;*** this tests' number
|
| 13269 |
|
|
2fca : 8d0002 [ 4]> sta test_case
|
| 13270 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 13271 |
|
|
|
| 13272 |
|
|
|
| 13273 |
|
|
; OR
|
| 13274 |
|
|
2fcd : a203 [ 2] ldx #3 ;immediate - self modifying code
|
| 13275 |
|
|
2fcf : b518 [ 4] tora lda zpOR,x
|
| 13276 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 230
|
| 13277 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13278 |
|
|
|
| 13279 |
|
|
2fd1 : 8ddc2f [ 4] sta torai1
|
| 13280 |
|
|
set_ax absORa,0
|
| 13281 |
|
|
> load_flag 0
|
| 13282 |
|
|
2fd4 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13283 |
|
|
>
|
| 13284 |
|
|
2fd6 : 48 [ 3]> pha ;use stack to load status
|
| 13285 |
|
|
2fd7 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13286 |
|
|
2fda : 28 [ 4]> plp
|
| 13287 |
|
|
|
| 13288 |
|
|
2fdc = torai1 equ *+1 ;target for immediate operand
|
| 13289 |
|
|
2fdb : 0963 [ 2] ora #99
|
| 13290 |
|
|
tst_ax absrlo,absflo,0
|
| 13291 |
|
|
2fdd : 08 [ 3]> php ;save flags
|
| 13292 |
|
|
2fde : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13293 |
|
|
> trap_ne
|
| 13294 |
|
|
2fe1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13295 |
|
|
>
|
| 13296 |
|
|
2fe3 : 68 [ 4]> pla ;load status
|
| 13297 |
|
|
> eor_flag 0
|
| 13298 |
|
|
2fe4 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13299 |
|
|
>
|
| 13300 |
|
|
2fe6 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13301 |
|
|
> trap_ne ;
|
| 13302 |
|
|
2fe9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13303 |
|
|
>
|
| 13304 |
|
|
|
| 13305 |
|
|
2feb : ca [ 2] dex
|
| 13306 |
|
|
2fec : 10e1 [ 3] bpl tora
|
| 13307 |
|
|
2fee : a203 [ 2] ldx #3
|
| 13308 |
|
|
2ff0 : b518 [ 4] tora1 lda zpOR,x
|
| 13309 |
|
|
2ff2 : 8dfd2f [ 4] sta torai2
|
| 13310 |
|
|
set_ax absORa,$ff
|
| 13311 |
|
|
> load_flag $ff
|
| 13312 |
|
|
2ff5 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13313 |
|
|
>
|
| 13314 |
|
|
2ff7 : 48 [ 3]> pha ;use stack to load status
|
| 13315 |
|
|
2ff8 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13316 |
|
|
2ffb : 28 [ 4]> plp
|
| 13317 |
|
|
|
| 13318 |
|
|
2ffd = torai2 equ *+1 ;target for immediate operand
|
| 13319 |
|
|
2ffc : 0963 [ 2] ora #99
|
| 13320 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 13321 |
|
|
2ffe : 08 [ 3]> php ;save flags
|
| 13322 |
|
|
2fff : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13323 |
|
|
> trap_ne
|
| 13324 |
|
|
3002 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13325 |
|
|
>
|
| 13326 |
|
|
3004 : 68 [ 4]> pla ;load status
|
| 13327 |
|
|
> eor_flag $ff-fnz
|
| 13328 |
|
|
3005 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13329 |
|
|
>
|
| 13330 |
|
|
3007 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13331 |
|
|
> trap_ne ;
|
| 13332 |
|
|
300a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13333 |
|
|
>
|
| 13334 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 231
|
| 13335 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13336 |
|
|
|
| 13337 |
|
|
|
| 13338 |
|
|
300c : ca [ 2] dex
|
| 13339 |
|
|
300d : 10e1 [ 4] bpl tora1
|
| 13340 |
|
|
|
| 13341 |
|
|
300f : a203 [ 2] ldx #3 ;zp
|
| 13342 |
|
|
3011 : b518 [ 4] tora2 lda zpOR,x
|
| 13343 |
|
|
3013 : 850c [ 3] sta zpt
|
| 13344 |
|
|
set_ax absORa,0
|
| 13345 |
|
|
> load_flag 0
|
| 13346 |
|
|
3015 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13347 |
|
|
>
|
| 13348 |
|
|
3017 : 48 [ 3]> pha ;use stack to load status
|
| 13349 |
|
|
3018 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13350 |
|
|
301b : 28 [ 4]> plp
|
| 13351 |
|
|
|
| 13352 |
|
|
301c : 050c [ 3] ora zpt
|
| 13353 |
|
|
tst_ax absrlo,absflo,0
|
| 13354 |
|
|
301e : 08 [ 3]> php ;save flags
|
| 13355 |
|
|
301f : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13356 |
|
|
> trap_ne
|
| 13357 |
|
|
3022 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13358 |
|
|
>
|
| 13359 |
|
|
3024 : 68 [ 4]> pla ;load status
|
| 13360 |
|
|
> eor_flag 0
|
| 13361 |
|
|
3025 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13362 |
|
|
>
|
| 13363 |
|
|
3027 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13364 |
|
|
> trap_ne ;
|
| 13365 |
|
|
302a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13366 |
|
|
>
|
| 13367 |
|
|
|
| 13368 |
|
|
302c : ca [ 2] dex
|
| 13369 |
|
|
302d : 10e2 [ 3] bpl tora2
|
| 13370 |
|
|
302f : a203 [ 2] ldx #3
|
| 13371 |
|
|
3031 : b518 [ 4] tora3 lda zpOR,x
|
| 13372 |
|
|
3033 : 850c [ 3] sta zpt
|
| 13373 |
|
|
set_ax absORa,$ff
|
| 13374 |
|
|
> load_flag $ff
|
| 13375 |
|
|
3035 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13376 |
|
|
>
|
| 13377 |
|
|
3037 : 48 [ 3]> pha ;use stack to load status
|
| 13378 |
|
|
3038 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13379 |
|
|
303b : 28 [ 4]> plp
|
| 13380 |
|
|
|
| 13381 |
|
|
303c : 050c [ 3] ora zpt
|
| 13382 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 13383 |
|
|
303e : 08 [ 3]> php ;save flags
|
| 13384 |
|
|
303f : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13385 |
|
|
> trap_ne
|
| 13386 |
|
|
3042 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13387 |
|
|
>
|
| 13388 |
|
|
3044 : 68 [ 4]> pla ;load status
|
| 13389 |
|
|
> eor_flag $ff-fnz
|
| 13390 |
|
|
3045 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13391 |
|
|
>
|
| 13392 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 232
|
| 13393 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13394 |
|
|
|
| 13395 |
|
|
3047 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13396 |
|
|
> trap_ne ;
|
| 13397 |
|
|
304a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13398 |
|
|
>
|
| 13399 |
|
|
|
| 13400 |
|
|
304c : ca [ 2] dex
|
| 13401 |
|
|
304d : 10e2 [ 3] bpl tora3
|
| 13402 |
|
|
|
| 13403 |
|
|
304f : a203 [ 2] ldx #3 ;abs
|
| 13404 |
|
|
3051 : b518 [ 4] tora4 lda zpOR,x
|
| 13405 |
|
|
3053 : 8d0302 [ 4] sta abst
|
| 13406 |
|
|
set_ax absORa,0
|
| 13407 |
|
|
> load_flag 0
|
| 13408 |
|
|
3056 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13409 |
|
|
>
|
| 13410 |
|
|
3058 : 48 [ 3]> pha ;use stack to load status
|
| 13411 |
|
|
3059 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13412 |
|
|
305c : 28 [ 4]> plp
|
| 13413 |
|
|
|
| 13414 |
|
|
305d : 0d0302 [ 4] ora abst
|
| 13415 |
|
|
tst_ax absrlo,absflo,0
|
| 13416 |
|
|
3060 : 08 [ 3]> php ;save flags
|
| 13417 |
|
|
3061 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13418 |
|
|
> trap_ne
|
| 13419 |
|
|
3064 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13420 |
|
|
>
|
| 13421 |
|
|
3066 : 68 [ 4]> pla ;load status
|
| 13422 |
|
|
> eor_flag 0
|
| 13423 |
|
|
3067 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13424 |
|
|
>
|
| 13425 |
|
|
3069 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13426 |
|
|
> trap_ne ;
|
| 13427 |
|
|
306c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13428 |
|
|
>
|
| 13429 |
|
|
|
| 13430 |
|
|
306e : ca [ 2] dex
|
| 13431 |
|
|
306f : 10e0 [ 3] bpl tora4
|
| 13432 |
|
|
3071 : a203 [ 2] ldx #3
|
| 13433 |
|
|
3073 : b518 [ 4] tora5 lda zpOR,x
|
| 13434 |
|
|
3075 : 8d0302 [ 4] sta abst
|
| 13435 |
|
|
set_ax absORa,$ff
|
| 13436 |
|
|
> load_flag $ff
|
| 13437 |
|
|
3078 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13438 |
|
|
>
|
| 13439 |
|
|
307a : 48 [ 3]> pha ;use stack to load status
|
| 13440 |
|
|
307b : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13441 |
|
|
307e : 28 [ 4]> plp
|
| 13442 |
|
|
|
| 13443 |
|
|
307f : 0d0302 [ 4] ora abst
|
| 13444 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 13445 |
|
|
3082 : 08 [ 3]> php ;save flags
|
| 13446 |
|
|
3083 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13447 |
|
|
> trap_ne
|
| 13448 |
|
|
3086 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13449 |
|
|
>
|
| 13450 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 233
|
| 13451 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13452 |
|
|
|
| 13453 |
|
|
3088 : 68 [ 4]> pla ;load status
|
| 13454 |
|
|
> eor_flag $ff-fnz
|
| 13455 |
|
|
3089 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13456 |
|
|
>
|
| 13457 |
|
|
308b : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13458 |
|
|
> trap_ne ;
|
| 13459 |
|
|
308e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13460 |
|
|
>
|
| 13461 |
|
|
|
| 13462 |
|
|
3090 : ca [ 2] dex
|
| 13463 |
|
|
3091 : 1002 [ 3] bpl tora6
|
| 13464 |
|
|
|
| 13465 |
|
|
3093 : a203 [ 2] ldx #3 ;zp,x
|
| 13466 |
|
|
3095 : tora6
|
| 13467 |
|
|
set_ax absORa,0
|
| 13468 |
|
|
> load_flag 0
|
| 13469 |
|
|
3095 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13470 |
|
|
>
|
| 13471 |
|
|
3097 : 48 [ 3]> pha ;use stack to load status
|
| 13472 |
|
|
3098 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13473 |
|
|
309b : 28 [ 4]> plp
|
| 13474 |
|
|
|
| 13475 |
|
|
309c : 1518 [ 4] ora zpOR,x
|
| 13476 |
|
|
tst_ax absrlo,absflo,0
|
| 13477 |
|
|
309e : 08 [ 3]> php ;save flags
|
| 13478 |
|
|
309f : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13479 |
|
|
> trap_ne
|
| 13480 |
|
|
30a2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13481 |
|
|
>
|
| 13482 |
|
|
30a4 : 68 [ 4]> pla ;load status
|
| 13483 |
|
|
> eor_flag 0
|
| 13484 |
|
|
30a5 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13485 |
|
|
>
|
| 13486 |
|
|
30a7 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13487 |
|
|
> trap_ne ;
|
| 13488 |
|
|
30aa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13489 |
|
|
>
|
| 13490 |
|
|
|
| 13491 |
|
|
30ac : ca [ 2] dex
|
| 13492 |
|
|
30ad : 10e6 [ 3] bpl tora6
|
| 13493 |
|
|
30af : a203 [ 2] ldx #3
|
| 13494 |
|
|
30b1 : tora7
|
| 13495 |
|
|
set_ax absORa,$ff
|
| 13496 |
|
|
> load_flag $ff
|
| 13497 |
|
|
30b1 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13498 |
|
|
>
|
| 13499 |
|
|
30b3 : 48 [ 3]> pha ;use stack to load status
|
| 13500 |
|
|
30b4 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13501 |
|
|
30b7 : 28 [ 4]> plp
|
| 13502 |
|
|
|
| 13503 |
|
|
30b8 : 1518 [ 4] ora zpOR,x
|
| 13504 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 13505 |
|
|
30ba : 08 [ 3]> php ;save flags
|
| 13506 |
|
|
30bb : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13507 |
|
|
> trap_ne
|
| 13508 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 234
|
| 13509 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13510 |
|
|
|
| 13511 |
|
|
30be : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13512 |
|
|
>
|
| 13513 |
|
|
30c0 : 68 [ 4]> pla ;load status
|
| 13514 |
|
|
> eor_flag $ff-fnz
|
| 13515 |
|
|
30c1 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13516 |
|
|
>
|
| 13517 |
|
|
30c3 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13518 |
|
|
> trap_ne ;
|
| 13519 |
|
|
30c6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13520 |
|
|
>
|
| 13521 |
|
|
|
| 13522 |
|
|
30c8 : ca [ 2] dex
|
| 13523 |
|
|
30c9 : 10e6 [ 3] bpl tora7
|
| 13524 |
|
|
|
| 13525 |
|
|
30cb : a203 [ 2] ldx #3 ;abs,x
|
| 13526 |
|
|
30cd : tora8
|
| 13527 |
|
|
set_ax absORa,0
|
| 13528 |
|
|
> load_flag 0
|
| 13529 |
|
|
30cd : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13530 |
|
|
>
|
| 13531 |
|
|
30cf : 48 [ 3]> pha ;use stack to load status
|
| 13532 |
|
|
30d0 : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13533 |
|
|
30d3 : 28 [ 4]> plp
|
| 13534 |
|
|
|
| 13535 |
|
|
30d4 : 1d3b02 [ 4] ora absOR,x
|
| 13536 |
|
|
tst_ax absrlo,absflo,0
|
| 13537 |
|
|
30d7 : 08 [ 3]> php ;save flags
|
| 13538 |
|
|
30d8 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13539 |
|
|
> trap_ne
|
| 13540 |
|
|
30db : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13541 |
|
|
>
|
| 13542 |
|
|
30dd : 68 [ 4]> pla ;load status
|
| 13543 |
|
|
> eor_flag 0
|
| 13544 |
|
|
30de : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13545 |
|
|
>
|
| 13546 |
|
|
30e0 : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13547 |
|
|
> trap_ne ;
|
| 13548 |
|
|
30e3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13549 |
|
|
>
|
| 13550 |
|
|
|
| 13551 |
|
|
30e5 : ca [ 2] dex
|
| 13552 |
|
|
30e6 : 10e5 [ 3] bpl tora8
|
| 13553 |
|
|
30e8 : a203 [ 2] ldx #3
|
| 13554 |
|
|
30ea : tora9
|
| 13555 |
|
|
set_ax absORa,$ff
|
| 13556 |
|
|
> load_flag $ff
|
| 13557 |
|
|
30ea : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13558 |
|
|
>
|
| 13559 |
|
|
30ec : 48 [ 3]> pha ;use stack to load status
|
| 13560 |
|
|
30ed : bd4702 [ 4]> lda absORa,x ;precharge accu
|
| 13561 |
|
|
30f0 : 28 [ 4]> plp
|
| 13562 |
|
|
|
| 13563 |
|
|
30f1 : 1d3b02 [ 4] ora absOR,x
|
| 13564 |
|
|
tst_ax absrlo,absflo,$ff-fnz
|
| 13565 |
|
|
30f4 : 08 [ 3]> php ;save flags
|
| 13566 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 235
|
| 13567 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13568 |
|
|
|
| 13569 |
|
|
30f5 : dd5302 [ 4]> cmp absrlo,x ;test result
|
| 13570 |
|
|
> trap_ne
|
| 13571 |
|
|
30f8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13572 |
|
|
>
|
| 13573 |
|
|
30fa : 68 [ 4]> pla ;load status
|
| 13574 |
|
|
> eor_flag $ff-fnz
|
| 13575 |
|
|
30fb : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13576 |
|
|
>
|
| 13577 |
|
|
30fd : dd5702 [ 4]> cmp absflo,x ;test flags
|
| 13578 |
|
|
> trap_ne ;
|
| 13579 |
|
|
3100 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13580 |
|
|
>
|
| 13581 |
|
|
|
| 13582 |
|
|
3102 : ca [ 2] dex
|
| 13583 |
|
|
3103 : 10e5 [ 4] bpl tora9
|
| 13584 |
|
|
|
| 13585 |
|
|
3105 : a003 [ 2] ldy #3 ;abs,y
|
| 13586 |
|
|
3107 : tora10
|
| 13587 |
|
|
set_ay absORa,0
|
| 13588 |
|
|
> load_flag 0
|
| 13589 |
|
|
3107 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13590 |
|
|
>
|
| 13591 |
|
|
3109 : 48 [ 3]> pha ;use stack to load status
|
| 13592 |
|
|
310a : b94702 [ 4]> lda absORa,y ;precharge accu
|
| 13593 |
|
|
310d : 28 [ 4]> plp
|
| 13594 |
|
|
|
| 13595 |
|
|
310e : 193b02 [ 4] ora absOR,y
|
| 13596 |
|
|
tst_ay absrlo,absflo,0
|
| 13597 |
|
|
3111 : 08 [ 3]> php ;save flags
|
| 13598 |
|
|
3112 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13599 |
|
|
> trap_ne ;
|
| 13600 |
|
|
3115 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13601 |
|
|
>
|
| 13602 |
|
|
3117 : 68 [ 4]> pla ;load status
|
| 13603 |
|
|
> eor_flag 0
|
| 13604 |
|
|
3118 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13605 |
|
|
>
|
| 13606 |
|
|
311a : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13607 |
|
|
> trap_ne
|
| 13608 |
|
|
311d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13609 |
|
|
>
|
| 13610 |
|
|
|
| 13611 |
|
|
311f : 88 [ 2] dey
|
| 13612 |
|
|
3120 : 10e5 [ 3] bpl tora10
|
| 13613 |
|
|
3122 : a003 [ 2] ldy #3
|
| 13614 |
|
|
3124 : tora11
|
| 13615 |
|
|
set_ay absORa,$ff
|
| 13616 |
|
|
> load_flag $ff
|
| 13617 |
|
|
3124 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13618 |
|
|
>
|
| 13619 |
|
|
3126 : 48 [ 3]> pha ;use stack to load status
|
| 13620 |
|
|
3127 : b94702 [ 4]> lda absORa,y ;precharge accu
|
| 13621 |
|
|
312a : 28 [ 4]> plp
|
| 13622 |
|
|
|
| 13623 |
|
|
312b : 193b02 [ 4] ora absOR,y
|
| 13624 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 236
|
| 13625 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13626 |
|
|
|
| 13627 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 13628 |
|
|
312e : 08 [ 3]> php ;save flags
|
| 13629 |
|
|
312f : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13630 |
|
|
> trap_ne ;
|
| 13631 |
|
|
3132 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13632 |
|
|
>
|
| 13633 |
|
|
3134 : 68 [ 4]> pla ;load status
|
| 13634 |
|
|
> eor_flag $ff-fnz
|
| 13635 |
|
|
3135 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13636 |
|
|
>
|
| 13637 |
|
|
3137 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13638 |
|
|
> trap_ne
|
| 13639 |
|
|
313a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13640 |
|
|
>
|
| 13641 |
|
|
|
| 13642 |
|
|
313c : 88 [ 2] dey
|
| 13643 |
|
|
313d : 10e5 [ 3] bpl tora11
|
| 13644 |
|
|
|
| 13645 |
|
|
313f : a206 [ 2] ldx #6 ;(zp,x)
|
| 13646 |
|
|
3141 : a003 [ 2] ldy #3
|
| 13647 |
|
|
3143 : tora12
|
| 13648 |
|
|
set_ay absORa,0
|
| 13649 |
|
|
> load_flag 0
|
| 13650 |
|
|
3143 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13651 |
|
|
>
|
| 13652 |
|
|
3145 : 48 [ 3]> pha ;use stack to load status
|
| 13653 |
|
|
3146 : b94702 [ 4]> lda absORa,y ;precharge accu
|
| 13654 |
|
|
3149 : 28 [ 4]> plp
|
| 13655 |
|
|
|
| 13656 |
|
|
314a : 014a [ 6] ora (indOR,x)
|
| 13657 |
|
|
tst_ay absrlo,absflo,0
|
| 13658 |
|
|
314c : 08 [ 3]> php ;save flags
|
| 13659 |
|
|
314d : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13660 |
|
|
> trap_ne ;
|
| 13661 |
|
|
3150 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13662 |
|
|
>
|
| 13663 |
|
|
3152 : 68 [ 4]> pla ;load status
|
| 13664 |
|
|
> eor_flag 0
|
| 13665 |
|
|
3153 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13666 |
|
|
>
|
| 13667 |
|
|
3155 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13668 |
|
|
> trap_ne
|
| 13669 |
|
|
3158 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13670 |
|
|
>
|
| 13671 |
|
|
|
| 13672 |
|
|
315a : ca [ 2] dex
|
| 13673 |
|
|
315b : ca [ 2] dex
|
| 13674 |
|
|
315c : 88 [ 2] dey
|
| 13675 |
|
|
315d : 10e4 [ 3] bpl tora12
|
| 13676 |
|
|
315f : a206 [ 2] ldx #6
|
| 13677 |
|
|
3161 : a003 [ 2] ldy #3
|
| 13678 |
|
|
3163 : tora13
|
| 13679 |
|
|
set_ay absORa,$ff
|
| 13680 |
|
|
> load_flag $ff
|
| 13681 |
|
|
3163 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13682 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 237
|
| 13683 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13684 |
|
|
|
| 13685 |
|
|
>
|
| 13686 |
|
|
3165 : 48 [ 3]> pha ;use stack to load status
|
| 13687 |
|
|
3166 : b94702 [ 4]> lda absORa,y ;precharge accu
|
| 13688 |
|
|
3169 : 28 [ 4]> plp
|
| 13689 |
|
|
|
| 13690 |
|
|
316a : 014a [ 6] ora (indOR,x)
|
| 13691 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 13692 |
|
|
316c : 08 [ 3]> php ;save flags
|
| 13693 |
|
|
316d : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13694 |
|
|
> trap_ne ;
|
| 13695 |
|
|
3170 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13696 |
|
|
>
|
| 13697 |
|
|
3172 : 68 [ 4]> pla ;load status
|
| 13698 |
|
|
> eor_flag $ff-fnz
|
| 13699 |
|
|
3173 : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13700 |
|
|
>
|
| 13701 |
|
|
3175 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13702 |
|
|
> trap_ne
|
| 13703 |
|
|
3178 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13704 |
|
|
>
|
| 13705 |
|
|
|
| 13706 |
|
|
317a : ca [ 2] dex
|
| 13707 |
|
|
317b : ca [ 2] dex
|
| 13708 |
|
|
317c : 88 [ 2] dey
|
| 13709 |
|
|
317d : 10e4 [ 3] bpl tora13
|
| 13710 |
|
|
|
| 13711 |
|
|
317f : a003 [ 2] ldy #3 ;(zp),y
|
| 13712 |
|
|
3181 : tora14
|
| 13713 |
|
|
set_ay absORa,0
|
| 13714 |
|
|
> load_flag 0
|
| 13715 |
|
|
3181 : a900 [ 2]> lda #0 ;allow test to change I-flag (no mask)
|
| 13716 |
|
|
>
|
| 13717 |
|
|
3183 : 48 [ 3]> pha ;use stack to load status
|
| 13718 |
|
|
3184 : b94702 [ 4]> lda absORa,y ;precharge accu
|
| 13719 |
|
|
3187 : 28 [ 4]> plp
|
| 13720 |
|
|
|
| 13721 |
|
|
3188 : 114a [ 5] ora (indOR),y
|
| 13722 |
|
|
tst_ay absrlo,absflo,0
|
| 13723 |
|
|
318a : 08 [ 3]> php ;save flags
|
| 13724 |
|
|
318b : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13725 |
|
|
> trap_ne ;
|
| 13726 |
|
|
318e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13727 |
|
|
>
|
| 13728 |
|
|
3190 : 68 [ 4]> pla ;load status
|
| 13729 |
|
|
> eor_flag 0
|
| 13730 |
|
|
3191 : 4930 [ 2]> eor #0|fao ;invert expected flags + always on bits
|
| 13731 |
|
|
>
|
| 13732 |
|
|
3193 : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13733 |
|
|
> trap_ne
|
| 13734 |
|
|
3196 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13735 |
|
|
>
|
| 13736 |
|
|
|
| 13737 |
|
|
3198 : 88 [ 2] dey
|
| 13738 |
|
|
3199 : 10e6 [ 3] bpl tora14
|
| 13739 |
|
|
319b : a003 [ 2] ldy #3
|
| 13740 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 238
|
| 13741 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13742 |
|
|
|
| 13743 |
|
|
319d : tora15
|
| 13744 |
|
|
set_ay absORa,$ff
|
| 13745 |
|
|
> load_flag $ff
|
| 13746 |
|
|
319d : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 13747 |
|
|
>
|
| 13748 |
|
|
319f : 48 [ 3]> pha ;use stack to load status
|
| 13749 |
|
|
31a0 : b94702 [ 4]> lda absORa,y ;precharge accu
|
| 13750 |
|
|
31a3 : 28 [ 4]> plp
|
| 13751 |
|
|
|
| 13752 |
|
|
31a4 : 114a [ 5] ora (indOR),y
|
| 13753 |
|
|
tst_ay absrlo,absflo,$ff-fnz
|
| 13754 |
|
|
31a6 : 08 [ 3]> php ;save flags
|
| 13755 |
|
|
31a7 : d95302 [ 4]> cmp absrlo,y ;test result
|
| 13756 |
|
|
> trap_ne ;
|
| 13757 |
|
|
31aa : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13758 |
|
|
>
|
| 13759 |
|
|
31ac : 68 [ 4]> pla ;load status
|
| 13760 |
|
|
> eor_flag $ff-fnz
|
| 13761 |
|
|
31ad : 497d [ 2]> eor #$ff-fnz|fao ;invert expected flags + always on bits
|
| 13762 |
|
|
>
|
| 13763 |
|
|
31af : d95702 [ 4]> cmp absflo,y ;test flags
|
| 13764 |
|
|
> trap_ne
|
| 13765 |
|
|
31b2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13766 |
|
|
>
|
| 13767 |
|
|
|
| 13768 |
|
|
31b4 : 88 [ 2] dey
|
| 13769 |
|
|
31b5 : 10e6 [ 3] bpl tora15
|
| 13770 |
|
|
if I_flag = 3
|
| 13771 |
|
|
31b7 : 58 [ 2] cli
|
| 13772 |
|
|
endif
|
| 13773 |
|
|
|
| 13774 |
|
|
31b8 : bin_test
|
| 13775 |
|
|
if skip_bin_test = 1
|
| 13776 |
|
|
31b8 : 4c2032 [ 3] jmp dec_test
|
| 13777 |
|
|
else
|
| 13778 |
|
|
lda #test_num
|
| 13779 |
|
|
sta test_case
|
| 13780 |
|
|
endif
|
| 13781 |
|
|
|
| 13782 |
|
|
next_test
|
| 13783 |
|
|
31bb : ad0002 [ 4]> lda test_case ;previous test
|
| 13784 |
|
|
31be : c928 [ 2]> cmp #test_num
|
| 13785 |
|
|
> trap_ne ;test is out of sequence
|
| 13786 |
|
|
31c0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13787 |
|
|
>
|
| 13788 |
|
|
0029 = >test_num = test_num + 1
|
| 13789 |
|
|
31c2 : a929 [ 2]> lda #test_num ;*** this tests' number
|
| 13790 |
|
|
31c4 : 8d0002 [ 4]> sta test_case
|
| 13791 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 13792 |
|
|
|
| 13793 |
|
|
|
| 13794 |
|
|
|
| 13795 |
|
|
; full binary add/subtract test
|
| 13796 |
|
|
; iterates through all combinations of operands and carry input
|
| 13797 |
|
|
; uses increments/decrements to predict result & result flags
|
| 13798 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 239
|
| 13799 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13800 |
|
|
|
| 13801 |
|
|
31c7 : d8 [ 2] cld
|
| 13802 |
|
|
31c8 : a20e [ 2] ldx #ad2 ;for indexed test
|
| 13803 |
|
|
31ca : a0ff [ 2] ldy #$ff ;max range
|
| 13804 |
|
|
31cc : a900 [ 2] lda #0 ;start with adding zeroes & no carry
|
| 13805 |
|
|
31ce : 850c [ 3] sta adfc ;carry in - for diag
|
| 13806 |
|
|
31d0 : 850d [ 3] sta ad1 ;operand 1 - accumulator
|
| 13807 |
|
|
31d2 : 850e [ 3] sta ad2 ;operand 2 - memory or immediate
|
| 13808 |
|
|
31d4 : 8d0302 [ 4] sta ada2 ;non zp
|
| 13809 |
|
|
31d7 : 850f [ 3] sta adrl ;expected result bits 0-7
|
| 13810 |
|
|
31d9 : 8510 [ 3] sta adrh ;expected result bit 8 (carry out)
|
| 13811 |
|
|
31db : a9ff [ 2] lda #$ff ;complemented operand 2 for subtract
|
| 13812 |
|
|
31dd : 8512 [ 3] sta sb2
|
| 13813 |
|
|
31df : 8d0402 [ 4] sta sba2 ;non zp
|
| 13814 |
|
|
31e2 : a902 [ 2] lda #2 ;expected Z-flag
|
| 13815 |
|
|
31e4 : 8511 [ 3] sta adrf
|
| 13816 |
|
|
31e6 : 18 [ 2] tadd clc ;test with carry clear
|
| 13817 |
|
|
31e7 : 200334 [ 6] jsr chkadd
|
| 13818 |
|
|
31ea : e60c [ 5] inc adfc ;now with carry
|
| 13819 |
|
|
31ec : e60f [ 5] inc adrl ;result +1
|
| 13820 |
|
|
31ee : 08 [ 3] php ;save N & Z from low result
|
| 13821 |
|
|
31ef : 08 [ 3] php
|
| 13822 |
|
|
31f0 : 68 [ 4] pla ;accu holds expected flags
|
| 13823 |
|
|
31f1 : 2982 [ 2] and #$82 ;mask N & Z
|
| 13824 |
|
|
31f3 : 28 [ 4] plp
|
| 13825 |
|
|
31f4 : d002 [ 3] bne tadd1
|
| 13826 |
|
|
31f6 : e610 [ 5] inc adrh ;result bit 8 - carry
|
| 13827 |
|
|
31f8 : 0510 [ 3] tadd1 ora adrh ;merge C to expected flags
|
| 13828 |
|
|
31fa : 8511 [ 3] sta adrf ;save expected flags except overflow
|
| 13829 |
|
|
31fc : 38 [ 2] sec ;test with carry set
|
| 13830 |
|
|
31fd : 200334 [ 6] jsr chkadd
|
| 13831 |
|
|
3200 : c60c [ 5] dec adfc ;same for operand +1 but no carry
|
| 13832 |
|
|
3202 : e60d [ 5] inc ad1
|
| 13833 |
|
|
3204 : d0e0 [ 4] bne tadd ;iterate op1
|
| 13834 |
|
|
3206 : a900 [ 2] lda #0 ;preset result to op2 when op1 = 0
|
| 13835 |
|
|
3208 : 8510 [ 3] sta adrh
|
| 13836 |
|
|
320a : ee0302 [ 6] inc ada2
|
| 13837 |
|
|
320d : e60e [ 5] inc ad2
|
| 13838 |
|
|
320f : 08 [ 3] php ;save NZ as operand 2 becomes the new result
|
| 13839 |
|
|
3210 : 68 [ 4] pla
|
| 13840 |
|
|
3211 : 2982 [ 2] and #$82 ;mask N00000Z0
|
| 13841 |
|
|
3213 : 8511 [ 3] sta adrf ;no need to check carry as we are adding to 0
|
| 13842 |
|
|
3215 : c612 [ 5] dec sb2 ;complement subtract operand 2
|
| 13843 |
|
|
3217 : ce0402 [ 6] dec sba2
|
| 13844 |
|
|
321a : a50e [ 3] lda ad2
|
| 13845 |
|
|
321c : 850f [ 3] sta adrl
|
| 13846 |
|
|
321e : d0c6 [ 4] bne tadd ;iterate op2
|
| 13847 |
|
|
|
| 13848 |
|
|
3220 : dec_test
|
| 13849 |
|
|
if skip_dec_test = 1
|
| 13850 |
|
|
3220 : 4ccf32 [ 3] jmp success
|
| 13851 |
|
|
else
|
| 13852 |
|
|
lda #test_num
|
| 13853 |
|
|
sta test_case
|
| 13854 |
|
|
endif
|
| 13855 |
|
|
|
| 13856 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 240
|
| 13857 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13858 |
|
|
|
| 13859 |
|
|
next_test
|
| 13860 |
|
|
3223 : ad0002 [ 4]> lda test_case ;previous test
|
| 13861 |
|
|
3226 : c929 [ 2]> cmp #test_num
|
| 13862 |
|
|
> trap_ne ;test is out of sequence
|
| 13863 |
|
|
3228 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13864 |
|
|
>
|
| 13865 |
|
|
002a = >test_num = test_num + 1
|
| 13866 |
|
|
322a : a92a [ 2]> lda #test_num ;*** this tests' number
|
| 13867 |
|
|
322c : 8d0002 [ 4]> sta test_case
|
| 13868 |
|
|
> ;check_ram ;uncomment to find altered RAM after each test
|
| 13869 |
|
|
|
| 13870 |
|
|
|
| 13871 |
|
|
; decimal add/subtract test
|
| 13872 |
|
|
; *** WARNING - tests documented behavior only! ***
|
| 13873 |
|
|
; only valid BCD operands are tested, N V Z flags are ignored
|
| 13874 |
|
|
; iterates through all valid combinations of operands and carry input
|
| 13875 |
|
|
; uses increments/decrements to predict result & carry flag
|
| 13876 |
|
|
322f : f8 [ 2] sed
|
| 13877 |
|
|
3230 : a20e [ 2] ldx #ad2 ;for indexed test
|
| 13878 |
|
|
3232 : a0ff [ 2] ldy #$ff ;max range
|
| 13879 |
|
|
3234 : a999 [ 2] lda #$99 ;start with adding 99 to 99 with carry
|
| 13880 |
|
|
3236 : 850d [ 3] sta ad1 ;operand 1 - accumulator
|
| 13881 |
|
|
3238 : 850e [ 3] sta ad2 ;operand 2 - memory or immediate
|
| 13882 |
|
|
323a : 8d0302 [ 4] sta ada2 ;non zp
|
| 13883 |
|
|
323d : 850f [ 3] sta adrl ;expected result bits 0-7
|
| 13884 |
|
|
323f : a901 [ 2] lda #1 ;set carry in & out
|
| 13885 |
|
|
3241 : 850c [ 3] sta adfc ;carry in - for diag
|
| 13886 |
|
|
3243 : 8510 [ 3] sta adrh ;expected result bit 8 (carry out)
|
| 13887 |
|
|
3245 : a900 [ 2] lda #0 ;complemented operand 2 for subtract
|
| 13888 |
|
|
3247 : 8512 [ 3] sta sb2
|
| 13889 |
|
|
3249 : 8d0402 [ 4] sta sba2 ;non zp
|
| 13890 |
|
|
324c : 38 [ 2] tdad sec ;test with carry set
|
| 13891 |
|
|
324d : 20d232 [ 6] jsr chkdad
|
| 13892 |
|
|
3250 : c60c [ 5] dec adfc ;now with carry clear
|
| 13893 |
|
|
3252 : a50f [ 3] lda adrl ;decimal adjust result
|
| 13894 |
|
|
3254 : d008 [ 3] bne tdad1 ;skip clear carry & preset result 99 (9A-1)
|
| 13895 |
|
|
3256 : c610 [ 5] dec adrh
|
| 13896 |
|
|
3258 : a999 [ 2] lda #$99
|
| 13897 |
|
|
325a : 850f [ 3] sta adrl
|
| 13898 |
|
|
325c : d012 [ 3] bne tdad3
|
| 13899 |
|
|
325e : 290f [ 2] tdad1 and #$f ;lower nibble mask
|
| 13900 |
|
|
3260 : d00c [ 3] bne tdad2 ;no decimal adjust needed
|
| 13901 |
|
|
3262 : c60f [ 5] dec adrl ;decimal adjust (?0-6)
|
| 13902 |
|
|
3264 : c60f [ 5] dec adrl
|
| 13903 |
|
|
3266 : c60f [ 5] dec adrl
|
| 13904 |
|
|
3268 : c60f [ 5] dec adrl
|
| 13905 |
|
|
326a : c60f [ 5] dec adrl
|
| 13906 |
|
|
326c : c60f [ 5] dec adrl
|
| 13907 |
|
|
326e : c60f [ 5] tdad2 dec adrl ;result -1
|
| 13908 |
|
|
3270 : 18 [ 2] tdad3 clc ;test with carry clear
|
| 13909 |
|
|
3271 : 20d232 [ 6] jsr chkdad
|
| 13910 |
|
|
3274 : e60c [ 5] inc adfc ;same for operand -1 but with carry
|
| 13911 |
|
|
3276 : a50d [ 3] lda ad1 ;decimal adjust operand 1
|
| 13912 |
|
|
3278 : f015 [ 3] beq tdad5 ;iterate operand 2
|
| 13913 |
|
|
327a : 290f [ 2] and #$f ;lower nibble mask
|
| 13914 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 241
|
| 13915 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13916 |
|
|
|
| 13917 |
|
|
327c : d00c [ 3] bne tdad4 ;skip decimal adjust
|
| 13918 |
|
|
327e : c60d [ 5] dec ad1 ;decimal adjust (?0-6)
|
| 13919 |
|
|
3280 : c60d [ 5] dec ad1
|
| 13920 |
|
|
3282 : c60d [ 5] dec ad1
|
| 13921 |
|
|
3284 : c60d [ 5] dec ad1
|
| 13922 |
|
|
3286 : c60d [ 5] dec ad1
|
| 13923 |
|
|
3288 : c60d [ 5] dec ad1
|
| 13924 |
|
|
328a : c60d [ 5] tdad4 dec ad1 ;operand 1 -1
|
| 13925 |
|
|
328c : 4c4c32 [ 3] jmp tdad ;iterate op1
|
| 13926 |
|
|
|
| 13927 |
|
|
328f : a999 [ 2] tdad5 lda #$99 ;precharge op1 max
|
| 13928 |
|
|
3291 : 850d [ 3] sta ad1
|
| 13929 |
|
|
3293 : a50e [ 3] lda ad2 ;decimal adjust operand 2
|
| 13930 |
|
|
3295 : f030 [ 3] beq tdad7 ;end of iteration
|
| 13931 |
|
|
3297 : 290f [ 2] and #$f ;lower nibble mask
|
| 13932 |
|
|
3299 : d018 [ 3] bne tdad6 ;skip decimal adjust
|
| 13933 |
|
|
329b : c60e [ 5] dec ad2 ;decimal adjust (?0-6)
|
| 13934 |
|
|
329d : c60e [ 5] dec ad2
|
| 13935 |
|
|
329f : c60e [ 5] dec ad2
|
| 13936 |
|
|
32a1 : c60e [ 5] dec ad2
|
| 13937 |
|
|
32a3 : c60e [ 5] dec ad2
|
| 13938 |
|
|
32a5 : c60e [ 5] dec ad2
|
| 13939 |
|
|
32a7 : e612 [ 5] inc sb2 ;complemented decimal adjust for subtract (?9+6)
|
| 13940 |
|
|
32a9 : e612 [ 5] inc sb2
|
| 13941 |
|
|
32ab : e612 [ 5] inc sb2
|
| 13942 |
|
|
32ad : e612 [ 5] inc sb2
|
| 13943 |
|
|
32af : e612 [ 5] inc sb2
|
| 13944 |
|
|
32b1 : e612 [ 5] inc sb2
|
| 13945 |
|
|
32b3 : c60e [ 5] tdad6 dec ad2 ;operand 2 -1
|
| 13946 |
|
|
32b5 : e612 [ 5] inc sb2 ;complemented operand for subtract
|
| 13947 |
|
|
32b7 : a512 [ 3] lda sb2
|
| 13948 |
|
|
32b9 : 8d0402 [ 4] sta sba2 ;copy as non zp operand
|
| 13949 |
|
|
32bc : a50e [ 3] lda ad2
|
| 13950 |
|
|
32be : 8d0302 [ 4] sta ada2 ;copy as non zp operand
|
| 13951 |
|
|
32c1 : 850f [ 3] sta adrl ;new result since op1+carry=00+carry +op2=op2
|
| 13952 |
|
|
32c3 : e610 [ 5] inc adrh ;result carry
|
| 13953 |
|
|
32c5 : d085 [ 3] bne tdad ;iterate op2
|
| 13954 |
|
|
32c7 : d8 [ 2] tdad7 cld
|
| 13955 |
|
|
|
| 13956 |
|
|
32c8 : ad0002 [ 4] lda test_case
|
| 13957 |
|
|
32cb : c92a [ 2] cmp #test_num
|
| 13958 |
|
|
trap_ne ;test is out of sequence
|
| 13959 |
|
|
32cd : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13960 |
|
|
|
| 13961 |
|
|
|
| 13962 |
|
|
; final RAM integrity test
|
| 13963 |
|
|
; verifies that none of the previous tests has altered RAM outside of the
|
| 13964 |
|
|
; designated write areas.
|
| 13965 |
|
|
check_ram
|
| 13966 |
|
|
> ;RAM check disabled - RAM size not set
|
| 13967 |
|
|
|
| 13968 |
|
|
; *** DEBUG INFO ***
|
| 13969 |
|
|
; to debug checksum errors uncomment check_ram in the next_test macro to
|
| 13970 |
|
|
; narrow down the responsible opcode.
|
| 13971 |
|
|
; may give false errors when monitor, OS or other background activity is
|
| 13972 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 242
|
| 13973 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 13974 |
|
|
|
| 13975 |
|
|
; allowed during previous tests.
|
| 13976 |
|
|
|
| 13977 |
|
|
|
| 13978 |
|
|
|
| 13979 |
|
|
; S U C C E S S ************************************************
|
| 13980 |
|
|
; -------------
|
| 13981 |
|
|
32cf : 4c0004 [ 3] success jmp start ;if you get here everything went well
|
| 13982 |
|
|
; -------------
|
| 13983 |
|
|
; S U C C E S S ************************************************
|
| 13984 |
|
|
|
| 13985 |
|
|
; core subroutine of the decimal add/subtract test
|
| 13986 |
|
|
; *** WARNING - tests documented behavior only! ***
|
| 13987 |
|
|
; only valid BCD operands are tested, N V Z flags are ignored
|
| 13988 |
|
|
; iterates through all valid combinations of operands and carry input
|
| 13989 |
|
|
; uses increments/decrements to predict result & carry flag
|
| 13990 |
|
|
32d2 : chkdad
|
| 13991 |
|
|
; decimal ADC / SBC zp
|
| 13992 |
|
|
32d2 : 08 [ 3] php ;save carry for subtract
|
| 13993 |
|
|
32d3 : a50d [ 3] lda ad1
|
| 13994 |
|
|
32d5 : 650e [ 3] adc ad2 ;perform add
|
| 13995 |
|
|
32d7 : 08 [ 3] php
|
| 13996 |
|
|
32d8 : c50f [ 3] cmp adrl ;check result
|
| 13997 |
|
|
trap_ne ;bad result
|
| 13998 |
|
|
32da : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 13999 |
|
|
|
| 14000 |
|
|
32dc : 68 [ 4] pla ;check flags
|
| 14001 |
|
|
32dd : 2901 [ 2] and #1 ;mask carry
|
| 14002 |
|
|
32df : c510 [ 3] cmp adrh
|
| 14003 |
|
|
trap_ne ;bad carry
|
| 14004 |
|
|
32e1 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14005 |
|
|
|
| 14006 |
|
|
32e3 : 28 [ 4] plp
|
| 14007 |
|
|
32e4 : 08 [ 3] php ;save carry for next add
|
| 14008 |
|
|
32e5 : a50d [ 3] lda ad1
|
| 14009 |
|
|
32e7 : e512 [ 3] sbc sb2 ;perform subtract
|
| 14010 |
|
|
32e9 : 08 [ 3] php
|
| 14011 |
|
|
32ea : c50f [ 3] cmp adrl ;check result
|
| 14012 |
|
|
trap_ne ;bad result
|
| 14013 |
|
|
32ec : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14014 |
|
|
|
| 14015 |
|
|
32ee : 68 [ 4] pla ;check flags
|
| 14016 |
|
|
32ef : 2901 [ 2] and #1 ;mask carry
|
| 14017 |
|
|
32f1 : c510 [ 3] cmp adrh
|
| 14018 |
|
|
trap_ne ;bad flags
|
| 14019 |
|
|
32f3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14020 |
|
|
|
| 14021 |
|
|
32f5 : 28 [ 4] plp
|
| 14022 |
|
|
; decimal ADC / SBC abs
|
| 14023 |
|
|
32f6 : 08 [ 3] php ;save carry for subtract
|
| 14024 |
|
|
32f7 : a50d [ 3] lda ad1
|
| 14025 |
|
|
32f9 : 6d0302 [ 4] adc ada2 ;perform add
|
| 14026 |
|
|
32fc : 08 [ 3] php
|
| 14027 |
|
|
32fd : c50f [ 3] cmp adrl ;check result
|
| 14028 |
|
|
trap_ne ;bad result
|
| 14029 |
|
|
32ff : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14030 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 243
|
| 14031 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14032 |
|
|
|
| 14033 |
|
|
|
| 14034 |
|
|
3301 : 68 [ 4] pla ;check flags
|
| 14035 |
|
|
3302 : 2901 [ 2] and #1 ;mask carry
|
| 14036 |
|
|
3304 : c510 [ 3] cmp adrh
|
| 14037 |
|
|
trap_ne ;bad carry
|
| 14038 |
|
|
3306 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14039 |
|
|
|
| 14040 |
|
|
3308 : 28 [ 4] plp
|
| 14041 |
|
|
3309 : 08 [ 3] php ;save carry for next add
|
| 14042 |
|
|
330a : a50d [ 3] lda ad1
|
| 14043 |
|
|
330c : ed0402 [ 4] sbc sba2 ;perform subtract
|
| 14044 |
|
|
330f : 08 [ 3] php
|
| 14045 |
|
|
3310 : c50f [ 3] cmp adrl ;check result
|
| 14046 |
|
|
trap_ne ;bad result
|
| 14047 |
|
|
3312 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14048 |
|
|
|
| 14049 |
|
|
3314 : 68 [ 4] pla ;check flags
|
| 14050 |
|
|
3315 : 2901 [ 2] and #1 ;mask carry
|
| 14051 |
|
|
3317 : c510 [ 3] cmp adrh
|
| 14052 |
|
|
trap_ne ;bad carry
|
| 14053 |
|
|
3319 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14054 |
|
|
|
| 14055 |
|
|
331b : 28 [ 4] plp
|
| 14056 |
|
|
; decimal ADC / SBC #
|
| 14057 |
|
|
331c : 08 [ 3] php ;save carry for subtract
|
| 14058 |
|
|
331d : a50e [ 3] lda ad2
|
| 14059 |
|
|
331f : 8d2533 [ 4] sta chkdadi ;self modify immediate
|
| 14060 |
|
|
3322 : a50d [ 3] lda ad1
|
| 14061 |
|
|
3325 = chkdadi = * + 1 ;operand of the immediate ADC
|
| 14062 |
|
|
3324 : 6900 [ 2] adc #0 ;perform add
|
| 14063 |
|
|
3326 : 08 [ 3] php
|
| 14064 |
|
|
3327 : c50f [ 3] cmp adrl ;check result
|
| 14065 |
|
|
trap_ne ;bad result
|
| 14066 |
|
|
3329 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14067 |
|
|
|
| 14068 |
|
|
332b : 68 [ 4] pla ;check flags
|
| 14069 |
|
|
332c : 2901 [ 2] and #1 ;mask carry
|
| 14070 |
|
|
332e : c510 [ 3] cmp adrh
|
| 14071 |
|
|
trap_ne ;bad carry
|
| 14072 |
|
|
3330 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14073 |
|
|
|
| 14074 |
|
|
3332 : 28 [ 4] plp
|
| 14075 |
|
|
3333 : 08 [ 3] php ;save carry for next add
|
| 14076 |
|
|
3334 : a512 [ 3] lda sb2
|
| 14077 |
|
|
3336 : 8d3c33 [ 4] sta chkdsbi ;self modify immediate
|
| 14078 |
|
|
3339 : a50d [ 3] lda ad1
|
| 14079 |
|
|
333c = chkdsbi = * + 1 ;operand of the immediate SBC
|
| 14080 |
|
|
333b : e900 [ 2] sbc #0 ;perform subtract
|
| 14081 |
|
|
333d : 08 [ 3] php
|
| 14082 |
|
|
333e : c50f [ 3] cmp adrl ;check result
|
| 14083 |
|
|
trap_ne ;bad result
|
| 14084 |
|
|
3340 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14085 |
|
|
|
| 14086 |
|
|
3342 : 68 [ 4] pla ;check flags
|
| 14087 |
|
|
3343 : 2901 [ 2] and #1 ;mask carry
|
| 14088 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 244
|
| 14089 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14090 |
|
|
|
| 14091 |
|
|
3345 : c510 [ 3] cmp adrh
|
| 14092 |
|
|
trap_ne ;bad carry
|
| 14093 |
|
|
3347 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14094 |
|
|
|
| 14095 |
|
|
3349 : 28 [ 4] plp
|
| 14096 |
|
|
; decimal ADC / SBC zp,x
|
| 14097 |
|
|
334a : 08 [ 3] php ;save carry for subtract
|
| 14098 |
|
|
334b : a50d [ 3] lda ad1
|
| 14099 |
|
|
334d : 7500 [ 4] adc 0,x ;perform add
|
| 14100 |
|
|
334f : 08 [ 3] php
|
| 14101 |
|
|
3350 : c50f [ 3] cmp adrl ;check result
|
| 14102 |
|
|
trap_ne ;bad result
|
| 14103 |
|
|
3352 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14104 |
|
|
|
| 14105 |
|
|
3354 : 68 [ 4] pla ;check flags
|
| 14106 |
|
|
3355 : 2901 [ 2] and #1 ;mask carry
|
| 14107 |
|
|
3357 : c510 [ 3] cmp adrh
|
| 14108 |
|
|
trap_ne ;bad carry
|
| 14109 |
|
|
3359 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14110 |
|
|
|
| 14111 |
|
|
335b : 28 [ 4] plp
|
| 14112 |
|
|
335c : 08 [ 3] php ;save carry for next add
|
| 14113 |
|
|
335d : a50d [ 3] lda ad1
|
| 14114 |
|
|
335f : f504 [ 4] sbc sb2-ad2,x ;perform subtract
|
| 14115 |
|
|
3361 : 08 [ 3] php
|
| 14116 |
|
|
3362 : c50f [ 3] cmp adrl ;check result
|
| 14117 |
|
|
trap_ne ;bad result
|
| 14118 |
|
|
3364 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14119 |
|
|
|
| 14120 |
|
|
3366 : 68 [ 4] pla ;check flags
|
| 14121 |
|
|
3367 : 2901 [ 2] and #1 ;mask carry
|
| 14122 |
|
|
3369 : c510 [ 3] cmp adrh
|
| 14123 |
|
|
trap_ne ;bad carry
|
| 14124 |
|
|
336b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14125 |
|
|
|
| 14126 |
|
|
336d : 28 [ 4] plp
|
| 14127 |
|
|
; decimal ADC / SBC abs,x
|
| 14128 |
|
|
336e : 08 [ 3] php ;save carry for subtract
|
| 14129 |
|
|
336f : a50d [ 3] lda ad1
|
| 14130 |
|
|
3371 : 7df501 [ 4] adc ada2-ad2,x ;perform add
|
| 14131 |
|
|
3374 : 08 [ 3] php
|
| 14132 |
|
|
3375 : c50f [ 3] cmp adrl ;check result
|
| 14133 |
|
|
trap_ne ;bad result
|
| 14134 |
|
|
3377 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14135 |
|
|
|
| 14136 |
|
|
3379 : 68 [ 4] pla ;check flags
|
| 14137 |
|
|
337a : 2901 [ 2] and #1 ;mask carry
|
| 14138 |
|
|
337c : c510 [ 3] cmp adrh
|
| 14139 |
|
|
trap_ne ;bad carry
|
| 14140 |
|
|
337e : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14141 |
|
|
|
| 14142 |
|
|
3380 : 28 [ 4] plp
|
| 14143 |
|
|
3381 : 08 [ 3] php ;save carry for next add
|
| 14144 |
|
|
3382 : a50d [ 3] lda ad1
|
| 14145 |
|
|
3384 : fdf601 [ 4] sbc sba2-ad2,x ;perform subtract
|
| 14146 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 245
|
| 14147 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14148 |
|
|
|
| 14149 |
|
|
3387 : 08 [ 3] php
|
| 14150 |
|
|
3388 : c50f [ 3] cmp adrl ;check result
|
| 14151 |
|
|
trap_ne ;bad result
|
| 14152 |
|
|
338a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14153 |
|
|
|
| 14154 |
|
|
338c : 68 [ 4] pla ;check flags
|
| 14155 |
|
|
338d : 2901 [ 2] and #1 ;mask carry
|
| 14156 |
|
|
338f : c510 [ 3] cmp adrh
|
| 14157 |
|
|
trap_ne ;bad carry
|
| 14158 |
|
|
3391 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14159 |
|
|
|
| 14160 |
|
|
3393 : 28 [ 4] plp
|
| 14161 |
|
|
; decimal ADC / SBC abs,y
|
| 14162 |
|
|
3394 : 08 [ 3] php ;save carry for subtract
|
| 14163 |
|
|
3395 : a50d [ 3] lda ad1
|
| 14164 |
|
|
3397 : 790401 [ 4] adc ada2-$ff,y ;perform add
|
| 14165 |
|
|
339a : 08 [ 3] php
|
| 14166 |
|
|
339b : c50f [ 3] cmp adrl ;check result
|
| 14167 |
|
|
trap_ne ;bad result
|
| 14168 |
|
|
339d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14169 |
|
|
|
| 14170 |
|
|
339f : 68 [ 4] pla ;check flags
|
| 14171 |
|
|
33a0 : 2901 [ 2] and #1 ;mask carry
|
| 14172 |
|
|
33a2 : c510 [ 3] cmp adrh
|
| 14173 |
|
|
trap_ne ;bad carry
|
| 14174 |
|
|
33a4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14175 |
|
|
|
| 14176 |
|
|
33a6 : 28 [ 4] plp
|
| 14177 |
|
|
33a7 : 08 [ 3] php ;save carry for next add
|
| 14178 |
|
|
33a8 : a50d [ 3] lda ad1
|
| 14179 |
|
|
33aa : f90501 [ 4] sbc sba2-$ff,y ;perform subtract
|
| 14180 |
|
|
33ad : 08 [ 3] php
|
| 14181 |
|
|
33ae : c50f [ 3] cmp adrl ;check result
|
| 14182 |
|
|
trap_ne ;bad result
|
| 14183 |
|
|
33b0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14184 |
|
|
|
| 14185 |
|
|
33b2 : 68 [ 4] pla ;check flags
|
| 14186 |
|
|
33b3 : 2901 [ 2] and #1 ;mask carry
|
| 14187 |
|
|
33b5 : c510 [ 3] cmp adrh
|
| 14188 |
|
|
trap_ne ;bad carry
|
| 14189 |
|
|
33b7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14190 |
|
|
|
| 14191 |
|
|
33b9 : 28 [ 4] plp
|
| 14192 |
|
|
; decimal ADC / SBC (zp,x)
|
| 14193 |
|
|
33ba : 08 [ 3] php ;save carry for subtract
|
| 14194 |
|
|
33bb : a50d [ 3] lda ad1
|
| 14195 |
|
|
33bd : 6144 [ 6] adc (lo adi2-ad2,x) ;perform add
|
| 14196 |
|
|
33bf : 08 [ 3] php
|
| 14197 |
|
|
33c0 : c50f [ 3] cmp adrl ;check result
|
| 14198 |
|
|
trap_ne ;bad result
|
| 14199 |
|
|
33c2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14200 |
|
|
|
| 14201 |
|
|
33c4 : 68 [ 4] pla ;check flags
|
| 14202 |
|
|
33c5 : 2901 [ 2] and #1 ;mask carry
|
| 14203 |
|
|
33c7 : c510 [ 3] cmp adrh
|
| 14204 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 246
|
| 14205 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14206 |
|
|
|
| 14207 |
|
|
trap_ne ;bad carry
|
| 14208 |
|
|
33c9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14209 |
|
|
|
| 14210 |
|
|
33cb : 28 [ 4] plp
|
| 14211 |
|
|
33cc : 08 [ 3] php ;save carry for next add
|
| 14212 |
|
|
33cd : a50d [ 3] lda ad1
|
| 14213 |
|
|
33cf : e146 [ 6] sbc (lo sbi2-ad2,x) ;perform subtract
|
| 14214 |
|
|
33d1 : 08 [ 3] php
|
| 14215 |
|
|
33d2 : c50f [ 3] cmp adrl ;check result
|
| 14216 |
|
|
trap_ne ;bad result
|
| 14217 |
|
|
33d4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14218 |
|
|
|
| 14219 |
|
|
33d6 : 68 [ 4] pla ;check flags
|
| 14220 |
|
|
33d7 : 2901 [ 2] and #1 ;mask carry
|
| 14221 |
|
|
33d9 : c510 [ 3] cmp adrh
|
| 14222 |
|
|
trap_ne ;bad carry
|
| 14223 |
|
|
33db : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14224 |
|
|
|
| 14225 |
|
|
33dd : 28 [ 4] plp
|
| 14226 |
|
|
; decimal ADC / SBC (abs),y
|
| 14227 |
|
|
33de : 08 [ 3] php ;save carry for subtract
|
| 14228 |
|
|
33df : a50d [ 3] lda ad1
|
| 14229 |
|
|
33e1 : 7156 [ 5] adc (adiy2),y ;perform add
|
| 14230 |
|
|
33e3 : 08 [ 3] php
|
| 14231 |
|
|
33e4 : c50f [ 3] cmp adrl ;check result
|
| 14232 |
|
|
trap_ne ;bad result
|
| 14233 |
|
|
33e6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14234 |
|
|
|
| 14235 |
|
|
33e8 : 68 [ 4] pla ;check flags
|
| 14236 |
|
|
33e9 : 2901 [ 2] and #1 ;mask carry
|
| 14237 |
|
|
33eb : c510 [ 3] cmp adrh
|
| 14238 |
|
|
trap_ne ;bad carry
|
| 14239 |
|
|
33ed : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14240 |
|
|
|
| 14241 |
|
|
33ef : 28 [ 4] plp
|
| 14242 |
|
|
33f0 : 08 [ 3] php ;save carry for next add
|
| 14243 |
|
|
33f1 : a50d [ 3] lda ad1
|
| 14244 |
|
|
33f3 : f158 [ 5] sbc (sbiy2),y ;perform subtract
|
| 14245 |
|
|
33f5 : 08 [ 3] php
|
| 14246 |
|
|
33f6 : c50f [ 3] cmp adrl ;check result
|
| 14247 |
|
|
trap_ne ;bad result
|
| 14248 |
|
|
33f8 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14249 |
|
|
|
| 14250 |
|
|
33fa : 68 [ 4] pla ;check flags
|
| 14251 |
|
|
33fb : 2901 [ 2] and #1 ;mask carry
|
| 14252 |
|
|
33fd : c510 [ 3] cmp adrh
|
| 14253 |
|
|
trap_ne ;bad carry
|
| 14254 |
|
|
33ff : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14255 |
|
|
|
| 14256 |
|
|
3401 : 28 [ 4] plp
|
| 14257 |
|
|
3402 : 60 [ 6] rts
|
| 14258 |
|
|
|
| 14259 |
|
|
; core subroutine of the full binary add/subtract test
|
| 14260 |
|
|
; iterates through all combinations of operands and carry input
|
| 14261 |
|
|
; uses increments/decrements to predict result & result flags
|
| 14262 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 247
|
| 14263 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14264 |
|
|
|
| 14265 |
|
|
3403 : a511 [ 3] chkadd lda adrf ;add V-flag if overflow
|
| 14266 |
|
|
3405 : 2983 [ 2] and #$83 ;keep N-----ZC / clear V
|
| 14267 |
|
|
3407 : 48 [ 3] pha
|
| 14268 |
|
|
3408 : a50d [ 3] lda ad1 ;test sign unequal between operands
|
| 14269 |
|
|
340a : 450e [ 3] eor ad2
|
| 14270 |
|
|
340c : 300a [ 3] bmi ckad1 ;no overflow possible - operands have different sign
|
| 14271 |
|
|
340e : a50d [ 3] lda ad1 ;test sign equal between operands and result
|
| 14272 |
|
|
3410 : 450f [ 3] eor adrl
|
| 14273 |
|
|
3412 : 1004 [ 3] bpl ckad1 ;no overflow occured - operand and result have same sign
|
| 14274 |
|
|
3414 : 68 [ 4] pla
|
| 14275 |
|
|
3415 : 0940 [ 2] ora #$40 ;set V
|
| 14276 |
|
|
3417 : 48 [ 3] pha
|
| 14277 |
|
|
3418 : 68 [ 4] ckad1 pla
|
| 14278 |
|
|
3419 : 8511 [ 3] sta adrf ;save expected flags
|
| 14279 |
|
|
; binary ADC / SBC zp
|
| 14280 |
|
|
341b : 08 [ 3] php ;save carry for subtract
|
| 14281 |
|
|
341c : a50d [ 3] lda ad1
|
| 14282 |
|
|
341e : 650e [ 3] adc ad2 ;perform add
|
| 14283 |
|
|
3420 : 08 [ 3] php
|
| 14284 |
|
|
3421 : c50f [ 3] cmp adrl ;check result
|
| 14285 |
|
|
trap_ne ;bad result
|
| 14286 |
|
|
3423 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14287 |
|
|
|
| 14288 |
|
|
3425 : 68 [ 4] pla ;check flags
|
| 14289 |
|
|
3426 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14290 |
|
|
3428 : c511 [ 3] cmp adrf
|
| 14291 |
|
|
trap_ne ;bad flags
|
| 14292 |
|
|
342a : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14293 |
|
|
|
| 14294 |
|
|
342c : 28 [ 4] plp
|
| 14295 |
|
|
342d : 08 [ 3] php ;save carry for next add
|
| 14296 |
|
|
342e : a50d [ 3] lda ad1
|
| 14297 |
|
|
3430 : e512 [ 3] sbc sb2 ;perform subtract
|
| 14298 |
|
|
3432 : 08 [ 3] php
|
| 14299 |
|
|
3433 : c50f [ 3] cmp adrl ;check result
|
| 14300 |
|
|
trap_ne ;bad result
|
| 14301 |
|
|
3435 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14302 |
|
|
|
| 14303 |
|
|
3437 : 68 [ 4] pla ;check flags
|
| 14304 |
|
|
3438 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14305 |
|
|
343a : c511 [ 3] cmp adrf
|
| 14306 |
|
|
trap_ne ;bad flags
|
| 14307 |
|
|
343c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14308 |
|
|
|
| 14309 |
|
|
343e : 28 [ 4] plp
|
| 14310 |
|
|
; binary ADC / SBC abs
|
| 14311 |
|
|
343f : 08 [ 3] php ;save carry for subtract
|
| 14312 |
|
|
3440 : a50d [ 3] lda ad1
|
| 14313 |
|
|
3442 : 6d0302 [ 4] adc ada2 ;perform add
|
| 14314 |
|
|
3445 : 08 [ 3] php
|
| 14315 |
|
|
3446 : c50f [ 3] cmp adrl ;check result
|
| 14316 |
|
|
trap_ne ;bad result
|
| 14317 |
|
|
3448 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14318 |
|
|
|
| 14319 |
|
|
344a : 68 [ 4] pla ;check flags
|
| 14320 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 248
|
| 14321 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14322 |
|
|
|
| 14323 |
|
|
344b : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14324 |
|
|
344d : c511 [ 3] cmp adrf
|
| 14325 |
|
|
trap_ne ;bad flags
|
| 14326 |
|
|
344f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14327 |
|
|
|
| 14328 |
|
|
3451 : 28 [ 4] plp
|
| 14329 |
|
|
3452 : 08 [ 3] php ;save carry for next add
|
| 14330 |
|
|
3453 : a50d [ 3] lda ad1
|
| 14331 |
|
|
3455 : ed0402 [ 4] sbc sba2 ;perform subtract
|
| 14332 |
|
|
3458 : 08 [ 3] php
|
| 14333 |
|
|
3459 : c50f [ 3] cmp adrl ;check result
|
| 14334 |
|
|
trap_ne ;bad result
|
| 14335 |
|
|
345b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14336 |
|
|
|
| 14337 |
|
|
345d : 68 [ 4] pla ;check flags
|
| 14338 |
|
|
345e : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14339 |
|
|
3460 : c511 [ 3] cmp adrf
|
| 14340 |
|
|
trap_ne ;bad flags
|
| 14341 |
|
|
3462 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14342 |
|
|
|
| 14343 |
|
|
3464 : 28 [ 4] plp
|
| 14344 |
|
|
; binary ADC / SBC #
|
| 14345 |
|
|
3465 : 08 [ 3] php ;save carry for subtract
|
| 14346 |
|
|
3466 : a50e [ 3] lda ad2
|
| 14347 |
|
|
3468 : 8d6e34 [ 4] sta chkadi ;self modify immediate
|
| 14348 |
|
|
346b : a50d [ 3] lda ad1
|
| 14349 |
|
|
346e = chkadi = * + 1 ;operand of the immediate ADC
|
| 14350 |
|
|
346d : 6900 [ 2] adc #0 ;perform add
|
| 14351 |
|
|
346f : 08 [ 3] php
|
| 14352 |
|
|
3470 : c50f [ 3] cmp adrl ;check result
|
| 14353 |
|
|
trap_ne ;bad result
|
| 14354 |
|
|
3472 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14355 |
|
|
|
| 14356 |
|
|
3474 : 68 [ 4] pla ;check flags
|
| 14357 |
|
|
3475 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14358 |
|
|
3477 : c511 [ 3] cmp adrf
|
| 14359 |
|
|
trap_ne ;bad flags
|
| 14360 |
|
|
3479 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14361 |
|
|
|
| 14362 |
|
|
347b : 28 [ 4] plp
|
| 14363 |
|
|
347c : 08 [ 3] php ;save carry for next add
|
| 14364 |
|
|
347d : a512 [ 3] lda sb2
|
| 14365 |
|
|
347f : 8d8534 [ 4] sta chksbi ;self modify immediate
|
| 14366 |
|
|
3482 : a50d [ 3] lda ad1
|
| 14367 |
|
|
3485 = chksbi = * + 1 ;operand of the immediate SBC
|
| 14368 |
|
|
3484 : e900 [ 2] sbc #0 ;perform subtract
|
| 14369 |
|
|
3486 : 08 [ 3] php
|
| 14370 |
|
|
3487 : c50f [ 3] cmp adrl ;check result
|
| 14371 |
|
|
trap_ne ;bad result
|
| 14372 |
|
|
3489 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14373 |
|
|
|
| 14374 |
|
|
348b : 68 [ 4] pla ;check flags
|
| 14375 |
|
|
348c : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14376 |
|
|
348e : c511 [ 3] cmp adrf
|
| 14377 |
|
|
trap_ne ;bad flags
|
| 14378 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 249
|
| 14379 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14380 |
|
|
|
| 14381 |
|
|
3490 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14382 |
|
|
|
| 14383 |
|
|
3492 : 28 [ 4] plp
|
| 14384 |
|
|
; binary ADC / SBC zp,x
|
| 14385 |
|
|
3493 : 08 [ 3] php ;save carry for subtract
|
| 14386 |
|
|
3494 : a50d [ 3] lda ad1
|
| 14387 |
|
|
3496 : 7500 [ 4] adc 0,x ;perform add
|
| 14388 |
|
|
3498 : 08 [ 3] php
|
| 14389 |
|
|
3499 : c50f [ 3] cmp adrl ;check result
|
| 14390 |
|
|
trap_ne ;bad result
|
| 14391 |
|
|
349b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14392 |
|
|
|
| 14393 |
|
|
349d : 68 [ 4] pla ;check flags
|
| 14394 |
|
|
349e : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14395 |
|
|
34a0 : c511 [ 3] cmp adrf
|
| 14396 |
|
|
trap_ne ;bad flags
|
| 14397 |
|
|
34a2 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14398 |
|
|
|
| 14399 |
|
|
34a4 : 28 [ 4] plp
|
| 14400 |
|
|
34a5 : 08 [ 3] php ;save carry for next add
|
| 14401 |
|
|
34a6 : a50d [ 3] lda ad1
|
| 14402 |
|
|
34a8 : f504 [ 4] sbc sb2-ad2,x ;perform subtract
|
| 14403 |
|
|
34aa : 08 [ 3] php
|
| 14404 |
|
|
34ab : c50f [ 3] cmp adrl ;check result
|
| 14405 |
|
|
trap_ne ;bad result
|
| 14406 |
|
|
34ad : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14407 |
|
|
|
| 14408 |
|
|
34af : 68 [ 4] pla ;check flags
|
| 14409 |
|
|
34b0 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14410 |
|
|
34b2 : c511 [ 3] cmp adrf
|
| 14411 |
|
|
trap_ne ;bad flags
|
| 14412 |
|
|
34b4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14413 |
|
|
|
| 14414 |
|
|
34b6 : 28 [ 4] plp
|
| 14415 |
|
|
; binary ADC / SBC abs,x
|
| 14416 |
|
|
34b7 : 08 [ 3] php ;save carry for subtract
|
| 14417 |
|
|
34b8 : a50d [ 3] lda ad1
|
| 14418 |
|
|
34ba : 7df501 [ 4] adc ada2-ad2,x ;perform add
|
| 14419 |
|
|
34bd : 08 [ 3] php
|
| 14420 |
|
|
34be : c50f [ 3] cmp adrl ;check result
|
| 14421 |
|
|
trap_ne ;bad result
|
| 14422 |
|
|
34c0 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14423 |
|
|
|
| 14424 |
|
|
34c2 : 68 [ 4] pla ;check flags
|
| 14425 |
|
|
34c3 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14426 |
|
|
34c5 : c511 [ 3] cmp adrf
|
| 14427 |
|
|
trap_ne ;bad flags
|
| 14428 |
|
|
34c7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14429 |
|
|
|
| 14430 |
|
|
34c9 : 28 [ 4] plp
|
| 14431 |
|
|
34ca : 08 [ 3] php ;save carry for next add
|
| 14432 |
|
|
34cb : a50d [ 3] lda ad1
|
| 14433 |
|
|
34cd : fdf601 [ 4] sbc sba2-ad2,x ;perform subtract
|
| 14434 |
|
|
34d0 : 08 [ 3] php
|
| 14435 |
|
|
34d1 : c50f [ 3] cmp adrl ;check result
|
| 14436 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 250
|
| 14437 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14438 |
|
|
|
| 14439 |
|
|
trap_ne ;bad result
|
| 14440 |
|
|
34d3 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14441 |
|
|
|
| 14442 |
|
|
34d5 : 68 [ 4] pla ;check flags
|
| 14443 |
|
|
34d6 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14444 |
|
|
34d8 : c511 [ 3] cmp adrf
|
| 14445 |
|
|
trap_ne ;bad flags
|
| 14446 |
|
|
34da : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14447 |
|
|
|
| 14448 |
|
|
34dc : 28 [ 4] plp
|
| 14449 |
|
|
; binary ADC / SBC abs,y
|
| 14450 |
|
|
34dd : 08 [ 3] php ;save carry for subtract
|
| 14451 |
|
|
34de : a50d [ 3] lda ad1
|
| 14452 |
|
|
34e0 : 790401 [ 4] adc ada2-$ff,y ;perform add
|
| 14453 |
|
|
34e3 : 08 [ 3] php
|
| 14454 |
|
|
34e4 : c50f [ 3] cmp adrl ;check result
|
| 14455 |
|
|
trap_ne ;bad result
|
| 14456 |
|
|
34e6 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14457 |
|
|
|
| 14458 |
|
|
34e8 : 68 [ 4] pla ;check flags
|
| 14459 |
|
|
34e9 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14460 |
|
|
34eb : c511 [ 3] cmp adrf
|
| 14461 |
|
|
trap_ne ;bad flags
|
| 14462 |
|
|
34ed : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14463 |
|
|
|
| 14464 |
|
|
34ef : 28 [ 4] plp
|
| 14465 |
|
|
34f0 : 08 [ 3] php ;save carry for next add
|
| 14466 |
|
|
34f1 : a50d [ 3] lda ad1
|
| 14467 |
|
|
34f3 : f90501 [ 4] sbc sba2-$ff,y ;perform subtract
|
| 14468 |
|
|
34f6 : 08 [ 3] php
|
| 14469 |
|
|
34f7 : c50f [ 3] cmp adrl ;check result
|
| 14470 |
|
|
trap_ne ;bad result
|
| 14471 |
|
|
34f9 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14472 |
|
|
|
| 14473 |
|
|
34fb : 68 [ 4] pla ;check flags
|
| 14474 |
|
|
34fc : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14475 |
|
|
34fe : c511 [ 3] cmp adrf
|
| 14476 |
|
|
trap_ne ;bad flags
|
| 14477 |
|
|
3500 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14478 |
|
|
|
| 14479 |
|
|
3502 : 28 [ 4] plp
|
| 14480 |
|
|
; binary ADC / SBC (zp,x)
|
| 14481 |
|
|
3503 : 08 [ 3] php ;save carry for subtract
|
| 14482 |
|
|
3504 : a50d [ 3] lda ad1
|
| 14483 |
|
|
3506 : 6144 [ 6] adc (lo adi2-ad2,x) ;perform add
|
| 14484 |
|
|
3508 : 08 [ 3] php
|
| 14485 |
|
|
3509 : c50f [ 3] cmp adrl ;check result
|
| 14486 |
|
|
trap_ne ;bad result
|
| 14487 |
|
|
350b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14488 |
|
|
|
| 14489 |
|
|
350d : 68 [ 4] pla ;check flags
|
| 14490 |
|
|
350e : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14491 |
|
|
3510 : c511 [ 3] cmp adrf
|
| 14492 |
|
|
trap_ne ;bad flags
|
| 14493 |
|
|
3512 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14494 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 251
|
| 14495 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14496 |
|
|
|
| 14497 |
|
|
|
| 14498 |
|
|
3514 : 28 [ 4] plp
|
| 14499 |
|
|
3515 : 08 [ 3] php ;save carry for next add
|
| 14500 |
|
|
3516 : a50d [ 3] lda ad1
|
| 14501 |
|
|
3518 : e146 [ 6] sbc (lo sbi2-ad2,x) ;perform subtract
|
| 14502 |
|
|
351a : 08 [ 3] php
|
| 14503 |
|
|
351b : c50f [ 3] cmp adrl ;check result
|
| 14504 |
|
|
trap_ne ;bad result
|
| 14505 |
|
|
351d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14506 |
|
|
|
| 14507 |
|
|
351f : 68 [ 4] pla ;check flags
|
| 14508 |
|
|
3520 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14509 |
|
|
3522 : c511 [ 3] cmp adrf
|
| 14510 |
|
|
trap_ne ;bad flags
|
| 14511 |
|
|
3524 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14512 |
|
|
|
| 14513 |
|
|
3526 : 28 [ 4] plp
|
| 14514 |
|
|
; binary ADC / SBC (abs),y
|
| 14515 |
|
|
3527 : 08 [ 3] php ;save carry for subtract
|
| 14516 |
|
|
3528 : a50d [ 3] lda ad1
|
| 14517 |
|
|
352a : 7156 [ 5] adc (adiy2),y ;perform add
|
| 14518 |
|
|
352c : 08 [ 3] php
|
| 14519 |
|
|
352d : c50f [ 3] cmp adrl ;check result
|
| 14520 |
|
|
trap_ne ;bad result
|
| 14521 |
|
|
352f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14522 |
|
|
|
| 14523 |
|
|
3531 : 68 [ 4] pla ;check flags
|
| 14524 |
|
|
3532 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14525 |
|
|
3534 : c511 [ 3] cmp adrf
|
| 14526 |
|
|
trap_ne ;bad flags
|
| 14527 |
|
|
3536 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14528 |
|
|
|
| 14529 |
|
|
3538 : 28 [ 4] plp
|
| 14530 |
|
|
3539 : 08 [ 3] php ;save carry for next add
|
| 14531 |
|
|
353a : a50d [ 3] lda ad1
|
| 14532 |
|
|
353c : f158 [ 5] sbc (sbiy2),y ;perform subtract
|
| 14533 |
|
|
353e : 08 [ 3] php
|
| 14534 |
|
|
353f : c50f [ 3] cmp adrl ;check result
|
| 14535 |
|
|
trap_ne ;bad result
|
| 14536 |
|
|
3541 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14537 |
|
|
|
| 14538 |
|
|
3543 : 68 [ 4] pla ;check flags
|
| 14539 |
|
|
3544 : 29c3 [ 2] and #$c3 ;mask NV----ZC
|
| 14540 |
|
|
3546 : c511 [ 3] cmp adrf
|
| 14541 |
|
|
trap_ne ;bad flags
|
| 14542 |
|
|
3548 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14543 |
|
|
|
| 14544 |
|
|
354a : 28 [ 4] plp
|
| 14545 |
|
|
354b : 60 [ 6] rts
|
| 14546 |
|
|
|
| 14547 |
|
|
; target for the jump absolute test
|
| 14548 |
|
|
354c : 88 [ 2] dey
|
| 14549 |
|
|
354d : 88 [ 2] dey
|
| 14550 |
|
|
354e : test_far
|
| 14551 |
|
|
354e : 08 [ 3] php ;either SP or Y count will fail, if we do not hit
|
| 14552 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 252
|
| 14553 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14554 |
|
|
|
| 14555 |
|
|
354f : 88 [ 2] dey
|
| 14556 |
|
|
3550 : 88 [ 2] dey
|
| 14557 |
|
|
3551 : 88 [ 2] dey
|
| 14558 |
|
|
3552 : 28 [ 4] plp
|
| 14559 |
|
|
trap_cs ;flags loaded?
|
| 14560 |
|
|
3553 : b0fe [ 3]> bcs * ;failed carry set
|
| 14561 |
|
|
|
| 14562 |
|
|
trap_vs
|
| 14563 |
|
|
3555 : 70fe [ 3]> bvs * ;failed overflow set
|
| 14564 |
|
|
|
| 14565 |
|
|
trap_mi
|
| 14566 |
|
|
3557 : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 14567 |
|
|
|
| 14568 |
|
|
trap_eq
|
| 14569 |
|
|
3559 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 14570 |
|
|
|
| 14571 |
|
|
355b : c946 [ 2] cmp #'F' ;registers loaded?
|
| 14572 |
|
|
trap_ne
|
| 14573 |
|
|
355d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14574 |
|
|
|
| 14575 |
|
|
355f : e041 [ 2] cpx #'A'
|
| 14576 |
|
|
trap_ne
|
| 14577 |
|
|
3561 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14578 |
|
|
|
| 14579 |
|
|
3563 : c04f [ 2] cpy #('R'-3)
|
| 14580 |
|
|
trap_ne
|
| 14581 |
|
|
3565 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14582 |
|
|
|
| 14583 |
|
|
3567 : 48 [ 3] pha ;save a,x
|
| 14584 |
|
|
3568 : 8a [ 2] txa
|
| 14585 |
|
|
3569 : 48 [ 3] pha
|
| 14586 |
|
|
356a : ba [ 2] tsx
|
| 14587 |
|
|
356b : e0fd [ 2] cpx #$fd ;check SP
|
| 14588 |
|
|
trap_ne
|
| 14589 |
|
|
356d : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14590 |
|
|
|
| 14591 |
|
|
356f : 68 [ 4] pla ;restore x
|
| 14592 |
|
|
3570 : aa [ 2] tax
|
| 14593 |
|
|
set_stat $ff
|
| 14594 |
|
|
> load_flag $ff
|
| 14595 |
|
|
3571 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 14596 |
|
|
>
|
| 14597 |
|
|
3573 : 48 [ 3]> pha ;use stack to load status
|
| 14598 |
|
|
3574 : 28 [ 4]> plp
|
| 14599 |
|
|
|
| 14600 |
|
|
3575 : 68 [ 4] pla ;restore a
|
| 14601 |
|
|
3576 : e8 [ 2] inx ;return registers with modifications
|
| 14602 |
|
|
3577 : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=1
|
| 14603 |
|
|
3579 : 4cf707 [ 3] jmp far_ret
|
| 14604 |
|
|
|
| 14605 |
|
|
; target for the jump indirect test
|
| 14606 |
|
|
align
|
| 14607 |
|
|
357c : 8535 ptr_tst_ind dw test_ind
|
| 14608 |
|
|
357e : 4c08 ptr_ind_ret dw ind_ret
|
| 14609 |
|
|
trap ;runover protection
|
| 14610 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 253
|
| 14611 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14612 |
|
|
|
| 14613 |
|
|
3580 : 4c8035 [ 3]> jmp * ;failed anyway
|
| 14614 |
|
|
|
| 14615 |
|
|
3583 : 88 [ 2] dey
|
| 14616 |
|
|
3584 : 88 [ 2] dey
|
| 14617 |
|
|
3585 : test_ind
|
| 14618 |
|
|
3585 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit
|
| 14619 |
|
|
3586 : 88 [ 2] dey
|
| 14620 |
|
|
3587 : 88 [ 2] dey
|
| 14621 |
|
|
3588 : 88 [ 2] dey
|
| 14622 |
|
|
3589 : 28 [ 4] plp
|
| 14623 |
|
|
trap_cs ;flags loaded?
|
| 14624 |
|
|
358a : b0fe [ 3]> bcs * ;failed carry set
|
| 14625 |
|
|
|
| 14626 |
|
|
trap_vs
|
| 14627 |
|
|
358c : 70fe [ 3]> bvs * ;failed overflow set
|
| 14628 |
|
|
|
| 14629 |
|
|
trap_mi
|
| 14630 |
|
|
358e : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 14631 |
|
|
|
| 14632 |
|
|
trap_eq
|
| 14633 |
|
|
3590 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 14634 |
|
|
|
| 14635 |
|
|
3592 : c949 [ 2] cmp #'I' ;registers loaded?
|
| 14636 |
|
|
trap_ne
|
| 14637 |
|
|
3594 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14638 |
|
|
|
| 14639 |
|
|
3596 : e04e [ 2] cpx #'N'
|
| 14640 |
|
|
trap_ne
|
| 14641 |
|
|
3598 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14642 |
|
|
|
| 14643 |
|
|
359a : c041 [ 2] cpy #('D'-3)
|
| 14644 |
|
|
trap_ne
|
| 14645 |
|
|
359c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14646 |
|
|
|
| 14647 |
|
|
359e : 48 [ 3] pha ;save a,x
|
| 14648 |
|
|
359f : 8a [ 2] txa
|
| 14649 |
|
|
35a0 : 48 [ 3] pha
|
| 14650 |
|
|
35a1 : ba [ 2] tsx
|
| 14651 |
|
|
35a2 : e0fd [ 2] cpx #$fd ;check SP
|
| 14652 |
|
|
trap_ne
|
| 14653 |
|
|
35a4 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14654 |
|
|
|
| 14655 |
|
|
35a6 : 68 [ 4] pla ;restore x
|
| 14656 |
|
|
35a7 : aa [ 2] tax
|
| 14657 |
|
|
set_stat $ff
|
| 14658 |
|
|
> load_flag $ff
|
| 14659 |
|
|
35a8 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 14660 |
|
|
>
|
| 14661 |
|
|
35aa : 48 [ 3]> pha ;use stack to load status
|
| 14662 |
|
|
35ab : 28 [ 4]> plp
|
| 14663 |
|
|
|
| 14664 |
|
|
35ac : 68 [ 4] pla ;restore a
|
| 14665 |
|
|
35ad : e8 [ 2] inx ;return registers with modifications
|
| 14666 |
|
|
35ae : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=1
|
| 14667 |
|
|
35b0 : 6c7e35 [ 6] jmp (ptr_ind_ret)
|
| 14668 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 254
|
| 14669 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14670 |
|
|
|
| 14671 |
|
|
trap ;runover protection
|
| 14672 |
|
|
35b3 : 4cb335 [ 3]> jmp * ;failed anyway
|
| 14673 |
|
|
|
| 14674 |
|
|
|
| 14675 |
|
|
; target for the jump subroutine test
|
| 14676 |
|
|
35b6 : 88 [ 2] dey
|
| 14677 |
|
|
35b7 : 88 [ 2] dey
|
| 14678 |
|
|
35b8 : test_jsr
|
| 14679 |
|
|
35b8 : 08 [ 3] php ;either SP or Y count will fail, if we do not hit
|
| 14680 |
|
|
35b9 : 88 [ 2] dey
|
| 14681 |
|
|
35ba : 88 [ 2] dey
|
| 14682 |
|
|
35bb : 88 [ 2] dey
|
| 14683 |
|
|
35bc : 28 [ 4] plp
|
| 14684 |
|
|
trap_cs ;flags loaded?
|
| 14685 |
|
|
35bd : b0fe [ 3]> bcs * ;failed carry set
|
| 14686 |
|
|
|
| 14687 |
|
|
trap_vs
|
| 14688 |
|
|
35bf : 70fe [ 3]> bvs * ;failed overflow set
|
| 14689 |
|
|
|
| 14690 |
|
|
trap_mi
|
| 14691 |
|
|
35c1 : 30fe [ 3]> bmi * ;failed minus (bit 7 set)
|
| 14692 |
|
|
|
| 14693 |
|
|
trap_eq
|
| 14694 |
|
|
35c3 : f0fe [ 3]> beq * ;failed equal (zero)
|
| 14695 |
|
|
|
| 14696 |
|
|
35c5 : c94a [ 2] cmp #'J' ;registers loaded?
|
| 14697 |
|
|
trap_ne
|
| 14698 |
|
|
35c7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14699 |
|
|
|
| 14700 |
|
|
35c9 : e053 [ 2] cpx #'S'
|
| 14701 |
|
|
trap_ne
|
| 14702 |
|
|
35cb : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14703 |
|
|
|
| 14704 |
|
|
35cd : c04f [ 2] cpy #('R'-3)
|
| 14705 |
|
|
trap_ne
|
| 14706 |
|
|
35cf : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14707 |
|
|
|
| 14708 |
|
|
35d1 : 48 [ 3] pha ;save a,x
|
| 14709 |
|
|
35d2 : 8a [ 2] txa
|
| 14710 |
|
|
35d3 : 48 [ 3] pha
|
| 14711 |
|
|
35d4 : ba [ 2] tsx ;sp -4? (return addr,a,x)
|
| 14712 |
|
|
35d5 : e0fb [ 2] cpx #$fb
|
| 14713 |
|
|
trap_ne
|
| 14714 |
|
|
35d7 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14715 |
|
|
|
| 14716 |
|
|
35d9 : adff01 [ 4] lda $1ff ;propper return on stack
|
| 14717 |
|
|
35dc : c908 [ 2] cmp #hi(jsr_ret)
|
| 14718 |
|
|
trap_ne
|
| 14719 |
|
|
35de : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14720 |
|
|
|
| 14721 |
|
|
35e0 : adfe01 [ 4] lda $1fe
|
| 14722 |
|
|
35e3 : c982 [ 2] cmp #lo(jsr_ret)
|
| 14723 |
|
|
trap_ne
|
| 14724 |
|
|
35e5 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14725 |
|
|
|
| 14726 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 255
|
| 14727 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14728 |
|
|
|
| 14729 |
|
|
set_stat $ff
|
| 14730 |
|
|
> load_flag $ff
|
| 14731 |
|
|
35e7 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 14732 |
|
|
>
|
| 14733 |
|
|
35e9 : 48 [ 3]> pha ;use stack to load status
|
| 14734 |
|
|
35ea : 28 [ 4]> plp
|
| 14735 |
|
|
|
| 14736 |
|
|
35eb : 68 [ 4] pla ;pull x,a
|
| 14737 |
|
|
35ec : aa [ 2] tax
|
| 14738 |
|
|
35ed : 68 [ 4] pla
|
| 14739 |
|
|
35ee : e8 [ 2] inx ;return registers with modifications
|
| 14740 |
|
|
35ef : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=1
|
| 14741 |
|
|
35f1 : 60 [ 6] rts
|
| 14742 |
|
|
trap ;runover protection
|
| 14743 |
|
|
35f2 : 4cf235 [ 3]> jmp * ;failed anyway
|
| 14744 |
|
|
|
| 14745 |
|
|
|
| 14746 |
|
|
;trap in case of unexpected IRQ, NMI, BRK, RESET - BRK test target
|
| 14747 |
|
|
35f5 : nmi_trap
|
| 14748 |
|
|
trap ;check stack for conditions at NMI
|
| 14749 |
|
|
35f5 : 4cf535 [ 3]> jmp * ;failed anyway
|
| 14750 |
|
|
|
| 14751 |
|
|
35f8 : res_trap
|
| 14752 |
|
|
trap ;unexpected RESET
|
| 14753 |
|
|
35f8 : 4cf835 [ 3]> jmp * ;failed anyway
|
| 14754 |
|
|
|
| 14755 |
|
|
|
| 14756 |
|
|
35fb : 88 [ 2] dey
|
| 14757 |
|
|
35fc : 88 [ 2] dey
|
| 14758 |
|
|
35fd : irq_trap ;BRK test or unextpected BRK or IRQ
|
| 14759 |
|
|
35fd : 08 [ 3] php ;either SP or Y count will fail, if we do not hit
|
| 14760 |
|
|
35fe : 88 [ 2] dey
|
| 14761 |
|
|
35ff : 88 [ 2] dey
|
| 14762 |
|
|
3600 : 88 [ 2] dey
|
| 14763 |
|
|
;next 4 traps could be caused by unexpected BRK or IRQ
|
| 14764 |
|
|
;check stack for BREAK and originating location
|
| 14765 |
|
|
;possible jump/branch into weeds (uninitialized space)
|
| 14766 |
|
|
3601 : c942 [ 2] cmp #'B' ;registers loaded?
|
| 14767 |
|
|
trap_ne
|
| 14768 |
|
|
3603 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14769 |
|
|
|
| 14770 |
|
|
3605 : e052 [ 2] cpx #'R'
|
| 14771 |
|
|
trap_ne
|
| 14772 |
|
|
3607 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14773 |
|
|
|
| 14774 |
|
|
3609 : c048 [ 2] cpy #('K'-3)
|
| 14775 |
|
|
trap_ne
|
| 14776 |
|
|
360b : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14777 |
|
|
|
| 14778 |
|
|
360d : 850a [ 3] sta irq_a ;save registers during break test
|
| 14779 |
|
|
360f : 860b [ 3] stx irq_x
|
| 14780 |
|
|
3611 : ba [ 2] tsx ;test break on stack
|
| 14781 |
|
|
3612 : bd0201 [ 4] lda $102,x
|
| 14782 |
|
|
cmp_flag 0 ;break test should have B=1
|
| 14783 |
|
|
3615 : c930 [ 2]> cmp #(0 |fao)&m8 ;expected flags + always on bits
|
| 14784 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 256
|
| 14785 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14786 |
|
|
|
| 14787 |
|
|
|
| 14788 |
|
|
trap_ne ; - no break flag on stack
|
| 14789 |
|
|
3617 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14790 |
|
|
|
| 14791 |
|
|
3619 : 68 [ 4] pla
|
| 14792 |
|
|
361a : c934 [ 2] cmp #$34 ;should have added interrupt disable
|
| 14793 |
|
|
trap_ne
|
| 14794 |
|
|
361c : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14795 |
|
|
|
| 14796 |
|
|
361e : ba [ 2] tsx
|
| 14797 |
|
|
361f : e0fc [ 2] cpx #$fc ;sp -3? (return addr, flags)
|
| 14798 |
|
|
trap_ne
|
| 14799 |
|
|
3621 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14800 |
|
|
|
| 14801 |
|
|
3623 : adff01 [ 4] lda $1ff ;propper return on stack
|
| 14802 |
|
|
3626 : c908 [ 2] cmp #hi(brk_ret)
|
| 14803 |
|
|
trap_ne
|
| 14804 |
|
|
3628 : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14805 |
|
|
|
| 14806 |
|
|
362a : adfe01 [ 4] lda $1fe
|
| 14807 |
|
|
; cmp #lo(brk_ret)
|
| 14808 |
|
|
362d : c9b8 [ 2] cmp #lo(brk_ret - 1) ; M65C02 treats JSR and traps (NMI, BRK/IRQ, RST) the same; add one to
|
| 14809 |
|
|
trap_ne
|
| 14810 |
|
|
362f : d0fe [ 3]> bne * ;failed not equal (non zero)
|
| 14811 |
|
|
|
| 14812 |
|
|
set_stat $ff
|
| 14813 |
|
|
> load_flag $ff
|
| 14814 |
|
|
3631 : a9ff [ 2]> lda #$ff ;allow test to change I-flag (no mask)
|
| 14815 |
|
|
>
|
| 14816 |
|
|
3633 : 48 [ 3]> pha ;use stack to load status
|
| 14817 |
|
|
3634 : 28 [ 4]> plp
|
| 14818 |
|
|
|
| 14819 |
|
|
3635 : a60b [ 3] ldx irq_x
|
| 14820 |
|
|
3637 : e8 [ 2] inx ;return registers with modifications
|
| 14821 |
|
|
3638 : a50a [ 3] lda irq_a
|
| 14822 |
|
|
363a : 49aa [ 2] eor #$aa ;N=1, V=1, Z=0, C=1 but original flags should be restored
|
| 14823 |
|
|
363c : 40 [ 6] rti
|
| 14824 |
|
|
trap ;runover protection
|
| 14825 |
|
|
363d : 4c3d36 [ 3]> jmp * ;failed anyway
|
| 14826 |
|
|
|
| 14827 |
|
|
|
| 14828 |
|
|
;copy of data to initialize BSS segment
|
| 14829 |
|
|
if load_data_direct != 1
|
| 14830 |
|
|
zp_init
|
| 14831 |
|
|
zp1_ db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSR
|
| 14832 |
|
|
zp7f_ db $7f ;test pattern for compare
|
| 14833 |
|
|
;logical zeropage operands
|
| 14834 |
|
|
zpOR_ db 0,$1f,$71,$80 ;test pattern for OR
|
| 14835 |
|
|
zpAN_ db $0f,$ff,$7f,$80 ;test pattern for AND
|
| 14836 |
|
|
zpEO_ db $ff,$0f,$8f,$8f ;test pattern for EOR
|
| 14837 |
|
|
;indirect addressing pointers
|
| 14838 |
|
|
ind1_ dw abs1 ;indirect pointer to pattern in absolute memory
|
| 14839 |
|
|
dw abs1+1
|
| 14840 |
|
|
dw abs1+2
|
| 14841 |
|
|
dw abs1+3
|
| 14842 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 257
|
| 14843 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14844 |
|
|
|
| 14845 |
|
|
dw abs7f
|
| 14846 |
|
|
inw1_ dw abs1-$f8 ;indirect pointer for wrap-test pattern
|
| 14847 |
|
|
indt_ dw abst ;indirect pointer to store area in absolute memory
|
| 14848 |
|
|
dw abst+1
|
| 14849 |
|
|
dw abst+2
|
| 14850 |
|
|
dw abst+3
|
| 14851 |
|
|
inwt_ dw abst-$f8 ;indirect pointer for wrap-test store
|
| 14852 |
|
|
indAN_ dw absAN ;indirect pointer to AND pattern in absolute memory
|
| 14853 |
|
|
dw absAN+1
|
| 14854 |
|
|
dw absAN+2
|
| 14855 |
|
|
dw absAN+3
|
| 14856 |
|
|
indEO_ dw absEO ;indirect pointer to EOR pattern in absolute memory
|
| 14857 |
|
|
dw absEO+1
|
| 14858 |
|
|
dw absEO+2
|
| 14859 |
|
|
dw absEO+3
|
| 14860 |
|
|
indOR_ dw absOR ;indirect pointer to OR pattern in absolute memory
|
| 14861 |
|
|
dw absOR+1
|
| 14862 |
|
|
dw absOR+2
|
| 14863 |
|
|
dw absOR+3
|
| 14864 |
|
|
;add/subtract indirect pointers
|
| 14865 |
|
|
adi2_ dw ada2 ;indirect pointer to operand 2 in absolute memory
|
| 14866 |
|
|
sbi2_ dw sba2 ;indirect pointer to complemented operand 2 (SBC)
|
| 14867 |
|
|
adiy2_ dw ada2-$ff ;with offset for indirect indexed
|
| 14868 |
|
|
sbiy2_ dw sba2-$ff
|
| 14869 |
|
|
zp_end
|
| 14870 |
|
|
if (zp_end - zp_init) != (zp_bss_end - zp_bss)
|
| 14871 |
|
|
;force assembler error if size is different
|
| 14872 |
|
|
ERROR ERROR ERROR ;mismatch between bss and zeropage data
|
| 14873 |
|
|
endif
|
| 14874 |
|
|
data_init
|
| 14875 |
|
|
abs1_ db $c3,$82,$41,0 ;test patterns for LDx BIT ROL ROR ASL LSR
|
| 14876 |
|
|
abs7f_ db $7f ;test pattern for compare
|
| 14877 |
|
|
;loads
|
| 14878 |
|
|
fLDx_ db fn,fn,0,fz ;expected flags for load
|
| 14879 |
|
|
;shifts
|
| 14880 |
|
|
rASL_ ;expected result ASL & ROL -carry
|
| 14881 |
|
|
rROL_ db $86,$04,$82,0 ; "
|
| 14882 |
|
|
rROLc_ db $87,$05,$83,1 ;expected result ROL +carry
|
| 14883 |
|
|
rLSR_ ;expected result LSR & ROR -carry
|
| 14884 |
|
|
rROR_ db $61,$41,$20,0 ; "
|
| 14885 |
|
|
rRORc_ db $e1,$c1,$a0,$80 ;expected result ROR +carry
|
| 14886 |
|
|
fASL_ ;expected flags for shifts
|
| 14887 |
|
|
fROL_ db fnc,fc,fn,fz ;no carry in
|
| 14888 |
|
|
fROLc_ db fnc,fc,fn,0 ;carry in
|
| 14889 |
|
|
fLSR_
|
| 14890 |
|
|
fROR_ db fc,0,fc,fz ;no carry in
|
| 14891 |
|
|
fRORc_ db fnc,fn,fnc,fn ;carry in
|
| 14892 |
|
|
;increments (decrements)
|
| 14893 |
|
|
rINC_ db $7f,$80,$ff,0,1 ;expected result for INC/DEC
|
| 14894 |
|
|
fINC_ db 0,fn,fn,fz,0 ;expected flags for INC/DEC
|
| 14895 |
|
|
;logical memory operand
|
| 14896 |
|
|
absOR_ db 0,$1f,$71,$80 ;test pattern for OR
|
| 14897 |
|
|
absAN_ db $0f,$ff,$7f,$80 ;test pattern for AND
|
| 14898 |
|
|
absEO_ db $ff,$0f,$8f,$8f ;test pattern for EOR
|
| 14899 |
|
|
;logical accu operand
|
| 14900 |
|
|
AS65 Assembler for R6502 [1.42]. Copyright 1994-2007, Frank A. Kingswood Page 258
|
| 14901 |
|
|
---------------------------------------------------------- 65c02_ft.a65 -----------------------------------------------------------
|
| 14902 |
|
|
|
| 14903 |
|
|
absORa_ db 0,$f1,$1f,0 ;test pattern for OR
|
| 14904 |
|
|
absANa_ db $f0,$ff,$ff,$ff ;test pattern for AND
|
| 14905 |
|
|
absEOa_ db $ff,$f0,$f0,$0f ;test pattern for EOR
|
| 14906 |
|
|
;logical results
|
| 14907 |
|
|
absrlo_ db 0,$ff,$7f,$80
|
| 14908 |
|
|
absflo_ db fz,fn,0,fn
|
| 14909 |
|
|
data_end
|
| 14910 |
|
|
if (data_end - data_init) != (data_bss_end - data_bss)
|
| 14911 |
|
|
;force assembler error if size is different
|
| 14912 |
|
|
ERROR ERROR ERROR ;mismatch between bss and data
|
| 14913 |
|
|
endif
|
| 14914 |
|
|
|
| 14915 |
|
|
vec_init
|
| 14916 |
|
|
dw nmi_trap
|
| 14917 |
|
|
dw res_trap
|
| 14918 |
|
|
dw irq_trap
|
| 14919 |
|
|
vec_bss equ $fffa
|
| 14920 |
|
|
endif ;end of RAM init data
|
| 14921 |
|
|
|
| 14922 |
|
|
if (load_data_direct = 1) & (ROM_vectors = 1)
|
| 14923 |
|
|
fffa = org $fffa ;vectors
|
| 14924 |
|
|
fffa : f535 dw nmi_trap
|
| 14925 |
|
|
fffc : f835 dw res_trap
|
| 14926 |
|
|
fffe : fd35 dw irq_trap
|
| 14927 |
|
|
endif
|
| 14928 |
|
|
|
| 14929 |
|
|
fffa = end start
|
| 14930 |
|
|
|
| 14931 |
|
|
No errors in pass 2.
|
| 14932 |
|
|
Wrote binary from address $0000 through $ffff.
|
| 14933 |
|
|
Total size 65536 bytes.
|
| 14934 |
|
|
Program start address is at $0400 (1024).
|
| 14935 |
|
|
|
