$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