$A96B/43371:   Fetch linnum From BASIC

Jump from $A49C, $A6A4, $A6B6, $A8A0, $A962:

A96B: A2 00     LDX #$00
A96D: 86 14     STX $14       ; Temporary: Integer value
A96F: 86 15     STX $15       ; Temporary: Integer value

Jump from $A9A2:

A971: B0 F7     BCS $A96A     ; Perform [on]
A973: E9 2F     SBC #$2F
A975: 85 07     STA $07       ; Temporary Integer during OR/AND
A977: A5 15     LDA $15       ; Temporary: Integer value
A979: 85 22     STA $22       ; Second Utility Pointer
A97B: C9 19     CMP #$19
A97D: B0 D4     BCS $A953     ; Perform [on]
A97F: A5 14     LDA $14       ; Temporary: Integer value
A981: 0A        ASL
A982: 26 22     ROL $22       ; Second Utility Pointer
A984: 0A        ASL
A985: 26 22     ROL $22       ; Second Utility Pointer
A987: 65 14     ADC $14       ; Temporary: Integer value
A989: 85 14     STA $14       ; Temporary: Integer value
A98B: A5 22     LDA $22       ; Second Utility Pointer
A98D: 65 15     ADC $15       ; Temporary: Integer value
A98F: 85 15     STA $15       ; Temporary: Integer value
A991: 06 14     ASL $14       ; Temporary: Integer value
A993: 26 15     ROL $15       ; Temporary: Integer value
A995: A5 14     LDA $14       ; Temporary: Integer value
A997: 65 07     ADC $07       ; Temporary Integer during OR/AND
A999: 85 14     STA $14       ; Temporary: Integer value
A99B: 90 02     BCC $A99F
A99D: E6 15     INC $15       ; Temporary: Integer value

Jump from $A99B:

A99F: 20 73 00  JSR $0073     ; CHRGET: Get next Byte of BASIC Text
A9A2: 4C 71 A9  JMP $A971

    Previous Page / Next Page