mirror of
https://github.com/toyoshim/Applerm-II.git
synced 2024-06-06 08:29:28 +00:00
Bug fix on adc condition flag updates
This commit is contained in:
parent
ff1f7b8b2f
commit
ff26481127
5
6502.S
5
6502.S
|
@ -311,7 +311,7 @@
|
||||||
add r1, r1, r0
|
add r1, r1, r0
|
||||||
movs r2, #FLAG_C
|
movs r2, #FLAG_C
|
||||||
tst SR, r2
|
tst SR, r2
|
||||||
bne 1f
|
beq 1f
|
||||||
adds r1, r1, #1
|
adds r1, r1, #1
|
||||||
1:
|
1:
|
||||||
movs r2, #FLAG_D
|
movs r2, #FLAG_D
|
||||||
|
@ -359,6 +359,7 @@
|
||||||
lsrs r0, r0, #8
|
lsrs r0, r0, #8
|
||||||
bcc 1f
|
bcc 1f
|
||||||
__se FLAG_V
|
__se FLAG_V
|
||||||
|
1:
|
||||||
mov RA, r2
|
mov RA, r2
|
||||||
adds PC, PC, #1
|
adds PC, PC, #1
|
||||||
.endm
|
.endm
|
||||||
|
@ -563,7 +564,7 @@
|
||||||
subs r1, r1, r0
|
subs r1, r1, r0
|
||||||
movs r2, #FLAG_C
|
movs r2, #FLAG_C
|
||||||
tst SR, r2
|
tst SR, r2
|
||||||
beq 1f
|
bne 1f
|
||||||
subs r1, r1, #1
|
subs r1, r1, #1
|
||||||
1:
|
1:
|
||||||
movs r2, #FLAG_D
|
movs r2, #FLAG_D
|
||||||
|
|
Loading…
Reference in New Issue
Block a user