Routines

62770: Set WACKER on his way to expelling ERIC


Used by routines at 29643 and 64460

62770 21807F LD HL,32640
62773 CB4E BIT 1,(HL) Is WACKER already looking for ERIC?
62775 C0 RET NZ Return if so
62776 CBCE SET 1,(HL) Signal: WACKER is looking for ERIC
62778 2EE4 LD L,228 HL=32740 (MSB of lesson time counter)
62780 36FF LD (HL),255 This lesson will not end until ERIC's expelled
62782 211BC8 LD HL,51227 Point HL at byte 27 of WACKER's buffer
62785 3630 LD (HL),48 Place the address of the table of A&P at 62768 (which contains the single routine address 62815) into bytes 27 and 28 of WACKER's buffer
62787 2C INC L
62788 36F5 LD (HL),245
62790 2C INC L L=29
62791 CBC6 SET 0,(HL) Signal: keep repeating the table of A&P (at 62768)
62793 C9 RET