Routines
Prev: E716 Up: Map Next: E891
E87C: do newline
Used by the routines at E6B6, E716 and E891.
E87C 46 C9 LSR $C9 shift >> input cursor row
E87E A6 D6 LDX $D6 get the cursor row
E880 E8 INX increment the row
E881 E0 19 CPX #$19 compare it with last row + 1
E883 D0 03 BNE $E888 if not last row + 1 skip the screen scroll
E885 20 EA E8 JSR $E8EA else scroll the screen
E888 B5 D9 LDA $D9,X get start of line X pointer high byte
E88A 10 F4 BPL $E880 loop if not start of logical line
E88C 86 D6 STX $D6 save the cursor row
E88E 4C 6C E5 JMP $E56C set the screen pointers for cursor row, column and return
Prev: E716 Up: Map Next: E891