Routines
Prev: BD6A Up: Map Next: BD91
BD7E: evaluate new ASCII digit
Used by the routines at AA1D, B9EA and BD6A.
multiply FAC1 by 10 then (ABS) add in new digit
BD7E 48 PHA save digit
BD7F 20 0C BC JSR $BC0C round and copy FAC1 to FAC2
BD82 68 PLA restore digit
BD83 20 3C BC JSR $BC3C save A as integer byte
BD86 A5 6E LDA $6E get FAC2 sign (b7)
BD88 45 66 EOR $66 toggle with FAC1 sign (b7)
BD8A 85 6F STA $6F save sign compare (FAC1 EOR FAC2)
BD8C A6 61 LDX $61 get FAC1 exponent
BD8E 4C 6A B8 JMP $B86A add FAC2 to FAC1 and return
Prev: BD6A Up: Map Next: BD91