| Routines

02780: THE 'POSITION STORE' SUBROUTINE

Used by the routine at CL_SET. The routine at PO_ABLE continues here. The new position's 'line and column' values and the 'pixel' address are stored in the appropriate system variables.
Input
B | Line number
C | Column number
HL | Display file address or printer buffer address
PO_STORE | 02780 | BIT 1,(IY+1) | Jump forward if handling the printer (bit 1 of FLAGS set).
| 02784 | JR NZ,PO_ST_PR
| 02786 | BIT 0,(IY+2) | Jump forward if handling the lower part of the screen (bit 0 of TV-FLAG set).
| 02790 | JR NZ,PO_ST_E
| 02792 | LD (23688),BC | Save the values that relate to the main part of the screen at S-POSN and DF-CC.
| 02796 | LD (23684),HL
| 02799 | RET | Then return.
PO_ST_E | 02800 | LD (23690),BC | Save the values that relate to the lower part of the screen at S-POSNL, ECHO-E and DF-CCL.
| 02804 | LD (23682),BC
| 02808 | LD (23686),HL
| 02811 | RET | Then return.
PO_ST_PR | 02812 | LD (IY+69),C | Save the values that relate to the printer buffer at P-POSN and PR-CC.
| 02815 | LD (23680),HL
| 02818 | RET | Then return.