The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
clear
power on
regs

# Base test --------------------
memset 00c9 72

op a9 55
op a2 0b
op 35 be

# Should be:  ACC=50, IX=0B
test acc = 50
test ix = 0b

# Zero test --------------------
power on

memset 00c9 aa

op a9 55
op a2 0b
op 35 be

# Should be:  ACC=0, IX=0B, Z=1
test acc = 0
test ix = 0b
test z = 1

# Negative test ----------------
power on

memset 00c9 aa

op a9 84
op a2 0b
op 35 be

# Should be:  ACC=80, IX=0B, S=1
test acc = 80
test ix = 0b
test s = 1

save verify_35.txt