Routines
26513: Make character write one letter on a blackboard
Used by routine at 26752
This entry point is used by the routine at
24175 when ERIC's writing on a board:
| 26516 |
4F |
LD C,A |
| 26517 |
CD5567 |
CALL 26453 |
| 26520 |
79 |
LD A,C |
| 26521 |
48 |
LD C,B |
| 26522 |
067F |
LD B,127 |
| 26524 |
A7 |
AND A |
| 26525 |
2004 |
JR NZ,26531 |
| 26527 |
3D |
DEC A |
| 26528 |
02 |
LD (BC),A |
| 26529 |
3C |
INC A |
| 26530 |
C9 |
RET |
| 26531 |
FE02 |
CP 2 |
| 26533 |
2004 |
JR NZ,26539 |
| 26535 |
3E40 |
LD A,64 |
| 26537 |
18F5 |
JR 26528 |
| 26539 |
E5 |
PUSH HL |
| 26540 |
6F |
LD L,A |
| 26541 |
26D7 |
LD H,215 |
| 26543 |
0A |
LD A,(BC) |
| 26544 |
E63F |
AND 63 |
| 26546 |
C6C0 |
ADD A,192 |
| 26548 |
37 |
SCF |
| 26549 |
8E |
ADC A,(HL) |
| 26550 |
0A |
LD A,(BC) |
| 26551 |
3004 |
JR NC,26557 |
| 26553 |
2F |
CPL |
| 26554 |
E640 |
AND 64 |
| 26556 |
02 |
LD (BC),A |
| 26557 |
0F |
RRCA |
| 26558 |
0F |
RRCA |
| 26559 |
0F |
RRCA |
| 26560 |
E60F |
AND 15 |
| 26562 |
FE08 |
CP 8 |
| 26564 |
3803 |
JR C,26569 |
| 26566 |
14 |
INC D |
| 26567 |
E607 |
AND 7 |
| 26569 |
83 |
ADD A,E |
| 26570 |
5F |
LD E,A |
| 26571 |
CD0C67 |
CALL 26380 |
| 26574 |
0A |
LD A,(BC) |
| 26575 |
E607 |
AND 7 |
| 26577 |
87 |
ADD A,A |
| 26578 |
87 |
ADD A,A |
| 26579 |
87 |
ADD A,A |
| 26580 |
2F |
CPL |
| 26581 |
D641 |
SUB 65 |
| 26583 |
32F267 |
LD (26610),A |
| 26586 |
0A |
LD A,(BC) |
| 26587 |
86 |
ADD A,(HL) |
| 26588 |
3C |
INC A |
| 26589 |
02 |
LD (BC),A |
| 26590 |
4E |
LD C,(HL) |
| 26591 |
EB |
EX DE,HL |
| 26592 |
7C |
LD A,H |
| 26593 |
26B5 |
LD H,181 |
| 26595 |
6E |
LD L,(HL) |
| 26596 |
C6A0 |
ADD A,160 |
| 26598 |
67 |
LD H,A |
| 26599 |
6E |
LD L,(HL) |
| 26600 |
2680 |
LD H,128 |
| 26602 |
14 |
INC D |
| 26603 |
1A |
LD A,(DE) |
| 26604 |
0608 |
LD B,8 |
| 26606 |
07 |
RLCA |
| 26607 |
3002 |
JR NC,26611 |
| 26609 |
CBx |
RES n,(HL) |
| 26611 |
24 |
INC H |
| 26612 |
10F8 |
DJNZ 26606 |
| 26614 |
3AF267 |
LD A,(26610) |
| 26617 |
F640 |
OR 64 |
| 26619 |
D608 |
SUB 8 |
| 26621 |
E6BF |
AND 191 |
| 26623 |
32F267 |
LD (26610),A |
| 26626 |
FEBE |
CP 190 |
| 26628 |
2001 |
JR NZ,26631 |
| 26630 |
2C |
INC L |
| 26631 |
0D |
DEC C |
| 26632 |
20DE |
JR NZ,26600 |
| 26634 |
0C |
INC C |
| 26635 |
E1 |
POP HL |
| 26636 |
C9 |
RET |