The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.
# *** MODIFIED TEST FROM ORIGINAL MONKEYNES
# *** Now properly checks $mem[$0002] and not $mem[$0102] as
# *** zero page mode wraps
clear
power on
regs

# The "stay within zero page" condition
op a0 55
op a2 0b
op 94 be

# Should be: IY=55, IX=0B, mem[$00C9]=55 
test iy = 55
test ix = 0b
test m:00c9 = 55

# The "overshoot the zero page" condition
op a0 62
op a2 0b
op 94 f7

# Should be: IY=62, IX=0B, mem[$0002]=62 
test iy = 62
test ix = 0b
test m:0002 = 62

save verify_94.txt