| HongKong_Initialise |
C172 |
LD HL,$6241 |
|
C175 |
LD DE,$0006 |
| HongKong_Initialise_0 |
C178 |
LD A,(HL) |
|
C179 |
CP $00 |
|
C17B |
JR Z,HongKong_Initialise_1 |
|
C17D |
LD (HL),$07 |
| HongKong_Initialise_1 |
C17F |
ADD HL,DE |
|
C180 |
LD A,$72 |
|
C182 |
CP H |
|
C183 |
JR NZ,HongKong_Initialise_0 |
|
C185 |
LD IX,$7240 |
|
C189 |
LD B,$0A |
|
C18B |
LD HL,$7530 |
|
C18E |
LD A,$FE |
|
C190 |
LD DE,$C51F |
|
C193 |
CALL HongKong_Initialise_4 |
|
C196 |
LD IX,$7338 |
|
C19A |
LD HL,$7588 |
|
C19D |
LD A,$FE |
|
C19F |
LD B,$0A |
|
C1A1 |
LD DE,$C521 |
|
C1A4 |
CALL HongKong_Initialise_4 |
|
C1A7 |
LD IX,$7430 |
|
C1AB |
LD HL,$75E0 |
|
C1AE |
LD A,$FE |
|
C1B0 |
LD B,$0A |
|
C1B2 |
LD DE,$C51F |
|
C1B5 |
CALL HongKong_Initialise_4 |
|
C1B8 |
LD HL,$7588 |
|
C1BB |
LD B,$20 |
|
C1BD |
LD (HL),$3C |
| HongKong_Initialise_2 |
C1BF |
INC HL |
|
C1C0 |
LD (HL),$BD |
|
C1C2 |
INC HL |
|
C1C3 |
LD (HL),$7E |
|
C1C5 |
DJNZ HongKong_Initialise_2 |
|
C1C7 |
LD HL,$7230 |
|
C1CA |
LD ($7239),HL |
|
C1CD |
LD HL,$7638 |
|
C1D0 |
LD (HL),$80 |
|
C1D2 |
LD A,$A0 |
|
C1D4 |
LD ($723B),A |
|
C1D7 |
LD DE,$7570 |
|
C1DA |
LD HL,$C4EF |
|
C1DD |
CALL HongKong_Initialise_3 |
|
C1E0 |
LD DE,$75C8 |
|
C1E3 |
CALL HongKong_Initialise_3 |
|
C1E6 |
LD DE,$7620 |
| HongKong_Initialise_3 |
C1E9 |
LD BC,$0010 |
|
C1EC |
LDIR |
|
C1EE |
RET |
| HongKong_Initialise_4 |
C1EF |
PUSH BC |
|
C1F0 |
LD (IX+$08),A |
|
C1F3 |
LD (IX+$00),L |
|
C1F6 |
LD (IX+$01),H |
|
C1F9 |
LD (IX+$02),$01 |
|
C1FD |
LD (IX+$03),$01 |
|
C201 |
LD (IX+$04),E |
|
C204 |
LD (IX+$05),D |
|
C207 |
LD BC,$0018 |
|
C20A |
ADD IX,BC |
|
C20C |
SUB $08 |
|
C20E |
LD BC,$0008 |
|
C211 |
ADD HL,BC |
|
C212 |
POP BC |
|
C213 |
DJNZ HongKong_Initialise_4 |
|
C215 |
LD (IX-$15),$02 |
|
C219 |
RET |
| HongKong_Initialise_5 |
C21A |
LD HL,($7239) |
|
C21D |
LD DE,$0018 |
|
C220 |
ADD HL,DE |
|
C221 |
LD A,$38 |
|
C223 |
CP L |
|
C224 |
JR NZ,HongKong_Initialise_6 |
|
C226 |
CALL Handler_HongKong_35 |
|
C229 |
LD HL,$7248 |
| HongKong_Initialise_6 |
C22C |
LD ($7239),HL |
|
C22F |
LD A,$20 |
|
C231 |
CP L |
|
C232 |
LD A,$02 |
|
C234 |
JR NZ,HongKong_Initialise_7 |
|
C236 |
LD A,$06 |
| HongKong_Initialise_7 |
C238 |
LD ($99AA),A |
|
C23B |
LD B,$03 |
|
C23D |
LD A,(HL) |
|
C23E |
CP $A8 |
|
C240 |
JP NC,HongKong_Initialise_24 |
|
C243 |
CP $10 |
|
C245 |
JP Z,HongKong_Initialise_19 |
|
C248 |
LD ($99E7),HL |
|
C24B |
CALL HongKong_Initialise_22 |
|
C24E |
CALL HongKong_Initialise_9 |
|
C251 |
LD HL,($99E7) |
|
C254 |
LD B,$03 |
| HongKong_Initialise_8 |
C256 |
PUSH BC |
|
C257 |
LD ($99E7),HL |
|
C25A |
LD BC,$FFF8 |
|
C25D |
ADD HL,BC |
|
C25E |
LD ($99E9),HL |
|
C261 |
CALL HongKong_Initialise_18 |
|
C264 |
LD HL,($99E7) |
|
C267 |
LD BC,$00F8 |
|
C26A |
ADD HL,BC |
|
C26B |
POP BC |
|
C26C |
DJNZ HongKong_Initialise_8 |
|
C26E |
RET |
| HongKong_Initialise_9 |
C26F |
LD IX,($7239) |
|
C273 |
LD B,$03 |
|
C275 |
LD A,(IX+$00) |
|
C278 |
AND $07 |
|
C27A |
RET NZ |
| HongKong_Initialise_10 |
C27B |
PUSH BC |
|
C27C |
LD D,$E7 |
|
C27E |
BIT 0,B |
|
C280 |
JR Z,HongKong_Initialise_11 |
|
C282 |
LD D,$0F |
|
C284 |
BIT 1,B |
|
C286 |
JR NZ,HongKong_Initialise_11 |
|
C288 |
LD D,$F0 |
| HongKong_Initialise_11 |
C28A |
LD L,(IX-$08) |
|
C28D |
LD H,(IX-$07) |
|
C290 |
LD C,(IX-$05) |
|
C293 |
LD E,$40 |
|
C295 |
LD B,$08 |
|
C297 |
BIT 0,C |
|
C299 |
JR NZ,HongKong_Initialise_12 |
|
C29B |
LD B,$10 |
| HongKong_Initialise_12 |
C29D |
LD A,$00 |
| HongKong_Initialise_13 |
C29F |
OR (HL) |
|
C2A0 |
AND D |
|
C2A1 |
JR NZ,HongKong_Initialise_14 |
|
C2A3 |
INC HL |
|
C2A4 |
DJNZ HongKong_Initialise_13 |
|
C2A6 |
LD HL,$C51F |
|
C2A9 |
JR HongKong_Initialise_17 |
| HongKong_Initialise_14 |
C2AB |
LD L,(IX+$04) |
|
C2AE |
LD H,(IX+$05) |
|
C2B1 |
LD D,$00 |
|
C2B3 |
ADD HL,DE |
|
C2B4 |
LD D,(HL) |
|
C2B5 |
INC HL |
|
C2B6 |
LD E,(HL) |
|
C2B7 |
LD A,(DE) |
|
C2B8 |
AND $E0 |
|
C2BA |
JR Z,HongKong_Initialise_16 |
|
C2BC |
CP $A0 |
|
C2BE |
JR Z,HongKong_Initialise_16 |
|
C2C0 |
BIT 6,A |
|
C2C2 |
JR Z,HongKong_Initialise_15 |
|
C2C4 |
LD HL,$7200 |
|
C2C7 |
SET 4,(HL) |
| HongKong_Initialise_15 |
C2C9 |
POP BC |
|
C2CA |
POP HL |
|
C2CB |
LD HL,($7239) |
|
C2CE |
LD DE,$FFE8 |
|
C2D1 |
ADD HL,DE |
|
C2D2 |
LD ($7239),HL |
|
C2D5 |
RET |
| HongKong_Initialise_16 |
C2D6 |
LD HL,$C521 |
|
C2D9 |
LD E,$80 |
|
C2DB |
DEC C |
|
C2DC |
JR NZ,HongKong_Initialise_14 |
| HongKong_Initialise_17 |
C2DE |
LD (IX-$04),L |
|
C2E1 |
LD (IX-$03),H |
|
C2E4 |
LD DE,$00F8 |
|
C2E7 |
ADD IX,DE |
|
C2E9 |
POP BC |
|
C2EA |
DJNZ HongKong_Initialise_10 |
|
C2EC |
RET |
| HongKong_Initialise_18 |
C2ED |
CALL $980E |
|
C2F0 |
RET |
| HongKong_Initialise_19 |
C2F1 |
LD A,$20 |
|
C2F3 |
CP L |
|
C2F4 |
JR NZ,HongKong_Initialise_21 |
| HongKong_Initialise_20 |
C2F6 |
CALL $9619 |
|
C2F9 |
AND $0E |
|
C2FB |
CP $0D |
|
C2FD |
JR NC,HongKong_Initialise_20 |
|
C2FF |
ADD A,$9A |
|
C301 |
LD ($723B),A |
| HongKong_Initialise_21 |
C304 |
PUSH BC |
|
C305 |
LD (HL),$FE |
|
C307 |
PUSH HL |
|
C308 |
PUSH HL |
|
C309 |
CALL $9439 |
|
C30C |
POP IX |
|
C30E |
LD BC,$FFF0 |
|
C311 |
ADD HL,BC |
|
C312 |
LD C,L |
|
C313 |
LD B,H |
|
C314 |
CALL $9403 |
|
C317 |
POP HL |
|
C318 |
LD BC,$00F8 |
|
C31B |
ADD HL,BC |
|
C31C |
POP BC |
|
C31D |
DJNZ HongKong_Initialise_21 |
|
C31F |
RET |
| HongKong_Initialise_22 |
C320 |
LD B,$09 |
|
C322 |
LD HL,$700E |
|
C325 |
LD DE,$0006 |
|
C328 |
CALL HongKong_Initialise_23 |
|
C32B |
LD HL,$70CE |
|
C32E |
LD B,$09 |
| HongKong_Initialise_23 |
C330 |
LD (HL),$01 |
|
C332 |
ADD HL,DE |
|
C333 |
DJNZ HongKong_Initialise_23 |
|
C335 |
RET |
| HongKong_Initialise_24 |
C336 |
JR NZ,HongKong_Initialise_26 |
|
C338 |
LD A,($723B) |
|
C33B |
LD C,A |
| HongKong_Initialise_25 |
C33C |
PUSH BC |
|
C33D |
DEC (HL) |
|
C33E |
DEC (HL) |
|
C33F |
PUSH HL |
|
C340 |
PUSH HL |
|
C341 |
LD A,C |
|
C342 |
CALL $9439 |
|
C345 |
POP IX |
|
C347 |
LD (IX+$05),$78 |
|
C34B |
LD (IX+$04),A |
|
C34E |
LD BC,$FFF0 |
|
C351 |
ADD HL,BC |
|
C352 |
LD B,H |
|
C353 |
LD C,L |
|
C354 |
CALL $941E |
|
C357 |
POP HL |
|
C358 |
LD BC,$00F8 |
|
C35B |
ADD HL,BC |
|
C35C |
POP BC |
|
C35D |
INC C |
|
C35E |
INC C |
|
C35F |
DJNZ HongKong_Initialise_25 |
|
C361 |
RET |
| HongKong_Initialise_26 |
C362 |
LD DE,$00F8 |
| HongKong_Initialise_27 |
C365 |
DEC (HL) |
|
C366 |
DEC (HL) |
|
C367 |
ADD HL,DE |
|
C368 |
DJNZ HongKong_Initialise_27 |
|
C36A |
RET |
