$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 |