Spectrum ROM | Routines |
Prev: 08329 | Up: Map |
Used by the routine at INPUT.
This subroutine is called twice for each INPUT value: once with the syntax/run flag reset (syntax) and once with it set (run).
|
|||||||
IN_ASSIGN | 08633 | LD HL,(23649) | Set CH-ADD to point to the first location of the work space (WORKSP) and fetch the character. | ||||
08636 | LD (23645),HL | ||||||
08639 | RST 24 | ||||||
08640 | CP 226 | Is it a 'STOP'? | |||||
08642 | JR Z,IN_STOP | Jump if it is. | |||||
08644 | LD A,(23665) | Otherwise make the assignment of the 'value' to the variable. | |||||
08647 | CALL VAL_FET_2 | ||||||
08650 | RST 24 | Get the present character and check it is a 'carriage return'. | |||||
08651 | CP 13 | ||||||
08653 | RET Z | Return if it is. | |||||
Report C - Nonsense in BASIC.
|
|||||||
08654 | RST 8 | Call the error handling routine. | |||||
08655 | DEFB 11 | ||||||
Come here if the INPUT line starts with 'STOP'.
|
|||||||
IN_STOP | 08656 | CALL SYNTAX_Z | But do not give the error report on the syntax-pass. | ||||
08659 | RET Z | ||||||
Report H - STOP in INPUT.
|
|||||||
08660 | RST 8 | Call the error handling routine. | |||||
08661 | DEFB 16 |
Prev: 08329 | Up: Map |