Routines

61487: Give lines to EINSTEIN or the kid he grassed up


Used by routine at 61696

B Reprimand message number
C Character number of kid to give lines to
H Character number of teacher (201-203)

61487 CD9162 CALL 25233 A=random number
61490 FE54 CP 84 Shall we give lines to EINSTEIN instead?
61492 3806 JR C,61500 Jump if so
61494 79 LD A,C A=character number of kid to give lines to
61495 FED0 CP 208 Was the teacher going to give lines to EINSTEIN?
61497 C8 RET Z Return if so
61498 1804 JR 61504
61500 3ED0 LD A,208 208=EINSTEIN
61502 0655 LD B,85 Message no. 85: DON'T TELL TALES

This entry point also is used by the routine at 61696:
61504 E5 PUSH HL
61505 CD1474 CALL 29716 Give lines
61508 E1 POP HL
61509 C9 RET