pokefirered/data/maps/ThreeIsland_BerryForest/scripts.inc
2020-01-15 16:00:45 -05:00

64 lines
1.6 KiB
PHP

ThreeIsland_BerryForest_MapScripts:: @ 8163C71
map_script MAP_SCRIPT_ON_TRANSITION, ThreeIsland_BerryForest_OnTransition
.byte 0
ThreeIsland_BerryForest_OnTransition:: @ 8163C77
setworldmapflag FLAG_WORLD_MAP_THREE_ISLAND_BERRY_FOREST
setescapewarp MAP_THREE_ISLAND_BOND_BRIDGE, 255, 12, 6
end
ThreeIsland_BerryForest_EventScript_163C83:: @ 8163C83
lock
faceplayer
msgbox gUnknown_817ADD6
playse SE_PIN
applymovement 1, Movement_ExclamationMark
waitmovement 0
applymovement 1, Movement_163D22
waitmovement 0
msgbox gUnknown_817AE8E
goto_if_questlog EventScript_ReleaseEnd
waitse
playmoncry SPECIES_HYPNO, 2
waitmoncry
setwildbattle SPECIES_HYPNO, 30, ITEM_NONE
dowildbattle
special sub_8112364
applymovement 1, Movement_FacePlayer
waitmovement 0
msgbox gUnknown_817AEE1
giveitem ITEM_IAPAPA_BERRY
compare VAR_RESULT, 0
call_if_eq EventScript_163D19
special Special_BufferBigGuyOrBigGirlString
msgbox gUnknown_817AF3B
closemessage
setflag FLAG_RESCUED_LOSTELLE
setflag FLAG_HIDE_LOSTELLE_IN_BERRY_FOREST
setvar VAR_MAP_SCENE_TWO_ISLAND_JOYFUL_GAME_CORNER, 2
clearflag FLAG_HIDE_TWO_ISLAND_GAME_CORNER_LOSTELLE
warp MAP_TWO_ISLAND_JOYFUL_GAME_CORNER, 255, 6, 6
waitstate
release
end
EventScript_163D19:: @ 8163D19
msgbox gUnknown_817AF9F
return
Movement_163D22:: @ 8163D22
walk_in_place_fastest_left
delay_16
walk_in_place_fastest_right
delay_8
walk_in_place_fastest_left
step_end
ThreeIsland_BerryForest_EventScript_163D28:: @ 8163D28
msgbox gUnknown_817AFD6, MSGBOX_SIGN
end
ThreeIsland_BerryForest_EventScript_163D31:: @ 8163D31
msgbox gUnknown_817B029, MSGBOX_SIGN
end