.SETXC STA XC \ Store the new text column in XC JMP PUTBACK \ Jump to PUTBACK to restore the USOSWRCH handler and \ return from the subroutine using a tail callName: SETXC [Show more] Type: Subroutine Category: Text Summary: Implement the #SETXC <column> command (move the text cursor to a specific column)Context: See this subroutine in context in the source code Variations: See code variations for this subroutine in the different versions References: This subroutine is called as follows: * JMPTAB calls SETXC
This routine is run when the parasite sends a #SETXC <column> command. It updates the text cursor x-coordinate (i.e. the text column) in XC. Arguments: A The text column
[X]
Subroutine PUTBACK (category: Tube)
Reset the OSWRCH vector in WRCHV to point to USOSWRCH
[X]
Variable XC in workspace I/O variables
The x-coordinate of the text cursor (i.e. the text column), set to an initial value of 1