| Routines

0018: THE 'COLLECT CHARACTER' RESTART

Used by the routines at SAVE_ETC, MAIN_EXEC, LIST, STMT_LOOP, SEPARATOR, STMT_NEXT, CLASS_09, READ_3, PRINT_2, PR_ITEM_1, PR_POSN_1, INPUT, IN_ASSIGN, CO_TEMP_1, CIRCLE, DRAW, SCANNING, S_2_COORD, S_QUOTE, S_DECIMAL, S_LETTER, S_FN_SBRN, LOOK_VARS, STK_VAR, SLICING, DIM, DEC_TO_FP and val. The contents of the location currently addressed by CH-ADD are fetched. A return is made if the value represents a printable character, otherwise CH-ADD is incremented and the tests repeated.
Output
A | Code of the character
GET_CHAR | 0018 | LD HL,($5C5D) | Fetch the value that is addressed by CH-ADD.
| 001B | LD A,(HL)
This entry point is used by the routine at NEXT_CHAR.
TEST_CHAR | 001C | CALL SKIP_OVER | Find out if the character is printable.
| 001F | RET NC | Return if it is so.
This routine continues into NEXT_CHAR.