Prev: 09467 Up: Map Next: 09506
This subroutine is used by S_QUOTE to check that every string quote is matched by another one.
BC Current string length counter
BC Updated string length counter
F Zero flag set if two consecutive '"' characters are found
S_QUOTE_S 09487 CALL CH_ADD_1 Point to the next character.
09490 INC BC Increase the length count by one.
09491 CP 13 Is it a carriage return?
09493 JP Z,REPORT_C Report the error if so.
09496 CP "\"" Is it another '"'?
09498 JR NZ,S_QUOTE_S Loop back if it is not.
09500 CALL CH_ADD_1 Point to next character.
09503 CP "\"" Set zero flag if it is another '"'.
09505 RET Finished.
Prev: 09467 Up: Map Next: 09506