![]() |
Routines |
| Value | Meaning | 1 | MR WACKER / READING ROOM | 2 | MR WACKER / MAP ROOM | 3 | MR WACKER / WHITE ROOM | 4 | MR WACKER / EXAM ROOM | 6 | DINNER (MR WACKER) | 17 | MR ROCKITT / READING ROOM | 19 | MR ROCKITT / WHITE ROOM | 20 | MR ROCKITT / EXAM ROOM | 34 | MR WITHIT / MAP ROOM | 35 | MR WITHIT / WHITE ROOM | 38 | DINNER (MR WITHIT) | 49 | MR CREAK / READING ROOM | 51 | MR CREAK / WHITE ROOM | 69 | REVISION LIBRARY | 71 | PLAYTIME |
|---|
| 31040 | LD A,(32756) | Pick up the lesson descriptor from 32756 |
| 31043 | AND 7 | Keep only the "room" bits (bits 0-2) |
| 31045 | CP 5 | Set the zero flag if this period is REVISION LIBRARY, and set the carry flag if this is a classroom period |
| 31047 | LD DE,60720 | Point DE at the lesson box graphic buffer |
| 31050 | LD HL,55945 | 55945=' ' (single space) |
| 31053 | JR NZ,31057 | Jump if this period is not REVISION LIBRARY |
| 31055 | LD L,128 | HL=55936: 'REVISION' |
| 31057 | JR NC,31076 | Jump if this is REVISION LIBRARY, DINNER or PLAYTIME |
| 31059 | LD A,(32756) | Pick up the lesson descriptor from 32756 |
| 31062 | AND 240 | Keep only the "teacher" bits (bits 4-7) |
| 31064 | LD L,A | Point HL at the appropriate teacher's name: 55736 (MR WACKER), 55750 (MR ROCKITT), 55764 (MR WITHIT), or 55778 (MR CREAK) |
| 31065 | RRCA | |
| 31066 | RRCA | |
| 31067 | RRCA | |
| 31068 | LD H,A | |
| 31069 | LD A,L | |
| 31070 | SUB H | |
| 31071 | ADD A,184 | |
| 31073 | LD L,A | |
| 31074 | LD H,217 | |
| 31076 | CALL 30042 | Write the first line of text (' ', 'REVISION' or the teacher's name) into the lesson box graphic buffer |
| 31079 | LD A,(32756) | Pick up the lesson descriptor from 32756 |
| 31082 | AND 7 | Keep only the "room" bits (bits 0-2) |
| 31084 | ADD A,A | Point HL at the appropriate room name: 55952 (READING ROOM), 55968 (MAP ROOM), 55984 (WHITE ROOM), 56000 (EXAM ROOM), 56032 (DINNER), or 56048 (PLAYTIME) |
| 31085 | ADD A,A | |
| 31086 | ADD A,A | |
| 31087 | ADD A,A | |
| 31088 | ADD A,128 | |
| 31090 | LD L,A | |
| 31091 | LD H,218 |
| 31093 | LD DE,60800 | Point DE at the appropriate spot in the lesson box graphic buffer for the second line of text |
| 31096 | CALL 30042 | Write the second line of text into the buffer |
| 31099 | LD HL,60672 | Point HL at the start of the lesson box graphic buffer |
| 31102 | LD DE,23212 | Set DE to the attribute file address for the lesson box |
| 31105 | JP 29977 | Copy the lesson box graphic buffer to the screen |