Routines
Prev: 49478 Up: Map Next: 50027
49522: Initialise: Hong Kong
HongKong_Initialise 49522 LD HL,25153
49525 LD DE,6
HongKong_Initialise_0 49528 LD A,(HL)
49529 CP 0
49531 JR Z,HongKong_Initialise_1
49533 LD (HL),7
HongKong_Initialise_1 49535 ADD HL,DE
49536 LD A,114
49538 CP H
49539 JR NZ,HongKong_Initialise_0
49541 LD IX,29248
49545 LD B,10
49547 LD HL,30000
49550 LD A,254
49552 LD DE,50463
49555 CALL HongKong_Initialise_4
49558 LD IX,29496
49562 LD HL,30088
49565 LD A,254
49567 LD B,10
49569 LD DE,50465
49572 CALL HongKong_Initialise_4
49575 LD IX,29744
49579 LD HL,30176
49582 LD A,254
49584 LD B,10
49586 LD DE,50463
49589 CALL HongKong_Initialise_4
49592 LD HL,30088
49595 LD B,32
49597 LD (HL),60
HongKong_Initialise_2 49599 INC HL
49600 LD (HL),189
49602 INC HL
49603 LD (HL),126
49605 DJNZ HongKong_Initialise_2
49607 LD HL,29232
49610 LD (29241),HL
49613 LD HL,30264
49616 LD (HL),128
49618 LD A,160
49620 LD (29243),A
49623 LD DE,30064
49626 LD HL,50415
49629 CALL HongKong_Initialise_3
49632 LD DE,30152
49635 CALL HongKong_Initialise_3
49638 LD DE,30240
HongKong_Initialise_3 49641 LD BC,16
49644 LDIR
49646 RET
HongKong_Initialise_4 49647 PUSH BC
49648 LD (IX+8),A
49651 LD (IX+0),L
49654 LD (IX+1),H
49657 LD (IX+2),1
49661 LD (IX+3),1
49665 LD (IX+4),E
49668 LD (IX+5),D
49671 LD BC,24
49674 ADD IX,BC
49676 SUB 8
49678 LD BC,8
49681 ADD HL,BC
49682 POP BC
49683 DJNZ HongKong_Initialise_4
49685 LD (IX-21),2
49689 RET
This entry point is used by the routine at Handler_HongKong.
HongKong_Initialise_5 49690 LD HL,(29241)
49693 LD DE,24
49696 ADD HL,DE
49697 LD A,56
49699 CP L
49700 JR NZ,HongKong_Initialise_6
49702 CALL Handler_HongKong_35
49705 LD HL,29256
HongKong_Initialise_6 49708 LD (29241),HL
49711 LD A,32
49713 CP L
49714 LD A,2
49716 JR NZ,HongKong_Initialise_7
49718 LD A,6
HongKong_Initialise_7 49720 LD (39338),A
49723 LD B,3
49725 LD A,(HL)
49726 CP 168
49728 JP NC,HongKong_Initialise_24
49731 CP 16
49733 JP Z,HongKong_Initialise_19
49736 LD (39399),HL
49739 CALL HongKong_Initialise_22
49742 CALL HongKong_Initialise_9
49745 LD HL,(39399)
49748 LD B,3
HongKong_Initialise_8 49750 PUSH BC
49751 LD (39399),HL
49754 LD BC,65528
49757 ADD HL,BC
49758 LD (39401),HL
49761 CALL HongKong_Initialise_18
49764 LD HL,(39399)
49767 LD BC,248
49770 ADD HL,BC
49771 POP BC
49772 DJNZ HongKong_Initialise_8
49774 RET
HongKong_Initialise_9 49775 LD IX,(29241)
49779 LD B,3
49781 LD A,(IX+0)
49784 AND 7
49786 RET NZ
HongKong_Initialise_10 49787 PUSH BC
49788 LD D,231
49790 BIT 0,B
49792 JR Z,HongKong_Initialise_11
49794 LD D,15
49796 BIT 1,B
49798 JR NZ,HongKong_Initialise_11
49800 LD D,240
HongKong_Initialise_11 49802 LD L,(IX-8)
49805 LD H,(IX-7)
49808 LD C,(IX-5)
49811 LD E,64
49813 LD B,8
49815 BIT 0,C
49817 JR NZ,HongKong_Initialise_12
49819 LD B,16
HongKong_Initialise_12 49821 LD A,0
HongKong_Initialise_13 49823 OR (HL)
49824 AND D
49825 JR NZ,HongKong_Initialise_14
49827 INC HL
49828 DJNZ HongKong_Initialise_13
49830 LD HL,50463
49833 JR HongKong_Initialise_17
HongKong_Initialise_14 49835 LD L,(IX+4)
49838 LD H,(IX+5)
49841 LD D,0
49843 ADD HL,DE
49844 LD D,(HL)
49845 INC HL
49846 LD E,(HL)
49847 LD A,(DE)
49848 AND 224
49850 JR Z,HongKong_Initialise_16
49852 CP 160
49854 JR Z,HongKong_Initialise_16
49856 BIT 6,A
49858 JR Z,HongKong_Initialise_15
49860 LD HL,29184
49863 SET 4,(HL)
HongKong_Initialise_15 49865 POP BC
49866 POP HL
49867 LD HL,(29241)
49870 LD DE,65512
49873 ADD HL,DE
49874 LD (29241),HL
49877 RET
HongKong_Initialise_16 49878 LD HL,50465
49881 LD E,128
49883 DEC C
49884 JR NZ,HongKong_Initialise_14
HongKong_Initialise_17 49886 LD (IX-4),L
49889 LD (IX-3),H
49892 LD DE,248
49895 ADD IX,DE
49897 POP BC
49898 DJNZ HongKong_Initialise_10
49900 RET
HongKong_Initialise_18 49901 CALL 38926
49904 RET
HongKong_Initialise_19 49905 LD A,32
49907 CP L
49908 JR NZ,HongKong_Initialise_21
HongKong_Initialise_20 49910 CALL 38425
49913 AND 14
49915 CP 13
49917 JR NC,HongKong_Initialise_20
49919 ADD A,154
49921 LD (29243),A
HongKong_Initialise_21 49924 PUSH BC
49925 LD (HL),254
49927 PUSH HL
49928 PUSH HL
49929 CALL 37945
49932 POP IX
49934 LD BC,65520
49937 ADD HL,BC
49938 LD C,L
49939 LD B,H
49940 CALL 37891
49943 POP HL
49944 LD BC,248
49947 ADD HL,BC
49948 POP BC
49949 DJNZ HongKong_Initialise_21
49951 RET
HongKong_Initialise_22 49952 LD B,9
49954 LD HL,28686
49957 LD DE,6
49960 CALL HongKong_Initialise_23
49963 LD HL,28878
49966 LD B,9
HongKong_Initialise_23 49968 LD (HL),1
49970 ADD HL,DE
49971 DJNZ HongKong_Initialise_23
49973 RET
HongKong_Initialise_24 49974 JR NZ,HongKong_Initialise_26
49976 LD A,(29243)
49979 LD C,A
HongKong_Initialise_25 49980 PUSH BC
49981 DEC (HL)
49982 DEC (HL)
49983 PUSH HL
49984 PUSH HL
49985 LD A,C
49986 CALL 37945
49989 POP IX
49991 LD (IX+5),120
49995 LD (IX+4),A
49998 LD BC,65520
50001 ADD HL,BC
50002 LD B,H
50003 LD C,L
50004 CALL 37918
50007 POP HL
50008 LD BC,248
50011 ADD HL,BC
50012 POP BC
50013 INC C
50014 INC C
50015 DJNZ HongKong_Initialise_25
50017 RET
HongKong_Initialise_26 50018 LD DE,248
HongKong_Initialise_27 50021 DEC (HL)
50022 DEC (HL)
50023 ADD HL,DE
50024 DJNZ HongKong_Initialise_27
50026 RET
Prev: 49478 Up: Map Next: 50027