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
|
.equ LOCALID_BILL, 1
OneIsland_MapScripts:: @ 8167484
map_script MAP_SCRIPT_ON_TRANSITION, OneIsland_OnTransition
map_script MAP_SCRIPT_ON_FRAME_TABLE, OneIsland_OnFrame
.byte 0
OneIsland_OnTransition:: @ 816748F
setworldmapflag FLAG_WORLD_MAP_ONE_ISLAND
end
OneIsland_OnFrame:: @ 8167493
map_script_2 VAR_MAP_SCENE_ONE_ISLAND_HARBOR, 2, OneIsland_EventScript_EnterOneIslandFirstTime
.2byte 0
OneIsland_EventScript_EnterOneIslandFirstTime:: @ 816749D
lockall
textcolor 0
applymovement OBJ_EVENT_ID_PLAYER, OneIsland_Movement_PlayerExitHarbor
waitmovement 0
msgbox OneIsland_Text_BillLetsGoSeeCelio
closemessage
applymovement LOCALID_BILL, OneIsland_Movement_BillWalkToPokeCenter
applymovement OBJ_EVENT_ID_PLAYER, OneIsland_Movement_PlayerWalkToPokeCenter
waitmovement 0
opendoor 14, 5
waitdooranim
applymovement LOCALID_BILL, OneIsland_Movement_BillEnterPokeCenter
applymovement OBJ_EVENT_ID_PLAYER, OneIsland_Movement_PlayerEnterPokeCenter
waitmovement 0
closedoor 14, 5
waitdooranim
removeobject LOCALID_BILL
setvar VAR_MAP_SCENE_ONE_ISLAND_HARBOR, 3
warp MAP_ONE_ISLAND_POKEMON_CENTER_1F, 255, 9, 9
waitstate
releaseall
end
.macro walk_to_pokecenter
walk_up
walk_up
walk_up
walk_up
walk_right
walk_right
walk_up
walk_up
walk_up
walk_up
walk_up
.endm
OneIsland_Movement_PlayerWalkToPokeCenter:: @ 81674F4
walk_up
walk_to_pokecenter
step_end
OneIsland_Movement_PlayerEnterPokeCenter:: @ 8167501
walk_up
walk_up
set_invisible
step_end
OneIsland_Movement_PlayerExitHarbor:: @ 8167505
walk_up
step_end
OneIsland_Movement_BillWalkToPokeCenter:: @ 8167507
walk_to_pokecenter
walk_up
step_end
OneIsland_Movement_BillEnterPokeCenter:: @ 8167514
walk_up
set_invisible
step_end
OneIsland_EventScript_OldMan:: @ 8167517
lock
faceplayer
goto_if_set FLAG_SYS_CAN_LINK_WITH_RS, OneIsland_EventScript_OldManLinkHoenn
goto_if_set FLAG_SEVII_DETOUR_FINISHED, OneIsland_EventScript_OldManLinkKanto
msgbox OneIsland_Text_LuckyToHaveCelioHere
release
end
OneIsland_EventScript_OldManLinkKanto:: @ 8167535
msgbox OneIsland_Text_HavePCLinkageWithKanto
release
end
OneIsland_EventScript_OldManLinkHoenn:: @ 816753F
msgbox OneIsland_Text_HavePCLinkageWithHoenn
release
end
OneIsland_EventScript_BaldingMan:: @ 8167549
msgbox OneIsland_Text_IsntWarmClimateHereGreat, MSGBOX_NPC
end
OneIsland_EventScript_IslandSign:: @ 8167552
msgbox OneIsland_Text_IslandSign, MSGBOX_SIGN
end
OneIsland_EventScript_PokemonNetCenterSign:: @ 816755B
msgbox OneIsland_Text_PokemonNetCenterSign, MSGBOX_SIGN
end
|
