$A7ED/42989:   Perform BASIC Keyword

Jump from $A7E7, $A948:

A7ED: F0 3C     BEQ $A82B     ; Perform [restore]

Jump from $A95C:

A7EF: E9 80     SBC #$80
A7F1: 90 11     BCC $A804
A7F3: C9 23     CMP #$23
A7F5: B0 17     BCS $A80E
A7F7: 0A        ASL
A7F8: A8        TAY
A7F9: B9 0D A0  LDA $A00D,Y   ; BASIC Command Vectors - 1
A7FC: 48        PHA
A7FD: B9 0C A0  LDA $A00C,Y   ; BASIC Command Vectors - 1
A800: 48        PHA
A801: 4C 73 00  JMP $0073     ; CHRGET: Get next Byte of BASIC Text

Jump from $A7F1:

A804: 4C A5 A9  JMP $A9A5     ; Perform [let]

Jump from $A7C2:

A807: C9 3A     CMP #$3A
A809: F0 D6     BEQ $A7E1     ; Prepare to execute statement

Jump from $A810:

A80B: 4C 08 AF  JMP $AF08     ; Output ?SYNTAX Error

Jump from $A7F5:

A80E: C9 4B     CMP #$4B
A810: D0 F9     BNE $A80B
A812: 20 73 00  JSR $0073     ; CHRGET: Get next Byte of BASIC Text
A815: A9 A4     LDA #$A4
A817: 20 FF AE  JSR $AEFF     ; Test ','
A81A: 4C A0 A8  JMP $A8A0     ; Perform [goto]

    Previous Page / Next Page