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 |