$B02E/45102: String Comparison Jump from $B019: B02E: A9 00 LDA #$00 B030: 85 0D STA $0D ; Data type Flag B032: C6 4D DEC $4D ; Mask used during FRMEVL B034: 20 A6 B6 JSR $B6A6 ; Perform String Housekeeping B037: 85 61 STA $61 ; FAC Exponent B039: 86 62 STX $62 ; FAC Mantissa B03B: 84 63 STY $63 ; FAC Mantissa B03D: A5 6C LDA $6C ; AFAC Mantissa B03F: A4 6D LDY $6D ; AFAC Mantissa B041: 20 AA B6 JSR $B6AA ; Perform String Housekeeping B044: 86 6C STX $6C ; AFAC Mantissa B046: 84 6D STY $6D ; AFAC Mantissa B048: AA TAX B049: 38 SEC B04A: E5 61 SBC $61 ; FAC Exponent B04C: F0 08 BEQ $B056 B04E: A9 01 LDA #$01 B050: 90 04 BCC $B056 B052: A6 61 LDX $61 ; FAC Exponent B054: A9 FF LDA #$FF Jump from $B04C, $B050: B056: 85 66 STA $66 ; FAC Sign B058: A0 FF LDY #$FF B05A: E8 INX Jump from $B06A: B05B: C8 INY B05C: CA DEX B05D: D0 07 BNE $B066 B05F: A6 66 LDX $66 ; FAC Sign Jump from $B02B: B061: 30 0F BMI $B072 B063: 18 CLC B064: 90 0C BCC $B072 Jump from $B05D: B066: B1 6C LDA ($6C),Y ; AFAC Mantissa B068: D1 62 CMP ($62),Y ; FAC Mantissa B06A: F0 EF BEQ $B05B B06C: A2 FF LDX #$FF B06E: B0 02 BCS $B072 B070: A2 01 LDX #$01 Jump from $B061, $B064, $B06E: B072: E8 INX B073: 8A TXA B074: 2A ROL B075: 25 12 AND $12 ; Flag: TAN sign/Comparative result B077: F0 02 BEQ $B07B B079: A9 FF LDA #$FF Jump from $B077: B07B: 4C 3C BC JMP $BC3C ; Evaluate <sgn> Previous Page / Next Page |