Files
pokeemerald/data/maps/OldaleTown/scripts.inc
T
Eduardo Quezada 70bad62f9b Merge remote-tracking branch '_pret_origin/master' into multilanguage/sync
# Conflicts:
#	Makefile
#	data/maps/BattleFrontier_BattleTowerLobby/scripts.inc
#	data/maps/OldaleTown/scripts.inc
#	data/maps/Route110_TrickHousePuzzle7/scripts.inc
#	data/maps/Route110_TrickHousePuzzle8/scripts.inc
#	data/scripts/roulette.inc
#	data/tilesets/graphics.inc
#	data/tilesets/metatiles.inc
#	graphics/trainer_card/0star_fr.pal
#	graphics/trainer_card/four_stars_fr.pal
#	graphics/trainer_card/frlg/0star.pal
#	graphics/trainer_card/frlg/blue.pal
#	graphics/trainer_card/frlg/bronze.pal
#	graphics/trainer_card/frlg/card.png
#	graphics/trainer_card/frlg/four_stars.pal
#	graphics/trainer_card/frlg/gold.pal
#	graphics/trainer_card/frlg/green.pal
#	graphics/trainer_card/frlg/one_star.pal
#	graphics/trainer_card/frlg/silver.pal
#	graphics/trainer_card/frlg/three_stars.pal
#	graphics/trainer_card/frlg/two_stars.pal
#	graphics/trainer_card/one_star_fr.pal
#	graphics/trainer_card/three_stars_fr.pal
#	graphics/trainer_card/two_stars_fr.pal
#	src/battle_message.c
#	src/battle_tent.c
#	src/berry_blender.c
#	src/berry_tag_screen.c
#	src/data/bard_music/length_table.h
#	src/data/credits.h
#	src/data/items.h
#	src/data/pokemon/pokedex_orders.h
#	src/data/region_map/region_map_entries.h
#	src/easy_chat.c
#	src/field_region_map.c
#	src/graphics.c
#	src/item.c
#	src/item_menu.c
#	src/menu_specialized.c
#	src/pokedex.c
#	src/pokedex_cry_screen.c
#	src/pokemon_jump.c
#	src/pokenav_conditions_search_results.c
#	src/pokenav_match_call_gfx.c
#	src/pokenav_ribbons_list.c
#	src/shop.c
#	src/trade.c
#	src/trainer_card.c
#	src/wireless_communication_status_screen.c
2024-07-05 18:38:49 -04:00

359 lines
8.0 KiB
C++

