mirror of
https://github.com/pret/pokefirered.git
synced 2026-05-09 21:25:42 -05:00
109 lines
2.4 KiB
PHP
109 lines
2.4 KiB
PHP
.equ LOCALID_BILL, 1
|
|
|
|
OneIsland_MapScripts::
|
|
map_script MAP_SCRIPT_ON_TRANSITION, OneIsland_OnTransition
|
|
map_script MAP_SCRIPT_ON_FRAME_TABLE, OneIsland_OnFrame
|
|
.byte 0
|
|
|
|
OneIsland_OnTransition::
|
|
setworldmapflag FLAG_WORLD_MAP_ONE_ISLAND
|
|
end
|
|
|
|
OneIsland_OnFrame::
|
|
map_script_2 VAR_MAP_SCENE_ONE_ISLAND_HARBOR, 2, OneIsland_EventScript_EnterOneIslandFirstTime
|
|
.2byte 0
|
|
|
|
OneIsland_EventScript_EnterOneIslandFirstTime::
|
|
lockall
|
|
textcolor NPC_TEXT_COLOR_MALE
|
|
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, 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::
|
|
walk_up
|
|
walk_to_pokecenter
|
|
step_end
|
|
|
|
OneIsland_Movement_PlayerEnterPokeCenter::
|
|
walk_up
|
|
walk_up
|
|
set_invisible
|
|
step_end
|
|
|
|
OneIsland_Movement_PlayerExitHarbor::
|
|
walk_up
|
|
step_end
|
|
|
|
OneIsland_Movement_BillWalkToPokeCenter::
|
|
walk_to_pokecenter
|
|
walk_up
|
|
step_end
|
|
|
|
OneIsland_Movement_BillEnterPokeCenter::
|
|
walk_up
|
|
set_invisible
|
|
step_end
|
|
|
|
OneIsland_EventScript_OldMan::
|
|
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::
|
|
msgbox OneIsland_Text_HavePCLinkageWithKanto
|
|
release
|
|
end
|
|
|
|
OneIsland_EventScript_OldManLinkHoenn::
|
|
msgbox OneIsland_Text_HavePCLinkageWithHoenn
|
|
release
|
|
end
|
|
|
|
OneIsland_EventScript_BaldingMan::
|
|
msgbox OneIsland_Text_IsntWarmClimateHereGreat, MSGBOX_NPC
|
|
end
|
|
|
|
OneIsland_EventScript_IslandSign::
|
|
msgbox OneIsland_Text_IslandSign, MSGBOX_SIGN
|
|
end
|
|
|
|
OneIsland_EventScript_PokemonNetCenterSign::
|
|
msgbox OneIsland_Text_PokemonNetCenterSign, MSGBOX_SIGN
|
|
end
|