aboutsummaryrefslogtreecommitdiff
path: root/bigfloat.s
diff options
context:
space:
mode:
authorB. Watson <yalhcru@gmail.com>2016-01-20 06:02:46 -0500
committerB. Watson <yalhcru@gmail.com>2016-01-20 06:02:46 -0500
commit6ed92fecc6eebcde1f8e855f76fa6a0d6afa749c (patch)
treeb4bb45959ad641c4286dd4e8bc5d70ea895229e4 /bigfloat.s
parent12114dbef93e85bb7b5832f60410bd73855883dd (diff)
downloadtaipan-6ed92fecc6eebcde1f8e855f76fa6a0d6afa749c.tar.gz
fix and simplify cprintfancy, allow Delete key and K/M for 1000/1M when entering numbers
Diffstat (limited to 'bigfloat.s')
-rw-r--r--bigfloat.s18
1 files changed, 10 insertions, 8 deletions
diff --git a/bigfloat.s b/bigfloat.s
index 1ee2dc9..529de1a 100644
--- a/bigfloat.s
+++ b/bigfloat.s
@@ -228,11 +228,15 @@ _ulong_to_big:
; high value needs to be multiplied by 65536
- lda #<BIG_64K
- sta FLPTR
- lda #>BIG_64K
- sta FLPTR+1
- jsr FLD1P
+ ldx #<BIG_64K ; FR1 = 65536
+ ldy #>BIG_64K
+ jsr FLD1R
+
+ ;lda #<BIG_64K
+ ;sta FLPTR
+ ;lda #>BIG_64K
+ ;sta FLPTR+1
+ ;jsr FLD1P
; old version:
; lda #<BIG_64K
@@ -346,9 +350,7 @@ _bank_maxed_out:
_big_cmp:
sta FLPTR
stx FLPTR+1
- jsr FLD0P
-
- jsr FMOVE ; move to FR1 (since it's the 2nd arg)
+ jsr FLD1P
jsr popax ; get a arg