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
|
TwoIsland_MapScripts:: @ 8167564
map_script MAP_SCRIPT_ON_TRANSITION, TwoIsland_OnTransition
.byte 0
TwoIsland_OnTransition:: @ 816756A
setworldmapflag FLAG_WORLD_MAP_TWO_ISLAND
setflag FLAG_VISITED_TWO_ISLAND
call TwoIsland_EventScript_SetShopState
end
TwoIsland_EventScript_SetShopState:: @ 8167576
goto_if_set FLAG_SYS_CAN_LINK_WITH_RS, TwoIsland_EventScript_SetShopStateAfterHoennLink
goto_if_set FLAG_SYS_GAME_CLEAR, TwoIsland_EventScript_SetShopStateAfterChampion
goto_if_set FLAG_RESCUED_LOSTELLE, TwoIsland_EventScript_SetShopStateAfterLostelleRescue
goto TwoIsland_EventScript_SetShopStateDefault
end
TwoIsland_EventScript_SetShopStateAfterHoennLink:: @ 8167597
goto_if_unset FLAG_TWO_ISLAND_SHOP_INTRODUCED, TwoIsland_EventScript_SetShopInitial
goto_if_unset FLAG_TWO_ISLAND_SHOP_EXPANDED_1, TwoIsland_EventScript_SetShopExpanded1
goto_if_unset FLAG_TWO_ISLAND_SHOP_EXPANDED_2, TwoIsland_EventScript_SetShopExpanded2
goto TwoIsland_EventScript_SetShopExpanded3
end
TwoIsland_EventScript_SetShopStateAfterChampion:: @ 81675B8
goto_if_unset FLAG_TWO_ISLAND_SHOP_INTRODUCED, TwoIsland_EventScript_SetShopInitial
goto_if_unset FLAG_RESCUED_LOSTELLE, TwoIsland_EventScript_SetShopInitial
goto_if_unset FLAG_TWO_ISLAND_SHOP_EXPANDED_1, TwoIsland_EventScript_SetShopExpanded1
goto TwoIsland_EventScript_SetShopExpanded2
end
TwoIsland_EventScript_SetShopStateAfterLostelleRescue:: @ 81675D9
goto_if_unset FLAG_TWO_ISLAND_SHOP_INTRODUCED, TwoIsland_EventScript_SetShopInitial
goto TwoIsland_EventScript_SetShopExpanded1
end
TwoIsland_EventScript_SetShopStateDefault:: @ 81675E8
goto TwoIsland_EventScript_SetShopInitial
end
TwoIsland_EventScript_SetShopInitial:: @ 81675EE
setvar VAR_MAP_SCENE_TWO_ISLAND, 1
return
TwoIsland_EventScript_SetShopExpanded1:: @ 81675F4
setvar VAR_MAP_SCENE_TWO_ISLAND, 2
clearflag FLAG_HIDE_TWO_ISLAND_WOMAN
return
TwoIsland_EventScript_SetShopExpanded2:: @ 81675FD
setvar VAR_MAP_SCENE_TWO_ISLAND, 3
clearflag FLAG_HIDE_TWO_ISLAND_BEAUTY
return
TwoIsland_EventScript_SetShopExpanded3:: @ 8167606
setvar VAR_MAP_SCENE_TWO_ISLAND, 4
clearflag FLAG_HIDE_TWO_ISLAND_SUPER_NERD
return
TwoIsland_EventScript_Clerk:: @ 816760F
goto_if_questlog EventScript_ReleaseEnd
lock
faceplayer
compare VAR_MAP_SCENE_TWO_ISLAND, 4
goto_if_eq TwoIsland_EventScript_ClerkShopExpanded3
compare VAR_MAP_SCENE_TWO_ISLAND, 3
goto_if_eq TwoIsland_EventScript_ClerkShopExpanded2
compare VAR_MAP_SCENE_TWO_ISLAND, 2
goto_if_eq TwoIsland_EventScript_ClerkShopExpanded1
goto TwoIsland_EventScript_ClerkShopInitial
end
TwoIsland_EventScript_ClerkShopExpanded3:: @ 8167646
goto_if_set FLAG_TWO_ISLAND_SHOP_EXPANDED_3, TwoIsland_EventScript_ClerkShopSkipIntro
setflag FLAG_TWO_ISLAND_SHOP_EXPANDED_3
message TwoIsland_Text_BringingItemsFromDistantLands
waitmessage
goto TwoIsland_EventScript_ShopExpanded3
end
TwoIsland_EventScript_ClerkShopExpanded2:: @ 816765E
goto_if_set FLAG_TWO_ISLAND_SHOP_EXPANDED_2, TwoIsland_EventScript_ClerkShopSkipIntro
setflag FLAG_TWO_ISLAND_SHOP_EXPANDED_2
message TwoIsland_Text_HopeYouGiveItYourBest
waitmessage
goto TwoIsland_EventScript_ShopExpanded2
end
TwoIsland_EventScript_ClerkShopExpanded1:: @ 8167676
goto_if_set FLAG_TWO_ISLAND_SHOP_EXPANDED_1, TwoIsland_EventScript_ClerkShopSkipIntro
setflag FLAG_TWO_ISLAND_SHOP_EXPANDED_1
message TwoIsland_Text_AddedMerchandiseForLostelle
waitmessage
goto TwoIsland_EventScript_ShopExpanded1
end
TwoIsland_EventScript_ClerkShopInitial:: @ 816768E
goto_if_set FLAG_TWO_ISLAND_SHOP_INTRODUCED, TwoIsland_EventScript_ClerkShopSkipIntro
setflag FLAG_TWO_ISLAND_SHOP_INTRODUCED
message TwoIsland_Text_WelcomeToShopMerchandiseLimited
waitmessage
goto TwoIsland_EventScript_ShopInitial
end
TwoIsland_EventScript_ClerkShopSkipIntro:: @ 81676A6
message Text_MayIHelpYou
waitmessage
compare VAR_MAP_SCENE_TWO_ISLAND, 4
goto_if_eq TwoIsland_EventScript_ShopExpanded3
compare VAR_MAP_SCENE_TWO_ISLAND, 3
goto_if_eq TwoIsland_EventScript_ShopExpanded2
compare VAR_MAP_SCENE_TWO_ISLAND, 2
goto_if_eq TwoIsland_EventScript_ShopExpanded1
goto TwoIsland_EventScript_ShopInitial
end
TwoIsland_EventScript_ShopInitial:: @ 81676D3
pokemart TwoIsland_Items_ShopInitial
msgbox Text_PleaseComeAgain
release
end
.align 2
TwoIsland_Items_ShopInitial:: @ 81676E4
.2byte ITEM_GREAT_BALL
.2byte ITEM_FRESH_WATER
.2byte ITEM_NONE
release
end
TwoIsland_EventScript_ShopExpanded1:: @ 81676EC
pokemart TwoIsland_Items_ShopExpanded1
msgbox Text_PleaseComeAgain
release
end
.align 2
TwoIsland_Items_ShopExpanded1:: @ 81676FC
.2byte ITEM_ULTRA_BALL
.2byte ITEM_GREAT_BALL
.2byte ITEM_SODA_POP
.2byte ITEM_FRESH_WATER
.2byte ITEM_NONE
release
end
TwoIsland_EventScript_ShopExpanded2:: @ 8167708
pokemart TwoIsland_Items_ShopExpanded2
msgbox Text_PleaseComeAgain
release
end
.align 2
TwoIsland_Items_ShopExpanded2:: @ 8167718
.2byte ITEM_ULTRA_BALL
.2byte ITEM_GREAT_BALL
.2byte ITEM_LEMONADE
.2byte ITEM_SODA_POP
.2byte ITEM_FRESH_WATER
.2byte ITEM_MOOMOO_MILK
.2byte ITEM_NONE
release
end
TwoIsland_EventScript_ShopExpanded3:: @ 8167728
pokemart TwoIsland_Items_ShopExpanded3
msgbox Text_PleaseComeAgain
release
end
.align 2
TwoIsland_Items_ShopExpanded3:: @ 8167738
.2byte ITEM_ULTRA_BALL
.2byte ITEM_REPEAT_BALL
.2byte ITEM_TIMER_BALL
.2byte ITEM_LEMONADE
.2byte ITEM_SODA_POP
.2byte ITEM_FRESH_WATER
.2byte ITEM_MOOMOO_MILK
.2byte ITEM_LAVA_COOKIE
.2byte ITEM_NONE
release
end
TwoIsland_EventScript_Sailor:: @ 816774C
msgbox TwoIsland_Text_FellowMovedFromCeladonCity, MSGBOX_NPC
end
TwoIsland_EventScript_Woman:: @ 8167755
msgbox TwoIsland_Text_ShopkeepersBrotherWorksGameCorner, MSGBOX_NPC
end
TwoIsland_EventScript_Beauty:: @ 816775E
lock
faceplayer
famechecker FAMECHECKER_BRUNO, 4
msgbox TwoIsland_Text_BrunoCameToIslandWhileBack
release
end
TwoIsland_EventScript_SuperNerd:: @ 8167777
msgbox TwoIsland_Text_BuyRareItemsHere, MSGBOX_NPC
end
TwoIsland_EventScript_Boy:: @ 8167780
msgbox TwoIsland_Text_OldWomanLivesOutOnCape, MSGBOX_NPC
end
TwoIsland_EventScript_LittleBoy:: @ 8167789
msgbox TwoIsland_Text_HaveYouTriedJumpingGame, MSGBOX_NPC
end
TwoIsland_EventScript_IslandSign:: @ 8167792
msgbox TwoIsland_Text_IslandSign, MSGBOX_SIGN
end
TwoIsland_EventScript_JoyfulGameCornerSign:: @ 816779B
msgbox TwoIsland_Text_JoyfulGameCornerSign, MSGBOX_SIGN
end
TwoIsland_EventScript_FastCurrentSign:: @ 81677A4
msgbox TwoIsland_Text_DangerFastCurrent, MSGBOX_SIGN
end
|
