$BF7B/49019:   Evaluate <power>

BF7B: F0 70     BEQ $BFED     ; Evaluate <exp>
BF7D: A5 69     LDA $69       ; AFAC Exponent
BF7F: D0 03     BNE $BF84
BF81: 4C F9 B8  JMP $B8F9     ; Perform Addition

Jump from $BF7F:

BF84: A2 4E     LDX #$4E
BF86: A0 00     LDY #$00
BF88: 20 D4 BB  JSR $BBD4     ; Store FAC#1 in Memory
BF8B: A5 6E     LDA $6E       ; AFAC Sign
BF8D: 10 0F     BPL $BF9E
BF8F: 20 CC BC  JSR $BCCC     ; Evaluate <int>
BF92: A9 4E     LDA #$4E
BF94: A0 00     LDY #$00
BF96: 20 5B BC  JSR $BC5B     ; Compare FAC#1 With Memory
BF99: D0 03     BNE $BF9E
BF9B: 98        TYA
BF9C: A4 07     LDY $07       ; Temporary Integer during OR/AND

Jump from $BF8D, $BF99:

BF9E: 20 FE BB  JSR $BBFE     ; Copy FAC#2 into FAC#1
BFA1: 98        TYA
BFA2: 48        PHA
BFA3: 20 EA B9  JSR $B9EA     ; Evaluate <log>
BFA6: A9 4E     LDA #$4E
BFA8: A0 00     LDY #$00
BFAA: 20 28 BA  JSR $BA28     ; Perform Multiply
BFAD: 20 ED BF  JSR $BFED     ; Evaluate <exp>
BFB0: 68        PLA
BFB1: 4A        LSR
BFB2: 90 0A     BCC $BFBE     ; Negate FAC#1

    Previous Page / Next Page