Routines
Prev: 1855 Up: Map Next: 18C1
18B6: THE 'NUMBER' SUBROUTINE
Used by the routines at OUT_LINE and EACH_STMT.
If the A register holds the 'number marker' then the HL register pair is advanced past the floating-point form.
Input
A Character code from a BASIC line
HL Address of that character
Output
A Next character code from the line (if the current one is a number marker)
HL Address of that character
NUMBER 18B6 CP $0E Is the character a 'number marker'?
18B8 RET NZ Return if not.
18B9 INC HL Advance the pointer six times so as to step past the 'number marker' and the five locations holding the floating-point form.
18BA INC HL
18BB INC HL
18BC INC HL
18BD INC HL
18BE INC HL
18BF LD A,(HL) Fetch the current code before returning.
18C0 RET
Prev: 1855 Up: Map Next: 18C1