chris/open-roms
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

added multiplication by 10 routine, not yet tested

Browse Source
This commit is contained in:
FeralChild64 committed 2020-02-27 17:35:22 +01:00
1 parent 6f7e099004
commit d8bb2ba403
5 files changed
+69 -19
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

c64/basic/math/mul10_FAC1_mul2.s
+25
View File
@@ -0,0 +1,25 @@
// #LAYOUT# STD * #TAKE
// #LAYOUT# * BASIC_0 #TAKE
// #LAYOUT# * * #IGNORE
//
// Multiply FAC1 by 2, do not normalize
//
mul10_FAC1_mul2:
// First handle the mantissa
asl FACOV
rol FAC1_mantissa+3
rol FAC1_mantissa+2
rol FAC1_mantissa+1
rol FAC1_mantissa+0
bcc !+
// We need to increment the exponent
inc FAC1_exponent
bcs_16 set_FAC1_max
rts