     $A38A/41866:   Find FOR/GOSUB Entry on Stack

    Jump from $A749, $A8D8, $AD2B:

    A38A: BA        TSX
    A38B: E8        INX
    A38C: E8        INX
    A38D: E8        INX
    A38E: E8        INX

    Jump from $A3B5:

    A38F: BD 01 01  LDA $0101,X
    A392: C9 81     CMP #$81
    A394: D0 21     BNE $A3B7
    A396: A5 4A     LDA $4A
    A398: D0 0A     BNE $A3A4
    A39A: BD 02 01  LDA $0102,X
    A39D: 85 49     STA $49
    A39F: BD 03 01  LDA $0103,X
    A3A2: 85 4A     STA $4A

    Jump from $A398:

    A3A4: DD 03 01  CMP $0103,X
    A3A7: D0 07     BNE $A3B0
    A3A9: A5 49     LDA $49
    A3AB: DD 02 01  CMP $0102,X
    A3AE: F0 07     BEQ $A3B7

    Jump from $A3A7:

    A3B0: 8A        TXA
    A3B1: 18        CLC
    A3B2: 69 12     ADC #$12
    A3B4: AA        TAX
    A3B5: D0 D8     BNE $A38F

    Jump from $A394, $A3AE:

    A3B7: 60        RTS

        Previous Page / Next Page