Routines
Prev: B8FE Up: Map Next: B97E
B947: negate FAC1
Used by the routine at B8D2.
B947 A5 66 LDA $66 get FAC1 sign (b7)
B949 49 FF EOR #$FF complement it
B94B 85 66 STA $66 save FAC1 sign (b7)
This entry point is used by the routine at BC9B.
twos complement FAC1 mantissa
B94D A5 62 LDA $62 get FAC1 mantissa 1
B94F 49 FF EOR #$FF complement it
B951 85 62 STA $62 save FAC1 mantissa 1
B953 A5 63 LDA $63 get FAC1 mantissa 2
B955 49 FF EOR #$FF complement it
B957 85 63 STA $63 save FAC1 mantissa 2
B959 A5 64 LDA $64 get FAC1 mantissa 3
B95B 49 FF EOR #$FF complement it
B95D 85 64 STA $64 save FAC1 mantissa 3
B95F A5 65 LDA $65 get FAC1 mantissa 4
B961 49 FF EOR #$FF complement it
B963 85 65 STA $65 save FAC1 mantissa 4
B965 A5 70 LDA $70 get FAC1 rounding byte
B967 49 FF EOR #$FF complement it
B969 85 70 STA $70 save FAC1 rounding byte
B96B E6 70 INC $70 increment FAC1 rounding byte
B96D D0 0E BNE $B97D exit if no overflow
This entry point is used by the routine at BC1B.
increment FAC1 mantissa
B96F E6 65 INC $65 increment FAC1 mantissa 4
B971 D0 0A BNE $B97D finished if no rollover
B973 E6 64 INC $64 increment FAC1 mantissa 3
B975 D0 06 BNE $B97D finished if no rollover
B977 E6 63 INC $63 increment FAC1 mantissa 2
B979 D0 02 BNE $B97D finished if no rollover
B97B E6 62 INC $62 increment FAC1 mantissa 1
B97D 60 RTS
Prev: B8FE Up: Map Next: B97E