From 6ed92fecc6eebcde1f8e855f76fa6a0d6afa749c Mon Sep 17 00:00:00 2001
From: "B. Watson" <yalhcru@gmail.com>
Date: Wed, 20 Jan 2016 06:02:46 -0500
Subject: fix and simplify cprintfancy, allow Delete key and K/M for 1000/1M
 when entering numbers

---
 bigfloat.s | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

(limited to 'bigfloat.s')

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
 
-- 
cgit v1.2.3