$AEAD/44717: Continue Expression
Jump from $AE9C:
AEAD: C9 2E CMP #$2E
AEAF: F0 DE BEQ $AE8F ; Evaluate Single Term
AEB1: C9 AB CMP #$AB
AEB3: F0 58 BEQ $AF0D ; Set up NOT Function
AEB5: C9 AA CMP #$AA
AEB7: F0 D1 BEQ $AE8A ; Evaluate Single Term
AEB9: C9 22 CMP #$22
AEBB: D0 0F BNE $AECC
Jump from $ABC3:
AEBD: A5 7A LDA $7A ; Pointer: Current Byte of BASIC Text
AEBF: A4 7B LDY $7B ; Pointer: Current Byte of BASIC Text
AEC1: 69 00 ADC #$00
AEC3: 90 01 BCC $AEC6
AEC5: C8 INY
Jump from $AEC3:
AEC6: 20 87 B4 JSR $B487 ; Set Up String
AEC9: 4C E2 B7 JMP $B7E2 ; Convert ASCII String to Flpt
Jump from $AEBB:
AECC: C9 A8 CMP #$A8
AECE: D0 13 BNE $AEE3
AED0: A0 18 LDY #$18
AED2: D0 3B BNE $AF0F ; Set up NOT Function
AED4: 20 BF B1 JSR $B1BF ; FAC#1 to Positive Integer
AED7: A5 65 LDA $65 ; FAC Mantissa
AED9: 49 FF EOR #$FF
AEDB: A8 TAY
AEDC: A5 64 LDA $64 ; FAC Mantissa
AEDE: 49 FF EOR #$FF
AEE0: 4C 91 B3 JMP $B391 ; Convert Integer in (AC/YR) to Flpt
Jump from $AECE:
AEE3: C9 A5 CMP #$A5
AEE5: D0 03 BNE $AEEA
AEE7: 4C F4 B3 JMP $B3F4 ; Perform [fn]
Jump from $AEE5:
AEEA: C9 B4 CMP #$B4
AEEC: 90 03 BCC $AEF1 ; Expression in Brackets
AEEE: 4C A7 AF JMP $AFA7 ; Identify Function Type
Previous Page / Next Page