summaryrefslogtreecommitdiff
path: root/data/maps/FourIsland/scripts.inc
blob: 68788f93abf96f4d3b1f70f60cbbcea78c186562 (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
FourIsland_MapScripts:: @ 8167CAE
	map_script 3, FourIsland_MapScript1_167CB9
	map_script 2, FourIsland_MapScript2_167CE2
	.byte 0

FourIsland_MapScript1_167CB9:: @ 8167CB9
	setworldmapflag FLAG_WORLD_MAP_FOUR_ISLAND
	compare_var_to_value VAR_MAP_SCENE_FOUR_ISLAND, 0
	call_if eq, EventScript_167CCD
	call EventScript_167CD1
	end

EventScript_167CCD:: @ 8167CCD
	clearflag FLAG_HIDE_FOUR_ISLAND_RIVAL
	return

EventScript_167CD1:: @ 8167CD1
	checkflag FLAG_PENDING_DAYCARE_EGG
	goto_if FALSE, EventScript_167CE1
	setobjectxyperm 1, 16, 14

EventScript_167CE1:: @ 8167CE1
	return

FourIsland_MapScript2_167CE2:: @ 8167CE2
	map_script_2 VAR_MAP_SCENE_FOUR_ISLAND, 0, EventScript_167CEC
	.2byte 0

EventScript_167CEC:: @ 8167CEC
	lockall
	textcolor 0
	applymovement 10, Movement_1A75ED
	waitmovement 0
	playbgm MUS_RIVAL1, 0
	applymovement 10, Movement_1A75DB
	waitmovement 0
	applymovement 10, Movement_1A75DD
	waitmovement 0
	delay 25
	applymovement 10, Movement_167D49
	waitmovement 0
	msgbox gUnknown_8182B37
	closemessage
	applymovement 255, Movement_167D52
	applymovement 10, Movement_167D4E
	waitmovement 0
	fadedefaultbgm
	playse SE_KAIDAN
	delay 35
	removeobject 10
	setvar VAR_MAP_SCENE_FOUR_ISLAND, 1
	releaseall
	end

Movement_167D49:: @ 8167D49
	step_13
	step_13
	step_10
	step_10
	step_end

Movement_167D4E:: @ 8167D4E
	step_1c
	step_1a
	step_10
	step_end

Movement_167D52:: @ 8167D52
	step_12
	step_30
	step_end

FourIsland_EventScript_167D55:: @ 8167D55
	special sub_8110AB4
	compare_var_to_value VAR_RESULT, 2
	goto_if eq, EventScript_1A7AE0
	special sub_8112364
	lock
	faceplayer
	special GetDaycareMonNicknames
	specialvar VAR_RESULT, GetDaycareState
	compare_var_to_value VAR_RESULT, 1
	goto_if eq, EventScript_167D9B
	compare_var_to_value VAR_RESULT, 2
	goto_if eq, EventScript_167E0C
	compare_var_to_value VAR_RESULT, 3
	goto_if eq, EventScript_167E19
	msgbox gUnknown_81BF555
	release
	end

EventScript_167D9B:: @ 8167D9B
	msgbox gUnknown_81BF5E3, MSGBOX_YESNO
	compare_var_to_value VAR_RESULT, 1
	goto_if eq, EventScript_167DD1
	msgbox gUnknown_81BF7B6, MSGBOX_YESNO
	compare_var_to_value VAR_RESULT, 1
	goto_if eq, EventScript_167DD1
	msgbox gUnknown_81BF6CF
	clearflag FLAG_PENDING_DAYCARE_EGG
	special RejectEggFromDayCare
	release
	end

EventScript_167DD1:: @ 8167DD1
	specialvar VAR_RESULT, CalculatePlayerPartyCount
	compare_var_to_value VAR_RESULT, 6
	goto_if ne, EventScript_167DEB
	msgbox gUnknown_81BF6F0
	release
	end

EventScript_167DEB:: @ 8167DEB
	textcolor 3
	message Text_1BF72A
	call EventScript_1A6675
	playfanfare MUS_FANFA1
	waitfanfare
	waitbuttonpress
	msgbox gUnknown_81BF755
	special GiveEggFromDaycare
	clearflag FLAG_PENDING_DAYCARE_EGG
	release
	end

EventScript_167E0C:: @ 8167E0C
	special GetDaycareMonNicknames
	msgbox gUnknown_81BF69A
	release
	end

EventScript_167E19:: @ 8167E19
	special GetDaycareMonNicknames
	msgbox gUnknown_81BF789
	special SetDaycareCompatibilityString
	special Special_ShowStringVar4AsFieldMessage
	waitmessage
	waitbuttonpress
	release
	end

FourIsland_EventScript_167E2E:: @ 8167E2E
	lock
	faceplayer
	checkflag FLAG_SYS_CAN_LINK_WITH_RS
	goto_if TRUE, EventScript_167E43
	msgbox gUnknown_8182A2B
	release
	end

EventScript_167E43:: @ 8167E43
	famechecker FAMECHECKER_LORELEI, 5
	msgbox gUnknown_8182A75
	release
	end

FourIsland_EventScript_167E5A:: @ 8167E5A
	lock
	faceplayer
	famechecker FAMECHECKER_LORELEI, 4
	msgbox gUnknown_8182CE3
	release
	end

FourIsland_EventScript_167E73:: @ 8167E73
	msgbox gUnknown_8182D8E, 2
	end

FourIsland_EventScript_167E7C:: @ 8167E7C
	msgbox gUnknown_8182A03, 3
	end

FourIsland_EventScript_167E85:: @ 8167E85
	msgbox gUnknown_8182DEB, 3
	end