$B465/46181: Evaluate <str$>
B465: 20 8D AD JSR $AD8D ; Confirm Result
B468: A0 00 LDY #$00
B46A: 20 DF BD JSR $BDDF ; Convert FAC#1 to ASCII String
B46D: 68 PLA
B46E: 68 PLA
Jump from $AF59:
B46F: A9 FF LDA #$FF
B471: A0 00 LDY #$00
B473: F0 12 BEQ $B487 ; Set Up String
Jump from $AA56, $B4C0, $B65D:
B475: A6 64 LDX $64 ; FAC Mantissa
B477: A4 65 LDY $65 ; FAC Mantissa
B479: 86 50 STX $50 ; Temporary storage for FLPT value
B47B: 84 51 STY $51 ; Temporary storage for FLPT value
Jump from $B6F3, $B70F:
B47D: 20 F4 B4 JSR $B4F4 ; Allocate Space for String
B480: 86 62 STX $62 ; FAC Mantissa
B482: 84 63 STY $63 ; FAC Mantissa
B484: 85 61 STA $61 ; FAC Exponent
B486: 60 RTS
Previous Page / Next Page