Routines
Prev: C172 Up: Map Next: C753
C36B: Handler: Hong Kong
Handler_HongKong C36B CALL HongKong_Initialise_5
C36E LD A,($7207)
C371 CP $05
C373 RET NC
C374 LD A,$06
C376 LD ($99AA),A
C379 LD HL,($99E3)
C37C LD DE,$0038
C37F ADD HL,DE
C380 LD A,$E0
C382 CP L
C383 JR NZ,Handler_HongKong_0
C385 LD HL,$7690
Handler_HongKong_0 C388 LD ($99E3),HL
C38B BIT 7,(HL)
C38D JR Z,Handler_HongKong_5
C38F CALL $9439
C392 LD IX,($99E3)
C396 LD E,(IX+$06)
C399 BIT 5,E
C39B JR NZ,Handler_HongKong_2
C39D LD L,(IX+$04)
C3A0 LD H,(IX+$05)
C3A3 CALL $9604
C3A6 LD A,(IX+$03)
C3A9 JR NZ,Handler_HongKong_1
C3AB RES 7,(IX+$00)
C3AF JP $9942
Handler_HongKong_1 C3B2 CALL Handler_HongKong_6
C3B5 SET 5,E
C3B7 JR Z,Handler_HongKong_4
Handler_HongKong_2 C3B9 RES 5,(IX+$06)
C3BD LD D,$08
Handler_HongKong_3 C3BF LD HL,$C450
C3C2 LD A,(IX+$07)
C3C5 INC A
C3C6 AND $0F
C3C8 LD (IX+$07),A
C3CB LD C,A
C3CC LD B,$00
C3CE ADD HL,BC
C3CF LD A,(HL)
C3D0 CP (IX+$06)
C3D3 JP Z,$9926
C3D6 LD E,A
C3D7 CALL Handler_HongKong_6
C3DA JR Z,Handler_HongKong_4
C3DC DEC D
C3DD JR NZ,Handler_HongKong_3
C3DF SET 5,(IX+$06)
C3E3 RET
Handler_HongKong_4 C3E4 LD (IX+$04),L
C3E7 LD (IX+$05),H
C3EA SET 5,E
C3EC LD (IX+$06),E
C3EF CALL $9926
C3F2 CALL $9619
C3F5 CP $F0
C3F7 RET C
C3F8 LD IX,($99E3)
C3FC JP $994D
Handler_HongKong_5 C3FF CALL $9439
C402 CALL $9619
C405 CP $0F
C407 RET NC
C408 LD IX,($99E3)
C40C LD H,$78
C40E ADD A,A
C40F AND $1E
C411 ADD A,$D4
C413 LD L,A
C414 LD A,$08
C416 CALL $9378
C419 AND $60
C41B RET NZ
C41C LD (IX+$00),$80
C420 LD (IX+$04),L
C423 LD (IX+$05),H
C426 LD (IX+$06),$28
C42A LD A,($99A5)
C42D AND $09
C42F LD (IX+$07),A
C432 JP $9929
Handler_HongKong_6 C435 LD L,(IX+$01)
C438 LD H,(IX+$02)
C43B CALL $9378
C43E AND $60
C440 RET Z
C441 PUSH AF
C442 AND $40
C444 JR Z,Handler_HongKong_7
C446 LD A,($7200)
C449 OR $10
C44B LD ($7200),A
Handler_HongKong_7 C44E POP AF
C44F RET
C450 EX AF,AF'
C451 EX AF,AF'
C452 EX AF,AF'
C453 EX AF,AF'
C454 NOP
C455 NOP
C456 JR Handler_HongKong_9
C458 EX AF,AF'
C459 EX AF,AF'
C45A EX AF,AF'
C45B DJNZ Handler_HongKong_10
C45D JR Handler_HongKong_8
Handler_HongKong_8 C45F EX AF,AF'
C460 LD B,C
C461 LD L,B
C462 JR NZ,Handler_HongKong_15
C464 LD L,A
C465 INC L
C466 JR NZ,Handler_HongKong_14
Handler_HongKong_9 C468 LD H,C
C469 LD (HL),E
C46A LD L,L
C46B LD H,C
C46C LD H,C
Handler_HongKong_10 C46D LD L,(HL)
C46E AND B
C46F NOP
C470 EX AF,AF'
C471 INC E
C472 EX AF,AF'
C473 RRA
C474 LD A,(BC)
C475 LD (BC),A
C476 RLCA
C477 NOP
C478 EX AF,AF'
C479 INC E
C47A EX AF,AF'
C47B CALL M,$A028
C47E RET P
C47F LD (BC),A
C480 NOP
C481 RRCA
C482 NOP
C483 INC BC
C484 NOP
C485 NOP
C486 NOP
C487 AND B
C488 ADD A,B
C489 RET M
C48A ADD A,B
C48B RET PO
C48C ADD A,B
C48D ADD A,B
C48E NOP
C48F NOP
C490 LD BC,$0700
C493 NOP
C494 EX AF,AF'
C495 INC D
C496 DAA
C497 NOP
C498 RET NZ
C499 NOP
C49A RET P
C49B NOP
C49C NOP
C49D RET PO
C49E LD D,B
C49F DEC B
C4A0 DEC B
C4A1 DEC B
C4A2 RLCA
C4A3 EX AF,AF'
C4A4 EX AF,AF'
C4A5 DJNZ Handler_HongKong_11
Handler_HongKong_11 C4A7 LD D,B
C4A8 JR NZ,Handler_HongKong_16
C4AA ADD A,B
C4AB ADD A,B
C4AC LD B,B
C4AD JR NC,Handler_HongKong_12
Handler_HongKong_12 C4AF NOP
C4B0 NOP
C4B1 RRCA
C4B2 DJNZ Handler_HongKong_13
C4B4 NOP
C4B5 RRCA
C4B6 NOP
C4B7 NOP
C4B8 NOP
C4B9 RET M
C4BA INC B
Handler_HongKong_13 C4BB RET P
Handler_HongKong_14 C4BC ADD A,B
C4BD RET M
C4BE ADD A,B
C4BF EX AF,AF'
C4C0 EX AF,AF'
C4C1 DEC BC
C4C2 INC B
C4C3 NOP
C4C4 CCF
C4C5 NOP
C4C6 NOP
C4C7 ADD A,B
C4C8 SUB B
C4C9 RET PE
C4CA ADC A,B
C4CB ADC A,B
C4CC CP $00
C4CE NOP
C4CF NOP
C4D0 EX AF,AF'
C4D1 INC E
C4D2 LD HL,($081C)
C4D5 EX AF,AF'
C4D6 NOP
Handler_HongKong_15 C4D7 NOP
C4D8 INC C
C4D9 EX AF,AF'
C4DA LD A,$08
C4DC INC D
C4DD LD ($0000),HL
C4E0 LD A,(HL)
C4E1 JR NZ,Handler_HongKong_17
C4E3 INC H
C4E4 INC H
C4E5 LD C,B
C4E6 NOP
C4E7 NOP
C4E8 NOP
C4E9 NOP
Handler_HongKong_16 C4EA NOP
C4EB NOP
C4EC NOP
C4ED NOP
C4EE NOP
C4EF NOP
C4F0 LD (BC),A
C4F1 LD BC,$0100
C4F4 INC BC
C4F5 INC BC
C4F6 INC BC
C4F7 LD (BC),A
C4F8 LD (BC),A
C4F9 LD (BC),A
C4FA NOP
C4FB NOP
C4FC NOP
C4FD NOP
C4FE NOP
C4FF LD A,(HL)
C500 RST $38
C501 RST $38
C502 RST $38
C503 LD H,(HL)
C504 RST $38
C505 RST $38
C506 SBC A,C
C507 CP E
C508 RST $38
C509 XOR E
C50A LD A,(HL)
C50B RST $38
C50C LD B,D
C50D RST $38
C50E LD A,(HL)
C50F NOP
C510 JR NZ,$C492
C512 NOP
C513 ADD A,B
C514 RET NZ
C515 RET NZ
C516 LD B,B
C517 LD B,B
C518 LD B,B
C519 LD B,B
C51A NOP
C51B NOP
C51C NOP
C51D NOP
C51E NOP
Handler_HongKong_17 C51F LD BC,$A201
C522 AND D
C523 RRA
C524 LD DE,$1918
C527 INC D
C528 DEC D
C529 JR Handler_HongKong_18
C52B RLA
C52C LD (DE),A
C52D INC DE
C52E LD D,$17
C530 RST $38
C531 RRA
C532 LD D,$17
C534 CPL
C535 INC D
C536 DEC D
C537 DJNZ Handler_HongKong_19
C539 RLA
C53A LD A,(DE)
C53B DEC DE
C53C RST $38
C53D RRA
C53E JR Handler_HongKong_21
C540 INC D
C541 DEC D
C542 JR Handler_HongKong_20
Handler_HongKong_18 C544 LD DE,$162F
C547 RLA
C548 LD (DE),A
C549 INC DE
Handler_HongKong_19 C54A RST $38
C54B LD C,A
C54C LD A,(DE)
C54D DEC DE
C54E LD D,$17
C550 LD A,(DE)
C551 LD (DE),A
C552 INC DE
C553 CPL
Handler_HongKong_20 C554 LD DE,$1918
C557 INC E
C558 RST $38
Handler_HongKong_21 C559 SBC A,A
C55A JR Handler_HongKong_23
C55C CPL
C55D INC DE
C55E LD A,(DE)
C55F DEC DE
C560 RRA
C561 DJNZ Handler_HongKong_22
C563 RST $38
C564 LD C,A
C565 INC E
C566 DEC E
C567 LD E,$1A
C569 DEC DE
C56A CPL
C56B DEC E
C56C LD E,$1C
C56E DEC E
C56F LD (DE),A
C570 INC DE
C571 LD E,$1D
C573 RST $38
Handler_HongKong_22 C574 LD E,A
Handler_HongKong_23 C575 INC D
C576 DEC D
C577 LD L,A
C578 INC D
C579 DEC D
C57A RST $38
C57B LD E,A
C57C DJNZ Handler_HongKong_24
C57E LD D,$17
C580 LD C,A
C581 DEC E
C582 LD E,$16
C584 RLA
C585 INC E
C586 RST $38
C587 INC D
C588 DEC D
C589 JR $C5A4
C58B LD (DE),A
C58C INC DE
C58D LD A,(DE)
C58E DEC DE
Handler_HongKong_24 C58F CPL
C590 DJNZ Handler_HongKong_25
C592 INC D
C593 DEC D
C594 JR $C5AF
C596 RST $38
C597 RRA
C598 LD D,$17
C59A LD A,(DE)
C59B DEC DE
C59C LD D,$17
C59E LD (DE),A
C59F INC DE
C5A0 CPL
C5A1 LD (DE),A
C5A2 INC DE
Handler_HongKong_25 C5A3 LD D,$17
C5A5 LD A,(DE)
C5A6 DEC DE
C5A7 RST $38
C5A8 CPL
C5A9 DEC E
C5AA DJNZ Handler_HongKong_26
C5AC INC D
C5AD DEC D
C5AE JR $C5C9
C5B0 RST $38
C5B1 CP A
C5B2 LD (DE),A
C5B3 INC DE
C5B4 LD D,$17
C5B6 DJNZ $C5C9
C5B8 CPL
C5B9 DJNZ $C5CC
C5BB JR Handler_HongKong_27
Handler_HongKong_26 C5BD RST $38
C5BE SBC A,A
C5BF LD (DE),A
C5C0 INC DE
C5C1 CPL
C5C2 LD (DE),A
C5C3 INC DE
C5C4 INC D
C5C5 DEC D
C5C6 JR Handler_HongKong_29
C5C8 DJNZ Handler_HongKong_28
C5CA RST $38
C5CB JR Handler_HongKong_30
C5CD SBC A,A
C5CE LD D,$17
C5D0 LD A,(DE)
C5D1 DEC DE
C5D2 LD (DE),A
C5D3 INC DE
C5D4 RST $18
C5D5 INC E
Handler_HongKong_27 C5D6 LD E,$1A
C5D8 DEC DE
C5D9 DEC E
C5DA INC E
Handler_HongKong_28 C5DB LD E,$FF
C5DD RST $38
C5DE LD L,A
C5DF DEC L
C5E0 INC E
Handler_HongKong_29 C5E1 LD E,$1D
C5E3 RST $38
C5E4 CCF
C5E5 INC D
Handler_HongKong_30 C5E6 DEC D
C5E7 DJNZ Handler_HongKong_31
C5E9 JR Handler_HongKong_32
C5EB INC D
C5EC CPL
C5ED LD E,$1C
C5EF DEC E
C5F0 INC E
C5F1 LD E,$FF
C5F3 CPL
C5F4 JR Handler_HongKong_33
C5F6 RLA
C5F7 LD (DE),A
C5F8 INC DE
C5F9 LD A,(DE)
Handler_HongKong_31 C5FA DEC DE
C5FB LD D,$FF
C5FD SBC A,A
C5FE LD A,(DE)
C5FF DEC DE
C600 LD (DE),A
C601 INC DE
C602 LD D,$17
Handler_HongKong_32 C604 LD (DE),A
C605 INC DE
C606 RRA
C607 NOP
C608 SUB $70
C60A XOR $D4
Handler_HongKong_33 C60C LD L,B
C60D AND $47
C60F LD SP,HL
Handler_HongKong_34 C610 JP P,$886A
C613 LD E,C
C614 OR $16
C616 DAA
C617 LD H,E
C618 JR C,Handler_HongKong_34
C61A LD D,$54
C61C DAA
C61D LD H,E
C61E OR $46
C620 LD D,H
C621 DAA
C622 LD D,B
C623 INC DE
C624 OR $96
C626 DAA
C627 LD D,B
C628 LD D,$25
C62A OR $46
C62C LD SP,$6427
C62F DEC H
C630 INC H
C631 OR $56
C633 DAA
C634 LD H,(HL)
C635 DEC H
C636 OR $56
C638 INC HL
C639 DAA
C63A LD B,(HL)
C63B DAA
C63C DEC H
C63D RLA
C63E OR $48
C640 LD B,E
C641 ADD A,L
C642 OR $16
C644 ADC A,B
C645 ADD A,L
C646 OR $16
C648 JR Z,Handler_HongKong_36
C64A OR $B6
C64C LD C,C
C64D LD ($F661),HL
C650 SUB (HL)
C651 LD ($6341),HL
C654 OR $24
C656 SUB (HL)
C657 LD H,E
C658 SUB $25
C65A INC H
C65B DEC (HL)
C65C OR $C6
C65E INC H
C65F HALT
C660 LD E,B
C661 OR $36
C663 LD (HL),H
C664 LD A,B
C665 OR $26
C667 DJNZ $C6DD
C669 OR $96
C66B SUB B
C66C NOP
C66D LD (HL),$40
C66F LD L,$40
C671 LD (HL),$4C
C673 LD (HL),$60
C675 LD E,$04
C677 LD A,(BC)
C678 LD C,H
C679 LD A,$50
C67B LD A,(BC)
C67C JR $C688
C67E LD D,B
C67F LD A,(DE)
C680 EX AF,AF'
C681 LD D,$3C
C683 LD B,D
C684 LD B,B
C685 LD B,D
C686 LD B,B
C687 LD HL,($3260)
C68A LD H,B
C68B LD ($0A3C),A
C68E INC H
C68F LD A,(DE)
C690 INC (HL)
C691 LD E,$6C
C693 LD A,(BC)
C694 INC E
C695 LD D,$48
C697 LD A,($2A44)
C69A LD E,B
C69B LD H,$00
This entry point is used by the routine at HongKong_Initialise.
Handler_HongKong_35 C69D CALL $9619
C6A0 AND $3C
C6A2 LD E,A
C6A3 LD D,$00
C6A5 LD HL,$7530
C6A8 ADD HL,DE
C6A9 CALL $9619
C6AC AND $1C
C6AE LD B,A
C6AF LD IX,$7639
Handler_HongKong_36 C6B3 ADD IX,DE
C6B5 ADD A,E
C6B6 CP $70
C6B8 JR C,Handler_HongKong_37
C6BA LD A,$70
C6BC SUB E
C6BD LD B,A
Handler_HongKong_37 C6BE LD A,($99A5)
C6C1 BIT 7,A
C6C3 JR Z,Handler_HongKong_41
C6C5 LD DE,$00B0
C6C8 ADD HL,DE
C6C9 LD DE,$FFA8
C6CC LD A,(IX-$01)
C6CF SUB (IX+$00)
C6D2 CP $01
C6D4 RET Z
Handler_HongKong_38 C6D5 LD A,(IX+$00)
C6D8 CP $F8
C6DA JR Z,Handler_HongKong_39
C6DC DEC (IX+$00)
C6DF PUSH HL
C6E0 SLA (HL)
C6E2 PUSH AF
C6E3 ADD HL,DE
C6E4 POP AF
C6E5 RL (HL)
C6E7 PUSH AF
C6E8 ADD HL,DE
C6E9 POP AF
C6EA RL (HL)
C6EC POP HL
Handler_HongKong_39 C6ED INC HL
C6EE INC IX
C6F0 LD A,$20
C6F2 CP L
C6F3 JR Z,Handler_HongKong_40
C6F5 DJNZ Handler_HongKong_38
C6F7 LD A,(IX+$00)
C6FA SUB (IX-$01)
C6FD CP $02
C6FF RET NZ
C700 LD B,$01
C702 JR Handler_HongKong_38
Handler_HongKong_40 C704 LD A,(IX+$00)
C707 CP $FA
C709 RET Z
C70A LD B,$10
C70C JR Handler_HongKong_38
Handler_HongKong_41 C70E LD A,(IX+$00)
C711 SUB (IX-$01)
C714 CP $01
C716 RET Z
C717 LD DE,$0058
Handler_HongKong_42 C71A LD A,(IX+$00)
C71D CP $08
C71F JR Z,Handler_HongKong_43
C721 INC (IX+$00)
C724 PUSH HL
C725 SRL (HL)
C727 PUSH AF
C728 ADD HL,DE
C729 POP AF
C72A RR (HL)
C72C PUSH AF
C72D ADD HL,DE
C72E POP AF
C72F RR (HL)
C731 POP HL
Handler_HongKong_43 C732 INC HL
C733 INC IX
C735 LD A,$70
C737 CP L
C738 JR Z,Handler_HongKong_44
C73A DJNZ Handler_HongKong_42
C73C LD A,(IX+$00)
C73F SUB (IX-$01)
C742 CP $FE
C744 RET NZ
C745 LD B,$01
C747 JR Handler_HongKong_42
Handler_HongKong_44 C749 LD A,(IX+$00)
C74C CP $06
C74E RET Z
C74F LD B,$10
C751 JR Handler_HongKong_42
Prev: C172 Up: Map Next: C753