$BCCC/48332: Evaluate <int>
Jump from $BF8F, $E00E, $E27A:
BCCC: A5 61 LDA $61 ; FAC Exponent
BCCE: C9 A0 CMP #$A0
BCD0: B0 20 BCS $BCF2
BCD2: 20 9B BC JSR $BC9B ; Convert FAC#1 to Integer
BCD5: 84 70 STY $70 ; FAC low-order rounding
BCD7: A5 66 LDA $66 ; FAC Sign
BCD9: 84 66 STY $66 ; FAC Sign
BCDB: 49 80 EOR #$80
BCDD: 2A ROL
BCDE: A9 A0 LDA #$A0
BCE0: 85 61 STA $61 ; FAC Exponent
BCE2: A5 65 LDA $65 ; FAC Mantissa
BCE4: 85 07 STA $07 ; Temporary Integer during OR/AND
BCE6: 4C D2 B8 JMP $B8D2 ; Perform Addition
Jump from $BC9D:
BCE9: 85 62 STA $62 ; FAC Mantissa
BCEB: 85 63 STA $63 ; FAC Mantissa
BCED: 85 64 STA $64 ; FAC Mantissa
BCEF: 85 65 STA $65 ; FAC Mantissa
BCF1: A8 TAY
Jump from $BCD0:
BCF2: 60 RTS
Previous Page / Next Page