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
|
.equ REQUIRED_CAUGHT_MONS, 50
Route15_WestEntrance_2F_MapScripts:: @ 8170092
.byte 0
Route15_WestEntrance_2F_EventScript_LeftBinoculars:: @ 8170093
lockall
msgbox Route15_WestEntrance_2F_Text_LargeShiningBird
drawmonpic SPECIES_ARTICUNO, 10, 3
delay 20
waitbuttonpress
erasemonpic
setvar VAR_0x8004, SPECIES_ARTICUNO
special Special_SetSeenMon
releaseall
end
Route15_WestEntrance_2F_EventScript_RightBinoculars:: @ 81700B0
msgbox Route15_WestEntrance_2F_Text_SmallIslandOnHorizon, MSGBOX_SIGN
end
Route15_WestEntrance_2F_EventScript_Aide:: @ 81700B9
lock
faceplayer
call Route15_WestEntrance_2F_EventScript_GetAideRequestInfo
goto_if_set FLAG_GOT_EXP_SHARE_FROM_OAKS_AIDE, Route15_WestEntrance_2F_EventScript_AlreadyGotExpShare
msgbox Route15_WestEntrance_2F_Text_GiveItemIfCaughtEnough, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq Aide_EventScript_DeclineCheckMons
setvar VAR_0x8004, 0
specialvar VAR_RESULT, Special_GetPokedexCount
getnumberstring 2, VAR_0x8006
call Route15_WestEntrance_2F_EventScript_GetAideRequestInfo
compare VAR_0x8006, REQUIRED_CAUGHT_MONS
goto_if_lt Aide_EventScript_HaventCaughtEnough
msgbox Route15_WestEntrance_2F_Text_GreatHereYouGo
checkitemspace ITEM_EXP_SHARE, 1
compare VAR_RESULT, FALSE
goto_if_eq Aide_EventScript_NoRoomForItem
giveitem_msg Route15_WestEntrance_2F_Text_ReceivedItemFromAide, ITEM_EXP_SHARE
setflag FLAG_GOT_EXP_SHARE_FROM_OAKS_AIDE
msgbox Route15_WestEntrance_2F_Text_ExplainExpShare
release
end
Route15_WestEntrance_2F_EventScript_AlreadyGotExpShare:: @ 817013B
msgbox Route15_WestEntrance_2F_Text_ExplainExpShare
release
end
Route15_WestEntrance_2F_EventScript_GetAideRequestInfo:: @ 8170145
getnumberstring 0, REQUIRED_CAUGHT_MONS
getitemname 1, ITEM_EXP_SHARE
return
|
