Prev: B850 Up: Map Next: B862
B853: perform subtraction, FAC1 from FAC2
Used by the routines at E000 and E26B.
B853 A5 66 LDA $66 get FAC1 sign (b7)
B855 49 FF EOR #$FF complement it
B857 85 66 STA $66 save FAC1 sign (b7)
B859 45 6E EOR $6E EOR with FAC2 sign (b7)
B85B 85 6F STA $6F save sign compare (FAC1 EOR FAC2)
B85D A5 61 LDA $61 get FAC1 exponent
B85F 4C 6A B8 JMP $B86A add FAC2 to FAC1 and return
Prev: B850 Up: Map Next: B862