summaryrefslogtreecommitdiff
path: root/src/engine/bank2.asm
blob: 1c82b471fb233359363e85e710e4c6a43018ed65 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
INCBIN "baserom.gbc",$8000,$8cd4 - $8000

Func_8cd4: ; 8cd4 (2:4cd4)
	push bc
	call EnableExtRAM
	ld b, $3c
.asm_8cda
	ld a, [de]
	inc de
	ld [hli], a
	dec b
	jr nz, .asm_8cda
	xor a
	ld [hl], a
	call DisableExtRAM
	pop bc
	ret
; 0x8ce7

INCBIN "baserom.gbc",$8ce7,$8cf9 - $8ce7

Func_8cf9: ; 8cf9 (2:4cf9)
	call EnableExtRAM
	xor a
	ld hl, $b703
	ld [hli], a
	inc a
	ld [hli], a
	ld [hli], a
	ld [hl], a
	ld [$b701], a
	call DisableExtRAM
Func_8d0b: ; 8d0b (2:4d0b)
	ld hl, Unknown_8d15
	ld de, $9380
	call Func_92ad
	ret

Unknown_8d15: ; 8d15 (2:4d15)
INCBIN "baserom.gbc",$8d15,$8d56 - $8d15

Func_8d56: ; 8d56 (2:4d56)
	xor a
	ld [$cab6], a
	call Func_04a2
	call Func_099c
	ld a, $1
	ld [$cac0], a
	call Func_2119
	call Func_20b0
	call Func_8d0b
	bank1call Func_5aeb
	ld de, $3cbf
	call Func_2275
	ret
; 0x8d78

INCBIN "baserom.gbc",$8d78,$8d9d - $8d78

Func_8d9d: ; 8d9d (2:4d9d)
	ld de, $cfd1
	ld b, $7
.asm_8da2
	ld a, [hli]
	ld [de], a
	inc de
	dec b
	jr nz, .asm_8da2
	ret

Unknown_8da9: ; 8da9 (2:4da9)
INCBIN "baserom.gbc",$8da9,$8db0 - $8da9

Func_8db0: ; 8db0 (2:4db0)
	ld hl, Unknown_8da9
	call Func_8d9d
	ld a, $ff
	call Func_9168
	xor a

Func_8dbc: ; 8dbc (2:4dbc)
	ld hl, Unknown_8de2
	call Func_2636
	ld hl, $0224
	call Func_2a59
.asm_8dc8
	call Func_053f
	jr c, Func_8dbc
	call Func_8dea
	jr c, Func_8dbc
	call Func_264b
	jr nc, .asm_8dc8
	ld a, [$ffb1]
	cp $ff
	ret z
	ld [$ceb1], a
	jp Func_8e42

Unknown_8de2: ; 8de2 (2:4de2)
INCBIN "baserom.gbc",$8de2,$8dea - $8de2

Func_8dea: ; 8dea (2:4dea)
	ld a, [hButtonsPressed2]
	and $8
	ret z
	ld a, [$cd10]
	ld [$ceb1], a
	call Func_8ff2
	jp nc, Func_8e05
	ld a, $ff
	call Func_90fb
	call Func_8fe8
	scf
	ret

Func_8e05: ; 8e05 (2:4e05)
	ld a, $1
	call Func_90fb
	call Func_9048
	push hl
	call Func_9038
	pop de
	call Func_8e1f
	ld a, $ff
	call Func_9168
	ld a, [$ceb1]
	scf
	ret

Func_8e1f: ; 8e1f (2:4e1f)
	push de
	ld de, $cfb9
	call Func_92b4
	pop de
	ld hl, $cf17
	call Func_8cd4
	ld a, $9
	ld hl, $cebb
	call Func_9843
	ld a, $3c
	ld [$cecc], a
	ld hl, $cebb
	ld [hl], a
	call Func_9e41
	ret

Func_8e42: ; 8e42 (2:4e42)
	call Func_2a9e
	ld hl, Unknown_9027
	call Func_2c08
	call Func_905a
.asm_8e4e
	call Func_053f
	call Func_9065
	jp nc, .asm_8e4e
	cp $ff
	jr nz, .asm_8e64
	call Func_90d8
	ld a, [$ceb1]
	jp Func_8dbc
.asm_8e64
	ld a, [$ceaf]
	or a
	jp nz, Func_8f8a
	ld a, [$ceb0]
	or a
	jp nz, .asm_8ecf
	call Func_9048
	ld e, l
	ld d, h
	ld hl, $cf17
	call Func_8cd4
	ld a, $14
	ld hl, $cfb9
	call Func_9843
	ld de, $cfb9
	call Func_9038
	call Func_92b4
	call Func_9345
	jr nc, .asm_8ec4
	call EnableExtRAM
	ld hl, $cf17
	call Func_910a
	call Func_9048
	call Func_9152
	ld e, l
	ld d, h
	ld hl, $cf17
	ld b, $3c
