$AAE8/43752:   Handle comma, TAB(, SPC(

Jump from $AAAF:

AAE8: 38        SEC
AAE9: 20 F0 FF  JSR $FFF0     ; Read / Set Cursor X/Y Position
AAEC: 98        TYA
AAED: 38        SEC

Jump from $AAF0:

AAEE: E9 0A     SBC #$0A
AAF0: B0 FC     BCS $AAEE
AAF2: 49 FF     EOR #$FF
AAF4: 69 01     ADC #$01
AAF6: D0 16     BNE $AB0E

Jump from $AAA6, $AAAB:

AAF8: 08        PHP
AAF9: 38        SEC
AAFA: 20 F0 FF  JSR $FFF0     ; Read / Set Cursor X/Y Position
AAFD: 84 09     STY $09       ; Screen Column for last TAB
AAFF: 20 9B B7  JSR $B79B     ; Evaluate Text to 1 Byte in XR
AB02: C9 29     CMP #$29
AB04: D0 59     BNE $AB5F     ; Handle Bad Data
AB06: 28        PLP
AB07: 90 06     BCC $AB0F
AB09: 8A        TXA
AB0A: E5 09     SBC $09       ; Screen Column for last TAB
AB0C: 90 05     BCC $AB13

Jump from $AAF6:

AB0E: AA        TAX

Jump from $AB07:

AB0F: E8        INX

Jump from $AB1C:

AB10: CA        DEX
AB11: D0 06     BNE $AB19

Jump from $AB0C, $AAB3:

AB13: 20 73 00  JSR $0073     ; CHRGET: Get next Byte of BASIC Text
AB16: 4C A2 AA  JMP $AAA2     ; Perform [print]

Jump from $AB11:

AB19: 20 3B AB  JSR $AB3B     ; Output Format Character
AB1C: D0 F2     BNE $AB10

    Previous Page / Next Page