Routines
Prev: B787 Up: Map Next: B7B8
B7A3: Check if we've run out of time
Used by the routines at B140 and B787.
B7A3 LD HL,$A425 Get time
B7A6 LD DE,$A8BC Get "end of day" time
B7A9 LD B,$05 Five character to check
B7AB LD A,(DE) Get next character
B7AC CP (HL) Is there a match?
B7AD RET NZ Return if not
B7AE INC HL Next time character
B7AF INC DE Next check character
B7B0 DJNZ $B7AB Loop to check more
B7B2 XOR A Set zero flag
B7B3 POP HL "Throw exception" and bypass stack calls
B7B4 POP HL
B7B5 LD A,$80 Signal "out of time"
B7B7 RET Bail out
Prev: B787 Up: Map Next: B7B8