.asm_8ea9
	ld a, [hli]
	ld [de], a
	inc de
	dec b
	jr nz, .asm_8ea9
	call Func_9038
	ld d, h
	ld e, l
	ld hl, $cfb9
	call Func_92ad
	call Func_9038
	ld a, [hl]
	call DisableExtRAM
	or a
	jr z, .asm_8edb
.asm_8ec4
	ld a, $ff
	call Func_9168
	ld a, [$ceb1]
	jp Func_8dbc
.asm_8ecf
	call Func_8ff2
	jp nc, .asm_8edb
	call Func_8fe8
	jp Func_8dbc
.asm_8edb
	ld a, $14
	ld hl, $cfb9
	call Func_9843
	ld de, $cfb9
	call Func_9038
	call Func_92b4
	call Func_8f05
	call Func_9038
	ld d, h
	ld e, l
	ld hl, $cfb9
	call Func_92b4
	ld a, $ff
	call Func_9168
	ld a, [$ceb1]
	jp Func_8dbc

Func_8f05: ; 8f05 (2:4f05)
	ld a, [$ceb1]
	or a
	jr nz, .asm_8f10
	ld hl, Unknown_a763
	jr .asm_8f23
.asm_8f10
	dec a
	jr nz, .asm_8f18
	ld hl, Unknown_a76c
	jr .asm_8f23
.asm_8f18
	dec a
	jr nz, .asm_8f20
	ld hl, Unknown_a775
	jr .asm_8f23
.asm_8f20
	ld hl, Unknown_a77e
.asm_8f23
	ld a, $14
	ld bc, $0401
	ld de, $cfb9
	farcall Func_1ad89
	ld a, [$cfb9]
	or a
	ret nz
	call Func_8f38
	ret

Func_8f38: ; 8f38 (2:4f38)
	ld hl, $b701
	call EnableExtRAM
	ld a, [hli]
	ld h, [hl]
	call DisableExtRAM
	ld l, a
	ld de, $c590
	call Func_0663
	ld hl, $cfb9
	ld [hl], $6
	inc hl
	ld [hl], $44
	inc hl
	ld [hl], $65
	inc hl
	ld [hl], $63
	inc hl
	ld [hl], $6b
	inc hl
	ld [hl], $20
	inc hl
	ld de, $c592
	ld a, [de]
	inc de
	ld [hli], a
	ld a, [de]
	inc de
	ld [hli], a
	ld a, [de]
	ld [hli], a
	xor a
	ld [hl], a
	ld hl, $b701
	call EnableExtRAM
	ld e, [hl]
	inc hl
	ld d, [hl]
	ld a, $3
	cp d
	jr nz, .asm_8f82
	ld a, $e7
	cp e
	jr nz, .asm_8f82
	ld de, $0000
.asm_8f82
	inc de
	ld [hl], d
	dec hl
	ld [hl], e
	call DisableExtRAM
	ret

Func_8f8a: ; 8f8a (2:4f8a)
	ld a, [$ceb0]
	or a
	jp nz, Func_9026
	call Func_8ff2
	jp nc, Func_8f9d
	call Func_8fe8
	jp Func_8dbc

Func_8f9d: ; 8f9d (2:4f9d)
	call EnableExtRAM
	ld a, [$b700]
	call DisableExtRAM
	ld h, $3
	ld l, a
	call Func_0879
	ld e, l
	inc e
	ld d, $2
	xor a
	ld hl, $0000
	ld bc, $0202
	call Func_1f5f
	ld a, [$ceb1]
	call EnableExtRAM
	ld [$b700], a
	call DisableExtRAM
	call Func_9326
	call Func_9038
	call EnableExtRAM
	call Func_9253
	call DisableExtRAM
	xor a
	ld [$ce3f], a
	ld [$ce40], a
	ld hl, $022a
	call Func_2aab
	ld a, [$ceb1]
	jp Func_8dbc

Func_8fe8: ; 8fe8 (2:4fe8)
	ld hl, $022f
	call Func_2aab
	ld a, [$ceb1]
	ret

Func_8ff2: ; 8ff2 (2:4ff2)
	ld a, [$ceb1]
	ld hl, $ceb2
	ld b, $0
	ld c, a
	add hl, bc
	ld a, [hl]
	or a
	ret nz
	scf
	ret
; 0x9001

INCBIN "baserom.gbc",$9001,$9026 - $9001

Func_9026: ; 9026 (2:5026)
	ret

Unknown_9027: ; 9027 (2:5027)
INCBIN "baserom.gbc",$9027,$9038 - $9027

