Routines |
Prev: 03131 | Up: Map | Next: 03157 |
Used by the routine at PO_MSG.
|
||||||||||||||||
PO_SEARCH | 03137 | PUSH AF | Save the 'entry number'. | |||||||||||||
03138 | EX DE,HL | HL now holds the base address. | ||||||||||||||
03139 | INC A | Compensate for the 'DEC A' below. | ||||||||||||||
PO_STEP | 03140 | BIT 7,(HL) | Wait for an 'inverted character'. | |||||||||||||
03142 | INC HL | |||||||||||||||
03143 | JR Z,PO_STEP | |||||||||||||||
03145 | DEC A | Count through the entries until the correct one is found. | ||||||||||||||
03146 | JR NZ,PO_STEP | |||||||||||||||
03148 | EX DE,HL | DE points to the initial character. | ||||||||||||||
03149 | POP AF | Fetch the 'entry number' and return with carry set for the first thirty two entries. | ||||||||||||||
03150 | CP 32 | |||||||||||||||
03152 | RET C | |||||||||||||||
03153 | LD A,(DE) | However if the initial character is a letter then a leading space may be needed. | ||||||||||||||
03154 | SUB "A" | |||||||||||||||
03156 | RET |
Prev: 03131 | Up: Map | Next: 03157 |