$E6B6/59062:   Advance Cursor

Jump from $E6A5:

E6B6: 20 B3 E8  JSR $E8B3     ; Check Line Increment
E6B9: E6 D3     INC $D3       ; Cursor Column on current Line
E6BB: A5 D5     LDA $D5       ; Current logical Line length: 39 or 79
E6BD: C5 D3     CMP $D3       ; Cursor Column on current Line
E6BF: B0 3F     BCS $E700     ; Retreat Cursor
E6C1: C9 4F     CMP #$4F
E6C3: F0 32     BEQ $E6F7     ; Retreat Cursor
E6C5: AD 92 02  LDA $0292     ; Flag: Auto scroll down
E6C8: F0 03     BEQ $E6CD
E6CA: 4C 67 E9  JMP $E967     ; Open A Space On The Screen

Jump from $E6C8:

E6CD: A6 D6     LDX $D6       ; Current Screen Line number of Cursor
E6CF: E0 19     CPX #$19
E6D1: 90 07     BCC $E6DA
E6D3: 20 EA E8  JSR $E8EA     ; Scroll Screen
E6D6: C6 D6     DEC $D6       ; Current Screen Line number of Cursor
E6D8: A6 D6     LDX $D6       ; Current Screen Line number of Cursor

Jump from $E6D1, $E97E, $E9C2:

E6DA: 16 D9     ASL $D9,X     ; Screen Line Link Table
E6DC: 56 D9     LSR $D9,X     ; Screen Line Link Table
E6DE: E8        INX
E6DF: B5 D9     LDA $D9,X     ; Screen Line Link Table
E6E1: 09 80     ORA #$80
E6E3: 95 D9     STA $D9,X     ; Screen Line Link Table
E6E5: CA        DEX
E6E6: A5 D5     LDA $D5       ; Current logical Line length: 39 or 79
E6E8: 18        CLC
E6E9: 69 28     ADC #$28
E6EB: 85 D5     STA $D5       ; Current logical Line length: 39 or 79

    Previous Page / Next Page