$BB0F/47887: Divide FAC#2 by FAC#1
Jump from $BA08, $E2D9, $E321:
BB0F: 20 8C BA JSR $BA8C ; Load FAC#2 From Memory
Jump from $BB0C:
BB12: F0 76 BEQ $BB8A
BB14: 20 1B BC JSR $BC1B ; Round FAC#1
BB17: A9 00 LDA #$00
BB19: 38 SEC
BB1A: E5 61 SBC $61 ; FAC Exponent
BB1C: 85 61 STA $61 ; FAC Exponent
BB1E: 20 B7 BA JSR $BAB7 ; Test Both Accumulators
BB21: E6 61 INC $61 ; FAC Exponent
BB23: F0 BA BEQ $BADF ; Overflow / Underflow
BB25: A2 FC LDX #$FC
BB27: A9 01 LDA #$01
Jump from $BB59:
BB29: A4 6A LDY $6A ; AFAC Mantissa
BB2B: C4 62 CPY $62 ; FAC Mantissa
BB2D: D0 10 BNE $BB3F
BB2F: A4 6B LDY $6B ; AFAC Mantissa
BB31: C4 63 CPY $63 ; FAC Mantissa
BB33: D0 0A BNE $BB3F
BB35: A4 6C LDY $6C ; AFAC Mantissa
BB37: C4 64 CPY $64 ; FAC Mantissa
BB39: D0 04 BNE $BB3F
BB3B: A4 6D LDY $6D ; AFAC Mantissa
BB3D: C4 65 CPY $65 ; FAC Mantissa
Jump from $BB2D, $BB33, $BB39, $BB57, $BB5B:
BB3F: 08 PHP
BB40: 2A ROL
BB41: 90 09 BCC $BB4C
BB43: E8 INX
BB44: 95 29 STA $29,X ; Floating point product of Multiply and Divide
BB46: F0 32 BEQ $BB7A
BB48: 10 34 BPL $BB7E
BB4A: A9 01 LDA #$01
Jump from $BB41, $BB7C:
BB4C: 28 PLP
BB4D: B0 0E BCS $BB5D
Jump from $BB77:
BB4F: 06 6D ASL $6D ; AFAC Mantissa
BB51: 26 6C ROL $6C ; AFAC Mantissa
BB53: 26 6B ROL $6B ; AFAC Mantissa
BB55: 26 6A ROL $6A ; AFAC Mantissa
BB57: B0 E6 BCS $BB3F
BB59: 30 CE BMI $BB29
BB5B: 10 E2 BPL $BB3F
Jump from $BB4D:
BB5D: A8 TAY
BB5E: A5 6D LDA $6D ; AFAC Mantissa
BB60: E5 65 SBC $65 ; FAC Mantissa
BB62: 85 6D STA $6D ; AFAC Mantissa
BB64: A5 6C LDA $6C ; AFAC Mantissa
BB66: E5 64 SBC $64 ; FAC Mantissa
BB68: 85 6C STA $6C ; AFAC Mantissa
BB6A: A5 6B LDA $6B ; AFAC Mantissa
BB6C: E5 63 SBC $63 ; FAC Mantissa
BB6E: 85 6B STA $6B ; AFAC Mantissa
BB70: A5 6A LDA $6A ; AFAC Mantissa
BB72: E5 62 SBC $62 ; FAC Mantissa
BB74: 85 6A STA $6A ; AFAC Mantissa
BB76: 98 TYA
BB77: 4C 4F BB JMP $BB4F
Jump from $BB46:
BB7A: A9 40 LDA #$40
BB7C: D0 CE BNE $BB4C
Jump from $BB48:
BB7E: 0A ASL
BB7F: 0A ASL
BB80: 0A ASL
BB81: 0A ASL
BB82: 0A ASL
BB83: 0A ASL
BB84: 85 70 STA $70 ; FAC low-order rounding
BB86: 28 PLP
BB87: 4C 8F BB JMP $BB8F
Jump from $BB12:
BB8A: A2 14 LDX #$14
BB8C: 4C 37 A4 JMP $A437 ; Error Routine
Jump from $BB87, $BA56:
BB8F: A5 26 LDA $26 ; Floating point product of Multiply and Divide
BB91: 85 62 STA $62 ; FAC Mantissa
BB93: A5 27 LDA $27 ; Floating point product of Multiply and Divide
BB95: 85 63 STA $63 ; FAC Mantissa
BB97: A5 28 LDA $28 ; Floating point product of Multiply and Divide
BB99: 85 64 STA $64 ; FAC Mantissa
BB9B: A5 29 LDA $29 ; Floating point product of Multiply and Divide
BB9D: 85 65 STA $65 ; FAC Mantissa
BB9F: 4C D7 B8 JMP $B8D7 ; Perform Addition
Previous Page / Next Page