Func_9038: ; 9038 (2:5038)
	ld a, [$ceb1]
	ld h, a
	ld l, $54
	call Func_0879
	push de
	ld de, $a200
	add hl, de
	pop de
	ret

Func_9048: ; 9048 (2:5048)
	push af
	ld a, [$ceb1]
	ld h, a
	ld l, $54
	call Func_0879
	push de
	ld de, $a218
	add hl, de
	pop de
	pop af
	ret

Func_905a: ; 905a (2:505a)
	xor a
	ld [$ceaf], a
	ld [$ceb0], a
	ld [$cea3], a
	ret

Func_9065: ; 9065 (2:5065)
	xor a
	ld [$cfe3], a
	ld a, [$ceaf]
	ld d, a
	ld a, [$ceb0]
	ld e, a
	ld a, [hButtonsPressed2]
	or a
	jr z, .asm_90a6
	bit 5, a
	jr nz, .asm_907e
	bit 4, a
	jr z, .asm_9084
.asm_907e
	ld a, d
	xor $1
	ld d, a
	jr .asm_9090
.asm_9084
	bit 6, a
	jr nz, .asm_908c
	bit 7, a
	jr z, .asm_90a6
.asm_908c
	ld a, e
	xor $1
	ld e, a
.asm_9090
	ld a, $1
	ld [$cfe3], a
	push de
	call Func_90d8
	pop de
	ld a, d
	ld [$ceaf], a
	ld a, e
	ld [$ceb0], a
	xor a
	ld [$cea3], a
.asm_90a6
	ld a, [$ff91]
	and $3
	jr z, .asm_90c1
	and $1
	jr nz, .asm_90b7
	ld a, $ff
	call Func_90fb
	scf
	ret
.asm_90b7
	call Func_90f7
	ld a, $1
	call Func_90fb
	scf
	ret
.asm_90c1
	ld a, [$cfe3]
	or a
	jr z, .asm_90ca
	call Func_3796
.asm_90ca
	ld hl, $cea3
	ld a, [hl]
	inc [hl]
	and $f
	ret nz
	ld a, $f
	bit 4, [hl]
	jr z, asm_90da
Func_90d8: ; 90d8 (2:50d8)
	ld a, $0
asm_90da
	ld e, a
	ld a, $a
	ld l, a
	ld a, [$ceaf]
	ld h, a
	call Func_0879
	ld a, l
	add $1
	ld b, a
	ld a, [$ceb0]
	sla a
	add $e
	ld c, a
	ld a, e
	call Func_06c3
	or a
	ret

Func_90f7: ; 90f7 (2:50f7)
	ld a, $f
	jr asm_90da

Func_90fb: ; 90fb (2:50fb)
	push af
	inc a
	jr z, .asm_9103
	ld a, $2
	jr .asm_9105
.asm_9103
	ld a, $3
.asm_9105
	call Func_3796
	pop af
	ret

Func_910a: ; 910a (2:510a)
	push hl
	ld b, $0
	ld d, $3c
.asm_910f
	ld a, [hli]
	or a
	jr z, .asm_911e
	ld c, a
	push hl
	ld hl, $a100
	add hl, bc
	dec [hl]
	pop hl
	dec d
	jr nz, .asm_910f
.asm_911e
	pop hl
	ret
; 0x9120

INCBIN "baserom.gbc",$9120,$9152 - $9120

Func_9152: ; 9152 (2:5152)
	push hl
	ld b, $0
	ld d, $3c
.asm_9157
	ld a, [hli]
	or a
	jr z, .asm_9166
	ld c, a
	push hl
	ld hl, $a100
	add hl, bc
	inc [hl]
	pop hl
	dec d
	jr nz, .asm_9157
.asm_9166
	pop hl
	ret

Func_9168: ; 9168 (2:5168)
	;ld [$ffb5], a
	db $ea, $b5, $ff
	call Func_8d56
	ld de, $0000
	ld bc, $1404
	call Func_1e7c
	ld de, $0003
	ld bc, $1404
	call Func_1e7c
	ld de, $0006
	ld bc, $1404
	call Func_1e7c
	ld de, $0009
	ld bc, $1404
	call Func_1e7c
	ld hl, Unknown_9242
	call Func_2c08
	ld a, $4
	ld hl, $ceb2
	call Func_9843
	;ld a, [$ffb5]
	db $fa, $b5, $ff
	bit 0, a
	jr z, .asm_91b0
	ld hl, $a200
	ld de, $0602
	call Func_926e
.asm_91b0
	ld hl, $a218
	call Func_9314
	jr c, .asm_91bd
	ld a, $1
	ld [$ceb2], a
.asm_91bd
	;ld a, [$ffb5]
	db $fa, $b5, $ff
	bit 1, a
	jr z, .asm_91cd
	ld hl, $a254
	ld de, $0605
	call Func_926e
