Routines

62620: Wait till all boys/girls have gone past gate or door


Used by table of A&P number 76

H 205 (ALBERT)

62620 2E01 LD L,1
62622 5E LD E,(HL) E=ALBERT's x-coordinate
62623 26D1 LD H,209 209=HAYLEY
62625 7E LD A,(HL) A=HAYLEY's x-coordinate
62626 26B6 LD H,182
62628 0604 LD B,4 4 little girls (183-186) who sometimes venture past skool gate
62630 1801 JR 62633
62632 7E LD A,(HL)
62633 FE88 CP 136 Is this girl on the right side of the gate?
62635 D8 RET C Return if not
62636 24 INC H Next girl
62637 10F9 DJNZ 62632 Jump back until HAYLEY and girls 1-4 have been checked

HAYLEY and the girls are safely on the right side of the gate. Now check the boys.
62639 7B LD A,E A=ALBERT's x-coordinate
62640 D602 SUB 2
62642 26D2 LD H,210 210=ERIC
62644 BE CP (HL) Is ERIC at least 2 spaces to the left of ALBERT?
62645 D8 RET C Return if not
62646 26C1 LD H,193 193=little boy no. 4
62648 060B LD B,11 7 little boys and 4 male teachers
62650 BE CP (HL) Is this character at least 2 spaces to the left of ALBERT?
62651 D8 RET C Return if not
62652 24 INC H Next character
62653 10FB DJNZ 62650 Jump back until the boys and teachers have been checked
62655 26CE LD H,206 206=BOY WANDER
62657 0603 LD B,3 BOY WANDER, ANGELFACE and EINSTEIN
62659 BE CP (HL) Is this character at least 2 spaces to the left of ALBERT?
62660 D8 RET C Return if not
62661 24 INC H Next character
62662 10FB DJNZ 62659 Jump back until the three main kids have been checked
62664 C38C63 JP 25484 Move to the next instruction in the table of A&P (at last)