Routines
Prev: 61654 Up: Map Next: 61760
61670: Submit Input Line
Used by the routine at InputLine.
Reached from InputLine_Enter when Enter is pressed. Clears the input rows, adjusts the lower screen via ScrollAdjust, prints a > prompt, echoes InputBuffer through PrintCharacter, then returns via ScrollAdjust. Token walks and vocabulary lookup are separate jump-table entries (AdvanceInputPointer, SearchVocabulary_Commands and neighbours).
SubmitInputLine 61670 LD A,32 Clear both input rows to spaces with blank attributes.
61672 LD (23545),A
61675 LD B,64
61677 SUB A
61678 LD (23542),A
61681 LD (23541),A
61684 LD (23543),A
61687 LD A,22
61689 LD (23544),A
SubmitInputLine_ClearLoop 61692 CALL PrintCharacter Print spaces until the clear count is done.
61695 DJNZ SubmitInputLine_ClearLoop
61697 SUB A Reset the column and call ScrollAdjust.
61698 LD (23543),A
61701 CALL ScrollAdjust
61704 LD A,(23689) Print a ">" prompt on the lower screen.
61707 LD B,A
61708 LD A,24
61710 SUB B
61711 LD (23544),A
61714 LD A,7
61716 LD (23541),A
61719 LD A,62
61721 LD (23545),A
61724 CALL PrintCharacter
61727 LD A,5 Restore the echo attribute and point at InputBuffer.
61729 LD (23541),A
61732 LD HL,23470
SubmitInputLine_Echo 61735 LD A,(HL) Jump to SubmitInputLine_ScrollBack at end-of-line.
61736 CP 13
61738 JR Z,SubmitInputLine_ScrollBack
61740 INC HL Echo this character through PrintCharacter and continue.
61741 LD (23545),A
61744 CALL PrintCharacter
61747 JR SubmitInputLine_Echo
SubmitInputLine_ScrollBack 61749 LD A,(23689) Scroll the lower screen back two rows via ScrollAdjust.
61752 SUB 2
61754 LD (23689),A
61757 JP ScrollAdjust
Prev: 61654 Up: Map Next: 61760