|
Routines |
| Prev: 04496 | Up: Map | Next: 04535 |
|
This subroutine removes the hidden floating-point forms in a BASIC line.
|
||||||||
| 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 | |||||||
| Prev: 04496 | Up: Map | Next: 04535 |