adding of floating point values works now

This commit is contained in:
FeralChild64 committed 2020-02-16 16:18:19 +01:00
1 parent ad70af9d73
commit 586ee998c6
2 files changed
+16 -9

No files matched your search

+11 -4
View File
@@ -62,10 +62,10 @@ add_FAC2_FAC1:
adc FAC1_mantissa+0
sta FAC1_mantissa+0
bcc add_FAC2_FAC1_normalize // end if no need to adapt the exponent
bcc_16 normal_FAC1 // end if no need to adapt the exponent
inc FAC1_exponent
bne add_FAC2_FAC1_normalize // end if no overflow
bne add_FAC2_FAC1_adapt_mantissa // end if no overflow
lda #$FF
sta FAC1_exponent
@@ -80,6 +80,13 @@ add_FAC2_FAC1_done:
rts
add_FAC2_FAC1_normalize:
add_FAC2_FAC1_adapt_mantissa:
sec
ror FAC1_mantissa+0
ror FAC1_mantissa+1
ror FAC1_mantissa+2
ror FAC1_mantissa+3
ror FACOV
jmp normal_FAC1
rts