Routines
Prev: 860D Up: Map Next: 867A
864A: Scroll the input window down a line
Used by the routine at INPUT_CHAR.
For a backspace past the start of a line: rows 19-22 back down to 20-23.
SCROLL_INPUT_BACK 864A PUSH HL
864B PUSH DE
864C PUSH BC
864D PUSH AF
864E LD HL,$50C0
8651 LD DE,$50E0
8654 LD A,$05
SCROLL_INPUT_BACK_0 8656 PUSH HL
8657 PUSH DE
8658 LD B,$08
SCROLL_INPUT_BACK_1 865A PUSH HL
865B PUSH DE
865C PUSH BC
865D LD BC,$0020
8660 LDIR
8662 POP BC
8663 POP DE
8664 POP HL
8665 INC H
8666 INC D
8667 DJNZ SCROLL_INPUT_BACK_1
8669 POP DE
866A POP HL
866B LD BC,$FFE0
866E ADD HL,BC
866F EX DE,HL
8670 ADD HL,BC
8671 EX DE,HL
8672 DEC A
8673 JR NZ,SCROLL_INPUT_BACK_0
8675 POP AF
8676 POP BC
8677 POP DE
8678 POP HL
8679 RET
Prev: 860D Up: Map Next: 867A