1
0
mirror of https://github.com/mgcaret/of816.git synced 2024-06-11 16:29:27 +00:00

resolve #4, h/t ksherlock

This commit is contained in:
mgcaret 2020-01-03 19:41:25 -08:00
parent 30a8a259c7
commit 7f57ba6f06

View File

@ -8,14 +8,9 @@
lda STACKBASE+6,x
eor STACKBASE+2,x
bpl samesign
lda STACKBASE+4,x
cmp STACKBASE+0,x
lda STACKBASE+6,x
sbc STACKBASE+2,x
bvs :+
eor #$8000
: sec ; make sure we don't set Z
rol ; move comparison into carry
lda STACKBASE+2,x ; Kelvin's excellent solution
sec
rol
rts
samesign: lda STACKBASE+6,x
cmp STACKBASE+2,x