pokefirered/data/maps/SevenIsland_House_Room1/scripts.inc
2022-08-28 16:51:45 +02:00

174 lines
6.0 KiB
PHP

.equ LOCALID_OLD_WOMAN, 1
.equ TRAINER_VISITING, VAR_TEMP_1
SevenIsland_House_Room1_MapScripts::
map_script MAP_SCRIPT_ON_TRANSITION, SevenIsland_House_Room1_OnTransition
map_script MAP_SCRIPT_ON_FRAME_TABLE, SevenIsland_House_Room1_OnFrame
.byte 0
SevenIsland_House_Room1_OnTransition::
special ValidateEReaderTrainer
call_if_eq VAR_RESULT, 0, SevenIsland_House_Room1_EventScript_SetTrainerVisitingLayout
call_if_ne VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 0, SevenIsland_House_Room1_EventScript_MoveOldWomanToDoor
end
SevenIsland_House_Room1_EventScript_SetTrainerVisitingLayout::
setvar TRAINER_VISITING, TRUE
setobjectxyperm LOCALID_OLD_WOMAN, 4, 2
setobjectmovementtype LOCALID_OLD_WOMAN, MOVEMENT_TYPE_FACE_DOWN
setmaplayoutindex LAYOUT_SEVEN_ISLAND_HOUSE_ROOM1_DOOR_OPEN
return
SevenIsland_House_Room1_EventScript_MoveOldWomanToDoor::
setobjectxyperm LOCALID_OLD_WOMAN, 3, 2
setobjectmovementtype LOCALID_OLD_WOMAN, MOVEMENT_TYPE_FACE_RIGHT
return
SevenIsland_House_Room1_OnFrame::
map_script_2 VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 1, SevenIsland_House_Room1_EventScript_OldWomanCommentOnBattle
map_script_2 VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 2, SevenIsland_House_Room1_EventScript_OldWomanCommentOnBattle
map_script_2 VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 3, SevenIsland_House_Room1_EventScript_OldWomanCommentOnBattle
.2byte 0
SevenIsland_House_Room1_EventScript_OldWomanCommentOnBattle::
lockall
textcolor NPC_TEXT_COLOR_FEMALE
applymovement OBJ_EVENT_ID_PLAYER, SevenIsland_House_Room1_Movement_PlayerReEnterRoom
waitmovement 0
applymovement LOCALID_OLD_WOMAN, SevenIsland_House_Room1_Movement_OldWomanWalkBehindPlayer
waitmovement 0
copyobjectxytoperm LOCALID_OLD_WOMAN
applymovement OBJ_EVENT_ID_PLAYER, Common_Movement_WalkInPlaceFasterUp
waitmovement 0
call_if_eq VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 1, SevenIsland_House_Room1_EventScript_BattleWonComment
call_if_eq VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 2, SevenIsland_House_Room1_EventScript_BattleLostComment
call_if_eq VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 3, SevenIsland_House_Room1_EventScript_BattleTiedComment
special LoadPlayerParty
setvar VAR_MAP_SCENE_SEVEN_ISLAND_HOUSE_ROOM1, 0
releaseall
end
SevenIsland_House_Room1_EventScript_BattleWonComment::
msgbox SevenIsland_House_Room1_Text_AstoundingBattle
return
SevenIsland_House_Room1_EventScript_BattleLostComment::
msgbox SevenIsland_House_Room1_Text_FeelYourDisappointment
return
SevenIsland_House_Room1_EventScript_BattleTiedComment::
msgbox SevenIsland_House_Room1_Text_DrawWasIt
return
SevenIsland_House_Room1_Movement_PlayerReEnterRoom::
walk_down
step_end
SevenIsland_House_Room1_Movement_OldWomanWalkBehindPlayer::
walk_right
walk_in_place_faster_down
step_end
SevenIsland_House_Room1_EventScript_OldWoman::
lock
faceplayer
special ValidateEReaderTrainer
call_if_eq VAR_RESULT, 1, SevenIsland_House_Room1_EventScript_InvalidVisitingTrainer
goto_if_eq TRAINER_VISITING, TRUE, SevenIsland_House_Room1_EventScript_TrainerVisiting
msgbox SevenIsland_House_Room1_Text_OnlyEnjoymentWatchingBattles
release
end
SevenIsland_House_Room1_EventScript_InvalidVisitingTrainer::
msgbox SevenIsland_House_Room1_Text_OnlyEnjoymentWatchingBattles
release
end
SevenIsland_House_Room1_EventScript_TrainerVisiting::
special SavePlayerParty
special BufferEReaderTrainerName
msgbox SevenIsland_House_Room1_Text_ChallengeVisitingTrainer, MSGBOX_YESNO
goto_if_eq VAR_RESULT, NO, SevenIsland_House_Room1_EventScript_DeclineBattle
call SevenIsland_House_Room1_EventScript_ChooseParty
goto_if_eq VAR_RESULT, 0, SevenIsland_House_Room1_EventScript_DeclineBattle
msgbox SevenIsland_House_Room1_Text_SaveProgressBeforeBattle, MSGBOX_YESNO
goto_if_eq VAR_RESULT, NO, SevenIsland_House_Room1_EventScript_DeclineBattle
special LoadPlayerParty
call EventScript_AskSaveGame
goto_if_eq VAR_RESULT, 0, SevenIsland_House_Room1_EventScript_DeclineBattle
special SavePlayerParty
special ReducePlayerPartyToThree
msgbox SevenIsland_House_Room1_Text_DontHoldAnythingBack
closemessage
call_if_eq VAR_FACING, DIR_NORTH, SevenIsland_House_Room1_EventScript_EnterBattleRoomNorth
call_if_eq VAR_FACING, DIR_EAST, SevenIsland_House_Room1_EventScript_EnterBattleRoomEast
call_if_eq VAR_FACING, DIR_WEST, SevenIsland_House_Room1_EventScript_EnterBattleRoomWest
warp MAP_SEVEN_ISLAND_HOUSE_ROOM2, 3, 1
waitstate
release
end
SevenIsland_House_Room1_EventScript_DeclineBattle::
special LoadPlayerParty
msgbox SevenIsland_House_Room1_Text_OhYouWontBattle
release
end
SevenIsland_House_Room1_EventScript_ChooseParty::
msgbox SevenIsland_House_Room1_Text_LimitThreeMonsPerSide
fadescreen FADE_TO_BLACK
special ChooseHalfPartyForBattle
waitstate
return
SevenIsland_House_Room1_EventScript_EnterBattleRoomNorth::
applymovement VAR_LAST_TALKED, SevenIsland_House_Room1_Movement_OldWomanMoveAsideLeft
applymovement OBJ_EVENT_ID_PLAYER, SevenIsland_House_Room1_Movement_PlayerEnterBattleRoomNorth
waitmovement 0
return
SevenIsland_House_Room1_EventScript_EnterBattleRoomEast::
applymovement VAR_LAST_TALKED, SevenIsland_House_Room1_Movement_OldWomanMoveAsideRight
applymovement OBJ_EVENT_ID_PLAYER, SevenIsland_House_Room1_Movement_PlayerEnterBattleRoomEast
waitmovement 0
return
SevenIsland_House_Room1_EventScript_EnterBattleRoomWest::
applymovement VAR_LAST_TALKED, SevenIsland_House_Room1_Movement_OldWomanMoveAsideLeft
applymovement OBJ_EVENT_ID_PLAYER, SevenIsland_House_Room1_Movement_PlayerEnterBattleRoomWest
waitmovement 0
return
SevenIsland_House_Room1_Movement_PlayerEnterBattleRoomNorth::
delay_16
walk_up
walk_up
step_end
SevenIsland_House_Room1_Movement_PlayerEnterBattleRoomEast::
delay_16
walk_right
walk_up
step_end
SevenIsland_House_Room1_Movement_PlayerEnterBattleRoomWest::
delay_16
walk_left
walk_up
step_end
SevenIsland_House_Room1_Movement_OldWomanMoveAsideLeft::
walk_left
walk_in_place_faster_right
step_end
SevenIsland_House_Room1_Movement_OldWomanMoveAsideRight::
walk_right
walk_in_place_faster_left
step_end
SevenIsland_House_Room1_EventScript_Box::
msgbox SevenIsland_House_Room1_Text_SlightBreezeAroundBox, MSGBOX_SIGN
end