fix printing of integers and BASIC free bytes on startup

This commit is contained in:
Paul Gardner-Stephen committed 2019-04-28 21:36:33 +09:30
1 parent 0c05cd335f
commit 3ab4f385ac
1 file changed
+2 -6
+2 -6
View File
@@ -73,12 +73,13 @@ bit_clear_hi:
dey dey
dey dey
dey dey
dey
dey
next_hi_bit: next_hi_bit:
asl asl
cpy #$7f cpy #$7f
bcc hi_loop bcc hi_loop
;; Deal with any carries ;; Deal with any carries
ldx #3 ldx #3
carry_fix_loop: carry_fix_loop:
@@ -98,11 +99,6 @@ post_carry:
;; Got digits. ;; Got digits.
;; Skip leading zeros, and print the resulting number ;; Skip leading zeros, and print the resulting number
ldx #4
* lda $0100,x
dex
bpl -
;; Skip leading zeros ;; Skip leading zeros
ldy #0 ldy #0
* lda $0100,y * lda $0100,y