Prev: BC39 Up: Map Next: BC58
BC3C: save A as integer byte
Used by the routines at AF28, B016 and BD7E.
BC3C 85 62 STA $62 save FAC1 mantissa 1
BC3E A9 00 LDA #$00 clear A
BC40 85 63 STA $63 clear FAC1 mantissa 2
BC42 A2 88 LDX #$88 set exponent
This entry point is used by the routine at B391.
set exponent = X, clear FAC1 3 and 4 and normalise
BC44 A5 62 LDA $62 get FAC1 mantissa 1
BC46 49 FF EOR #$FF complement it
BC48 2A ROL A sign bit into carry
This entry point is used by the routine at BDCD.
set exponent = X, clear mantissa 4 and 3 and normalise FAC1
BC49 A9 00 LDA #$00 clear A
BC4B 85 65 STA $65 clear FAC1 mantissa 4
BC4D 85 64 STA $64 clear FAC1 mantissa 3
This entry point is used by the routine at AF28.
set exponent = X and normalise FAC1
BC4F 86 61 STX $61 set FAC1 exponent
BC51 85 70 STA $70 clear FAC1 rounding byte
BC53 85 66 STA $66 clear FAC1 sign (b7)
BC55 4C D2 B8 JMP $B8D2 do ABS and normalise FAC1
Prev: BC39 Up: Map Next: BC58