summaryrefslogtreecommitdiff
path: root/home/unknown_388f.asm
blob: 66864940249ac28dc98fb22e79533baff80ab68c (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
INCLUDE "constants.asm"

SECTION "home/unknown_388f.asm", ROM0

Function388f::
	ret

Function3890::
	callba Function14cac
	ret

Function3899::
	callba Function14dac
	ret

Function38a2::
	callba Function14dc4
	ret

Function38ab::
	callba Function14ddd
	ret

Function38b4::
	callba Function14e00
	ret

Function38bd::
	callba Function14e5f
	ret

Function38c6::
	callba Function14e27
	ret

Function38cf::
	callba Function14e4a
	ret

Function38d8::
	ld hl, wc5ed
	set 7, [hl]
	ld a, $8
	ld [wd637], a
	ret

TestWildBattleStart::
	ldh a, [hJoyState]
	and D_PAD
	ret z ; if no directions are down, don't try and trigger a wild encounter
	call CheckBPressedDebug
	jp nz, ClearAccumulator ; if b button is down, clear acc
	callab Function3ee3e
	ld a, [wBattleMode]
	and a
	ret z ; if no battle, return
	ld a, $3
	call WriteIntod637
	call SetFFInAccumulator
	ret

Function3904::
	predef Function3ef19
	ld a, $f3
	ldh [hMapEntryMethod], a
	ld hl, wd4a9
	set 5, [hl]
	ld hl, wJoypadFlags
	set 4, [hl]
	set 6, [hl]
	ld a, $b
	call WriteIntod637
	ret

Function391f::
	ret

Function3920::
	ld a, [wcd5d]
	cp $1
	jr z, .asm_392d
	ld a, $4
	call WriteIntod637
	ret

.asm_392d:
	ld hl, wJoypadFlags
	res 4, [hl]
	ld hl, .text
	call OpenTextbox
	call GBFadeOutToBlack
	jp Init

.text:
	text "つぎは がんばるぞ!!"
	done