.asm_91cd
	ld hl, $a26c
	call Func_9314
	jr c, .asm_91da
	ld a, $1
	ld [$ceb3], a
.asm_91da
	;ld a, [$ffb5]
	db $fa, $b5, $ff
	bit 2, a
	jr z, .asm_91ea
	ld hl, $a2a8
	ld de, $0608
	call Func_926e
.asm_91ea
	ld hl, $a2c0
	call Func_9314
	jr c, .asm_91f7
	ld a, $1
	ld [$ceb4], a
.asm_91f7
	;ld a, [$ffb5]
	db $fa, $b5, $ff
	bit 3, a
	jr z, .asm_9207
	ld hl, $a2fc
	ld de, $060b
	call Func_926e
.asm_9207
	ld hl, $a314
	call Func_9314
	jr c, .asm_9214
	ld a, $1
	ld [$ceb5], a
.asm_9214
	call EnableExtRAM
	ld a, [$b700]
	ld c, a
	ld b, $0
	ld d, $2
.asm_921f
	ld hl, $ceb2
	add hl, bc
	ld a, [hl]
	or a
	jr nz, .asm_9234
	inc c
	ld a, $4
	cp c
	jr nz, .asm_921f
	ld c, $0
	dec d
	jr z, .asm_9234
	jr .asm_921f
.asm_9234
	ld a, c
	ld [$b700], a
	call DisableExtRAM
	call Func_9326
	call EnableLCD
	ret

Unknown_9242: ; 9242 (2:5242)
INCBIN "baserom.gbc",$9242,$9253 - $9242

Func_9253: ; 9253 (2:5253)
	ld de, $c590
	call Func_92ad
	ld hl, $c590
	call Func_23c1
	ld b, $0
	ld hl, $c590
	add hl, bc
	ld d, h
	ld e, l
	ld hl, Unknown_92a7
	call Func_92ad
	ret

Func_926e: ; 926e (2:526e)
	push hl
	call Func_9314
	pop hl
	jr c, .asm_929c
	push de
	ld de, $c590
	call Func_92b4
	ld hl, $c590
	call Func_23c1
	ld b, $0
	ld hl, $c590
	add hl, bc
	ld d, h
	ld e, l
	ld hl, Unknown_92a7
	call Func_92ad
	pop de
	ld hl, $c590
	call Func_22ae
	call Func_21c5
	or a
	ret
.asm_929c
	call Func_22ae
	ld hl, $0223
	call Func_2c29
	scf
	ret

Unknown_92a7: ; 92a7 (2:52a7)
INCBIN "baserom.gbc",$92a7,$92ad - $92a7

Func_92ad: ; 92ad (2:52ad)
	ld a, [hli]
	ld [de], a
	or a
	ret z
	inc de
	jr Func_92ad

Func_92b4: ; 92b4 (2:52b4)
	call EnableExtRAM
	call Func_92ad
	call DisableExtRAM
	ret
; 0x92be

INCBIN "baserom.gbc",$92be,$9314 - $92be

Func_9314: ; 9314 (2:5314)
	ld bc, $0018
	add hl, bc
	call EnableExtRAM
	ld a, [hl]
	call DisableExtRAM
	or a
	jr nz, .asm_9324
	scf
	ret
.asm_9324
	or a
	ret

Func_9326: ; 9326 (2:5326)
	call EnableExtRAM
	ld a, [$b700]
	call DisableExtRAM
	ld h, $3
	ld l, a
	call Func_0879
	ld e, l
	inc e
	ld d, $2
	ld a, $38
	ld hl, $0102
	ld bc, $0202
	call Func_1f5f
	ret

Func_9345: ; 9345 (2:5345)
INCBIN "baserom.gbc",$9345,$9843 - $9345

Func_9843: ; 9843 (2:5843)
INCBIN "baserom.gbc",$9843,$9e41 - $9843

Func_9e41: ; 9e41 (2:5e41)
INCBIN "baserom.gbc",$9e41,$a288 - $9e41

Func_a288: ; a288 (2:6288)
INCBIN "baserom.gbc",$a288,$a763 - $a288

Unknown_a763: ; a763 (2:6763)
INCBIN "baserom.gbc",$a763,$a76c - $a763

Unknown_a76c: ; a76c (2:676c)
INCBIN "baserom.gbc",$a76c,$a775 - $a76c

Unknown_a775: ; a775 (2:6775)
INCBIN "baserom.gbc",$a775,$a77e - $a775

Unknown_a77e: ; a77e (2:677e)
INCBIN "baserom.gbc",$a77e,$b177 - $a77e

Func_b177: ; b177 (2:7177)
INCBIN "baserom.gbc",$b177,$c000 - $b177