$BBC7/48071: Store FAC#1 in Memory
Jump from $E05D:
BBC7: A2 5C LDX #$5C
BBC9: 2C .BYTE $2C
Jump from $E047, $E2B4:
BBCA: A2 57 LDX #$57
BBCC: A0 00 LDY #$00
BBCE: F0 04 BEQ $BBD4
Jump from $A9D6, $AD52:
BBD0: A6 49 LDX $49 ; Pointer: Index Variable for FOR/NEXT loop
BBD2: A4 4A LDY $4A ; Pointer: Index Variable for FOR/NEXT loop
Jump from $BBCE, $B420, $BF88, $E0F6:
BBD4: 20 1B BC JSR $BC1B ; Round FAC#1
BBD7: 86 22 STX $22 ; Second Utility Pointer
BBD9: 84 23 STY $23 ; Second Utility Pointer
BBDB: A0 04 LDY #$04
BBDD: A5 65 LDA $65 ; FAC Mantissa
BBDF: 91 22 STA ($22),Y ; Second Utility Pointer
BBE1: 88 DEY
BBE2: A5 64 LDA $64 ; FAC Mantissa
BBE4: 91 22 STA ($22),Y ; Second Utility Pointer
BBE6: 88 DEY
BBE7: A5 63 LDA $63 ; FAC Mantissa
BBE9: 91 22 STA ($22),Y ; Second Utility Pointer
BBEB: 88 DEY
BBEC: A5 66 LDA $66 ; FAC Sign
BBEE: 09 7F ORA #$7F
BBF0: 25 62 AND $62 ; FAC Mantissa
BBF2: 91 22 STA ($22),Y ; Second Utility Pointer
BBF4: 88 DEY
BBF5: A5 61 LDA $61 ; FAC Exponent
BBF7: 91 22 STA ($22),Y ; Second Utility Pointer
BBF9: 84 70 STY $70 ; FAC low-order rounding
BBFB: 60 RTS
Previous Page / Next Page