| Routines

04519: THE 'REMOVE-FP' SUBROUTINE

Used by the routines at MAIN_EXEC and INPUT. This subroutine removes the hidden floating-point forms in a BASIC line.
Input
HL | E-LINE or WORKSP
REMOVE_FP | 04519 | LD A,(HL) | Each character in turn is examined.
| 04520 | CP 14 | Is it a number marker?
| 04522 | LD BC,6 | It will occupy six locations.
| 04525 | CALL Z,RECLAIM_2 | Reclaim the floating point number.
| 04528 | LD A,(HL) | Fetch the code again.
| 04529 | INC HL | Update the pointer.
| 04530 | CP 13 | Is it a carriage return?
| 04532 | JR NZ,REMOVE_FP | Back if not. But make a simple return if it is.
| 04534 | RET