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