$BC1B/48155: Round FAC#1
Jump from $A9C4, $AE43, $BB14, $BBD4, $BC0C:
BC1B: A5 61 LDA $61 ; FAC Exponent
BC1D: F0 FB BEQ $BC1A ; Copy FAC#1 into FAC#2
BC1F: 06 70 ASL $70 ; FAC low-order rounding
BC21: 90 F7 BCC $BC1A ; Copy FAC#1 into FAC#2
Jump from $BFFA:
BC23: 20 6F B9 JSR $B96F ; 2's Complement FAC#1
BC26: D0 F2 BNE $BC1A ; Copy FAC#1 into FAC#2
BC28: 4C 38 B9 JMP $B938 ; Perform Addition
Previous Page / Next Page