![]() |
Routines |
H | Character number of teacher (163-166) |
31968 | LD A,H | L=0 (MR WACKER), 16 (MR ROCKITT), 32 (MR WITHIT), or 48 (MR CREAK) |
31969 | SUB 163 | |
31971 | ADD A,A | |
31972 | ADD A,A | |
31973 | ADD A,A | |
31974 | ADD A,A | |
31975 | LD L,A | |
31976 | CALL 24993 | Get random number in A |
31979 | CP L | |
31980 | LD L,255 | Return with L=255 if the teacher's not in the mood to give lines |
31982 | RET NC | |
31983 | JR 31904 | Make teacher give EINSTEIN lines for telling tales |