| Routines

250F: THE 'SCANNING QUOTES' SUBROUTINE

This subroutine is used by S_QUOTE to check that every string quote is matched by another one.
Input
BC | Current string length counter
Output
BC | Updated string length counter
F | Zero flag set if two consecutive '"' characters are found
S_QUOTE_S | 250F | CALL CH_ADD_1 | Point to the next character.
| 2512 | INC BC | Increase the length count by one.
| 2513 | CP $0D | Is it a carriage return?
| 2515 | JP Z,REPORT_C | Report the error if so.
| 2518 | CP "\"" | Is it another '"'?
| 251A | JR NZ,S_QUOTE_S | Loop back if it is not.
| 251C | CALL CH_ADD_1 | Point to next character.
| 251F | CP "\"" | Set zero flag if it is another '"'.
| 2521 | RET | Finished.