$BC39/48185:   Evaluate <sgn>

BC39: 20 2B BC  JSR $BC2B     ; Check Sign of FAC#1

Jump from $AF9D, $B07B, $BD83:

BC3C: 85 62     STA $62       ; FAC Mantissa
BC3E: A9 00     LDA #$00
BC40: 85 63     STA $63       ; FAC Mantissa
BC42: A2 88     LDX #$88

Jump from $B39B:

BC44: A5 62     LDA $62       ; FAC Mantissa
BC46: 49 FF     EOR #$FF
BC48: 2A        ROL

Jump from $BDD4:

BC49: A9 00     LDA #$00
BC4B: 85 65     STA $65       ; FAC Mantissa
BC4D: 85 64     STA $64       ; FAC Mantissa

Jump from $AF81:

BC4F: 86 61     STX $61       ; FAC Exponent
BC51: 85 70     STA $70       ; FAC low-order rounding
BC53: 85 66     STA $66       ; FAC Sign
BC55: 4C D2 B8  JMP $B8D2     ; Perform Addition

    Previous Page / Next Page