summaryrefslogtreecommitdiff
path: root/data/scripts/berry_tree.inc
blob: cf17f759d6e7ce7f3f8e3eb20262b1346f2aca17 (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
S_BerryTree:: @ 81A14DD
	special ObjectEventInteractionGetBerryTreeData
	switch VAR_0x8004
	case 255, BerryTree_EventScript_1A1533
	case 0, BerryTree_EventScript_1A153D
	case 1, BerryTree_EventScript_1A1595
	case 2, BerryTree_EventScript_1A15A2
	case 3, BerryTree_EventScript_1A15AF
	case 4, BerryTree_EventScript_1A15BC
	case 5, BerryTree_EventScript_1A15F9
	end

BerryTree_EventScript_1A1533:: @ 81A1533
	lockall
	message Route102_Text_1A1946
	waitmessage
	waitbuttonpress
	releaseall
	end

BerryTree_EventScript_1A153D:: @ 81A153D
	lock
	faceplayer
	specialvar VAR_RESULT, PlayerHasBerries
	compare VAR_RESULT, 1
	goto_if_eq BerryTree_EventScript_1A1558
	message Route102_Text_1A16B6
	waitmessage
	waitbuttonpress
	release
	end

BerryTree_EventScript_1A1558:: @ 81A1558
	msgbox Route102_Text_1A16CD, MSGBOX_YESNO
	compare VAR_RESULT, YES
	goto_if_eq BerryTree_EventScript_1A1577
	compare VAR_RESULT, NO
	goto_if_eq BerryTree_EventScript_1A1593
	end

BerryTree_EventScript_1A1577:: @ 81A1577
	fadescreen FADE_TO_BLACK
	closemessage
	special Berry_FadeAndGoToBerryBagMenu
	waitstate
	compare VAR_ITEM_ID, 0
	goto_if_eq BerryTree_EventScript_1A1593
	removeitem VAR_ITEM_ID, 1
	call S_PlantBerryTree
BerryTree_EventScript_1A1593:: @ 81A1593
	release
	end

BerryTree_EventScript_1A1595:: @ 81A1595
	lockall
	message Route102_Text_1A172C
	waitmessage
	waitbuttonpress
	goto BerryTree_EventScript_1A165F

BerryTree_EventScript_1A15A2:: @ 81A15A2
	lockall
	message Route102_Text_1A174B
	waitmessage
	waitbuttonpress
	goto BerryTree_EventScript_1A165F

BerryTree_EventScript_1A15AF:: @ 81A15AF
	lockall
	message Route102_Text_1A175C
	waitmessage
	waitbuttonpress
	goto BerryTree_EventScript_1A165F

BerryTree_EventScript_1A15BC:: @ 81A15BC
	call BerryTree_EventScript_1A15CE
	lockall
	message Route102_Text_1A177D
	waitmessage
	waitbuttonpress
	goto BerryTree_EventScript_1A165F

BerryTree_EventScript_1A15CE:: @ 81A15CE
	compare VAR_0x8005, 0
	goto_if_eq BerryTree_EventScript_1A15F2
	compare VAR_0x8005, 4
	goto_if_eq BerryTree_EventScript_1A15EB
	bufferstring 1, Route102_Text_1A17B7
	return

BerryTree_EventScript_1A15EB:: @ 81A15EB
	bufferstring 1, Route102_Text_1A179F
	return

BerryTree_EventScript_1A15F2:: @ 81A15F2
	bufferstring 1, Route102_Text_1A17B0
	return

BerryTree_EventScript_1A15F9:: @ 81A15F9
	buffernumberstring 1, VAR_0x8006
	lock
	faceplayer
	msgbox Route102_Text_1A17C0, MSGBOX_YESNO
	compare VAR_RESULT, YES
	goto_if_eq BerryTree_EventScript_1A161D
	compare VAR_RESULT, NO
	goto_if_eq BerryTree_EventScript_1A164B

BerryTree_EventScript_1A161D:: @ 81A161D
	special ObjectEventInteractionPickBerryTree
	compare VAR_0x8004, 0
	goto_if_eq BerryTree_EventScript_1A1642
	special ObjectEventInteractionRemoveBerryTree
	message Route102_Text_1A17FD
	playfanfare MUS_OBTAIN_BERRY
	waitmessage
	waitfanfare
	waitbuttonpress
	message Route102_Text_1A181A
	waitmessage
	waitbuttonpress
	release
	end

BerryTree_EventScript_1A1642:: @ 81A1642
	message Route102_Text_1A1881
	waitmessage
	waitbuttonpress
	release
	end

BerryTree_EventScript_1A164B:: @ 81A164B
	message Route102_Text_1A18C5
	waitmessage
	waitbuttonpress
	release
	end

S_PlantBerryTreeFromBag:: @ 81A1654
	lockall
	special ObjectEventInteractionGetBerryTreeData
	call S_PlantBerryTree
	releaseall
	end

BerryTree_EventScript_1A165F:: @ 81A165F
	checkitem ITEM_WAILMER_PAIL, 1
	compare VAR_RESULT, 0
	goto_if_eq BerryTree_EventScript_1A168D
	msgbox Route102_Text_1A18E6, MSGBOX_YESNO
	compare VAR_RESULT, YES
	goto_if_eq S_WaterBerryTree
	compare VAR_RESULT, NO
	goto_if_eq BerryTree_EventScript_1A168D
BerryTree_EventScript_1A168D:: @ 81A168D
	releaseall
	end

S_WaterBerryTreeFromBag:: @ 81A168F
	special ObjectEventInteractionGetBerryTreeData
	lockall
S_WaterBerryTree:: @ 81A1693
	message Route102_Text_1A1912
	waitmessage
	special ObjectEventInteractionWaterBerryTree
	special DoWateringBerryTreeAnim
	waitstate
	message Route102_Text_1A1925
	waitmessage
	waitbuttonpress
	releaseall
	end

S_PlantBerryTree:: @ 81A16A9
	special ObjectEventInteractionPlantBerryTree
	incrementgamestat GAME_STAT_PLANTED_BERRIES
	message Route102_Text_1A16FB
	waitmessage
	waitbuttonpress
	return