Routines
28877: Close any temporarily open doors if necessary
Used by routine at 63156
| 28877 |
3AF67F |
LD A,(32758) |
| 28880 |
FE04 |
CP 4 |
| 28882 |
C0 |
RET NZ |
| 28883 |
3AF47F |
LD A,(32756) |
| 28886 |
213E01 |
LD HL,318 |
| 28889 |
CB47 |
BIT 0,A |
| 28891 |
C4EC70 |
CALL NZ,28908 |
| 28894 |
214002 |
LD HL,576 |
| 28897 |
CB4F |
BIT 1,A |
| 28899 |
C4EC70 |
CALL NZ,28908 |
| 28902 |
CB57 |
BIT 2,A |
| 28904 |
C8 |
RET Z |
| 28905 |
214204 |
LD HL,1090 |
| 28908 |
E5 |
PUSH HL |
| 28909 |
26B9 |
LD H,185 |
| 28911 |
7E |
LD A,(HL) |
| 28912 |
2C |
INC L |
| 28913 |
56 |
LD D,(HL) |
| 28914 |
3D |
DEC A |
| 28915 |
4F |
LD C,A |
| 28916 |
C603 |
ADD A,3 |
| 28918 |
5F |
LD E,A |
| 28919 |
2101B7 |
LD HL,46849 |
| 28922 |
0620 |
LD B,32 |
| 28924 |
7E |
LD A,(HL) |
| 28925 |
B9 |
CP C |
| 28926 |
380B |
JR C,28939 |
| 28928 |
BB |
CP E |
| 28929 |
3008 |
JR NC,28939 |
| 28931 |
2C |
INC L |
| 28932 |
7A |
LD A,D |
| 28933 |
96 |
SUB (HL) |
| 28934 |
2D |
DEC L |
| 28935 |
FE02 |
CP 2 |
| 28937 |
3804 |
JR C,28943 |
| 28939 |
24 |
INC H |
| 28940 |
10EE |
DJNZ 28924 |
| 28942 |
A7 |
AND A |
| 28943 |
E1 |
POP HL |
| 28944 |
7C |
LD A,H |
| 28945 |
D44070 |
CALL NC,28736 |
| 28948 |
3AF47F |
LD A,(32756) |
| 28951 |
C9 |
RET |