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 |