Routines

61463: Make EINSTEIN talk


The address of this routine is placed in bytes 9 and 10 of the buffer of the teacher who is taking ERIC's class by the routine at 61696

E Message number
H Teacher's character number (201-203)

61463 7B LD A,E A=message number
61464 320BD0 LD (53259),A Place this in byte 11 of EINSTEIN's buffer
61467 EB EX DE,HL
61468 21807F LD HL,32640
61471 CBDE SET 3,(HL) Signal: EINSTEIN is talking
61473 EB EX DE,HL
61474 2E09 LD L,9 Replace the address of this routine in bytes 9 and 10 of the teacher's buffer with 61478 (below)
61476 3626 LD (HL),38
61478 3A807F LD A,(32640)
61481 CB5F BIT 3,A Is EINSTEIN still talking?
61483 C0 RET NZ Return if so
61484 C39063 JP 25488 Let the teacher continue conducting the class