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
|
FourIsland_MapScripts:: @ 8167CAE
map_script MAP_SCRIPT_ON_TRANSITION, FourIsland_OnTransition
map_script MAP_SCRIPT_ON_FRAME_TABLE, FourIsland_OnFrame
.byte 0
FourIsland_OnTransition:: @ 8167CB9
setworldmapflag FLAG_WORLD_MAP_FOUR_ISLAND
compare 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
goto_if_unset FLAG_PENDING_DAYCARE_EGG, EventScript_167CE1
setobjectxyperm 1, 16, 14
EventScript_167CE1:: @ 8167CE1
return
FourIsland_OnFrame:: @ 8167CE2
map_script_2 VAR_MAP_SCENE_FOUR_ISLAND, 0, EventScript_167CEC
.2byte 0
EventScript_167CEC:: @ 8167CEC
lockall
textcolor 0
applymovement 10, Movement_WalkInPlaceFastestDown
waitmovement 0
playbgm MUS_RIVAL1, 0
applymovement 10, Movement_ExclamationMark
waitmovement 0
applymovement 10, Movement_Delay48
waitmovement 0
delay 25
applymovement 10, Movement_167D49
waitmovement 0
msgbox gUnknown_8182B37
closemessage
applymovement OBJ_EVENT_ID_PLAYER, 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
walk_right
walk_right
walk_down
walk_down
step_end
Movement_167D4E:: @ 8167D4E
delay_16
delay_4
walk_down
step_end
Movement_167D52:: @ 8167D52
walk_left
walk_in_place_fastest_right
step_end
FourIsland_EventScript_DaycareMan:: @ 8167D55
goto_if_questlog EventScript_ReleaseEnd
special sub_8112364
lock
faceplayer
special GetDaycareMonNicknames
specialvar VAR_RESULT, GetDaycareState
compare VAR_RESULT, DAYCARE_EGG_WAITING
goto_if_eq FourIsland_EventScript_DaycareEggWaiting
compare VAR_RESULT, DAYCARE_ONE_MON
goto_if_eq FourIsland_EventScript_CheckOnOneMon
compare VAR_RESULT, DAYCARE_TWO_MONS
goto_if_eq FourIsland_EventScript_CheckOnTwoMons
msgbox DayCare_Text_ImDaycareManSpeakToMyWife
release
end
FourIsland_EventScript_DaycareEggWaiting:: @ 8167D9B
msgbox DayCare_Text_DoYouWantEgg, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq FourIsland_EventScript_DaycareAcceptEgg
msgbox DayCare_Text_IWillKeepDoYouWantIt, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq FourIsland_EventScript_DaycareAcceptEgg
msgbox DayCare_Text_IllKeepIt
clearflag FLAG_PENDING_DAYCARE_EGG
special RejectEggFromDayCare
release
end
FourIsland_EventScript_DaycareAcceptEgg:: @ 8167DD1
specialvar VAR_RESULT, CalculatePlayerPartyCount
compare VAR_RESULT, PARTY_SIZE
goto_if_ne FourIsland_EventScript_DaycareReceivedEgg
msgbox DayCare_Text_YouHaveNoRoomForIt
release
end
FourIsland_EventScript_DaycareReceivedEgg:: @ 8167DEB
textcolor 3
message DayCare_Text_ReceivedEgg
call EventScript_1A6675
playfanfare MUS_FANFA1
waitfanfare
waitbuttonpress
msgbox DayCare_Text_TakeGoodCareOfIt
special GiveEggFromDaycare
clearflag FLAG_PENDING_DAYCARE_EGG
release
end
FourIsland_EventScript_CheckOnOneMon:: @ 8167E0C
special GetDaycareMonNicknames
msgbox DayCare_Text_YourMonIsDoingFine
release
end
FourIsland_EventScript_CheckOnTwoMons:: @ 8167E19
special GetDaycareMonNicknames
msgbox DayCare_Text_YourMonsAreDoingFine
special SetDaycareCompatibilityString
special Special_ShowStringVar4AsFieldMessage
waitmessage
waitbuttonpress
release
end
FourIsland_EventScript_167E2E:: @ 8167E2E
lock
faceplayer
goto_if_set FLAG_SYS_CAN_LINK_WITH_RS, 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, MSGBOX_NPC
end
FourIsland_EventScript_167E7C:: @ 8167E7C
msgbox gUnknown_8182A03, MSGBOX_SIGN
end
FourIsland_EventScript_167E85:: @ 8167E85
msgbox gUnknown_8182DEB, MSGBOX_SIGN
end
|
