Routines
Prev: 38730 Up: Map Next: 44799
40618: Routine at 9EAA
Used by the routine at StartGame.
40618 LD A,(47082)
40621 CP 4
40623 RET Z
40624 LD A,(39784)
40627 CP 9
40629 RET Z
40630 LD A,(39762)
40633 CP 9
40635 RET Z
40636 LD A,(47081)
40639 CP 44
40641 RET NC
40642 LD A,(39830)
40645 AND A
40646 RET NZ
40647 LD HL,39830
40650 CALL 40759
40653 LD IX,39830
40657 LD HL,40747
40660 LD A,(47083)
40663 RRA
40664 JR NC,40669
40666 LD HL,40753
40669 LD A,(HL)
40670 LD (IX+0),A
40673 LD (IX+17),0
40677 INC HL
40678 LD A,(HL)
40679 LD (IX+18),A
40682 INC HL
40683 LD A,(HL)
40684 LD (IX+19),A
40687 INC HL
40688 LD A,(HL)
40689 LD (IX+12),A
40692 INC HL
40693 LD A,(HL)
40694 LD (IX+13),A
40697 INC HL
40698 LD A,(HL)
40699 LD (IX+7),A
40702 LD (IX+1),0
40706 LD (IX+4),0
40710 LD A,(36168)
40713 LD HL,40743
40716 AND 3
40718 CALL PrintLine_9
40721 LD A,(HL)
40722 LD (IX+2),A
40725 LD (IX+6),16
40729 LD (IX+20),16
40733 LD HL,0
40736 LD (43643),HL
40739 CALL 43782
40742 RET
40743 LD B,B
40744 XOR B
40745 LD B,B
40746 XOR B
40747 ADD HL,BC
40748 RET P
40749 LD (HL),B
40750 JR 40764
40752 LD BC,24584
40755 SUB B
40756 JR 40774
40758 LD BC,5633
40761 NOP
40762 LD B,C
40763 JP 36570
40766 LD H,E
40767 SBC A,A
40768 LD A,(HL)
40769 AND D
40770 LD A,(HL)
40771 AND D
40772 LD E,D
40773 AND L
40774 AND E
40775 AND L
40776 SBC A,D
40777 XOR B
40778 JP NC,680
40781 XOR C
40782 CP H
40783 XOR C
40784 JR NC,40700
40786 ADC A,L
40787 AND L
40788 LD HL,40764
40791 LD A,(IX+0)
40794 ADD A,A
40795 CALL PrintLine_9
40798 LD A,(HL)
40799 INC HL
40800 LD H,(HL)
40801 LD L,A
40802 JP (HL)
40803 RET
This entry point is used by the routine at StartGame.
40804 LD A,(39792)
40807 CP 28
40809 LD A,0
40811 JR Z,40815
40813 LD A,5
40815 LD (23768),A
40818 LD A,(IX+2)
40821 AND 128
40823 LD (38483),A
40826 LD BC,(36569)
40830 BIT 1,C
40832 LD A,(IX+2)
40835 JR Z,40839
40837 SUB 4
40839 BIT 0,C
40841 JR Z,40845
40843 ADD A,4
40845 LD (IX+2),A
40848 CALL 42191
40851 LD A,(IX+21)
40854 CP 65
40856 JP Z,41059
40859 CP 97
40861 JP Z,41059
40864 AND 193
40866 CP 128
40868 JP Z,41059
40871 CP 129
40873 JP Z,41059
40876 LD B,A
40877 AND 64
40879 JR NZ,40888
40881 LD A,(43103)
40884 RLA
40885 JP C,41059
40888 LD (IX+1),2
40892 LD (IX+8),3
40896 LD A,1
40898 LD (39786),A
40901 LD A,(36166)
40904 LD E,A
40905 LD A,B
40906 AND 64
40908 JR NZ,40966
40910 BIT 0,E
40912 JR Z,40917
40914 DEC (IX+2)
40917 CALL 44140
40920 LD A,(IX+21)
40923 LD B,A
40924 AND 30
40926 ADD A,(IX+2)
40929 ADD A,8
40931 LD (39788),A
40934 RR E
40936 RET C
40937 INC (IX+12)
40940 INC (IX+12)
40943 LD A,B
40944 ADD A,2
40946 OR 32
40948 CP 48
40950 JR Z,40956
40952 LD (IX+21),A
40955 RET
40956 LD (IX+21),129
40960 LD (IX+12),44
40964 JR 41018
40966 BIT 0,E
40968 JR Z,40973
40970 INC (IX+2)
40973 CALL 44140
40976 LD A,(IX+21)
40979 AND 62
40981 LD B,A
40982 ADD A,(IX+2)
40985 ADD A,8
40987 LD (39788),A
40990 RR E
40992 RET C
40993 DEC (IX+12)
40996 DEC (IX+12)
40999 LD A,B
41000 SUB 2
41002 JR C,41010
41004 OR 64
41006 LD (IX+21),A
41009 RET
41010 LD (IX+12),28
41014 LD (IX+21),128
41018 LD A,(39786)
41021 OR 128
41023 LD (39786),A
41026 LD A,(IX+2)
41029 INC A
41030 AND 252
41032 LD (IX+2),A
41035 RRA
41036 RRA
41037 AND 1
41039 LD B,A
41040 LD A,(IX+21)
41043 AND 1
41045 ADD A,A
41046 LD C,A
41047 ADD A,A
41048 ADD A,B
41049 LD (IX+1),A
41052 LD A,4
41054 ADD A,C
41055 LD (IX+8),A
41058 RET
41059 CALL 44194
41062 CALL 44220
41065 LD A,(43103)
41068 AND A
41069 JP Z,41185
41072 EX AF,AF'
41073 CALL 44220
41076 EX AF,AF'
41077 BIT 6,A
41079 JR Z,41138
41081 LD A,(36166)
41084 RRA
41085 CALL C,43730
41088 LD IY,(46995)
41092 LD DE,456
41095 CALL Sounds_PlaySquareWave_Loop
41098 DI
41099 LD A,(43103)
41102 RLA
41103 LD A,(IX+1)
41106 JR NC,41112
41108 AND A
41109 RET NZ
41110 JR 41115
41112 SUB 10
41114 RET NZ
41115 BIT 5,(IX+21)
41119 JR Z,41129
41121 LD (43103),A
41124 LD (IX+21),34
41128 RET
41129 LD (IX+21),128
41133 LD (43103),A
41136 JR 41185
41138 RES 7,(IX+21)
41142 SET 0,(IX+21)
41146 RES 1,(IX+21)
41150 SET 6,(IX+21)
41154 RLA
41155 JR NC,41171
41157 LD (IX+1),12
41161 LD (IX+19),240
41165 LD A,192
41167 LD (43103),A
41170 RET
41171 LD (IX+19),170
41175 LD (IX+1),6
41179 LD A,65
41181 LD (43103),A
41184 RET
41185 LD A,(IX+2)
41188 RRA
41189 RRA
41190 AND 1
41192 LD B,A
41193 LD A,(IX+21)
41196 AND 1
41198 ADD A,A
41199 ADD A,A
41200 ADD A,B
41201 LD (IX+1),A
41204 LD A,(IX+20)
41207 DEC A
41208 RET NZ
41209 LD A,(IX+1)
41212 ADD A,10
41214 LD (IX+1),A
41217 LD A,(41312)
41220 SUB 2
41222 JR C,41228
41224 LD (41312),A
41227 RET
41228 LD A,(36569)
41231 AND 16
41233 RET Z
41234 LD IY,39698
41238 LD A,(39698)
41241 AND A
41242 JR Z,41253
41244 LD IY,39720
41248 LD A,(39720)
41251 AND A
41252 RET NZ
41253 LD (IY+0),5
41257 LD (IY+1),0
41261 LD (IY+9),8
41265 LD A,(IX+2)
41268 ADD A,12
41270 LD (IY+2),A
41273 LD (IY+4),172
41277 LD (IY+17),0
41281 LD (IY+21),0
41285 LD A,(41312)
41288 CPL
41289 AND 1
41291 ADD A,22
41293 LD (41312),A
41296 PUSH IX
41298 CALL Sounds_FindEmptySlot
41301 LD (IX+0),11
41305 LD (IX+1),2
41309 POP IX
41311 RET
41312 NOP
This entry point is used by the routine at StartGame.
41313 LD A,(47077)
41316 CP 2
41318 JP NZ,41435
41321 LD A,(47087)
41324 AND A
41325 JP NZ,41435
41328 LD A,(47095)
41331 AND A
41332 JP NZ,41435
41335 LD C,A
41336 LD A,253
41338 IN A,(254)
41340 CPL
41341 AND 10
41343 JR Z,41347
41345 SET 0,C
41347 LD A,253
41349 IN A,(254)
41351 CPL
41352 AND 5
41354 JR Z,41358
41356 SET 1,C
41358 LD A,250
41360 IN A,(254)
41362 CPL
41363 AND 31
41365 JR Z,41369
41367 SET 4,C
41369 LD A,C
41370 LD (36569),A
41373 RET
This entry point is used by the routine at StartGame.
41374 AND A
41375 JR NZ,41438
41377 LD A,(47077)
41380 CP 2
41382 LD A,(47095)
41385 JR NZ,41438
41387 LD A,(47087)
41390 AND A
41391 LD A,(47095)
41394 JR NZ,41438
41396 LD C,A
41397 LD A,191
41399 IN A,(254)
41401 CPL
41402 AND 5
41404 JR Z,41408
41406 SET 0,C
41408 LD A,191
41410 IN A,(254)
41412 CPL
41413 AND 10
41415 JR Z,41419
41417 SET 1,C
41419 LD A,95
41421 IN A,(254)
41423 CPL
41424 AND 31
41426 JR Z,41430
41428 SET 4,C
41430 LD A,C
41431 LD (36569),A
41434 RET
This entry point is used by the routine at 37132.
41435 LD A,(47087)
41438 AND A
41439 JP Z,41528
41442 DEC A
41443 JP Z,41452
41446 DEC A
41447 JP Z,41488
41450 JR 41460
41452 IN A,(31)
41454 AND 31
41456 LD C,A
41457 JP 41579
41460 LD A,239
41462 IN A,(254)
41464 LD B,255
41466 RRA
41467 RL B
41469 RRA
41470 RL B
41472 RRA
41473 RL B
41475 RRA
41476 RRA
41477 RL B
41479 RLA
41480 RL B
41482 LD A,B
41483 CPL
41484 LD C,A
41485 JP 41579
41488 LD A,239
41490 IN A,(254)
41492 OR 224
41494 LD B,A
41495 AND 8
41497 LD C,A
41498 LD A,B
41499 RRCA
41500 RRCA
41501 LD B,A
41502 AND 5
41504 OR C
41505 LD C,A
41506 LD A,B
41507 RRA
41508 RRA
41509 AND 16
41511 OR C
41512 LD C,A
41513 LD A,247
41515 IN A,(254)
41517 RRA
41518 RRA
41519 RRA
41520 AND 2
41522 OR C
41523 CPL
41524 LD C,A
41525 JP 41579
41528 LD C,0
41530 LD A,253
41532 IN A,(254)
41534 AND 10
41536 LD B,A
41537 LD A,191
41539 IN A,(254)
41541 AND 21
41543 OR B
41544 XOR 31
41546 JR Z,41550
41548 SET 0,C
41550 LD A,253
41552 IN A,(254)
41554 AND 21
41556 LD B,A
41557 LD A,191
41559 IN A,(254)
41561 AND 10
41563 OR B
41564 XOR 31
41566 JR Z,41570
41568 SET 1,C
41570 LD A,90
41572 CALL 38823
41575 JR Z,41579
41577 SET 4,C
41579 LD A,C
41580 LD (36569),A
41583 RET
41584 NOP
41585 NOP
41586 NOP
41587 NOP
41588 NOP
41589 NOP
41590 NOP
41591 NOP
41592 NOP
41593 NOP
41594 NOP
41595 NOP
41596 NOP
41597 NOP
41598 LD A,(IX+18)
41601 AND 128
41603 LD (38483),A
41606 LD A,(23772)
41609 INC A
41610 LD (23772),A
41613 LD (42920),IX
41617 PUSH IX
41619 POP DE
41620 LD BC,41584
41623 LD HL,39632
41626 AND A
41627 SBC HL,DE
41629 JR Z,41645
41631 LD BC,41588
41634 LD HL,39654
41637 AND A
41638 SBC HL,DE
41640 JR Z,41645
41642 LD BC,41592
41645 LD (41596),BC
41649 LD L,C
41650 LD H,B
41651 LD A,(HL)
41652 AND A
41653 JR Z,41659
41655 DEC (HL)
41656 JP 41855
41659 INC HL
41660 LD A,(HL)
41661 AND A
41662 JR Z,41768
41664 ADD A,(IX+6)
41667 AND 63
41669 LD (IX+6),A
41672 INC HL
41673 LD B,A
41674 ADD A,2
41676 AND 60
41678 LD (HL),A
41679 AND 15
41681 JR NZ,41698
41683 LD A,B
41684 AND 12
41686 LD A,(HL)
41687 JR NZ,41693
41689 ADD A,4
41691 JR 41695
41693 SUB 4
41695 AND 63
41697 LD (HL),A
41698 LD C,(HL)
41699 INC HL
41700 LD A,(HL)
41701 EXX
41702 LD HL,36280
41705 CALL PrintLine_9
41708 PUSH HL
41709 POP IY
41711 BIT 0,(IY+1)
41715 JR NZ,41753
41717 CALL 44066
41720 JR NC,41753
41722 EXX
41723 PUSH BC
41724 CALL 44393
41727 CALL 44140
41730 LD E,(IX+6)
41733 POP BC
41734 PUSH DE
41735 LD (IX+6),C
41738 PUSH BC
41739 CALL 42144
41742 POP BC
41743 LD A,(IX+6)
41746 CP C
41747 POP DE
41748 RET NZ
41749 LD (IX+6),E
41752 RET
41753 LD HL,(41596)
41756 LD (HL),2
41758 INC HL
41759 LD (HL),0
41761 EXX
41762 LD (IX+6),C
41765 JP 42128
41768 LD A,(36279)
41771 AND A
41772 JP Z,41855
41775 LD B,A
41776 LD IY,36280
41780 BIT 0,(IY+1)
41784 JR NZ,41793
41786 PUSH BC
41787 CALL 44066
41790 POP BC
41791 JR C,41802
41793 LD DE,16
41796 ADD IY,DE
41798 DJNZ 41780
41800 JR 41855
41802 PUSH IY
41804 POP HL
41805 LD DE,36280
41808 AND A
41809 SBC HL,DE
41811 LD E,L
41812 LD HL,(41596)
41815 LD (HL),0
41817 INC HL
41818 LD B,0
41820 LD A,(IX+6)
41823 ADD A,16
41825 AND 63
41827 CP 32
41829 JR C,41833
41831 LD B,254
41833 LD C,255
41835 LD A,(IY+4)
41838 ADD A,4
41840 CP (IX+4)
41843 JR C,41849
41845 LD A,B
41846 XOR 254
41848 LD B,A
41849 LD A,C
41850 XOR B
41851 LD (HL),A
41852 INC HL
41853 INC HL
41854 LD (HL),E
41855 LD A,(IX+20)
41858 AND A
41859 JP Z,42049
41862 DEC A
41863 LD (IX+20),A
41866 JR Z,41934
41868 LD A,(47077)
41871 CP 2
41873 JR NZ,41895
41875 LD A,(IX+2)
41878 CP 136
41880 JR NC,42007
41882 CP 128
41884 JR C,41895
41886 LD A,(IX+21)
41889 AND 127
41891 CP 10
41893 JR C,42007
41895 LD A,(36569)
41898 AND 16
41900 JR NZ,41934
41902 LD A,(39784)
41905 AND 127
41907 CP 3
41909 JR NZ,41934
41911 LD A,(39766)
41914 LD B,A
41915 LD A,(IX+21)
41918 AND 127
41920 ADD A,B
41921 LD (IX+2),A
41924 LD (IX+4),167
41928 CALL 44140
41931 JP 42153
41934 LD (IX+20),0
41938 LD (IX+4),169
41942 LD A,(39784)
41945 RLA
41946 JR NC,41953
41948 LD A,255
41950 LD (39784),A
41953 LD A,(IX+21)
41956 AND 127
41958 ADD A,36
41960 CP 48
41962 JR NZ,41966
41964 LD A,52
41966 LD (IX+6),A
41969 LD A,(IX+21)
41972 AND 128
41974 LD (IX+21),A
41977 LD (IX+4),166
41981 LD A,(IX+18)
41984 AND 128
41986 LD (IX+18),A
41989 PUSH IX
41991 CALL Sounds_FindEmptySlot
41994 LD (IX+0),4
41998 LD (IX+1),2
42002 POP IX
42004 JP 42153
42007 LD A,(47474)
42010 AND 16
42012 JR NZ,42028
42014 LD A,(39762)
42017 AND 127
42019 CP 3
42021 JR NZ,42028
42023 LD A,(39744)
42026 JR 41914
42028 LD (IX+20),0
42032 LD (IX+4),169
42036 LD A,(39762)
42039 RLA
42040 JR NC,41953
42042 LD A,255
42044 LD (39762),A
42047 JR 41953
42049 LD A,(36166)
42052 LD C,A
42053 AND 3
42055 JR NZ,42128
42057 LD A,(IX+18)
42060 INC A
42061 LD (IX+18),A
42064 AND 127
42066 CP 127
42068 JR NZ,42099
42070 LD A,(IX+18)
42073 AND 128
42075 LD (IX+18),A
42078 LD A,(IX+6)
42081 ADD A,4
42083 AND 15
42085 JR NZ,42089
42087 LD A,4
42089 LD B,A
42090 LD A,(IX+6)
42093 AND 48
42095 OR B
42096 LD (IX+6),A
42099 LD A,C
42100 AND 7
42102 JR NZ,42128
42104 INC (IX+19)
42107 LD A,(IX+19)
42110 SUB 148
42112 JR NZ,42128
42114 LD (IX+19),A
42117 LD A,(IX+7)
42120 CP 6
42122 JR Z,42128
42124 INC A
42125 LD (IX+7),A
42128 CALL 44393
42131 LD E,(IX+6)
42134 CALL 44149
42137 LD A,(IX+6)
42140 CP E
42141 CALL NZ,43795
42144 CALL 43807
42147 CALL 45052
42150 CALL 42191
42153 SET 7,(IX+21)
42157 LD A,(IX+2)
42160 AND 7
42162 LD (IX+1),A
42165 LD A,(IX+4)
42168 CP 192
42170 RET C
42171 LD HL,(41596)
42174 LD (HL),0
42176 INC HL
42177 LD (HL),0
42179 SET 7,(IX+0)
42183 LD A,(23769)
42186 DEC A
42187 LD (23769),A
42190 RET
42191 LD A,(39830)
42194 AND 127
42196 RET Z
42197 CP 10
42199 RET Z
42200 LD IY,39830
42204 CALL 44101
42207 RET NC
42208 LD (IY+0),10
42212 LD (IY+1),0
42216 LD (IY+18),80
42220 LD (IY+19),144
42224 LD A,(IY+8)
42227 SUB 2
42229 ADD A,A
42230 ADD A,A
42231 ADD A,(IY+2)
42234 LD (IY+2),A
42237 LD (IY+8),2
42241 LD (IY+9),13
42245 LD A,(IY+4)
42248 ADD A,4
42250 LD (IY+4),A
42253 LD A,(IX+0)
42256 AND 127
42258 CP 2
42260 JR NZ,42305
42262 LD A,(IX+6)
42265 AND 16
42267 LD DE,4144
42270 JR Z,42275
42272 LD DE,32
42275 LD A,(36169)
42278 LD B,A
42279 RLA
42280 JR C,42283
42282 LD E,D
42283 LD A,B
42284 AND 12
42286 JR NZ,42293
42288 LD A,(IX+6)
42291 AND 12
42293 OR E
42294 LD (IX+6),A
42297 LD A,(IX+18)
42300 AND 128
42302 LD (IX+18),A
42305 PUSH IX
42307 LD IX,49357
42311 LD (IX+0),6
42315 LD (IX+1),48
42319 POP IX
42321 LD BC,848
42324 JP 38493
42327 NOP
42328 NOP
42329 NOP
42330 LD A,(IX+4)
42333 CP 160
42335 CALL NC,42619
42338 LD DE,8
42341 LD B,2
42343 LD HL,(42327)
42346 ADD HL,DE
42347 LD A,H
42348 CP B
42349 JR NZ,42354
42351 LD H,B
42352 LD L,0
42354 LD (42327),HL
42357 LD D,(IX+4)
42360 LD A,(42329)
42363 LD E,A
42364 ADD HL,DE
42365 LD (IX+4),H
42368 LD A,L
42369 LD (42329),A
42372 LD A,H
42373 CP 192
42375 RET C
42376 SET 7,(IX+0)
42380 RET
42381 LD A,(IX+2)
42384 ADD A,0
42386 LD (IX+2),A
42389 CALL 44194
42392 CALL 44220
42395 LD DE,40
42398 LD B,128
42400 JP 42343
42403 LD A,(IX+2)
42406 AND 128
42408 LD (38483),A
42411 LD A,(23772)
42414 INC A
42415 LD (23772),A
42418 LD A,(IX+1)
42421 CP 2
42423 JR NC,42446
42425 XOR 1
42427 LD (IX+1),A
42430 LD A,(IX+4)
42433 SUB 6
42435 LD (IX+4),A
42438 JR C,42462
42440 CP 3
42442 JR NC,42475
42444 JR 42462
42446 LD A,(IX+2)
42449 AND 248
42451 LD (IX+2),A
42454 CALL 43730
42457 LD A,(IX+1)
42460 AND A
42461 RET NZ
42462 SET 7,(IX+0)
42466 LD A,(41312)
42469 AND 1
42471 LD (41312),A
42474 RET
42475 CALL 45052
42478 LD A,(39830)
42481 AND 127
42483 RET Z
42484 CP 10
42486 RET Z
42487 LD IY,39830
42491 CALL 44101
42494 RET NC
42495 LD (IY+0),10
42499 LD (IY+1),0
42503 LD (IY+18),80
42507 LD (IY+19),144
42511 LD A,(IY+8)
42514 SUB 2
42516 ADD A,A
42517 ADD A,A
42518 ADD A,(IY+2)
42521 LD (IY+2),A
42524 LD (IY+8),2
42528 LD (IY+9),13
42532 LD A,(IY+4)
42535 ADD A,4
42537 LD (IY+4),A
42540 LD (IX+1),2
42544 LD (IX+9),6
42548 LD (IX+18),80
42552 LD (IX+19),80
42556 LD A,(IX+2)
42559 AND 248
42561 LD (IX+2),A
42564 PUSH IX
42566 LD IX,49357
42570 LD (IX+0),6
42574 LD (IX+1),48
42578 POP IX
42580 LD BC,848
42583 JP 38493
42586 NOP
42587 PUSH IX
42589 CALL Sounds_FindEmptySlot
42592 LD (IX+0),12
42596 LD (IX+1),2
42600 POP IX
42602 RET
42603 NOP
This entry point is used by the routine at StartGame.
42604 LD A,(42603)
42607 LD B,A
42608 LD A,(43103)
42611 LD (42603),A
42614 LD A,B
42615 LD (43103),A
42618 RET
42619 CP 176
42621 RET NC
42622 LD IY,39764
42626 CALL 44101
42629 JR C,42654
42631 LD A,(47077)
42634 CP 2
42636 RET NZ
42637 LD IY,39742
42641 CALL 44066
42644 RET NC
42645 CALL 42604
42648 CALL 42654
42651 JP 42604
42654 LD A,(IX+1)
42657 SUB 10
42659 JR NZ,42665
42661 LD (23769),A
42664 RET
42665 LD A,(IY+2)
42668 AND 128
42670 LD (38483),A
42673 XOR A
42674 LD (42586),A
42677 LD BC,1024
42680 CALL 38493
42683 LD A,(IX+20)
42686 CP 5
42688 CALL NZ,42587
42691 DEC (IY+20)
42694 JR NZ,42701
42696 LD A,128
42698 LD (43103),A
42701 LD A,(36166)
42704 AND 1
42706 INC A
42707 NEG
42709 LD (42328),A
42712 XOR A
42713 LD (42327),A
42716 LD A,(36168)
42719 LD B,A
42720 AND 1
42722 INC A
42723 RL B
42725 JR C,42729
42727 NEG
42729 LD (42385),A
42732 LD (IX+0),11
42736 LD (IX+1),0
42740 CALL 43782
42743 LD A,(IX+20)
42746 CP 6
42748 JP Z,43677
42751 LD (IY+20),A
42754 LD A,(IY+20)
42757 CP 1
42759 JR NZ,42766
42761 LD (43103),A
42764 LD A,1
42766 AND A
42767 JP Z,43060
42770 PUSH AF
42771 LD A,(IY+12)
42774 CP 34
42776 JR C,42813
42778 XOR A
42779 LD (39803),A
42782 LD (IY+21),78
42786 LD (IY+1),4
42790 PUSH IX
42792 CALL Sounds_FindEmptySlot
42795 LD (IX+0),10
42799 LD (IX+1),16
42803 POP IX
42805 LD A,(36166)
42808 AND 254
42810 LD (36166),A
42813 POP AF
42814 CP 8
42816 JR NZ,42824
42818 LD BC,20480
42821 JP 38493
42824 CP 9
42826 JR NZ,42853
42828 LD A,(39830)
42831 AND 127
42833 RET Z
42834 CP 10
42836 RET Z
42837 PUSH IX
42839 LD IX,42824
42843 LD IY,39830
42847 CALL 42208
42850 POP IX
42852 RET
42853 CP 5
42855 JP Z,43104
42858 CP 4
42860 JR NZ,42906
42862 LD (IY+20),255
42866 LD A,2
42868 LD (39639),A
42871 LD (39661),A
42874 LD (39683),A
42877 LD HL,(36168)
42880 LD A,L
42881 AND 31
42883 ADD A,31
42885 LD (39651),A
42888 LD A,H
42889 AND 31
42891 ADD A,31
42893 LD (39673),A
42896 LD A,H
42897 ADD A,L
42898 AND 31
42900 ADD A,31
42902 LD (39695),A
42905 RET
42906 CP 2
42908 RET NZ
42909 LD A,3
42911 LD (23769),A
42914 LD (IY+20),255
42918 LD IY,0
42922 LD L,(IY+2)
42925 LD H,(IY+4)
42928 LD A,(IY+6)
42931 AND 15
42933 LD DE,2060
42936 CP 4
42938 JR Z,42950
42940 LD DE,1036
42943 CP 8
42945 JR Z,42950
42947 LD DE,1032
42950 LD A,(IY+6)
42953 AND 48
42955 OR E
42956 LD (43017),A
42959 LD A,(IY+6)
42962 AND 48
42964 OR D
42965 LD (43058),A
42968 LD D,(IY+7)
42971 LD C,(IY+0)
42974 LD B,(IY+1)
42977 LD IY,39632
42981 LD A,(39632)
42984 AND A
42985 JR Z,42991
42987 LD IY,39654
42991 LD (IY+2),L
42994 LD (IY+4),H
42997 LD (IY+0),2
43001 LD (IY+17),0
43005 LD (IY+7),D
43008 LD (IY+0),C
43011 LD (IY+1),B
43014 LD (IY+6),0
43018 LD IY,39654
43022 LD A,(39654)
43025 AND A
43026 JR Z,43032
43028 LD IY,39676
43032 LD (IY+2),L
43035 LD (IY+4),H
43038 LD (IY+0),2
43042 LD (IY+17),0
43046 LD (IY+7),D
43049 LD (IY+0),C
43052 LD (IY+1),B
43055 LD (IY+6),0
43059 RET
43060 XOR A
43061 LD (39803),A
43064 LD (IY+21),32
43068 LD A,(43103)
43071 AND A
43072 JR Z,43076
43074 LD A,10
43076 LD (IY+1),A
43079 PUSH IX
43081 CALL Sounds_FindEmptySlot
43084 LD (IX+0),9
43088 LD (IX+1),192
43092 POP IX
43094 LD A,(36166)
43097 AND 254
43099 LD (36166),A
43102 RET
43103 NOP
43104 PUSH IX
43106 LD IX,39874
43110 CALL 46724
43113 CALL 39184
43116 CALL 39973
43119 LD (IX+17),0
43123 LD A,(IX+2)
43126 ADD A,16
43128 CP 233
43130 JR NC,43135
43132 LD (IX+2),A
43135 CALL Sounds_FindEmptySlot
43138 LD (IX+0),7
43142 LD (IX+1),32
43146 POP IX
43148 LD A,1
43150 LD (43161),A
43153 LD A,(47080)
43156 INC A
43157 LD (47080),A
43160 RET
43161 NOP
43162 LD A,(36166)
43165 AND 1
43167 LD (IX+1),A
43170 CALL 43782
43173 LD HL,(43215)
43176 LD DE,65504
43179 ADD HL,DE
43180 LD A,(36166)
43183 CP 56
43185 JR C,43190
43187 LD (43215),HL
43190 LD A,(43217)
43193 LD E,A
43194 LD D,(IX+4)
43197 ADD HL,DE
43198 LD A,L
43199 LD (43217),A
43202 LD A,H
43203 LD (IX+4),A
43206 SUB 6
43208 LD (39768),A
43211 LD (39746),A
43214 RET
43215 NOP
43216 NOP
43217 NOP
43218 CALL 44393
43221 LD A,(IX+4)
43224 CP 192
43226 JR NC,43261
43228 CALL 44149
43231 DEC (IX+21)
43234 RET NZ
43235 LD A,(IX+1)
43238 CP 4
43240 JR Z,43261
43242 INC (IX+1)
43245 CALL 43782
43248 LD A,(IX+20)
43251 SRL A
43253 LD (IX+20),A
43256 INC A
43257 LD (IX+21),A
43260 RET
43261 SET 7,(IX+0)
43265 RET
43266 LD A,(IX+4)
43269 CP 8
43271 JR NC,43277
43273 INC (IX+4)
43276 RET
43277 CALL 43383
43280 LD HL,(43643)
43283 LD A,H
43284 AND A
43285 JR Z,43292
43287 CALL 43588
43290 JR 43311
43292 LD B,1
43294 LD A,(36166)
43297 AND 3
43299 CALL Z,43645
43302 CALL 44393
43305 CALL 45052
43308 CALL 44140
43311 LD A,(IX+4)
43314 CP 192
43316 JR C,43323
43318 SET 7,(IX+0)
43322 RET
43323 LD A,(36166)
43326 AND 0
43328 CALL Z,43730
43331 LD A,(23771)
43334 AND A
43335 JP NZ,43668
43338 RET
43339 AND 4
43341 LD C,A
43342 LD A,(IX+6)
43345 ADD A,16
43347 AND 63
43349 CP 32
43351 JR NC,43355
43353 INC C
43354 INC C
43355 LD B,0
43357 LD HL,43375
43360 ADD HL,BC
43361 LD A,(HL)
43362 LD (IX+1),A
43365 INC HL
43366 LD A,(HL)
43367 LD (IX+19),A
43370 LD (IX+18),240
43374 RET
43375 LD BC,1348
43378 ADD A,H
43379 DEC C
43380 RET P
43381 ADD HL,BC
43382 RET NZ
43383 LD A,(39808)
43386 AND A
43387 RET NZ
43388 LD A,(36168)
43391 LD B,A
43392 LD A,(36169)
43395 ADD A,B
43396 AND 63
43398 RET NZ
43399 LD (39825),A
43402 LD A,(IX+4)
43405 ADD A,8
43407 CP 192
43409 RET NC
43410 LD (39812),A
43413 LD A,4
43415 LD (39808),A
43418 LD A,(IX+2)
43421 ADD A,8
43423 LD (39810),A
43426 LD A,10
43428 LD (39809),A
43431 LD A,8
43433 LD (39820),A
43436 LD (39821),A
43439 LD HL,4098
43442 LD (39816),HL
43445 LD HL,0
43448 LD (42327),HL
43451 RET
43452 LD A,(IX+4)
43455 CP 8
43457 JR NC,43463
43459 INC (IX+4)
43462 RET
43463 CALL 43383
43466 LD A,(IX+6)
43469 SUB 16
43471 AND 63
43473 LD (43523),A
43476 LD HL,(43643)
43479 LD A,H
43480 AND A
43481 JR Z,43488
43483 CALL 43588
43486 JR 43507
43488 LD B,1
43490 LD A,(36166)
43493 AND 3
43495 CALL Z,43645
43498 CALL 44393
43501 CALL 45052
43504 CALL 44140
43507 LD A,(IX+4)
43510 CP 192
43512 JR C,43519
43514 SET 7,(IX+0)
43518 RET
43519 CALL 43730
43522 LD C,0
43524 LD A,(IX+6)
43527 SUB 16
43529 AND 63
43531 XOR C
43532 AND 32
43534 JR Z,43560
43536 LD A,(IX+19)
43539 LD (IX+19),A
43542 BIT 5,C
43544 JR Z,43553
43546 LD A,14
43548 SUB (IX+1)
43551 JR 43560
43553 LD A,(IX+1)
43556 XOR 7
43558 ADD A,7
43560 LD A,(23771)
43563 AND A
43564 JP NZ,43668
43567 RET
43568 LD (IX+19),144
43572 CALL 43730
43575 LD A,(IX+1)
43578 AND 63
43580 CP 9
43582 RET NZ
43583 SET 7,(IX+0)
43587 RET
43588 LD A,L
43589 CP 16
43591 JR NC,43598
43593 LD L,16
43595 LD (43643),HL
43598 LD A,(IX+2)
43601 CP L
43602 JR Z,43615
43604 JR C,43612
43606 DEC (IX+2)
43609 DEC (IX+2)
43612 INC (IX+2)
43615 LD A,(IX+4)
43618 CP H
43619 JR Z,43631
43621 JR C,43627
43623 DEC (IX+4)
43626 RET
43627 INC (IX+4)
43630 RET
43631 LD A,(IX+2)
43634 CP L
43635 RET NZ
43636 LD HL,0
43639 LD (43643),HL
43642 RET
43643 NOP
43644 NOP
43645 LD A,(IX+6)
43648 LD L,A
43649 SUB (IX+20)
43652 JR Z,43668
43654 BIT 5,A
43656 LD A,B
43657 JR NZ,43661
43659 NEG
43661 ADD A,L
43662 AND 63
43664 LD (IX+6),A
43667 RET
43668 LD A,(36168)
43671 AND 63
43673 LD (IX+20),A
43676 RET
43677 LD A,6
43679 LD (39852),A
43682 XOR A
43683 LD (39869),A
43686 LD (48004),IY
43690 LD A,(IY+12)
43693 CP 28
43695 LD A,4
43697 JR Z,43701
43699 LD A,12
43701 ADD A,(IY+2)
43704 LD (39854),A
43707 LD A,(IY+4)
43710 ADD A,6
43712 LD (39856),A
43715 LD A,27
43717 LD (35101),A
43720 LD HL,0
43723 LD (43215),HL
43726 INC (IY+20)
43729 RET
43730 LD A,(IX+18)
43733 LD B,A
43734 SUB 64
43736 JR NC,43778
43738 LD A,(IX+1)
43741 AND 63
43743 INC A
43744 LD E,A
43745 LD A,(IX+19)
43748 LD D,A
43749 RRCA
43750 RRCA
43751 RRCA
43752 RRCA
43753 AND 15
43755 CP E
43756 JR NC,43762
43758 LD A,D
43759 AND 15
43761 LD E,A
43762 LD (IX+1),E
43765 LD A,B
43766 ADD A,A
43767 ADD A,A
43768 AND 192
43770 OR (IX+18)
43773 EX AF,AF'
43774 CALL 43782
43777 EX AF,AF'
43778 LD (IX+18),A
43781 RET
This entry point is used by the routine at 38730.
43782 CALL 30567
43785 LD A,(DE)
43786 LD (IX+8),A
43789 INC DE
43790 LD A,(DE)
43791 LD (IX+9),A
43794 RET
43795 PUSH IX
43797 CALL Sounds_FindEmptySlot
43800 LD (IX+0),3
43804 POP IX
43806 RET
43807 LD A,(IX+4)
43810 CP 152
43812 RET C
43813 LD A,(IX+15)
43816 CP 170
43818 RET NC
43819 LD IY,39764
43823 CALL 44066
43826 JR C,43842
43828 LD A,(47077)
43831 CP 2
43833 RET NZ
43834 LD IY,39742
43838 CALL 44066
43841 RET NC
43842 RES 7,(IX+18)
43846 BIT 7,(IY+2)
43850 JR Z,43856
43852 SET 7,(IX+18)
43856 CALL 43795
43859 LD A,(IY+20)
43862 CP 3
43864 JR NZ,43909
43866 LD A,(IY+12)
43869 CP 28
43871 JR NZ,43909
43873 LD A,(IX+2)
43876 SUB (IY+2)
43879 JR NC,43882
43881 XOR A
43882 AND 252
43884 CP 25
43886 JR C,43890
43888 LD A,24
43890 LD B,A
43891 LD A,(IX+21)
43894 AND 128
43896 OR B
43897 LD (IX+21),A
43900 LD (IX+20),176
43904 LD (IX+4),167
43908 RET
43909 LD (IX+4),166
43913 LD A,(IX+18)
43916 AND 128
43918 LD (IX+18),A
43921 LD A,(IY+12)
43924 LD HL,44014
43927 CP 28
43929 JR Z,43934
43931 LD HL,44028
43934 LD A,(IX+2)
43937 ADD A,3
43939 SUB (IY+2)
43942 JR C,43951
43944 CP (HL)
43945 JR C,43951
43947 INC HL
43948 INC HL
43949 JR 43944
43951 INC HL
43952 LD A,(HL)
43953 BIT 2,A
43955 JR NZ,43960
43957 JP 43979
43960 CALL 43967
43963 LD A,(HL)
43964 CALL 43979
43967 LD A,(IX+6)
43970 XOR 31
43972 INC A
43973 AND 63
43975 LD (IX+6),A
43978 RET
43979 AND 3
43981 ADD A,A
43982 LD B,A
43983 ADD A,A
43984 ADD A,B
43985 LD HL,44042
43988 CALL PrintLine_9
43991 LD A,4
43993 CP (IX+6)
43996 JR Z,44009
43998 INC HL
43999 ADD A,4
44001 CP 16
44003 JR NZ,43993
44005 ADD A,4
44007 JR 43993
44009 LD A,(HL)
44010 LD (IX+6),A
44013 RET
44014 INC B
44015 RLCA
44016 EX AF,AF'
44017 LD B,12
44019 DEC B
44020 DJNZ 44022
44022 INC D
44023 LD BC,536
44026 RST 56
44027 INC BC
44028 LD B,7
44030 INC C
44031 LD B,18
44033 DEC B
44034 LD A,(DE)
44035 NOP
44036 JR NZ,44039
44038 LD H,2
44040 RST 56
44041 INC BC
44042 INC A
44043 JR C,44097
44045 INC L
44046 JR Z,44084
44048 INC A
44049 JR C,44103
44051 INC (HL)
44052 INC (HL)
44053 INC (HL)
44054 INC A
44055 JR C,44113
44057 INC (HL)
44058 JR C,44116
44060 INC A
44061 INC A
44062 JR C,44120
44064 INC A
44065 INC A
44066 LD L,(IX+2)
44069 LD A,(IY+2)
44072 LD C,(IX+12)
44075 LD B,(IY+12)
44078 CALL 44094
44081 RET NC
44082 LD L,(IX+4)
44085 LD A,(IY+4)
44088 LD C,(IX+13)
44091 LD B,(IY+13)
44094 SUB L
44095 JR C,44099
44097 SUB C
44098 RET
44099 ADD A,B
44100 RET
44101 LD L,(IX+2)
44104 LD A,(IY+2)
44107 LD C,(IX+12)
44110 LD B,(IY+12)
44113 CALL 44129
44116 RET NC
44117 LD L,(IX+4)
44120 LD A,(IY+4)
44123 LD C,(IX+13)
44126 LD B,(IY+13)
44129 SUB L
44130 JR C,44136
44132 DEC C
44133 DEC C
44134 SUB C
44135 RET
44136 DEC B
44137 DEC B
44138 ADD A,B
44139 RET
44140 CALL 44183
44143 CALL 44194
44146 JP 44220
44149 LD B,63
44151 CALL 44183
44154 CALL C,44270
44157 LD B,31
44159 CALL 44194
44162 CALL C,44270
44165 CALL 44220
44168 RET C
44169 JP 44270
44172 LD A,(IX+4)
44175 CP 175
44177 RET C
44178 LD (IX+4),175
44182 RET
44183 LD A,(IX+4)
44186 CP 8
44188 RET NC
44189 LD (IX+4),8
44193 RET
44194 LD A,(IX+2)
44197 CP 8
44199 RET NC
44200 LD (IX+2),8
44204 RET
This entry point is used by the routine at StartGame.
44205 LD A,(IX+2)
44208 CP 128
44210 RET NC
44211 LD (IX+2),128
44215 RES 0,(IX+1)
44219 RET
44220 LD A,(IX+12)
44223 ADD A,(IX+2)
44226 CP 249
44228 RET C
44229 LD A,248
44231 SUB (IX+12)
44234 LD (IX+2),A
44237 RET
This entry point is used by the routine at StartGame.
44238 LD A,(IX+12)
44241 ADD A,(IX+2)
44244 CP 128
44246 RET C
44247 LD A,128
44249 SUB (IX+12)
44252 LD (IX+2),A
44255 LD A,(IX+12)
44258 CP 28
44260 JR Z,44265
44262 CP 44
44264 RET NZ
44265 SET 0,(IX+1)
44269 RET
44270 LD A,(IX+6)
44273 XOR B
44274 INC A
44275 AND 63
44277 LD (IX+6),A
44280 RET
44281 LD H,0
44283 LD B,H
44284 LD L,H
44285 LD D,(IX+7)
44288 LD A,8
44290 JR 44298
44292 DEC A
44293 RET Z
44294 SLA C
44296 RL B
44298 SRL D
44300 JR NC,44292
44302 ADD HL,BC
44303 JP NZ,44292
44306 RET
44307 PUSH BC
44308 CALL 44281
44311 POP BC
44312 INC B
44313 RET NZ
44314 LD A,L
44315 CPL
44316 LD L,A
44317 LD A,H
44318 CPL
44319 LD H,A
44320 INC HL
44321 RET
44322 LD HL,44376
44325 LD A,(IX+6)
44328 AND 15
44330 LD B,A
44331 CALL PrintLine_9
44334 LD C,(HL)
44335 LD A,B
44336 XOR 15
44338 INC A
44339 LD HL,44376
44342 CALL PrintLine_9
44345 LD L,(HL)
44346 LD H,0
44348 LD B,H
44349 LD A,(IX+6)
44352 AND 48
44354 RET Z
44355 CP 16
44357 JR NZ,44364
44359 LD A,L
44360 LD L,C
44361 LD C,A
44362 DEC B
44363 RET
44364 CP 32
44366 JR NZ,44371
44368 DEC H
44369 DEC B
44370 RET
44371 LD A,C
44372 LD C,L
44373 LD L,A
44374 DEC H
44375 RET
44376 RST 56
44377 DEFB 253
44378 JP M,59124
44381 RET PO
44382 CALL NC,46277
44385 AND C
44386 ADC A,L
44387 LD A,B
44388 LD H,C
44389 LD C,D
44390 LD SP,24
44393 CALL 44322
44396 PUSH HL
44397 CALL 44307
44400 LD D,(IX+2)
44403 LD E,(IX+3)
44406 ADD HL,DE
44407 LD (IX+2),H
44410 LD (IX+3),L
44413 POP BC
44414 CALL 44307
44417 LD D,(IX+4)
44420 LD E,(IX+5)
44423 ADD HL,DE
44424 LD (IX+4),H
44427 LD (IX+5),L
44430 RET
This entry point is used by the routine at 46949.
44431 LD IY,(38793)
44435 LD HL,16513
44438 LD B,12
44440 PUSH BC
44441 PUSH HL
44442 CALL 44460
44445 POP HL
44446 LD A,32
44448 ADD A,L
44449 LD L,A
44450 JR NC,44456
44452 LD A,8
44454 ADD A,H
44455 LD H,A
44456 POP BC
44457 DJNZ 44440
44459 RET
44460 LD B,15
44462 PUSH BC
44463 PUSH HL
44464 CALL 44476
44467 POP HL
44468 INC L
44469 INC L
44470 POP BC
44471 INC IY
44473 DJNZ 44462
44475 RET
44476 BIT 7,(IY+0)
44480 RET NZ
44481 BIT 4,(IY+0)
44485 RET NZ
44486 LD E,(IX+0)
44489 LD D,(IX+1)
44492 LD (44510),SP
44496 EX DE,HL
44497 LD SP,HL
44498 EX DE,HL
44499 LD B,8
44501 POP DE
44502 LD (HL),E
44503 INC L
44504 LD (HL),D
44505 DEC L
44506 INC H
44507 DJNZ 44501
44509 LD SP,0
44512 RET
This entry point is used by the routine at 48591.
44513 LD IY,(38793)
44517 LD HL,56833
44520 LD (44795),HL
44523 LD HL,55202
44526 LD (44797),HL
44529 LD B,12
44531 PUSH BC
44532 PUSH IY
44534 CALL 44563
44537 POP IY
44539 CALL 44586
44542 LD HL,(44795)
44545 INC H
44546 LD (44795),HL
44549 LD HL,(44797)
44552 LD DE,32
44555 ADD HL,DE
44556 LD (44797),HL
44559 POP BC
44560 DJNZ 44531
44562 RET
44563 LD B,15
44565 LD HL,(44795)
44568 PUSH BC
44569 PUSH HL
44570 BIT 7,(IY+0)
44574 CALL Z,44674
44577 POP HL
44578 INC L
44579 INC L
44580 INC IY
44582 POP BC
44583 DJNZ 44568
44585 RET
44586 LD B,15
44588 LD HL,(44797)
44591 BIT 7,(IY+0)
44595 JR NZ,44610
44597 RES 6,(HL)
44599 INC L
44600 LD A,L
44601 CPL
44602 AND 31
44604 JR Z,44610
44606 RES 6,(HL)
44608 JR 44611
44610 INC L
44611 INC L
44612 INC IY
44614 DJNZ 44591
44616 RET
44617 LD HL,(44795)
44620 INC H
44621 INC L
44622 PUSH BC
44623 PUSH HL
44624 BIT 7,(IY+0)
44628 CALL Z,44640
44631 POP HL
44632 INC L
44633 INC L
44634 INC IY
44636 POP BC
44637 DJNZ 44622
44639 RET
44640 LD DE,21930
44643 LD C,L
44644 CALL 44655
44647 LD A,L
44648 AND 31
44650 CP 29
44652 RET Z
44653 LD L,C
44654 INC L
44655 LD B,4
44657 LD A,(HL)
44658 AND E
44659 LD (HL),A
44660 LD A,L
44661 ADD A,32
44663 LD L,A
44664 LD A,(HL)
44665 AND D
44666 LD (HL),A
44667 LD A,L
44668 ADD A,32
44670 LD L,A
44671 DJNZ 44657
44673 RET
44674 LD (44725),SP
44678 PUSH HL
44679 LD DE,65504
44682 ADD HL,DE
44683 LD (HL),0
44685 INC L
44686 LD (HL),0
44688 POP HL
44689 LD A,L
44690 AND 31
44692 DEC A
44693 JR Z,44708
44695 PUSH HL
44696 DEC L
44697 LD DE,32
44700 LD B,8
44702 RES 0,(HL)
44704 ADD HL,DE
44705 DJNZ 44702
44707 POP HL
44708 LD SP,44799
44711 LD DE,31
44714 LD A,8
44716 POP BC
44717 LD (HL),C
44718 INC L
44719 LD (HL),B
44720 ADD HL,DE
44721 DEC A
44722 JR NZ,44716
44724 LD SP,0
44727 LD C,L
44728 LD (HL),A
44729 INC L
44730 LD (HL),A
44731 LD A,L
44732 AND 31
44734 CP 30
44736 JR Z,44750
44738 INC L
44739 LD DE,65504
44742 ADD HL,DE
44743 LD B,8
44745 RES 7,(HL)
44747 ADD HL,DE
44748 DJNZ 44745
44750 LD A,C
44751 AND 31
44753 LD HL,(44797)
44756 ADD A,L
44757 LD L,A
44758 LD DE,65502
44761 ADD HL,DE
44762 PUSH HL
44763 LD A,(IY+0)
44766 AND 15
44768 LD HL,44779
44771 CALL PrintLine_9
44774 LD B,(HL)
44775 POP HL
44776 LD (HL),B
44777 INC L
44778 LD (HL),B
44779 RET
44780 LD D,A
44781 LD C,A
44782 LD E,A
44783 JR NZ,44897
44785 LD B,A
44786 LD D,A
44787 LD E,A
44788 LD C,A
44789 NOP
44790 LD B,A
44791 LD D,A
44792 LD C,A
44793 LD E,A
44794 NOP
44795 NOP
44796 NOP
44797 NOP
44798 NOP
Prev: 38730 Up: Map Next: 44799