Routines
Prev: 46974 Up: Map Next: 47391
46975: Routine at B77F
Used by the routine at 46845.
46975 LD A,(46974) Jump to 47018 if *46974 is not equal to 255.
46978 CP 255
46980 JR NZ,47018
46982 LD HL,(46806) HL=*46806.
46985 LD A,L Return if HL is zero.
46986 OR H
46987 RET Z
46988 XOR A Write 0 to *46974.
46989 LD (46974),A
46992 PUSH HL IX=HL (using the stack).
46993 POP IX
46995 LD L,(IX-2) L=*IX-2.
46998 LD H,(IX-1) H=*IX-1.
47001 LD (46806),HL Write HL to *46806.
47004 LD L,(IX+0) L=*IX+0.
47007 LD H,(IX+1) H=*IX+1.
47010 CALL 41415 Call 41415.
47013 INC HL Increment HL by two.
47014 INC HL
47015 PUSH HL IX=HL (using the stack).
47016 POP IX
47018 LD A,(IX+0) A=*IX+0.
47021 INC IX Increment IX by one.
47023 BIT 7,A Jump to 47053 if bit 7 of A is not set.
47025 JR Z,47053
47027 LD D,A D=A.
47028 LD E,(IX+0) E=*IX+0.
47031 INC IX Increment IX by one.
47033 AND %01110000 Keep only bits 4-6.
47035 CP 96 Jump to 47046 if A is equal to 96.
47037 JR Z,47046
47039 CP 48 Jump to 47046 if A is equal to 48.
47041 JR Z,47046
47043 CP 32 Return if A is not equal to 32.
47045 RET NZ
47046 LD A,255 Write 255 to *46974.
47048 LD (46974),A
47051 AND A Set flags.
47052 RET Return.
47053 CP 32 Jump to 47095 if A is less than 32.
47055 JR C,47095
47057 CP 96 Jump to 47069 if A is less than 96.
47059 JR C,47069
47061 CALL GetCommonWord Call GetCommonWord.
47064 OR %00000001 Set bit 0.
47066 LD A,0 A=0.
47068 RET Return.
47069 AND %00011111 Keep only bits 0-4.
47071 INC A Increment A by one.
47072 LD B,A B=A.
47073 PUSH IX HL=IX (using the stack).
47075 POP HL
47076 INC HL Increment HL by one.
47077 LD C,0 C=0.
47079 CALL 43408 Call 43408.
47082 DJNZ 47079 Decrease counter by one and loop back to 47079 until counter is zero.
47084 PUSH HL IX=HL (using the stack).
47085 POP IX
47087 LD A,C A=C.
47088 AND A Jump to 47018 if HL is not equal to A.
47089 JR NZ,47018
47091 DEC IX Decrease IX by one.
47093 JR 47018 Jump to 47018.
47095 CP 2
47097 JR NZ,47111
47099 LD E,(IX+0)
47102 LD D,(IX+1)
47105 ADD IX,DE
47107 DEC IX
47109 JR 47018
47111 CP 11
47113 JR NZ,47156
47115 LD E,(IX+0)
47118 LD D,(IX+1)
47121 PUSH IX
47123 POP HL
47124 LD A,2
47126 CALL 41244
47129 LD (IX+0),L
47132 LD (IX+1),H
47135 PUSH HL
47136 LD HL,(46806)
47139 LD (46806),IX
47143 LD (IX-2),L
47146 LD (IX-1),H
47149 POP HL
47150 ADD HL,DE
47151 PUSH HL
47152 POP IX
47154 JR 47107
47156 CP 29
47158 JP C,47018
47161 JP 46982
This entry point is used by the routines at 46410, 46810 and 46832.
47164 POP IX
47166 LD B,3
47168 LD E,(HL)
47169 INC HL
47170 LD D,(HL)
47171 INC HL
47172 PUSH DE
47173 DJNZ 47168
47175 POP HL
47176 EX (SP),HL
47177 PUSH HL
47178 JP (IX)
47180 LD HL,(45450)
47183 PUSH HL
47184 LD HL,(45448)
47187 PUSH HL
47188 LD HL,(45446)
47191 PUSH HL
47192 LD HL,(45452)
47195 PUSH HL
47196 LD HL,26730
47199 CALL 42399
47202 RET
47203 JP 51497
47206 NOP
47207 NOP
47208 NOP
47209 NOP
This entry point is used by the routine at 56428.
47210 PUSH AF
47211 LD IX,40942
47215 CALL 41207
47218 JR Z,47272
47220 LD C,(IX+0)
47223 LD B,(IX+1)
47226 LD (47208),BC
47230 LD L,(IX-2)
47233 LD H,(IX-1)
47236 LD (40940),HL
47239 CALL 41415
47242 POP AF
47243 PUSH AF
47244 AND A
47245 JR Z,47252
47247 CALL 47274
47250 JR Z,47272
47252 LD BC,(47208)
47256 LD (41003),BC
47260 CALL 44671
47263 CP 192
47265 JR NZ,47260
47267 LD HL,(41001)
47270 LD (HL),144
47272 POP AF
47273 RET
47274 LD HL,(47208)
47277 LD (41003),HL
47280 XOR A
47281 LD (40996),A
47284 LD HL,(40944)
47287 PUSH HL
47288 LD HL,0
47291 LD (40944),HL
47294 CALL 43698
47297 JR Z,47303
47299 CP 2
47301 JR NZ,47364
47303 LD HL,(41003)
47306 LD A,(HL)
47307 AND 240
47309 CP 192
47311 JR NZ,47294
47313 LD (HL),144
47315 LD A,8
47317 CALL 41244
47320 LD HL,(40942)
47323 LD (40942),IX
47327 LD (IX-2),L
47330 LD (IX-1),H
47333 LD HL,(40944)
47336 LD (IX+5),L
47339 LD (IX+6),H
47342 POP HL
47343 LD (40944),HL
47346 XOR A
47347 LD (IX+1),A
47350 LD A,(41012)
47353 LD (IX+0),A
47356 LD A,(40996)
47359 LD (IX+7),A
47362 XOR A
47363 RET
47364 PUSH AF
47365 CALL 55421
47368 POP AF
47369 POP HL
47370 LD (40944),HL
47373 RET
This entry point is used by the routine at 47414.
47374 CALL 47391
47377 LD (47206),IX
47381 LD E,(IX+5)
47384 LD D,(IX+6)
47387 PUSH DE
47388 POP IY
47390 RET
Prev: 46974 Up: Map Next: 47391