| Routines

02639: THE 'CARRIAGE RETURN' SUBROUTINE

The address of this routine is derived from an offset found in the control character table. If the printing being handled is going to the printer then a carriage return character leads to the printer buffer being emptied. If the printing is to the screen then a test for 'scroll?' is made before decreasing the line number.
Input
B | Current line number
PO_ENTER | 02639 | BIT 1,(IY+1) | Jump if handling the printer (bit 1 of FLAGS set).
| 02643 | JP NZ,COPY_BUFF
| 02646 | LD C,33 | Set to lefthand column.
| 02648 | CALL PO_SCR | Scroll if necessary.
| 02651 | DEC B | Now down a line.
| 02652 | JP CL_SET | Make an indirect return via CL_SET and PO_STORE.