.set LOCALID_MART_EMPLOYEE, 2
.set LOCALID_FOOTPRINTS_MAN, 3
.set LOCALID_RIVAL, 4
OldaleTown_MapScripts::
map_script MAP_SCRIPT_ON_TRANSITION, OldaleTown_OnTransition
.byte 0
OldaleTown_OnTransition:
call Common_EventScript_SetupRivalGfxId
setflag FLAG_VISITED_OLDALE_TOWN
call_if_unset FLAG_ADVENTURE_STARTED, OldaleTown_EventScript_BlockWestEntrance
call_if_unset FLAG_RECEIVED_POTION_OLDALE, OldaleTown_EventScript_MoveMartEmployee
call_if_set FLAG_ADVENTURE_STARTED, OldaleTown_EventScript_SetOldaleState
end
@ This script seems pointless because nothing uses VAR_OLDALE_TOWN_STATE
OldaleTown_EventScript_SetOldaleState::
setvar VAR_OLDALE_TOWN_STATE, 1
return
OldaleTown_EventScript_BlockWestEntrance::
setobjectxyperm LOCALID_FOOTPRINTS_MAN, 1, 11
setobjectmovementtype LOCALID_FOOTPRINTS_MAN, MOVEMENT_TYPE_FACE_LEFT
return
OldaleTown_EventScript_MoveMartEmployee::
setobjectxyperm LOCALID_MART_EMPLOYEE, 13, 14
setobjectmovementtype LOCALID_MART_EMPLOYEE, MOVEMENT_TYPE_FACE_DOWN
return
OldaleTown_EventScript_TownSign::
msgbox OldaleTown_Text_TownSign, MSGBOX_SIGN
end
OldaleTown_EventScript_Girl::
msgbox OldaleTown_Text_SavingMyProgress, MSGBOX_NPC
end
OldaleTown_EventScript_MartEmployee::
lock
faceplayer
goto_if_set FLAG_RECEIVED_POTION_OLDALE, OldaleTown_EventScript_ExplainPotion
goto_if_set FLAG_TEMP_1, OldaleTown_EventScript_ExplainPotion
setflag FLAG_TEMP_1
playbgm MUS_FOLLOW_ME, FALSE
msgbox OldaleTown_Text_IWorkAtPokemonMart, MSGBOX_DEFAULT
closemessage
switch VAR_FACING
case DIR_SOUTH, OldaleTown_EventScript_GoToMartSouth
case DIR_NORTH, OldaleTown_EventScript_GoToMartNorth
case DIR_EAST, OldaleTown_EventScript_GoToMartEast
end
OldaleTown_EventScript_GoToMartSouth::
applymovement LOCALID_MART_EMPLOYEE, OldaleTown_Movement_EmployeeSouth
applymovement OBJ_EVENT_ID_PLAYER, OldaleTown_Movement_PlayerSouth
waitmovement 0
goto OldaleTown_EventScript_ExplainPokemonMart
end
OldaleTown_EventScript_GoToMartNorth::
applymovement LOCALID_MART_EMPLOYEE, OldaleTown_Movement_EmployeeNorth
applymovement OBJ_EVENT_ID_PLAYER, OldaleTown_Movement_PlayerNorth
waitmovement 0
goto OldaleTown_EventScript_ExplainPokemonMart
end
OldaleTown_EventScript_GoToMartEast::
applymovement OBJ_EVENT_ID_PLAYER, OldaleTown_Movement_PlayerEast
applymovement LOCALID_MART_EMPLOYEE, OldaleTown_Movement_EmployeeEast
waitmovement 0
goto OldaleTown_EventScript_ExplainPokemonMart
end
OldaleTown_EventScript_ExplainPokemonMart::
msgbox OldaleTown_Text_ThisIsAPokemonMart, MSGBOX_DEFAULT
giveitem ITEM_POTION
goto_if_eq VAR_RESULT, FALSE, OldaleTown_EventScript_BagIsFull
msgbox OldaleTown_Text_PotionExplanation, MSGBOX_DEFAULT
setflag FLAG_RECEIVED_POTION_OLDALE
fadedefaultbgm
release
end
OldaleTown_EventScript_ExplainPotion::
msgbox OldaleTown_Text_PotionExplanation, MSGBOX_DEFAULT
release
end
OldaleTown_EventScript_BagIsFull::
msgbox gText_TooBadBagIsFull, MSGBOX_DEFAULT
fadedefaultbgm
release
end
OldaleTown_Movement_EmployeeEast:
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
walk_in_place_faster_down
step_end
OldaleTown_Movement_EmployeeSouth:
walk_left
walk_up
walk_up
walk_right
walk_up
walk_up
walk_up
walk_up
walk_up
walk_in_place_faster_down
step_end
OldaleTown_Movement_EmployeeNorth:
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
walk_in_place_faster_down
step_end
OldaleTown_Movement_Unknown1:
walk_up
walk_up
walk_right
walk_right
walk_right
walk_right
walk_up
walk_up
walk_up
walk_up
walk_up
delay_8
walk_in_place_faster_down
step_end
OldaleTown_Movement_PlayerEast:
walk_right
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
step_end
OldaleTown_Movement_PlayerSouth:
delay_16
delay_16
delay_16
delay_16
walk_up
walk_up
walk_up
walk_up
walk_up
step_end
OldaleTown_Movement_PlayerNorth:
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
walk_up
step_end
OldaleTown_Movement_Unknown2:
walk_left
walk_up
walk_up
walk_right
walk_right
walk_right
walk_right
walk_up
walk_up
walk_up
walk_up
step_end
OldaleTown_EventScript_FootprintsMan::
lock
faceplayer
goto_if_set FLAG_ADVENTURE_STARTED, OldaleTown_EventScript_NotBlockingPath
msgbox OldaleTown_Text_DiscoveredFootprints, MSGBOX_DEFAULT
closemessage
applymovement LOCALID_FOOTPRINTS_MAN, Common_Movement_FaceOriginalDirection
waitmovement 0
release
end
OldaleTown_EventScript_BlockedPath::
lockall
applymovement OBJ_EVENT_ID_PLAYER, OldaleTown_Movement_PlayerStepBack
applymovement LOCALID_FOOTPRINTS_MAN, OldaleTown_Movement_BackUp
waitmovement 0
msgbox OldaleTown_Text_WaitDontComeInHere, MSGBOX_DEFAULT
closemessage
applymovement LOCALID_FOOTPRINTS_MAN, OldaleTown_Movement_ReturnToOriginalPosition
waitmovement 0
releaseall
end
OldaleTown_EventScript_NotBlockingPath::
msgbox OldaleTown_Text_FinishedSketchingFootprints, MSGBOX_DEFAULT
release
end
OldaleTown_EventScript_Rival::
lockall
applymovement LOCALID_RIVAL, Common_Movement_FacePlayer
waitmovement 0
setvar VAR_0x8009, 0
goto OldaleTown_EventScript_ShowRivalMessage
end
OldaleTown_EventScript_RivalTrigger1::
lockall
applymovement LOCALID_RIVAL, OldaleTown_Movement_RivalApproachPlayer1
waitmovement 0
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
setvar VAR_0x8009, 1
goto OldaleTown_EventScript_ShowRivalMessage
end
OldaleTown_EventScript_RivalTrigger2::
lockall
applymovement LOCALID_RIVAL, OldaleTown_Movement_RivalApproachPlayer2
waitmovement 0
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
setvar VAR_0x8009, 1
goto OldaleTown_EventScript_ShowRivalMessage
end
OldaleTown_EventScript_RivalTrigger3::
lockall
applymovement LOCALID_RIVAL, OldaleTown_Movement_RivalApproachPlayer3
waitmovement 0
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterRight
waitmovement 0
setvar VAR_0x8009, 1
goto OldaleTown_EventScript_ShowRivalMessage
end
OldaleTown_EventScript_ShowRivalMessage::
checkplayergender
goto_if_eq VAR_RESULT, MALE, OldaleTown_EventScript_ShowMayMessage
goto_if_eq VAR_RESULT, FEMALE, OldaleTown_EventScript_ShowBrendanMessage
end
OldaleTown_EventScript_ShowMayMessage::
msgbox OldaleTown_Text_MayLetsGoBack, MSGBOX_DEFAULT
goto OldaleTown_EventScript_RivalFinish
end
OldaleTown_EventScript_ShowBrendanMessage::
msgbox OldaleTown_Text_BrendanLetsGoBack, MSGBOX_DEFAULT
goto OldaleTown_EventScript_RivalFinish
end
OldaleTown_EventScript_RivalFinish::
closemessage
call_if_eq VAR_0x8009, 0, OldaleTown_EventScript_DoExitMovement1
call_if_eq VAR_0x8009, 1, OldaleTown_EventScript_DoExitMovement2
applymovement LOCALID_RIVAL, OldaleTown_Movement_RivalExit
waitmovement 0
removeobject LOCALID_RIVAL
setvar VAR_OLDALE_RIVAL_STATE, 2
setflag FLAG_HIDE_OLDALE_TOWN_RIVAL
releaseall
end
OldaleTown_EventScript_DoExitMovement1::
goto_if_ne VAR_FACING, DIR_SOUTH, OldaleTown_EventScript_DoExitMovement2
applymovement LOCALID_RIVAL, OldaleTown_Movement_RivalExit
waitmovement 0
return
OldaleTown_EventScript_DoExitMovement2::
applymovement OBJ_EVENT_ID_PLAYER, OldaleTown_Movement_WatchRivalExit
applymovement LOCALID_RIVAL, OldaleTown_Movement_RivalExit
waitmovement 0
return
OldaleTown_Movement_RivalApproachPlayer1:
walk_left
walk_left
step_end
OldaleTown_Movement_RivalApproachPlayer2:
walk_left
step_end
OldaleTown_Movement_RivalApproachPlayer3:
face_left
step_end
OldaleTown_Movement_RivalExit:
walk_down
walk_down
walk_down
walk_down
walk_down
walk_down
step_end
OldaleTown_Movement_WatchRivalExit:
delay_8
delay_4
walk_in_place_faster_down
step_end
OldaleTown_Movement_PlayerStepBack:
delay_8
walk_right
step_end
OldaleTown_Movement_BackUp:
walk_fast_up
walk_in_place_faster_left
lock_facing_direction
walk_right
unlock_facing_direction
step_end
OldaleTown_Movement_ReturnToOriginalPosition:
walk_down
walk_left
step_end
.ifdef FRENCH
.include "data/maps/OldaleTown/text_fr.inc"
.else
.ifdef ITALIAN
.include "data/maps/OldaleTown/text_it.inc"
.else
.ifdef SPANISH
.include "data/maps/OldaleTown/text_es.inc"
.else
.include "data/maps/OldaleTown/text.inc"
.endif
.endif
.endif