| Routines

06025: THE 'OPEN-P' SUBROUTINE

The address of this routine is derived from an offset found in the open stream lookup table.
Input
BC | Length of the expression specifying the channel code
OPEN_P | 06025 | LD E,16 | The data bytes will be 16 and 0.
This entry point is used by the routines at OPEN_K and OPEN_S.
OPEN_END | 06027 | DEC BC | Decrease the length of the expression and give an error if it was not a single character.
| 06028 | LD A,B
| 06029 | OR C
| 06030 | JR NZ,REPORT_F
| 06032 | LD D,A | Otherwise clear the D register, fetch HL and return.
| 06033 | POP HL
| 06034 | RET