Apple-2-SW
/
Applerm-II
mirror of https://github.com/toyoshim/Applerm-II.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

Bug fix: conditions are hard :(

This commit is contained in:
Takashi Toyoshima 2014-12-08 02:35:47 +09:00
parent 2ad2fa6efb
commit 9098230d7d
1 changed files with 10 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
6502.S
View File

@ -454,26 +454,23 @@
.endm
.macro _cp reg
prn r0
prn \reg
__cl (FLAG_N | FLAG_Z | FLAG_C)
mov r1, \reg
subs r2, r1, r0
sxtb r2, r2
subs r0, r1, r0
beq 1f
bcc 3f
bmi 1f
__se FLAG_C
b 3f
1:
bcc 2f
__se FLAG_C
2:
__se FLAG_Z
3:
movs r1, #FLAG_N
tst r0, r1
beq 1f
sxtb r0, r0
movs r0, r0
bpl 1f
__se FLAG_N
b 2f
1:
bne 2f
__se FLAG_Z
2:
adds PC, PC, #1
.endm