Routines
Prev: 43738 Up: Map Next: 44841
43799: Handler: Paris
Handler_Paris 43799 CALL Handler_Paris_8 Call Handler_Paris_8.
43802 LD A,(29191) Return if *29191 is zero.
43805 CP 0
43807 RET Z
43808 LD HL,(39395) HL=*39395.
43811 LD DE,56 HL+=0056.
43814 ADD HL,DE
43815 LD A,200 Jump to Handler_Paris_0 if L is not equal to 200.
43817 CP L
43818 JR NZ,Handler_Paris_0
43820 LD HL,24240 Write 24240 to *39395.
Handler_Paris_0 43823 LD (39395),HL
43826 BIT 7,(HL) Test bit 7 of *HL.
43828 JP Z,Handler_Paris_7 Jump to Handler_Paris_7 if A is zero.
43831 CALL 37945 Call 37945.
43834 LD IX,(39395) IX=*39395.
43838 LD A,128 Jump to Handler_Paris_1 if *IX+0 is equal to 128.
43840 CP (IX+0)
43843 JR Z,Handler_Paris_1
43845 DEC (IX+0) Decrease *IX+0 by one.
43848 CP (IX+0) Compare A with *IX+0.
43851 RET NZ Return if {} is not zero.
43852 LD HL,44371 Write 44371 to *44282.
43855 LD (44282),HL
43858 CALL 39245 Call 39245.
43861 LD HL,(39395) HL=*39395.
43864 LD (HL),128 Write 128 to *HL.
43866 RET Return.
Handler_Paris_1 43867 BIT 5,(IX+6) Test bit 5 of *IX+6.
43871 JR Z,Handler_Paris_2 Jump to Handler_Paris_2 if A is zero.
43873 RES 5,(IX+6) Reset bit 5 of *IX+6.
43877 LD L,(IX+4) L=*IX+4.
43880 LD H,(IX+5) H=*IX+5.
43883 CALL 38404 Call 38404.
43886 JP NZ,39206 Jump to 39206 if A is not zero.
43889 LD (IX+0),0 Write 0 to *IX+0.
43893 JP 39234 Jump to 39234.
Handler_Paris_2 43896 LD A,(39339) A=*39339.
43899 CP 80 Compare A with 80.
43901 JR Z,Handler_Paris_4 Jump to Handler_Paris_4 if A is zero.
43903 LD A,(39340) A=*39340.
43906 CP 0 Compare A with 0.
43908 JR Z,Handler_Paris_4 Jump to Handler_Paris_4 if A is zero.
43910 LD A,(IX+24) A=*IX+24.
43913 AND %10010000 Keep only bits 4, 7.
43915 CP 128 Compare A with 128.
43917 JR NZ,Handler_Paris_4 Jump to Handler_Paris_4 if A is not zero.
43919 CALL 38425 Call 38425.
43922 AND %00001111 Keep only bits 0-3.
43924 OR %10010000 Set bits 4, 7.
43926 LD IX,(39395) IX=*39395.
43930 LD (IX+0),A Write A to *IX+0.
43933 RET Return.
Handler_Paris_3 43934 AND %01000000 Keep only bits 6.
43936 JR Z,Handler_Paris_5 Jump to Handler_Paris_5 if A is zero.
43938 LD HL,29184 HL=29184.
43941 SET 4,(HL) Set bit 4 of *HL.
43943 JR Handler_Paris_5 Jump to Handler_Paris_5.
Handler_Paris_4 43945 LD A,(IX+7) A=*IX+7.
43948 CP 0 Compare A with 0.
43950 JR NZ,Handler_Paris_6 Jump to Handler_Paris_6 if A is not zero.
Handler_Paris_5 43952 CALL 38425 Call 38425.
43955 LD C,A C=A.
43956 AND %00011000 Keep only bits 3-4.
43958 LD IX,(39395) IX=*39395.
43962 LD (IX+6),A Write A to *IX+6.
43965 LD A,C A=C.
43966 AND %00000111 Keep only bits 0-2.
43968 ADD A,8 A+=8.
43970 LD (IX+7),A Write A to *IX+7.
43973 JP 39206 Jump to 39206.
Handler_Paris_6 43976 DEC (IX+7) Decrease *IX+7 by one.
43979 LD H,(IX+5) H=*IX+5.
43982 LD L,(IX+4) L=*IX+4.
43985 CALL 37749 Call 37749.
43988 AND %01100010 Keep only bits 1, 5-6.
43990 JR NZ,Handler_Paris_3 Jump to Handler_Paris_3 if A is not zero.
43992 LD (IX+4),L Write L to *IX+4.
43995 LD (IX+5),H Write H to *IX+5.
43998 SET 5,(IX+6) Set bit 5 of *IX+6.
44002 JP 39206 Jump to 39206.
Handler_Paris_7 44005 CALL 37945 Call 37945.
44008 CALL 38425 Call 38425.
44011 AND %11110000 Keep only bits 4-7.
44013 LD L,A L=A.
44014 LD H,0 H=0.
44016 ADD HL,HL HL+=HL.
44017 ADD HL,HL HL+=HL.
44018 LD DE,30974 DE=30974.
44021 ADD HL,DE HL+=DE.
44022 LD A,16 A=16.
44024 LD IX,(39395) IX=*39395.
44028 CALL 37752 Call 37752.
44031 AND %01100010 Keep only bits 1, 5-6.
44033 RET NZ Return if {} is not zero.
44034 LD A,(39333) A=*39333.
44037 AND %00001111 Keep only bits 0-3.
44039 LD (IX+7),A Write A to *IX+7.
44042 LD (IX+0),128 Write 128 to *IX+0.
44046 LD (IX+4),L Write L to *IX+4.
44049 LD (IX+5),H Write H to *IX+5.
44052 LD (IX+6),48 Write 48 to *IX+6.
44056 JP 39209 Jump to 39209.
Handler_Paris_8 44059 LD HL,(29241) HL=*29241.
44062 BIT 0,(HL) Test bit 0 of *HL.
44064 JR NZ,Handler_Paris_11 Jump to Handler_Paris_11 if A is not zero.
Handler_Paris_9 44066 LD HL,(29241) HL=*29241.
44069 LD DE,10 DE=0010.
44072 ADD HL,DE HL+=DE.
44073 LD A,128 A=128.
Handler_Paris_10 44075 CP H Compare A with H.
44076 LD (29241),HL Write HL to *29241.
44079 RET NZ Return if {} is not zero.
44080 LD HL,32256 HL=32256.
44083 JR Handler_Paris_10 Jump to Handler_Paris_10.
Handler_Paris_11 44085 BIT 1,(HL) Test bit 1 of *HL.
44087 JR NZ,Handler_Paris_12 Jump to Handler_Paris_12 if A is not zero.
44089 CALL 38425 Call 38425.
44092 CP 150 Compare A with 150.
44094 JR C,Handler_Paris_9 Jump to Handler_Paris_9 if A is lower.
44096 AND %00001100 Keep only bits 2-3.
44098 LD E,A E=A.
44099 RLCA RLCA.
44100 LD IX,(29241) IX=*29241.
44104 LD L,(IX+1) L=*IX+1.
44107 LD H,(IX+2) H=*IX+2.
44110 CALL 37752 Call 37752.
44113 AND %00010001 Keep only bits 0, 4.
44115 JR NZ,Handler_Paris_9 Jump to Handler_Paris_9 if A is not zero.
44117 LD A,E A=E.
44118 OR %00000011 Set bits 0-1.
44120 LD (IX+0),A Write A to *IX+0.
Handler_Paris_12 44123 LD IX,(29241) IX=*29241.
44127 LD C,(IX+1) C=*IX+1.
44130 LD B,(IX+2) B=*IX+2.
44133 CALL 37865 Call 37865.
44136 LD IX,(29241) IX=*29241.
44140 LD A,(IX+0) A=*IX+0.
44143 ADD A,16 A+=16.
44145 CP 80 Compare A with 80.
44147 JR C,Handler_Paris_13 Jump to Handler_Paris_13 if A is lower.
44149 AND %00001101 Keep only bits 0, 2-3.
44151 LD (IX+0),A Write A to *IX+0.
44154 CALL Handler_Paris_15 Call Handler_Paris_15.
44157 JR Handler_Paris_9 Jump to Handler_Paris_9.
Handler_Paris_13 44159 LD (IX+0),A Write A to *IX+0.
44162 CALL Handler_Paris_17 Call Handler_Paris_17.
44165 LD A,(IX+2) A=*IX+2.
44168 LD D,(IX+3) D=*IX+3.
44171 LD IX,(29241) IX=*29241.
44175 CP 0 Compare A with 0.
44177 JR Z,Handler_Paris_16 Jump to Handler_Paris_16 if A is zero.
44179 LD E,A E=A.
44180 LD L,(IX+1) L=*IX+1.
44183 LD H,(IX+2) H=*IX+2.
44186 ADD HL,DE HL+=DE.
44187 LD D,(HL) D=*HL.
44188 INC HL Increment HL by one.
44189 LD E,(HL) E=*HL.
44190 LD A,(DE) A=*DE.
44191 DEC HL Decrease HL by one.
44192 AND %00010001 Keep only bits 0, 4.
44194 JR NZ,Handler_Paris_14 Jump to Handler_Paris_14 if HL is not zero.
44196 LD (IX+1),L Write L to *IX+1.
44199 LD (IX+2),H Write H to *IX+2.
44202 JP 38823 Jump to 38823.
Handler_Paris_14 44205 LD A,(IX+0) A=*IX+0.
44208 AND %00001111 Keep only bits 0-3.
44210 OR %01000000 Set bits 6.
44212 LD (IX+0),A Write A to *IX+0.
44215 JP Handler_Paris_15 Jump to Handler_Paris_15.
Handler_Paris_15 44218 CALL Handler_Paris_17 Call Handler_Paris_17.
44221 LD IX,(29241) IX=*29241.
Handler_Paris_16 44225 LD L,(IX+1) L=*IX+1.
44228 LD H,(IX+2) H=*IX+2.
44231 JP 38823 Jump to 38823.
Handler_Paris_17 44234 AND %01111100 Keep only bits 2-6.
44236 LD E,A E=A.
44237 LD D,0 D=0.
44239 LD IX,44291 IX=44291.
44243 ADD IX,DE IX+=DE.
44245 LD E,(IX+0) E=*IX+0.
44248 LD D,(IX+1) D=*IX+1.
44251 LD (44282),DE Write DE to *44282.
44255 AND %01100000 Keep only bits 5-6.
44257 LD E,16 E=16.
44259 JR Z,Handler_Paris_18 Jump to Handler_Paris_18 if HL is zero.
44261 CP 32 Compare A with 32.
44263 LD E,32 E=32.
44265 JR Z,Handler_Paris_18 Jump to Handler_Paris_18 if A is zero.
44267 CP 64 Compare A with 64.
44269 LD E,64 E=64.
44271 JR Z,Handler_Paris_18 Jump to Handler_Paris_18 if A is zero.
44273 LD E,128 E=128.
Handler_Paris_18 44275 LD HL,61439 HL=61439.
44278 LD A,E A=E.
44279 OR (HL) Set the bits from *HL.
44280 LD (HL),A Write A to *HL.
44281 RET Return.
44282 DEFB 83,173,1,1,2,173,0,0
44290 DEFB 17
44291 DEFB 83,173,0,0,83,173,0,0
44299 DEFB 83,173,0,0,83,173,0,0
44307 DEFB 91,173,0,0,115,173,0,0
44315 DEFB 131,173,0,0,155,173,0,0
44323 DEFB 99,173,2,0,123,173,64,0
44331 DEFB 139,173,254,255,155,173,192,255
44339 DEFB 99,173,2,0,123,173,64,0
44347 DEFB 139,173,254,255,155,173,192,255
44355 DEFB 107,173,2,0,123,173,64,0
44363 DEFB 147,173,254,255,163,173,192,255
44371 DEFB 0,0,0,0,0,24,24,0
44379 DEFB 0,0,3,7,10,4,8,0
44387 DEFB 0,0,124,12,112,0,0,0
44395 DEFB 0,0,192,32,176,112,0,0
44403 DEFB 0,0,0,0,0,36,24,24
44411 DEFB 0,36,36,36,24,24,0,0
44419 DEFB 0,0,192,224,80,32,16,0
44427 DEFB 0,0,62,48,14,0,0,0
44435 DEFB 0,0,3,4,13,14,0,0
44443 DEFB 0,0,24,24,36,36,36,0
44451 DEFB 0,0,0,0,0,24,60,36
44459 DEFB 50,174,206,121,7,50,174,30
44467 DEFB 122,7,50,174,102,122,7,50
44475 DEFB 174,150,122,7,50,174,200,122
44483 DEFB 7,50,174,160,123,7,50,174
44491 DEFB 236,123,7,50,174,14,124,7
44499 DEFB 50,174,88,124,7,58,174,78
44507 DEFB 121,6,66,174,82,121,2,58
44515 DEFB 174,158,121,6,66,174,162,121
44523 DEFB 3,58,174,230,121,5,66,174
44531 DEFB 234,121,3,58,174,22,122,7
44539 DEFB 66,174,26,122,5,58,174,72
44547 DEFB 122,3,66,174,76,122,5,58
44555 DEFB 174,32,123,4,66,174,36,123
44563 DEFB 6,58,174,108,123,3,66,174
44571 DEFB 112,123,5,58,174,142,123,6
44579 DEFB 66,174,146,123,4,58,174,216
44587 DEFB 123,6,66,174,220,123,2,41
44595 DEFB 175,4,3,142,174,0,0,74
44603 DEFB 174,2,2,138,174,0,0,106
44611 DEFB 174,2,2,138,174,0,0,0
44619 DEFB 0,0,0,0,1,7,31,31
44627 DEFB 31,31,15,11,2,0,0,0
44635 DEFB 1,7,31,127,255,255,255,255
44643 DEFB 255,255,255,255,255,219,1,0
44651 DEFB 128,224,248,254,255,255,255,255
44659 DEFB 255,255,255,255,255,219,128,0
44667 DEFB 0,0,0,0,128,224,248,248
44675 DEFB 248,248,240,208,64,0,0,5
44683 DEFB 4,5,4,3,34,1,3,34
44691 DEFB 33,3,34,33,3,34,1,72
44699 DEFB 97,117,112,112,101,116,32,84
44707 DEFB 114,97,115,104,109,111,110,160
44715 DEFB 0,0,0,0,0,0,36,0
44723 DEFB 0,9,1,32,0,0,0,0
44731 DEFB 1,32,0,0,0,1,32,0
44739 DEFB 1,32,18,0,0,19,32,0
44747 DEFB 9,0,18,0,0,18,0,0
44755 DEFB 9,0,0,0,0,0,144,0
44763 DEFB 0,0,2,64,1,32,144,0
44771 DEFB 0,9,2,64,1,32,0,0
44779 DEFB 0,9,0,0,0,0,0,0
44787 DEFB 48,17,8,17,4,17,8,10
44795 DEFB 52,17,12,9,8,17,8,10
44803 DEFB 56,9,36,9,12,10,120,10
44811 DEFB 120,10,120,10,120,10,120,10
44819 DEFB 120,10,120,10,120,10,120,10
44827 DEFB 120,10,120,10,120,10,120,10
44835 DEFB 120,10,120,10,4,0
Prev: 43738 Up: Map Next: 44841