Routines
63309: Change lesson
This routine is called from the main loop at 63210
63309 |
3610 |
LD (HL),16 |
63311 |
CD58F8 |
CALL 63576 |
63314 |
2EDF |
LD L,223 |
63316 |
7E |
LD A,(HL) |
63317 |
3C |
INC A |
63318 |
F6C0 |
OR 192 |
63320 |
77 |
LD (HL),A |
63321 |
5F |
LD E,A |
63322 |
16B5 |
LD D,181 |
63324 |
1A |
LD A,(DE) |
63325 |
5F |
LD E,A |
63326 |
16D2 |
LD D,210 |
63328 |
1A |
LD A,(DE) |
63329 |
2C |
INC L |
63330 |
77 |
LD (HL),A |
63331 |
15 |
DEC D |
We now enter a loop to transfer the address of a table of A&P into each character's
buffer.
63332 |
62 |
LD H,D |
63333 |
1A |
LD A,(DE) |
63334 |
D9 |
EXX |
63335 |
26E8 |
LD H,232 |
63337 |
6F |
LD L,A |
63338 |
7E |
LD A,(HL) |
63339 |
2C |
INC L |
63340 |
D9 |
EXX |
63341 |
2E1B |
LD L,27 |
63343 |
77 |
LD (HL),A |
63344 |
2C |
INC L |
63345 |
D9 |
EXX |
63346 |
7E |
LD A,(HL) |
63347 |
D9 |
EXX |
63348 |
77 |
LD (HL),A |
63349 |
2C |
INC L |
63350 |
CBC6 |
SET 0,(HL) |
63352 |
7C |
LD A,H |
63353 |
FEC6 |
CP 198 |
63355 |
3026 |
JR NC,63395 |
63357 |
CBDE |
SET 3,(HL) |
63359 |
D9 |
EXX |
63360 |
0601 |
LD B,1 |
63362 |
67 |
LD H,A |
63363 |
3AFF7F |
LD A,(32767) |
63366 |
FE50 |
CP 80 |
63368 |
3005 |
JR NC,63375 |
63370 |
7C |
LD A,H |
63371 |
FEBE |
CP 190 |
63373 |
1810 |
JR 63391 |
63375 |
FE78 |
CP 120 |
63377 |
7C |
LD A,H |
63378 |
3008 |
JR NC,63388 |
63380 |
FEC1 |
CP 193 |
63382 |
300A |
JR NC,63394 |
63384 |
FEBA |
CP 186 |
63386 |
1802 |
JR 63390 |
63388 |
FEBE |
CP 190 |
63390 |
3F |
CCF |
63391 |
DC2E62 |
CALL C,25134 |
63394 |
D9 |
EXX |
63395 |
15 |
DEC D |
63396 |
7A |
LD A,D |
63397 |
FEB6 |
CP 182 |
63399 |
20BB |
JR NZ,63332 |
63401 |
C3B17E |
JP 32433 |