dionmoustos/Pokemon-Firered
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'master' into movement-action

Browse Source
This commit is contained in:
cbt6
2022-08-15 12:54:47 +08:00
committed by GitHub
parent 7233b2ed0a b3c2c7291f
commit 2644dd9c21
286 changed files with 8970 additions and 9432 deletions
Download Patch File Download Diff File Expand all files Collapse all files
data/scripts/bag_full.inc
+1 -1
View File
@@ -1,5 +1,5 @@
EventScript_BagIsFull::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox Text_TooBadBagFull
release
end
data/scripts/cable_club.inc
+125 -213
View File
@@ -4,8 +4,7 @@ CableClub_OnTransition::
CableClub_EventScript_HideOrShowMysteryGiftMan::
specialvar VAR_RESULT, ValidateReceivedWonderCard
compare VAR_RESULT, FALSE
goto_if_eq EventScript_HideMysteryGiftMan
goto_if_eq VAR_RESULT, FALSE, EventScript_HideMysteryGiftMan
clearflag FLAG_HIDE_MG_DELIVERYMEN
return
@@ -16,7 +15,7 @@ EventScript_HideMysteryGiftMan::
CableClub_EventScript_MysteryGiftMan::
goto_if_questlog EventScript_ReleaseEnd
special QuestLog_CutRecording
execram
trywondercardscript
@ Unused
EventScript_MysteryGiftThankYou::
@@ -34,27 +33,19 @@ CableClub_OnWarp::
.2byte 0
EventScript_CheckTurnAttendant::
compare VAR_0x8007, 0
goto_if_eq EventScript_CheckTurnAttendantEnd
goto_if_eq VAR_0x8007, 0, EventScript_CheckTurnAttendantEnd
turnobject VAR_0x8007, DIR_WEST
EventScript_CheckTurnAttendantEnd:
end
CableClub_OnLoad::
compare VAR_CABLE_CLUB_STATE, USING_SINGLE_BATTLE
goto_if_eq EventScript_OnLoadFromColosseum
compare VAR_CABLE_CLUB_STATE, USING_DOUBLE_BATTLE
goto_if_eq EventScript_OnLoadFromColosseum
compare VAR_CABLE_CLUB_STATE, USING_MULTI_BATTLE
goto_if_eq EventScript_OnLoadFromColosseum
compare VAR_CABLE_CLUB_STATE, USING_TRADE_CENTER
goto_if_eq EventScript_OnLoadFromTradeCenter
compare VAR_CABLE_CLUB_STATE, USING_UNION_ROOM
goto_if_eq EventScript_OnLoadFromUnionRoom
compare VAR_CABLE_CLUB_STATE, USING_BERRY_CRUSH
goto_if_eq EventScript_OnLoadFromBerryCrush
compare VAR_CABLE_CLUB_STATE, USING_MINIGAME
goto_if_eq EventScript_OnLoadFromGameCorner
goto_if_eq VAR_CABLE_CLUB_STATE, USING_SINGLE_BATTLE, EventScript_OnLoadFromColosseum
goto_if_eq VAR_CABLE_CLUB_STATE, USING_DOUBLE_BATTLE, EventScript_OnLoadFromColosseum
goto_if_eq VAR_CABLE_CLUB_STATE, USING_MULTI_BATTLE, EventScript_OnLoadFromColosseum
goto_if_eq VAR_CABLE_CLUB_STATE, USING_TRADE_CENTER, EventScript_OnLoadFromTradeCenter
goto_if_eq VAR_CABLE_CLUB_STATE, USING_UNION_ROOM, EventScript_OnLoadFromUnionRoom
goto_if_eq VAR_CABLE_CLUB_STATE, USING_BERRY_CRUSH, EventScript_OnLoadFromBerryCrush
goto_if_eq VAR_CABLE_CLUB_STATE, USING_MINIGAME, EventScript_OnLoadFromGameCorner
end
EventScript_OnLoadFromColosseum::
@@ -113,9 +104,8 @@ CableClub_EventScript_CloseLinkAndExitLinkRoom::
special HelpSystem_Enable
special QuestLog_StartRecordingInputsAfterDeferredEvent
setvar VAR_CABLE_CLUB_STATE, 0
textcolor 1
compare VAR_0x8007, 0
goto_if_eq CableClub_EventScript_PlayerExitLinkRoom
textcolor NPC_TEXT_COLOR_FEMALE
goto_if_eq VAR_0x8007, 0, CableClub_EventScript_PlayerExitLinkRoom
applymovement VAR_0x8007, Movement_AttendantFaceLeft
waitmovement 0
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerExitLinkRoom
@@ -139,9 +129,8 @@ CableClub_EventScript_PlayerExitTradeCenter::
special HelpSystem_Enable
special QuestLog_StartRecordingInputsAfterDeferredEvent
setvar VAR_CABLE_CLUB_STATE, 0
textcolor 1
compare VAR_0x8007, 0
goto_if_eq CableClub_EventScript_PlayerExitLinkRoom
textcolor NPC_TEXT_COLOR_FEMALE
goto_if_eq VAR_0x8007, 0, CableClub_EventScript_PlayerExitLinkRoom
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerFaceAttendantRight
waitmovement 0
applymovement VAR_0x8007, Movement_AttendantFaceLeft
@@ -163,9 +152,8 @@ CableClub_EventScript_PlayerExitUnionRoom::
special HelpSystem_Enable
special QuestLog_StartRecordingInputsAfterDeferredEvent
setvar VAR_CABLE_CLUB_STATE, 0
textcolor 1
compare VAR_0x8007, 0
goto_if_eq CableClub_EventScript_PlayerExitLinkRoom
textcolor NPC_TEXT_COLOR_FEMALE
goto_if_eq VAR_0x8007, 0, CableClub_EventScript_PlayerExitLinkRoom
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerFaceAttendantRight
waitmovement 0
applymovement VAR_0x8007, Movement_AttendantFaceLeft
@@ -192,7 +180,7 @@ CableClub_EventScript_PlayerExitLinkRoom::
CableClub_EventScript_Tutorial::
lockall
textcolor 1
textcolor NPC_TEXT_COLOR_FEMALE
applymovement OBJ_EVENT_ID_PLAYER, Movement_WalkInPlaceFasterUp
waitmovement 0
msgbox CableClub_Text_FirstTimeRightThisWay
@@ -262,8 +250,7 @@ CableClub_EventScript_SingleBattleMode::
CableClub_EventScript_DoubleBattleMode::
special HasEnoughMonsForDoubleBattle
compare VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS
goto_if_ne CableClub_EventScript_NeedTwoMonsForDoubleBattle
goto_if_ne VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS, CableClub_EventScript_NeedTwoMonsForDoubleBattle
setvar VAR_0x8004, USING_DOUBLE_BATTLE
goto CableClub_EventScript_TryEnterColosseum
end
@@ -280,27 +267,20 @@ CableClub_EventScript_MultiBattleMode::
CableClub_EventScript_TryEnterColosseum::
call EventScript_AskSaveGame
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_AbortLink
message CableClub_Text_PleaseWaitBCancel
waitmessage
special HelpSystem_Disable
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special TryBattleLinkup
waitstate
call EventScript_RestorePrevTextColor
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterColosseum
compare VAR_RESULT, 2
goto_if_eq CableClub_EventScript_AbortLinkSomeoneNotReady
compare VAR_RESULT, 3
goto_if_eq CableClub_EventScript_AbortLinkDifferentSelections
compare VAR_RESULT, 4
goto_if_eq CableClub_EventScript_AbortLinkIncorrectNumberOfBattlers
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_AbortLink
compare VAR_RESULT, 6
goto_if_eq CableClub_EventScript_AbortLinkConnectionError
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterColosseum
goto_if_eq VAR_RESULT, 2, CableClub_EventScript_AbortLinkSomeoneNotReady
goto_if_eq VAR_RESULT, 3, CableClub_EventScript_AbortLinkDifferentSelections
goto_if_eq VAR_RESULT, 4, CableClub_EventScript_AbortLinkIncorrectNumberOfBattlers
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, 6, CableClub_EventScript_AbortLinkConnectionError
end
CableClub_EventScript_EnterColosseum::
@@ -323,14 +303,13 @@ CableClub_EventScript_EnterColosseum::
waitdooranim
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerEnterLinkRoom
waitmovement 0
hideobject OBJ_EVENT_ID_PLAYER, 0
hideobjectat OBJ_EVENT_ID_PLAYER, 0
closedoor 9, 1
waitdooranim
release
compare VAR_0x8004, USING_MULTI_BATTLE
goto_if_eq CableClub_EventScript_WarpTo4PColosseum
goto_if_eq VAR_0x8004, USING_MULTI_BATTLE, CableClub_EventScript_WarpTo4PColosseum
special SetCableClubWarp
warp MAP_BATTLE_COLOSSEUM_2P, 255, 6, 8
warp MAP_BATTLE_COLOSSEUM_2P, 6, 8
special DoCableClubWarp
waitstate
end
@@ -343,7 +322,7 @@ CableClub_EventScript_PlayerApproachLinkRoomRight::
CableClub_EventScript_WarpTo4PColosseum::
special SetCableClubWarp
warp MAP_BATTLE_COLOSSEUM_4P, 255, 5, 8
warp MAP_BATTLE_COLOSSEUM_4P, 5, 8
special DoCableClubWarp
waitstate
end
@@ -384,34 +363,24 @@ CableClub_EventScript_ConfirmNumberAndRestart::
CableClub_EventScript_TradeCenter::
copyvar VAR_0x8007, VAR_LAST_TALKED
call CableClub_EventScript_CheckPartyTradeRequirements
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_AbortLink
call EventScript_AskSaveGame
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_AbortLink
message CableClub_Text_PleaseWaitBCancel
waitmessage
special HelpSystem_Disable
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special TryTradeLinkup
waitstate
call EventScript_RestorePrevTextColor
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterTradeCenter
compare VAR_RESULT, 2
goto_if_eq CableClub_EventScript_AbortLinkSomeoneNotReady
compare VAR_RESULT, 3
goto_if_eq CableClub_EventScript_AbortLinkDifferentSelections
compare VAR_RESULT, 4
goto_if_eq CableClub_EventScript_AbortLinkIncorrectNumberOfParticipants
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_AbortLink
compare VAR_RESULT, 6
goto_if_eq CableClub_EventScript_AbortLinkConnectionError
compare VAR_RESULT, 7
goto_if_eq CableClub_EventScript_AbortLinkPlayerNotReady
compare VAR_RESULT, 9
goto_if_eq CableClub_EventScript_AbortLinkOtherTrainerNotReady
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterTradeCenter
goto_if_eq VAR_RESULT, 2, CableClub_EventScript_AbortLinkSomeoneNotReady
goto_if_eq VAR_RESULT, 3, CableClub_EventScript_AbortLinkDifferentSelections
goto_if_eq VAR_RESULT, 4, CableClub_EventScript_AbortLinkIncorrectNumberOfParticipants
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, 6, CableClub_EventScript_AbortLinkConnectionError
goto_if_eq VAR_RESULT, 7, CableClub_EventScript_AbortLinkPlayerNotReady
goto_if_eq VAR_RESULT, 9, CableClub_EventScript_AbortLinkOtherTrainerNotReady
end
CableClub_EventScript_EnterTradeCenter::
@@ -432,23 +401,21 @@ CableClub_EventScript_EnterTradeCenter::
waitdooranim
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerEnterLinkRoom
waitmovement 0
hideobject OBJ_EVENT_ID_PLAYER, 0
hideobjectat OBJ_EVENT_ID_PLAYER, 0
closedoor 9, 1
waitdooranim
release
special SetCableClubWarp
setwarp MAP_TRADE_CENTER, 255, 5, 8
setwarp MAP_TRADE_CENTER, 5, 8
special DoCableClubWarp
waitstate
end
CableClub_EventScript_CheckPartyTradeRequirements::
specialvar VAR_RESULT, CalculatePlayerPartyCount
compare VAR_RESULT, 2
goto_if_lt CableClub_EventScript_NeedTwoMonsToTrade
goto_if_lt VAR_RESULT, 2, CableClub_EventScript_NeedTwoMonsToTrade
specialvar VAR_RESULT, DoesPartyHaveEnigmaBerry
compare VAR_RESULT, TRUE
goto_if_eq CableClub_EventScript_CantTradeEnigmaBerry
goto_if_eq VAR_RESULT, TRUE, CableClub_EventScript_CantTradeEnigmaBerry
setvar VAR_RESULT, TRUE
return
@@ -608,14 +575,14 @@ CableClub_EventScript_ShowBattleRecords::
BattleColosseum_2P_EventScript_PlayerSpot0::
setvar VAR_0x8005, 0
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterColosseumPlayerSpot
waitstate
end
BattleColosseum_2P_EventScript_PlayerSpot1::
setvar VAR_0x8005, 1
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterColosseumPlayerSpot
waitstate
end
@@ -624,10 +591,9 @@ BattleColosseum_4P_EventScript_PlayerSpot0::
fadescreen FADE_TO_BLACK
special ChooseHalfPartyForBattle
waitstate
compare VAR_RESULT, 0
goto_if_eq BattleColosseum_4P_EventScript_CancelSpotTrigger
goto_if_eq VAR_RESULT, 0, BattleColosseum_4P_EventScript_CancelSpotTrigger
setvar VAR_0x8005, 0
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterColosseumPlayerSpot
waitstate
end
@@ -636,10 +602,9 @@ BattleColosseum_4P_EventScript_PlayerSpot1::
fadescreen FADE_TO_BLACK
special ChooseHalfPartyForBattle
waitstate
compare VAR_RESULT, 0
goto_if_eq BattleColosseum_4P_EventScript_CancelSpotTrigger
goto_if_eq VAR_RESULT, 0, BattleColosseum_4P_EventScript_CancelSpotTrigger
setvar VAR_0x8005, 1
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterColosseumPlayerSpot
waitstate
end
@@ -648,10 +613,9 @@ BattleColosseum_4P_EventScript_PlayerSpot2::
fadescreen FADE_TO_BLACK
special ChooseHalfPartyForBattle
waitstate
compare VAR_RESULT, 0
goto_if_eq BattleColosseum_4P_EventScript_CancelSpotTrigger
goto_if_eq VAR_RESULT, 0, BattleColosseum_4P_EventScript_CancelSpotTrigger
setvar VAR_0x8005, 2
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterColosseumPlayerSpot
waitstate
end
@@ -660,10 +624,9 @@ BattleColosseum_4P_EventScript_PlayerSpot3::
fadescreen FADE_TO_BLACK
special ChooseHalfPartyForBattle
waitstate
compare VAR_RESULT, 0
goto_if_eq BattleColosseum_4P_EventScript_CancelSpotTrigger
goto_if_eq VAR_RESULT, 0, BattleColosseum_4P_EventScript_CancelSpotTrigger
setvar VAR_0x8005, 3
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterColosseumPlayerSpot
waitstate
end
@@ -673,14 +636,14 @@ BattleColosseum_4P_EventScript_CancelSpotTrigger::
TradeCenter_EventScript_Chair0::
setvar VAR_0x8005, 0
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterTradeSeat
waitstate
end
TradeCenter_EventScript_Chair1::
setvar VAR_0x8005, 1
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterTradeSeat
waitstate
end
@@ -688,7 +651,7 @@ TradeCenter_EventScript_Chair1::
@ Unused
TradeCenter_EventScript_Chair2::
setvar VAR_0x8005, 2
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterTradeSeat
waitstate
end
@@ -696,7 +659,7 @@ TradeCenter_EventScript_Chair2::
@ Unused
TradeCenter_EventScript_Chair3::
setvar VAR_0x8005, 3
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special EnterTradeSeat
waitstate
end
@@ -710,7 +673,7 @@ RecordCorner_EventScript_Spot3::
end
CableClub_EventScript_ReadTrainerCard::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox Text_LookedAtPlayersTrainerCard
fadescreen FADE_TO_BLACK
special Script_ShowLinkTrainerCard
@@ -718,7 +681,7 @@ CableClub_EventScript_ReadTrainerCard::
end
CableClub_EventScript_ReadTrainerCardColored::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox Text_LookedAtPlayersTrainerCardColored
fadescreen FADE_TO_BLACK
special Script_ShowLinkTrainerCard
@@ -726,13 +689,13 @@ CableClub_EventScript_ReadTrainerCardColored::
end
CableClub_EventScript_TooBusyToNotice::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox Text_TrainerTooBusyToNotice
closemessage
end
BattleColosseum_2P_EventScript_Attendant::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special Script_FacePlayer
msgbox Text_TakeSeatStartBattle
special Script_ClearHeldMovement
@@ -740,7 +703,7 @@ BattleColosseum_2P_EventScript_Attendant::
end
TradeCenter_EventScript_Attendant::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special Script_FacePlayer
msgbox Text_TakeSeatStartTrade
special Script_ClearHeldMovement
@@ -752,16 +715,15 @@ RecordCorner_EventScript_Attendant::
end
TradeCenter_ConfirmLeaveRoom::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox Text_TerminateLinkIfYouLeaveRoom, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq TradeCenter_TerminateLink
goto_if_eq VAR_RESULT, YES, TradeCenter_TerminateLink
erasebox 0, 0, 29, 19
releaseall
end
TradeCenter_TerminateLink::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
messageautoscroll Text_TerminateLinkConfirmation
waitmessage
special ExitLinkRoom
@@ -780,12 +742,10 @@ CableClub_EventScript_UnionRoomAttendant::
faceplayer
goto_if_unset FLAG_SYS_POKEDEX_GET, CableClub_EventScript_WirelessClubAdjustements
specialvar VAR_RESULT, IsBadEggInParty
compare VAR_RESULT, TRUE
goto_if_eq CableClub_EventScript_AbortLinkPlayerHasBadEgg
goto_if_eq VAR_RESULT, TRUE, CableClub_EventScript_AbortLinkPlayerHasBadEgg
copyvar VAR_0x8007, VAR_LAST_TALKED
specialvar VAR_RESULT, IsWirelessAdapterConnected
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_UnionRoomAdapterNotConnected
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_UnionRoomAdapterNotConnected
message CableClub_Text_WelcomeUnionRoomEnter
waitmessage
goto CableClub_EventScript_AskEnterUnionRoom
@@ -808,11 +768,9 @@ CableClub_EventScript_UnionRoomInfo::
CableClub_EventScript_EnterUnionRoom::
call CableClub_EventScript_CheckPartyUnionRoomRequirements
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_AbortLink
call EventScript_AskSaveGame
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_AbortLink
msgbox CableClub_Text_EnjoyUnionRoom
closemessage
special HealPlayerParty
@@ -831,12 +789,12 @@ CableClub_EventScript_EnterUnionRoom::
waitdooranim
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerEnterLinkRoom
waitmovement 0
hideobject OBJ_EVENT_ID_PLAYER, 0
hideobjectat OBJ_EVENT_ID_PLAYER, 0
closedoor 5, 1
waitdooranim
special Script_ResetUnionRoomTrade
special SetCableClubWarp
warpteleport2 MAP_UNION_ROOM, 255, 7, 11
warpspinenter MAP_UNION_ROOM, 7, 11
waitstate
special UnionRoomSpecial
waitstate
@@ -844,11 +802,9 @@ CableClub_EventScript_EnterUnionRoom::
CableClub_EventScript_CheckPartyUnionRoomRequirements::
specialvar VAR_RESULT, CountPartyNonEggMons
compare VAR_RESULT, 2
goto_if_lt CableClub_EventScript_NeedTwoMonsForUnionRoom
goto_if_lt VAR_RESULT, 2, CableClub_EventScript_NeedTwoMonsForUnionRoom
specialvar VAR_RESULT, DoesPartyHaveEnigmaBerry
compare VAR_RESULT, TRUE
goto_if_eq CableClub_EventScript_NoEnigmaBerryInUnionRoom
goto_if_eq VAR_RESULT, TRUE, CableClub_EventScript_NoEnigmaBerryInUnionRoom
setvar VAR_RESULT, TRUE
return
@@ -872,8 +828,7 @@ CableClub_EventScript_WirelessClubAttendant::
faceplayer
goto_if_unset FLAG_SYS_POKEDEX_GET, CableClub_EventScript_WirelessClubAdjustements
msgbox CableClub_Text_AskAboutLinking, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq CableClub_EventScript_DontAskAboutLinking
goto_if_eq VAR_RESULT, NO, CableClub_EventScript_DontAskAboutLinking
msgbox CableClub_Text_ExplainWirelessClub
release
return
@@ -890,11 +845,9 @@ CableClub_EventScript_DirectCornerAttendant::
faceplayer
goto_if_unset FLAG_SYS_POKEDEX_GET, CableClub_EventScript_WirelessClubAdjustements
specialvar VAR_RESULT, IsBadEggInParty
compare VAR_RESULT, TRUE
goto_if_eq CableClub_EventScript_AbortLinkPlayerHasBadEgg
goto_if_eq VAR_RESULT, TRUE, CableClub_EventScript_AbortLinkPlayerHasBadEgg
specialvar VAR_RESULT, IsWirelessAdapterConnected
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_WelcomeToCableClub
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_WelcomeToCableClub
message CableClub_Text_WelcomeWhichDirectCornerRoom
waitmessage
delay 15
@@ -923,11 +876,9 @@ CableClub_EventScript_DirectCornerNoBerry::
CableClub_EventScript_WirelessTrade::
msgbox CableClub_Text_TradePokemon, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, NO, CableClub_EventScript_AbortLink
call CableClub_EventScript_CheckPartyTradeRequirements
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_AbortLink
setvar VAR_0x8004, LINK_GROUP_TRADE
goto CableClub_EventScript_SaveAndChooseLinkLeader
end
@@ -952,8 +903,7 @@ CableClub_EventScript_WirelessSingleBattle::
CableClub_EventScript_WirelessDoubleBattle::
special HasEnoughMonsForDoubleBattle
compare VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS
goto_if_ne CableClub_EventScript_TwoMonsNeededForWirelessDoubleBattle
goto_if_ne VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS, CableClub_EventScript_TwoMonsNeededForWirelessDoubleBattle
setvar VAR_0x8004, LINK_GROUP_DOUBLE_BATTLE
goto CableClub_EventScript_SaveAndChooseLinkLeader
end
@@ -975,11 +925,9 @@ CableClub_EventScript_WirelessBattleInfo::
CableClub_EventScript_WirelessBerryCrush::
msgbox CableClub_Text_UseBerryCrush, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, NO, CableClub_EventScript_AbortLink
special HasAtLeastOneBerry
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_NeedBerryForBerryCrush
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_NeedBerryForBerryCrush
setvar VAR_0x8004, LINK_GROUP_BERRY_CRUSH
goto CableClub_EventScript_SaveAndChooseLinkLeader
end
@@ -991,8 +939,7 @@ CableClub_EventScript_NeedBerryForBerryCrush::
CableClub_EventScript_SaveAndChooseLinkLeader::
call EventScript_AskSaveGame
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_AbortLink
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_AbortLink
switch VAR_0x8004
case LINK_GROUP_TRADE, CableClub_EventScript_ChooseLinkLeaderFrom2
case LINK_GROUP_SINGLE_BATTLE, CableClub_EventScript_ChooseLinkLeaderFrom2
@@ -1002,7 +949,7 @@ CableClub_EventScript_SaveAndChooseLinkLeader::
end
CableClub_EventScript_ChooseLinkLeaderFrom2::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
message CableClub_Text_ChooseGroupLeaderOfTwo
waitmessage
call EventScript_RestorePrevTextColor
@@ -1016,28 +963,22 @@ CableClub_EventScript_ChooseLinkLeaderFrom2::
CableClub_EventScript_TryLeadGroup2Players::
call CableClub_EventScript_TryBecomeLinkLeader
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterWirelessLinkRoom
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeaderFrom2
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryLeadGroup2Players
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterWirelessLinkRoom
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeaderFrom2
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryLeadGroup2Players
release
return
CableClub_EventScript_TryJoinGroup2Players::
call CableClub_EventScript_TryJoinLinkGroup
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterWirelessLinkRoom
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeaderFrom2
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryJoinGroup2Players
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterWirelessLinkRoom
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeaderFrom2
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryJoinGroup2Players
release
return
CableClub_EventScript_ChooseLinkLeaderFrom4::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
message CableClub_Text_ChooseGroupLeaderOfFour
waitmessage
call EventScript_RestorePrevTextColor
@@ -1051,28 +992,22 @@ CableClub_EventScript_ChooseLinkLeaderFrom4::
CableClub_EventScript_TryLeadGroup4Players::
call CableClub_EventScript_TryBecomeLinkLeader
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterWirelessLinkRoom
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeaderFrom4
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryLeadGroup4Players
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterWirelessLinkRoom
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeaderFrom4
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryLeadGroup4Players
release
return
CableClub_EventScript_TryJoinGroup4Players::
call CableClub_EventScript_TryJoinLinkGroup
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterWirelessLinkRoom
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeaderFrom4
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryJoinGroup4Players
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterWirelessLinkRoom
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeaderFrom4
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryJoinGroup4Players
release
return
CableClub_EventScript_ChooseLinkLeader::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
message CableClub_Text_ChooseGroupLeader
waitmessage
call EventScript_RestorePrevTextColor
@@ -1086,23 +1021,17 @@ CableClub_EventScript_ChooseLinkLeader::
CableClub_EventScript_TryLeadGroupXPlayers::
call CableClub_EventScript_TryBecomeLinkLeader
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterWirelessLinkRoom
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeader
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryLeadGroupXPlayers
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterWirelessLinkRoom
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeader
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryLeadGroupXPlayers
release
return
CableClub_EventScript_TryJoinGroupXPlayers::
call CableClub_EventScript_TryJoinLinkGroup
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterWirelessLinkRoom
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeader
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryJoinGroupXPlayers
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterWirelessLinkRoom
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeader
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryJoinGroupXPlayers
release
return
@@ -1137,7 +1066,7 @@ CableClub_EventScript_EnterWirelessLinkRoom::
waitdooranim
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerEnterLinkRoom
waitmovement 0
hideobject OBJ_EVENT_ID_PLAYER, 0
hideobjectat OBJ_EVENT_ID_PLAYER, 0
closedoor 9, 1
waitdooranim
release
@@ -1149,8 +1078,7 @@ CableClub_EventScript_ShowWirelessCommunicationScreen::
lockall
goto_if_unset FLAG_SYS_POKEDEX_GET, CableClub_EventScript_NotReadyYet
specialvar VAR_RESULT, IsWirelessAdapterConnected
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_AdapterNotConnected
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_AdapterNotConnected
special HelpSystem_Disable
fadescreen FADE_TO_BLACK
special ShowWirelessCommunicationScreen
@@ -1231,8 +1159,7 @@ JoyfulGameCorner_EventScript_MinigameAttendant::
message Text_WelcomeCanYouWait
waitmessage
specialvar VAR_RESULT, IsWirelessAdapterConnected
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_AdapterNotConnectedMinigame
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_AdapterNotConnectedMinigame
delay 60
special HelpSystem_Disable
message Text_PlayWhichGame
@@ -1248,17 +1175,14 @@ JoyfulGameCorner_EventScript_MinigameAttendant::
CableClub_EventScript_PlayPokemonJump::
setvar VAR_0x8005, 0
special IsPokemonJumpSpeciesInParty
compare VAR_RESULT, FALSE
goto_if_eq CableClub_EventScript_NoEligiblePkmn
goto_if_eq VAR_RESULT, FALSE, CableClub_EventScript_NoEligiblePkmn
msgbox Text_EnterWhichPokemon
setvar VAR_0x8005, 0
special ChooseMonForWirelessMinigame
waitstate
compare VAR_0x8004, PARTY_SIZE
goto_if_ge CableClub_EventScript_AbortMinigame
goto_if_ge VAR_0x8004, PARTY_SIZE, CableClub_EventScript_AbortMinigame
call EventScript_AskSaveGame
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_AbortMinigame
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_AbortMinigame
setvar VAR_0x8004, LINK_GROUP_POKEMON_JUMP
goto CableClub_EventScript_ChooseLinkLeaderMinigame
end
@@ -1266,23 +1190,20 @@ CableClub_EventScript_PlayPokemonJump::
CableClub_EventScript_PlayDodrioBerryPicking::
setvar VAR_0x8005, 1
special IsDodrioInParty
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_NoEligiblePkmn
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_NoEligiblePkmn
msgbox Text_EnterWhichPokemon
setvar VAR_0x8005, 1
special ChooseMonForWirelessMinigame
waitstate
compare VAR_0x8004, PARTY_SIZE
goto_if_ge CableClub_EventScript_AbortMinigame
goto_if_ge VAR_0x8004, PARTY_SIZE, CableClub_EventScript_AbortMinigame
call EventScript_AskSaveGame
compare VAR_RESULT, 0
goto_if_eq CableClub_EventScript_AbortMinigame
goto_if_eq VAR_RESULT, 0, CableClub_EventScript_AbortMinigame
setvar VAR_0x8004, LINK_GROUP_BERRY_PICKING
goto CableClub_EventScript_ChooseLinkLeaderMinigame
end
CableClub_EventScript_ChooseLinkLeaderMinigame::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
message CableClub_Text_ChooseGroupLeader
waitmessage
call EventScript_RestorePrevTextColor
@@ -1296,23 +1217,17 @@ CableClub_EventScript_ChooseLinkLeaderMinigame::
CableClub_EventScript_TryBecomeMinigameLinkLeader::
call CableClub_EventScript_TryBecomeLinkLeader
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterMinigame
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeaderMinigame
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryBecomeMinigameLinkLeader
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterMinigame
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeaderMinigame
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryBecomeMinigameLinkLeader
release
return
CableClub_EventScript_TryJoinMinigameLinkGroup::
call CableClub_EventScript_TryJoinLinkGroup
compare VAR_RESULT, 1
goto_if_eq CableClub_EventScript_EnterMinigame
compare VAR_RESULT, 5
goto_if_eq CableClub_EventScript_ChooseLinkLeaderMinigame
compare VAR_RESULT, 8
goto_if_eq CableClub_EventScript_TryJoinMinigameLinkGroup
goto_if_eq VAR_RESULT, 1, CableClub_EventScript_EnterMinigame
goto_if_eq VAR_RESULT, 5, CableClub_EventScript_ChooseLinkLeaderMinigame
goto_if_eq VAR_RESULT, 8, CableClub_EventScript_TryJoinMinigameLinkGroup
release
return
@@ -1331,7 +1246,7 @@ CableClub_EventScript_EnterMinigame::
closemessage
applymovement OBJ_EVENT_ID_PLAYER, Movement_PlayerEnterMinigameRoom
waitmovement 0
hideobject OBJ_EVENT_ID_PLAYER, 0
hideobjectat OBJ_EVENT_ID_PLAYER, 0
release
waitstate
end
@@ -1343,12 +1258,9 @@ CableClub_EventScript_AdapterNotConnectedMinigame::
CableClub_EventScript_NoEligiblePkmn::
msgbox EventScript_ExplainPokemonJumpRequirements, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq CableClub_EventScript_AbortMinigame
compare VAR_0x8005, 0
call_if_eq CableClub_EventScript_ExplainPokemonJumpRequirements
compare VAR_0x8005, 1
call_if_eq CableClub_EventScript_ExplainDodrioBerryPickingRequirements
goto_if_eq VAR_RESULT, NO, CableClub_EventScript_AbortMinigame
call_if_eq VAR_0x8005, 0, CableClub_EventScript_ExplainPokemonJumpRequirements
call_if_eq VAR_0x8005, 1, CableClub_EventScript_ExplainDodrioBerryPickingRequirements
goto CableClub_EventScript_AbortMinigame
end
data/scripts/day_care.inc
+17 -27
View File
@@ -2,32 +2,27 @@ Route5_PokemonDayCare_EventScript_DaycareMan::
goto_if_questlog EventScript_ReleaseEnd
lock
faceplayer
showmoneybox 0, 0, 0
showmoneybox 0, 0
specialvar VAR_RESULT, IsThereMonInRoute5Daycare
compare VAR_RESULT, TRUE
goto_if_eq Route5_PokemonDayCare_EventScript_CheckOnMon
goto_if_eq VAR_RESULT, TRUE, Route5_PokemonDayCare_EventScript_CheckOnMon
msgbox Route5_PokemonDayCare_Text_WantMeToRaiseMon, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq Route5_PokemonDayCare_EventScript_TryGiveMon
goto_if_eq VAR_RESULT, YES, Route5_PokemonDayCare_EventScript_TryGiveMon
msgbox Route5_PokemonDayCare_Text_ComeAgain
goto Route5_PokemonDayCare_EventScript_CloseMoneyBox
end
Route5_PokemonDayCare_EventScript_TryGiveMon::
specialvar VAR_RESULT, CountPartyNonEggMons
compare VAR_RESULT, 1
goto_if_eq Route5_PokemonDayCare_EventScript_OnlyOneMonInParty
goto_if_eq VAR_RESULT, 1, Route5_PokemonDayCare_EventScript_OnlyOneMonInParty
msgbox Route5_PokemonDayCare_Text_WhichMonShouldIRaise
fadescreen FADE_TO_BLACK
hidemoneybox 0, 0
hidemoneybox
special ChooseSendDaycareMon
waitstate
showmoneybox 0, 0, 0
compare VAR_0x8004, PARTY_SIZE
goto_if_ge Route5_PokemonDayCare_EventScript_ComeAgain
showmoneybox 0, 0
goto_if_ge VAR_0x8004, PARTY_SIZE, Route5_PokemonDayCare_EventScript_ComeAgain
specialvar VAR_RESULT, CountPartyAliveNonEggMons_IgnoreVar0x8004Slot
compare VAR_RESULT, 0
goto_if_eq Route5_PokemonDayCare_EventScript_OnlyOneAliveMonInParty
goto_if_eq VAR_RESULT, 0, Route5_PokemonDayCare_EventScript_OnlyOneAliveMonInParty
specialvar VAR_0x8005, GetSelectedMonNicknameAndSpecies
msgbox Route5_PokemonDayCare_Text_LookAfterMonForAWhile
waitse
@@ -57,14 +52,11 @@ Route5_PokemonDayCare_EventScript_OnlyOneAliveMonInParty::
Route5_PokemonDayCare_EventScript_CheckOnMon::
setvar VAR_0x8004, 0
specialvar VAR_RESULT, GetNumLevelsGainedForRoute5DaycareMon
compare VAR_RESULT, 0
call_if_ne Route5_PokemonDayCare_EventScript_MonHasGrownByXLevels
compare VAR_RESULT, 0
call_if_eq Route5_PokemonDayCare_EventScript_NotEnoughTime
call_if_ne VAR_RESULT, 0, Route5_PokemonDayCare_EventScript_MonHasGrownByXLevels
call_if_eq VAR_RESULT, 0, Route5_PokemonDayCare_EventScript_NotEnoughTime
special GetCostToWithdrawRoute5DaycareMon
msgbox Route5_PokemonDayCare_Text_OweMeXForMonsReturn, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq Route5_PokemonDayCare_EventScript_TryRetrieveMon
goto_if_eq VAR_RESULT, YES, Route5_PokemonDayCare_EventScript_TryRetrieveMon
goto Route5_PokemonDayCare_EventScript_ComeAgain
end
@@ -78,11 +70,9 @@ Route5_PokemonDayCare_EventScript_NotEnoughTime::
Route5_PokemonDayCare_EventScript_TryRetrieveMon::
specialvar VAR_RESULT, CalculatePlayerPartyCount
compare VAR_RESULT, PARTY_SIZE
goto_if_eq Route5_PokemonDayCare_EventScript_NoRoomInParty
goto_if_eq VAR_RESULT, PARTY_SIZE, Route5_PokemonDayCare_EventScript_NoRoomInParty
specialvar VAR_RESULT, IsEnoughForCostInVar0x8005
compare VAR_RESULT, TRUE
goto_if_eq Route5_PokemonDayCare_EventScript_RetrieveMon
goto_if_eq VAR_RESULT, TRUE, Route5_PokemonDayCare_EventScript_RetrieveMon
msgbox Route5_PokemonDayCare_Text_DontHaveEnoughMoney
goto Route5_PokemonDayCare_EventScript_CloseMoneyBox
end
@@ -91,14 +81,14 @@ Route5_PokemonDayCare_EventScript_RetrieveMon::
setvar VAR_0x8004, 0
specialvar VAR_RESULT, TakePokemonFromRoute5Daycare
special SubtractMoneyFromVar0x8005
updatemoneybox 0, 0, 0
updatemoneybox
copyvar VAR_0x8008, VAR_RESULT
getpartysize
subvar VAR_RESULT, 1
getpartymonname 0, VAR_RESULT
bufferpartymonnick STR_VAR_1, VAR_RESULT
copyvar VAR_RESULT, VAR_0x8008
msgbox Route5_PokemonDayCare_Text_ThankYouHeresMon
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
waitse
playmoncry VAR_RESULT, CRY_MODE_NORMAL
msgbox Route5_PokemonDayCare_Text_PlayerGotMonBack
@@ -113,7 +103,7 @@ Route5_PokemonDayCare_EventScript_NoRoomInParty::
end
Route5_PokemonDayCare_EventScript_CloseMoneyBox::
hidemoneybox 0, 0
hidemoneybox
release
end
data/scripts/fame_checker.inc
+16 -16
View File
@@ -3,7 +3,7 @@ ViridianCity_School_EventScript_PokemonJournal::
faceplayer
famechecker FAMECHECKER_OAK, 3
famechecker FAMECHECKER_DAISY, 3
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureProfOak
release
end
@@ -13,7 +13,7 @@ EventScript_PokemonJournalUnused1::
faceplayer
famechecker FAMECHECKER_DAISY, 1
famechecker FAMECHECKER_OAK, 4
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureProfOak
release
end
@@ -22,7 +22,7 @@ EventScript_PokemonJournalUnused2::
lock
faceplayer
famechecker FAMECHECKER_DAISY, 4
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureProfOak
release
end
@@ -30,7 +30,7 @@ EventScript_PokemonJournalUnused2::
FourIsland_PokemonCenter_1F_EventScript_PokemonJournal::
lockall
famechecker FAMECHECKER_DAISY, 5
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureDaisyOak
releaseall
end
@@ -54,7 +54,7 @@ MtMoon_1F_EventScript_BaldingMan::
PewterCity_Museum_1F_EventScript_PokemonJournalBrock::
lockall
famechecker FAMECHECKER_BROCK, 5
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureBrock
releaseall
end
@@ -79,7 +79,7 @@ CeruleanCity_PokemonCenter_1F_EventScript_PokemonJournalMisty::
lock
faceplayer
famechecker FAMECHECKER_MISTY, 5
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureMisty
release
end
@@ -87,7 +87,7 @@ CeruleanCity_PokemonCenter_1F_EventScript_PokemonJournalMisty::
VermilionCity_PokemonCenter_1F_EventScript_PokemonJournalLtSurge::
lockall
famechecker FAMECHECKER_LTSURGE, 5
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureLtSurge
releaseall
end
@@ -96,7 +96,7 @@ CeladonCity_Condominiums_2F_EventScript_PokemonJournalErika::
lock
faceplayer
famechecker FAMECHECKER_ERIKA, 5
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureErika
release
end
@@ -105,7 +105,7 @@ FuchsiaCity_WardensHouse_EventScript_PokemonJournalKoga::
lock
faceplayer
famechecker FAMECHECKER_KOGA, 4
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureKoga
release
end
@@ -122,7 +122,7 @@ SaffronCity_PokemonCenter_1F_EventScript_PokemonJournalSabrina::
lock
faceplayer
famechecker FAMECHECKER_SABRINA, 4
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureSabrina
release
end
@@ -138,7 +138,7 @@ CinnabarIsland_Gym_EventScript_BlaineFujiPhoto::
FiveIsland_ResortGorgeous_House_EventScript_PokemonJournal::
lockall
famechecker FAMECHECKER_BLAINE, 5
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureBlaine
releaseall
end
@@ -155,7 +155,7 @@ FiveIsland_PokemonCenter_1F_EventScript_PokemonJournal::
lock
faceplayer
famechecker FAMECHECKER_LORELEI, 3
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureLorelei
release
end
@@ -164,7 +164,7 @@ SaffronCity_PokemonTrainerFanClub_EventScript_PokemonJournalBruno::
lock
faceplayer
famechecker FAMECHECKER_BRUNO, 2
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureBruno
release
end
@@ -190,7 +190,7 @@ SevenIsland_PokemonCenter_1F_EventScript_PokemonJournal::
lock
faceplayer
famechecker FAMECHECKER_AGATHA, 3
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureAgatha
release
end
@@ -239,7 +239,7 @@ IndigoPlateau_PokemonCenter_1F_EventScript_PokemonJournal::
lock
faceplayer
famechecker FAMECHECKER_LANCE, 4
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureLance
release
end
@@ -264,7 +264,7 @@ CinnabarIsland_PokemonCenter_1F_EventScript_PokemonJournalMrFuji::
lock
faceplayer
famechecker FAMECHECKER_MRFUJI, 5
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox PokemonJournal_Text_SpecialFeatureMrFuji
release
end
data/scripts/field_moves.inc
+28 -41
View File
@@ -3,14 +3,12 @@ EventScript_CutTree::
lockall
goto_if_unset FLAG_BADGE02_GET, EventScript_CantCutTree
checkpartymove MOVE_CUT
compare VAR_RESULT, PARTY_SIZE
goto_if_eq EventScript_CantCutTree
setfieldeffectarg 0, VAR_RESULT
getpartymonname 0, VAR_RESULT
getmovename 1, MOVE_CUT
goto_if_eq VAR_RESULT, PARTY_SIZE, EventScript_CantCutTree
setfieldeffectargument 0, VAR_RESULT
bufferpartymonnick STR_VAR_1, VAR_RESULT
buffermovename STR_VAR_2, MOVE_CUT
msgbox Text_CutTreeDown, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DontCutTree
goto_if_eq VAR_RESULT, NO, EventScript_DontCutTree
msgbox Text_MonUsedMove
closemessage
dofieldeffect FLDEFF_USE_CUT_ON_TREE
@@ -63,14 +61,12 @@ EventScript_RockSmash::
lockall
goto_if_unset FLAG_BADGE06_GET, EventScript_CantSmashRock
checkpartymove MOVE_ROCK_SMASH
compare VAR_RESULT, PARTY_SIZE
goto_if_eq EventScript_CantSmashRock
setfieldeffectarg 0, VAR_RESULT
getpartymonname 0, VAR_RESULT
getmovename 1, MOVE_ROCK_SMASH
goto_if_eq VAR_RESULT, PARTY_SIZE, EventScript_CantSmashRock
setfieldeffectargument 0, VAR_RESULT
bufferpartymonnick STR_VAR_1, VAR_RESULT
buffermovename STR_VAR_2, MOVE_ROCK_SMASH
msgbox Text_UseRockSmash, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DontSmashRock
goto_if_eq VAR_RESULT, NO, EventScript_DontSmashRock
msgbox Text_MonUsedMove
closemessage
dofieldeffect FLDEFF_USE_ROCK_SMASH
@@ -90,8 +86,7 @@ EventScript_UseRockSmash::
waitmovement 0
removeobject VAR_LAST_TALKED
special RockSmashWildEncounter
compare VAR_RESULT, FALSE
goto_if_eq EventScript_RockSmashNoEncounter
goto_if_eq VAR_RESULT, FALSE, EventScript_RockSmashNoEncounter
waitstate
releaseall
end
@@ -127,12 +122,10 @@ EventScript_StrengthBoulder::
goto_if_unset FLAG_BADGE04_GET, EventScript_CantMoveBoulder
goto_if_set FLAG_SYS_USE_STRENGTH, EventScript_AlreadyUsedStrength
checkpartymove MOVE_STRENGTH
compare VAR_RESULT, PARTY_SIZE
goto_if_eq EventScript_CantMoveBoulder
setfieldeffectarg 0, VAR_RESULT
goto_if_eq VAR_RESULT, PARTY_SIZE, EventScript_CantMoveBoulder
setfieldeffectargument 0, VAR_RESULT
msgbox Text_UseStrength, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DontUseStrength
goto_if_eq VAR_RESULT, NO, EventScript_DontUseStrength
closemessage
dofieldeffect FLDEFF_USE_STRENGTH
waitstate
@@ -186,13 +179,11 @@ EventScript_Waterfall::
goto_if_questlog EventScript_ReleaseEnd
lockall
checkpartymove MOVE_WATERFALL
compare VAR_RESULT, PARTY_SIZE
goto_if_eq EventScript_WaterCrashingDown
getpartymonname 0, VAR_RESULT
setfieldeffectarg 0, VAR_RESULT
goto_if_eq VAR_RESULT, PARTY_SIZE, EventScript_WaterCrashingDown
bufferpartymonnick STR_VAR_1, VAR_RESULT
setfieldeffectargument 0, VAR_RESULT
msgbox Text_UseWaterfall, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_EndWaterfall
goto_if_eq VAR_RESULT, NO, EventScript_EndWaterfall
msgbox Text_MonUsedWaterfall
dofieldeffect FLDEFF_USE_WATERFALL
goto EventScript_EndWaterfall
@@ -220,14 +211,12 @@ Text_MonUsedWaterfall::
EventScript_DeepWater::
lockall
checkpartymove MOVE_DIVE
compare VAR_RESULT, PARTY_SIZE
goto_if_eq EventScript_MayGoUnderwater
getpartymonname 0, VAR_RESULT
setfieldeffectarg 0, VAR_RESULT
setfieldeffectarg 1, 1
goto_if_eq VAR_RESULT, PARTY_SIZE, EventScript_MayGoUnderwater
bufferpartymonnick STR_VAR_1, VAR_RESULT
setfieldeffectargument 0, VAR_RESULT
setfieldeffectargument 1, 1
msgbox Text_SeaIsDeepUseDive, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_EndDive
goto_if_eq VAR_RESULT, NO, EventScript_EndDive
msgbox Text_MonUsedDive
dofieldeffect FLDEFF_USE_DIVE
goto EventScript_EndDive
@@ -243,14 +232,12 @@ EventScript_EndDive:
EventScript_TrySurface::
lockall
checkpartymove MOVE_DIVE
compare VAR_RESULT, PARTY_SIZE
goto_if_eq EventScript_CantSurface
getpartymonname 0, VAR_RESULT
setfieldeffectarg 0, VAR_RESULT
setfieldeffectarg 1, 1
goto_if_eq VAR_RESULT, PARTY_SIZE, EventScript_CantSurface
bufferpartymonnick STR_VAR_1, VAR_RESULT
setfieldeffectargument 0, VAR_RESULT
setfieldeffectargument 1, 1
msgbox Text_LightFilteringUseDive, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_EndSurface
goto_if_eq VAR_RESULT, NO, EventScript_EndSurface
msgbox Text_MonUsedDive
dofieldeffect FLDEFF_USE_DIVE
goto EventScript_EndSurface
data/scripts/flash.inc
+1 -1
View File
@@ -1,4 +1,4 @@
EventScript_FldEffFlash::
animateflash 0
setflashradius 0
setflashlevel 0
end
data/scripts/hall_of_fame.inc
+1 -2
View File
@@ -3,8 +3,7 @@ EventScript_SetDefeatedEliteFourFlagsVars::
call EventScript_ResetEliteFour
special Script_UpdateTrainerFanClubGameClear
specialvar VAR_RESULT, IsNationalPokedexEnabled
compare VAR_RESULT, FALSE
call_if_eq EventScript_SetReadyTryGiveNationalDexScene
call_if_eq VAR_RESULT, FALSE, EventScript_SetReadyTryGiveNationalDexScene
call EventScript_ResetLegendaries
return
data/scripts/hole.inc
+1 -1
View File
@@ -15,7 +15,7 @@ EventScript_FallDownHole::
waitmovement 0
playse SE_FALL
delay 60
warphole 0xFFFF
warphole MAP_UNDEFINED
waitstate
end
data/scripts/itemfinder.inc
+3 -5
View File
@@ -1,12 +1,10 @@
EventScript_ItemfinderDigUpUnderfootItem::
lockall
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
waitse
call EventScript_TryPickUpHiddenItem
compare VAR_0x8007, TRUE
goto_if_eq EventScript_DigUpItemPutInPocket
compare VAR_0x8007, FALSE
goto_if_eq EventScript_DigUpItemBagIsFull
goto_if_eq VAR_0x8007, TRUE, EventScript_DigUpItemPutInPocket
goto_if_eq VAR_0x8007, FALSE, EventScript_DigUpItemBagIsFull
end
EventScript_DigUpItemPutInPocket::
data/scripts/move_tutors.inc
+59 -115
View File
@@ -3,16 +3,13 @@ VictoryRoad_2F_EventScript_DoubleEdgeTutor::
faceplayer
goto_if_set FLAG_TUTOR_DOUBLE_EDGE, EventScript_DoubleEdgeTaught
msgbox Text_DoubleEdgeTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DoubleEdgeDeclined
goto_if_eq VAR_RESULT, NO, EventScript_DoubleEdgeDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_DoubleEdgeDeclined
goto_if_eq VAR_RESULT, NO, EventScript_DoubleEdgeDeclined
msgbox Text_DoubleEdgeWhichMon
setvar VAR_0x8005, MOVETUTOR_DOUBLE_EDGE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_DoubleEdgeDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_DoubleEdgeDeclined
setflag FLAG_TUTOR_DOUBLE_EDGE
goto EventScript_DoubleEdgeTaught
end
@@ -32,16 +29,13 @@ EventScript_ThunderWaveTutor::
faceplayer
goto_if_set FLAG_TUTOR_THUNDER_WAVE, EventScript_ThunderWaveTaught
msgbox Text_ThunderWaveTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_ThunderWaveDeclined
goto_if_eq VAR_RESULT, NO, EventScript_ThunderWaveDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_ThunderWaveDeclined
goto_if_eq VAR_RESULT, NO, EventScript_ThunderWaveDeclined
msgbox Text_ThunderWaveWhichMon
setvar VAR_0x8005, MOVETUTOR_THUNDER_WAVE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_ThunderWaveDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_ThunderWaveDeclined
setflag FLAG_TUTOR_THUNDER_WAVE
goto EventScript_ThunderWaveTaught
end
@@ -61,16 +55,13 @@ RockTunnel_B1F_EventScript_RockSlideTutor::
faceplayer
goto_if_set FLAG_TUTOR_ROCK_SLIDE, EventScript_RockSlideTaught
msgbox Text_RockSlideTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_RockSlideDeclined
goto_if_eq VAR_RESULT, NO, EventScript_RockSlideDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_RockSlideDeclined
goto_if_eq VAR_RESULT, NO, EventScript_RockSlideDeclined
msgbox Text_RockSlideWhichMon
setvar VAR_0x8005, MOVETUTOR_ROCK_SLIDE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_RockSlideDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_RockSlideDeclined
setflag FLAG_TUTOR_ROCK_SLIDE
goto EventScript_RockSlideTaught
end
@@ -90,16 +81,13 @@ MtEmber_Exterior_EventScript_ExplosionTutor::
faceplayer
goto_if_set FLAG_TUTOR_EXPLOSION, EventScript_ExplosionTaught
msgbox Text_ExplosionTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_ExplosionDeclined
goto_if_eq VAR_RESULT, NO, EventScript_ExplosionDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_ExplosionDeclined
goto_if_eq VAR_RESULT, NO, EventScript_ExplosionDeclined
msgbox Text_ExplosionWhichMon
setvar VAR_0x8005, MOVETUTOR_EXPLOSION
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_ExplosionDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_ExplosionDeclined
setflag FLAG_TUTOR_EXPLOSION
goto EventScript_ExplosionTaught
end
@@ -119,16 +107,13 @@ Route4_EventScript_MegaPunchTutor::
faceplayer
goto_if_set FLAG_TUTOR_MEGA_PUNCH, EventScript_MegaPunchTaught
msgbox Text_MegaPunchTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaPunchDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MegaPunchDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaPunchDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MegaPunchDeclined
msgbox Text_MegaPunchWhichMon
setvar VAR_0x8005, MOVETUTOR_MEGA_PUNCH
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_MegaPunchDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_MegaPunchDeclined
setflag FLAG_TUTOR_MEGA_PUNCH
goto EventScript_MegaPunchTaught
end
@@ -148,16 +133,13 @@ Route4_EventScript_MegaKickTutor::
faceplayer
goto_if_set FLAG_TUTOR_MEGA_KICK, EventScript_MegaKickTaught
msgbox Text_MegaKickTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaKickDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MegaKickDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MegaKickDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MegaKickDeclined
msgbox Text_MegaKickWhichMon
setvar VAR_0x8005, MOVETUTOR_MEGA_KICK
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_MegaKickDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_MegaKickDeclined
setflag FLAG_TUTOR_MEGA_KICK
goto EventScript_MegaKickTaught
end
@@ -177,16 +159,13 @@ EventScript_DreamEaterTutor::
faceplayer
goto_if_set FLAG_TUTOR_DREAM_EATER, EventScript_DreamEaterTaught
msgbox Text_DreamEaterTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DreamEaterDeclined
goto_if_eq VAR_RESULT, NO, EventScript_DreamEaterDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_DreamEaterDeclined
goto_if_eq VAR_RESULT, NO, EventScript_DreamEaterDeclined
msgbox Text_DreamEaterWhichMon
setvar VAR_0x8005, MOVETUTOR_DREAM_EATER
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_DreamEaterDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_DreamEaterDeclined
setflag FLAG_TUTOR_DREAM_EATER
goto EventScript_DreamEaterTaught
end
@@ -206,16 +185,13 @@ EventScript_SoftboiledTutor::
faceplayer
goto_if_set FLAG_TUTOR_SOFT_BOILED, EventScript_SoftboiledTaught
msgbox Text_SoftboiledTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SoftboiledDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SoftboiledDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SoftboiledDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SoftboiledDeclined
msgbox Text_SoftboiledWhichMon
setvar VAR_0x8005, MOVETUTOR_SOFT_BOILED
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SoftboiledDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_SoftboiledDeclined
setflag FLAG_TUTOR_SOFT_BOILED
goto EventScript_SoftboiledTaught
end
@@ -235,16 +211,13 @@ FuchsiaCity_EventScript_SubstituteTutor::
faceplayer
goto_if_set FLAG_TUTOR_SUBSTITUTE, EventScript_SubstituteTaught
msgbox Text_SubstituteTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SubstituteDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SubstituteDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SubstituteDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SubstituteDeclined
msgbox Text_SubstituteWhichMon
setvar VAR_0x8005, MOVETUTOR_SUBSTITUTE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SubstituteDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_SubstituteDeclined
setflag FLAG_TUTOR_SUBSTITUTE
goto EventScript_SubstituteTaught
end
@@ -264,16 +237,13 @@ SevenIsland_EventScript_SwordsDanceTutor::
faceplayer
goto_if_set FLAG_TUTOR_SWORDS_DANCE, EventScript_SwordsDanceTaught
msgbox Text_SwordsDanceTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SwordsDanceDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SwordsDanceDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SwordsDanceDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SwordsDanceDeclined
msgbox Text_SwordsDanceWhichMon
setvar VAR_0x8005, MOVETUTOR_SWORDS_DANCE
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SwordsDanceDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_SwordsDanceDeclined
setflag FLAG_TUTOR_SWORDS_DANCE
goto EventScript_SwordsDanceTaught
end
@@ -293,16 +263,13 @@ PewterCity_Museum_1F_EventScript_SeismicTossTutor::
faceplayer
goto_if_set FLAG_TUTOR_SEISMIC_TOSS, EventScript_SeismicTossTaught
msgbox Text_SeismicTossTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_SeismicTossDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SeismicTossDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_SeismicTossDeclined
goto_if_eq VAR_RESULT, NO, EventScript_SeismicTossDeclined
msgbox Text_SeismicTossWhichMon
setvar VAR_0x8005, MOVETUTOR_SEISMIC_TOSS
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_SeismicTossDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_SeismicTossDeclined
setflag FLAG_TUTOR_SEISMIC_TOSS
goto EventScript_SeismicTossTaught
end
@@ -322,16 +289,13 @@ EventScript_CounterTutor::
faceplayer
goto_if_set FLAG_TUTOR_COUNTER, EventScript_CounterTaught
msgbox Text_CounterTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_CounterDeclined
goto_if_eq VAR_RESULT, NO, EventScript_CounterDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_CounterDeclined
goto_if_eq VAR_RESULT, NO, EventScript_CounterDeclined
msgbox Text_CounterWhichMon
setvar VAR_0x8005, MOVETUTOR_COUNTER
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_CounterDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_CounterDeclined
setflag FLAG_TUTOR_COUNTER
goto EventScript_CounterTaught
end
@@ -351,16 +315,13 @@ EventScript_MetronomeTutor::
faceplayer
goto_if_set FLAG_TUTOR_METRONOME, EventScript_MetronomeTaught
msgbox Text_MetronomeTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MetronomeDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MetronomeDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MetronomeDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MetronomeDeclined
msgbox Text_MetronomeWhichMon
setvar VAR_0x8005, MOVETUTOR_METRONOME
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_MetronomeDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_MetronomeDeclined
setflag FLAG_TUTOR_METRONOME
goto EventScript_MetronomeTaught
end
@@ -378,19 +339,16 @@ EventScript_MetronomeTaught::
EventScript_MimicTutor::
goto_if_set FLAG_TUTOR_MIMIC, EventScript_MimicTaught
msgbox Text_MimicTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_MimicDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MimicDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_MimicDeclined
goto_if_eq VAR_RESULT, NO, EventScript_MimicDeclined
msgbox Text_MimicWhichMon
setvar VAR_0x8005, MOVETUTOR_MIMIC
call EventScript_ChooseMoveTutorMon
lock
faceplayer
compare VAR_RESULT, 0
goto_if_eq EventScript_MimicDeclined
removeitem ITEM_POKE_DOLL, 1
goto_if_eq VAR_RESULT, 0, EventScript_MimicDeclined
removeitem ITEM_POKE_DOLL
setflag FLAG_TUTOR_MIMIC
goto EventScript_MimicTaught
end
@@ -402,10 +360,8 @@ EventScript_MimicDeclined::
EventScript_MimicTaught::
checkplayergender
compare VAR_RESULT, MALE
call_if_eq EventScript_MimicTaughtMale
compare VAR_RESULT, FEMALE
call_if_eq EventScript_MimicTaughtFemale
call_if_eq VAR_RESULT, MALE, EventScript_MimicTaughtMale
call_if_eq VAR_RESULT, FEMALE, EventScript_MimicTaughtFemale
release
end
@@ -422,16 +378,13 @@ FourIsland_House1_EventScript_BodySlamTutor::
faceplayer
goto_if_set FLAG_TUTOR_BODY_SLAM, EventScript_BodySlamTaught
msgbox Text_BodySlamTeach, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_BodySlamDeclined
goto_if_eq VAR_RESULT, NO, EventScript_BodySlamDeclined
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq EventScript_BodySlamDeclined
goto_if_eq VAR_RESULT, NO, EventScript_BodySlamDeclined
msgbox Text_BodySlamWhichMon
setvar VAR_0x8005, MOVETUTOR_BODY_SLAM
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq EventScript_BodySlamDeclined
goto_if_eq VAR_RESULT, FALSE, EventScript_BodySlamDeclined
setflag FLAG_TUTOR_BODY_SLAM
goto EventScript_BodySlamTaught
end
@@ -455,26 +408,19 @@ TwoIsland_CapeBrink_House_EventScript_StarterTutor::
faceplayer
goto_if_set FLAG_LEARNED_ALL_MOVES_AT_CAPE_BRINK, CapeBrinkTutor_EventScript_TaughtAllMoves
goto_if_set FLAG_TEMP_2, CapeBrinkTutor_EventScript_MoveJustTaught
getfirstpartymonname 0
bufferleadmonspeciesname STR_VAR_1
msgbox Text_UltimateMoveThatMon
specialvar VAR_RESULT, CapeBrinkGetMoveToTeachLeadPokemon
compare VAR_RESULT, FALSE
goto_if_eq CapeBrinkTutor_EventScript_NoLeadStarter
goto_if_eq VAR_RESULT, FALSE, CapeBrinkTutor_EventScript_NoLeadStarter
copyvar VAR_0x8009, VAR_0x8005
compare VAR_FACING, DIR_NORTH
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceDown
compare VAR_FACING, DIR_SOUTH
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceUp
compare VAR_FACING, DIR_EAST
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceLeft
compare VAR_FACING, DIR_WEST
call_if_eq CapeBrinkTutor_EventScript_JumpInPlaceRight
call_if_eq VAR_FACING, DIR_NORTH, CapeBrinkTutor_EventScript_JumpInPlaceDown
call_if_eq VAR_FACING, DIR_SOUTH, CapeBrinkTutor_EventScript_JumpInPlaceUp
call_if_eq VAR_FACING, DIR_EAST, CapeBrinkTutor_EventScript_JumpInPlaceLeft
call_if_eq VAR_FACING, DIR_WEST, CapeBrinkTutor_EventScript_JumpInPlaceRight
msgbox Text_AllowMeToTeachMonUltimateMove, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq CapeBrinkTutor_EventScript_DeclineMove
goto_if_eq VAR_RESULT, NO, CapeBrinkTutor_EventScript_DeclineMove
call EventScript_CanOnlyBeLearnedOnce
compare VAR_RESULT, NO
goto_if_eq CapeBrinkTutor_EventScript_DeclineMove
goto_if_eq VAR_RESULT, NO, CapeBrinkTutor_EventScript_DeclineMove
msgbox Text_LetMeConferUltimateMove
closemessage
fadescreen FADE_TO_BLACK
@@ -499,8 +445,7 @@ CapeBrinkTutor_EventScript_TaughtAllMoves::
CapeBrinkTutor_EventScript_TaughtMove::
copyvar VAR_0x8005, VAR_0x8009
specialvar VAR_RESULT, HasLearnedAllMovesFromCapeBrinkTutor
compare VAR_RESULT, TRUE
goto_if_eq CapeBrinkTutor_EventScript_LearnedAllMoves
goto_if_eq VAR_RESULT, TRUE, CapeBrinkTutor_EventScript_LearnedAllMoves
msgbox Text_TaughtMove
setflag FLAG_TEMP_2
release
@@ -514,8 +459,7 @@ CapeBrinkTutor_EventScript_LearnedAllMoves::
CapeBrinkTutor_EventScript_ChooseMon::
call EventScript_ChooseMoveTutorMon
compare VAR_RESULT, FALSE
goto_if_eq CapeBrinkTutor_EventScript_DeclineMove
goto_if_eq VAR_RESULT, FALSE, CapeBrinkTutor_EventScript_DeclineMove
goto CapeBrinkTutor_EventScript_TaughtMove
end
@@ -557,7 +501,7 @@ EventScript_ChooseMoveTutorMon::
return
EventScript_CanOnlyBeLearnedOnce::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special DisableMsgBoxWalkaway
signmsg
msgbox Text_MoveCanOnlyBeLearnedOnce, MSGBOX_YESNO
data/scripts/mystery_event_club.inc
+4 -8
View File
@@ -3,8 +3,7 @@
MysteryEventClub_EventScript_Woman::
lock
faceplayer
compare GAVE_PROFILE, TRUE
goto_if_eq EventScript_AlreadyGaveProfile
goto_if_eq GAVE_PROFILE, TRUE, EventScript_AlreadyGaveProfile
goto_if_set FLAG_SYS_SET_TRAINER_CARD_PROFILE, EventScript_GivenProfileBefore
msgbox Text_IdLoveToHearYourProfile
goto EventScript_AskForProfile
@@ -104,12 +103,9 @@ EventScript_GiveProfile:
call Common_ShowEasyChatScreen
lock
faceplayer
compare VAR_0x8004, 0
goto_if_eq EventScript_GaveSpecialProfile
compare VAR_RESULT, FALSE
goto_if_eq EventScript_CancelGiveProfile
compare VAR_RESULT, TRUE
goto_if_eq EventScript_GaveProfile
goto_if_eq VAR_0x8004, 0, EventScript_GaveSpecialProfile
goto_if_eq VAR_RESULT, FALSE, EventScript_CancelGiveProfile
goto_if_eq VAR_RESULT, TRUE, EventScript_GaveProfile
end
Text_IdLoveToHearYourProfile:
data/scripts/obtain_item.inc
+38 -57
View File
@@ -9,7 +9,7 @@ EventScript_RestorePrevTextColor::
Std_ObtainItem::
copyvar VAR_PREV_TEXT_COLOR, VAR_TEXT_COLOR
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
additem VAR_0x8000, VAR_0x8001
copyvar VAR_0x8007, VAR_RESULT
call EventScript_ObtainItemMessage
@@ -17,13 +17,11 @@ Std_ObtainItem::
return
EventScript_ObtainItemMessage::
bufferitemnameplural 1, VAR_0x8000, VAR_0x8001
bufferitemnameplural STR_VAR_2, VAR_0x8000, VAR_0x8001
checkitemtype VAR_0x8000
call EventScript_BufferPocketNameTryFanfare
compare VAR_0x8007, TRUE
call_if_eq EventScript_ObtainedItem
compare VAR_0x8007, FALSE
call_if_eq EventScript_NoRoomForItem
call_if_eq VAR_0x8007, TRUE, EventScript_ObtainedItem
call_if_eq VAR_0x8007, FALSE, EventScript_NoRoomForItem
return
EventScript_BufferPocketNameTryFanfare::
@@ -36,33 +34,28 @@ EventScript_BufferPocketNameTryFanfare::
end
EventScript_BufferItemsPocket::
getstdstring 2, STDSTRING_ITEMS_POCKET
compare VAR_0x8007, TRUE
call_if_eq EventScript_PlayFanfareObtainedItem
bufferstdstring STR_VAR_3, STDSTRING_ITEMS_POCKET
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
return
EventScript_BufferKeyItemsPocket::
getstdstring 2, STDSTRING_KEY_ITEMS_POCKET
compare VAR_0x8007, TRUE
call_if_eq EventScript_PlayFanfareObtainedItem
bufferstdstring STR_VAR_3, STDSTRING_KEY_ITEMS_POCKET
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
return
EventScript_BufferPokeBallsPocket::
getstdstring 2, STDSTRING_POKEBALLS_POCKET
compare VAR_0x8007, TRUE
call_if_eq EventScript_PlayFanfareObtainedItem
bufferstdstring STR_VAR_3, STDSTRING_POKEBALLS_POCKET
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
return
EventScript_BufferTMCase::
getstdstring 2, STDSTRING_TM_CASE
compare VAR_0x8007, TRUE
call_if_eq EventScript_PlayFanfareObtainedTMHM
bufferstdstring STR_VAR_3, STDSTRING_TM_CASE
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedTMHM
return
EventScript_BufferBerryPouch::
getstdstring 2, STDSTRING_BERRY_POUCH
compare VAR_0x8007, TRUE
call_if_eq EventScript_PlayFanfareObtainedItem
bufferstdstring STR_VAR_3, STDSTRING_BERRY_POUCH
call_if_eq VAR_0x8007, TRUE, EventScript_PlayFanfareObtainedItem
return
EventScript_ObtainedItem::
@@ -86,17 +79,15 @@ EventScript_PlayFanfareObtainedTMHM::
return
Std_ObtainDecoration::
adddecor VAR_0x8000
adddecoration VAR_0x8000
copyvar VAR_0x8007, VAR_RESULT
call EventScript_ObtainDecorMessage
return
EventScript_ObtainDecorMessage::
getdecorname 1, VAR_0x8000
compare VAR_0x8007, TRUE
call_if_eq EventScript_ObtainedDecor
compare VAR_0x8007, FALSE
call_if_eq EventScript_NoRoomForDecor
bufferdecorationname STR_VAR_2, VAR_0x8000
call_if_eq VAR_0x8007, TRUE, EventScript_ObtainedDecor
call_if_eq VAR_0x8007, FALSE, EventScript_NoRoomForDecor
return
EventScript_ObtainedDecor::
@@ -120,13 +111,11 @@ Std_FindItem::
copyvar VAR_0x8005, VAR_0x8001
checkitemspace VAR_0x8000, VAR_0x8001
copyvar VAR_0x8007, VAR_RESULT
getitemname 1, VAR_0x8000
bufferitemname STR_VAR_2, VAR_0x8000
checkitemtype VAR_0x8000
call EventScript_BufferPocketNameTryFanfare
compare VAR_0x8007, TRUE
call_if_eq EventScript_PickUpItem
compare VAR_0x8007, FALSE
call_if_eq EventScript_NoRoomToPickUpItem
call_if_eq VAR_0x8007, TRUE, EventScript_PickUpItem
call_if_eq VAR_0x8007, FALSE, EventScript_NoRoomToPickUpItem
release
return
@@ -135,10 +124,8 @@ EventScript_PickUpItem::
additem VAR_0x8004, VAR_0x8005
specialvar VAR_RESULT, BufferTMHMMoveName
copyvar VAR_0x8008, VAR_RESULT
compare VAR_0x8008, TRUE
call_if_eq EventScript_FoundTMHM
compare VAR_0x8008, FALSE
call_if_eq EventScript_FoundItem
call_if_eq VAR_0x8008, TRUE, EventScript_FoundTMHM
call_if_eq VAR_0x8008, FALSE, EventScript_FoundItem
waitfanfare
waitmessage
msgbox Text_PutItemAway
@@ -160,30 +147,25 @@ EventScript_NoRoomToPickUpItem::
EventScript_HiddenItemScript::
lockall
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
waitse
compare VAR_0x8005, 0
goto_if_eq EventScript_TryPickUpHiddenCoins
goto_if_eq VAR_0x8005, 0, EventScript_TryPickUpHiddenCoins
call EventScript_TryPickUpHiddenItem
compare VAR_0x8007, TRUE
goto_if_eq EventScript_PickedUpHiddenItem
compare VAR_0x8007, FALSE
goto_if_eq EventScript_NoRoomForHiddenItem
goto_if_eq VAR_0x8007, TRUE, EventScript_PickedUpHiddenItem
goto_if_eq VAR_0x8007, FALSE, EventScript_NoRoomForHiddenItem
end
EventScript_TryPickUpHiddenItem::
additem VAR_0x8005, VAR_0x8006
copyvar VAR_0x8007, VAR_RESULT
getitemname 1, VAR_0x8005
bufferitemname STR_VAR_2, VAR_0x8005
checkitemtype VAR_0x8005
call EventScript_BufferPocketNameTryFanfare
return
EventScript_PickedUpHiddenItem::
compare VAR_0x8006, 1
call_if_eq EventScript_FoundSingleItem
compare VAR_0x8006, 1
call_if_ne EventScript_FoundMultipleItems
call_if_eq VAR_0x8006, 1, EventScript_FoundSingleItem
call_if_ne VAR_0x8006, 1, EventScript_FoundMultipleItems
waitfanfare
waitmessage
msgbox Text_PutItemAway
@@ -196,12 +178,12 @@ EventScript_FoundSingleItem::
return
EventScript_FoundCoins::
getnumberstring 0, VAR_0x8006
buffernumberstring STR_VAR_1, VAR_0x8006
message Text_FoundXCoins
return
EventScript_FoundMultipleItems::
getnumberstring 0, VAR_0x8006
buffernumberstring STR_VAR_1, VAR_0x8006
message Text_FoundXItems
return
@@ -216,10 +198,9 @@ EventScript_TryPickUpHiddenCoins::
goto_if_unset FLAG_GOT_COIN_CASE, EventScript_NoCaseForHiddenCoins
checkcoins VAR_RESULT
specialvar VAR_RESULT, CheckAddCoins
compare VAR_RESULT, FALSE
goto_if_eq EventScript_HiddenCoinsButCaseIsFull
goto_if_eq VAR_RESULT, FALSE, EventScript_HiddenCoinsButCaseIsFull
addcoins VAR_0x8006
getstdstring 1, STDSTRING_COINS
bufferstdstring STR_VAR_2, STDSTRING_COINS
call EventScript_PlayFanfareObtainedItem
call EventScript_FoundCoins
waitfanfare
@@ -230,8 +211,8 @@ EventScript_TryPickUpHiddenCoins::
end
EventScript_HiddenCoinsButCaseIsFull::
getnumberstring 0, VAR_0x8006
getstdstring 1, STDSTRING_COINS
buffernumberstring STR_VAR_1, VAR_0x8006
bufferstdstring STR_VAR_2, STDSTRING_COINS
msgbox Text_FoundXCoins
msgbox Text_CoinCaseIsFull
setvar VAR_RESULT, 0
@@ -239,8 +220,8 @@ EventScript_HiddenCoinsButCaseIsFull::
end
EventScript_NoCaseForHiddenCoins::
getnumberstring 0, VAR_0x8006
getstdstring 1, STDSTRING_COINS
buffernumberstring STR_VAR_1, VAR_0x8006
bufferstdstring STR_VAR_2, STDSTRING_COINS
msgbox Text_FoundXCoins
msgbox Text_NothingToPutThemIn
setvar VAR_RESULT, 0
data/scripts/pc.inc
+1 -2
View File
@@ -88,8 +88,7 @@ EventScript_AccessProfOaksPC::
playse SE_PC_LOGIN
msgbox Text_AccessedProfOaksPC
msgbox Text_HavePokedexRated, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_ExitOaksPC
goto_if_eq VAR_RESULT, NO, EventScript_ExitOaksPC
setflag FLAG_OAKS_RATING_IS_VIA_PC
call PokedexRating_EventScript_Rate
clearflag FLAG_OAKS_RATING_IS_VIA_PC
data/scripts/pc_transfer.inc
+6 -8
View File
@@ -13,34 +13,32 @@ EventScript_NameReceivedBoxMon::
return
EventScript_TransferredToPC::
bufferboxname 0, VAR_PC_BOX_TO_SEND_MON
getspeciesname 1, VAR_TEMP_1
bufferboxname STR_VAR_1, VAR_PC_BOX_TO_SEND_MON
bufferspeciesname STR_VAR_2, VAR_TEMP_1
call_if_unset FLAG_SYS_NOT_SOMEONES_PC, EventScript_TransferredSomeonesPC
call_if_set FLAG_SYS_NOT_SOMEONES_PC, EventScript_TransferredBillsPC
return
EventScript_TransferredSomeonesPC::
specialvar VAR_RESULT, ShouldShowBoxWasFullMessage
compare VAR_RESULT, TRUE
goto_if_eq EventScript_TransferredSomeonesPCBoxFull
goto_if_eq VAR_RESULT, TRUE, EventScript_TransferredSomeonesPCBoxFull
msgbox Text_MonSentToBoxInSomeonesPC
return
EventScript_TransferredSomeonesPCBoxFull::
specialvar VAR_RESULT, GetPCBoxToSendMon
bufferboxname 2, VAR_RESULT
bufferboxname STR_VAR_3, VAR_RESULT
msgbox Text_MonSentToBoxSomeonesBoxFull
return
EventScript_TransferredBillsPC::
specialvar VAR_RESULT, ShouldShowBoxWasFullMessage
compare VAR_RESULT, TRUE
goto_if_eq EventScript_TransferredBillsPCBoxFull
goto_if_eq VAR_RESULT, TRUE, EventScript_TransferredBillsPCBoxFull
msgbox Text_MonSentToBoxInBillsPC
return
EventScript_TransferredBillsPCBoxFull::
specialvar VAR_RESULT, GetPCBoxToSendMon
bufferboxname 2, VAR_RESULT
bufferboxname STR_VAR_3, VAR_RESULT
msgbox Text_MonSentToBoxBillsBoxFull
return
data/scripts/pkmn_center_nurse.inc
+3 -6
View File
@@ -30,14 +30,11 @@ EventScript_PkmnCenterNurse_TakeAndHealPkmn::
EventScript_PkmnCenterNurse_CheckTrainerTowerAndUnionRoom::
specialvar VAR_RESULT, IsPlayerNotInTrainerTowerLobby
compare VAR_RESULT, FALSE
goto_if_eq EventScript_PkmnCenterNurse_ReturnPkmn
goto_if_eq VAR_RESULT, FALSE, EventScript_PkmnCenterNurse_ReturnPkmn
specialvar VAR_RESULT, BufferUnionRoomPlayerName
copyvar VAR_0x8008, VAR_RESULT
compare VAR_0x8008, 0
goto_if_eq EventScript_PkmnCenterNurse_ReturnPkmn
compare VAR_0x8008, 1
goto_if_eq EventScript_PkmnCenterNurse_PlayerWaitingInUionRoom
goto_if_eq VAR_0x8008, 0, EventScript_PkmnCenterNurse_ReturnPkmn
goto_if_eq VAR_0x8008, 1, EventScript_PkmnCenterNurse_PlayerWaitingInUionRoom
end
EventScript_PkmnCenterNurse_ReturnPkmn::
data/scripts/pokedex_rating.inc
+10 -15
View File
@@ -18,10 +18,8 @@ PokedexRating_EventScript_ShowRatingMsg::
copyvar VAR_0x8004, VAR_0x8009
special GetProfOaksRatingMessage
waitmessage
compare VAR_RESULT, FALSE
call_if_eq PokedexRating_EventScript_NormalFanfare
compare VAR_RESULT, TRUE
call_if_eq PokedexRating_EventScript_DexCompleteFanfare
call_if_eq VAR_RESULT, FALSE, PokedexRating_EventScript_NormalFanfare
call_if_eq VAR_RESULT, TRUE, PokedexRating_EventScript_DexCompleteFanfare
waitfanfare
waitbuttonpress
return
@@ -43,29 +41,26 @@ PokedexRating_EventScript_Rate::
copyvar VAR_0x8008, VAR_0x8005
copyvar VAR_0x8009, VAR_0x8006
copyvar VAR_0x800A, VAR_RESULT
getnumberstring 0, VAR_0x8008 @ Num Kanto Seen
getnumberstring 1, VAR_0x8009 @ Num Kanto Caught
buffernumberstring STR_VAR_1, VAR_0x8008 @ Num Kanto Seen
buffernumberstring STR_VAR_2, VAR_0x8009 @ Num Kanto Caught
msgbox PokedexRating_Text_SeenXOwnedY
call_if_unset FLAG_OAKS_RATING_IS_VIA_PC, PokedexRating_EventScript_SetTextColor
call PokedexRating_EventScript_ShowRatingMsg
compare VAR_0x800A, FALSE
goto_if_eq PokedexRating_EventScript_EndRating @ National Dex not enabled
goto_if_eq VAR_0x800A, FALSE, PokedexRating_EventScript_EndRating @ National Dex not enabled
setvar VAR_0x8004, 1
specialvar VAR_RESULT, GetPokedexCount
copyvar VAR_0x8008, VAR_0x8005
copyvar VAR_0x8009, VAR_0x8006
getnumberstring 0, VAR_0x8008 @ Num National Seen
getnumberstring 1, VAR_0x8009 @ Num National Caught
buffernumberstring STR_VAR_1, VAR_0x8008 @ Num National Seen
buffernumberstring STR_VAR_2, VAR_0x8009 @ Num National Caught
msgbox PokedexRating_Text_NationalDexSeenXOwnedY
specialvar VAR_RESULT, HasAllMons
compare VAR_RESULT, FALSE
goto_if_eq PokedexRating_EventScript_DexIncomplete
compare VAR_RESULT, TRUE
goto_if_eq PokedexRating_EventScript_DexComplete
goto_if_eq VAR_RESULT, FALSE, PokedexRating_EventScript_DexIncomplete
goto_if_eq VAR_RESULT, TRUE, PokedexRating_EventScript_DexComplete
end
PokedexRating_EventScript_SetTextColor::
textcolor 0
textcolor NPC_TEXT_COLOR_MALE
return
PokedexRating_EventScript_DexIncomplete::
data/scripts/pokemon_league.inc
+1 -1
View File
@@ -23,7 +23,7 @@ PokemonLeague_EventScript_SetDoorOpen::
PokemonLeague_EventScript_PreventExit::
lockall
textcolor 0
textcolor NPC_TEXT_COLOR_MALE
msgbox Text_VoiceRangOutDontRunAway
closemessage
applymovement OBJ_EVENT_ID_PLAYER, PokemonLeague_Movement_ForcePlayerIn
data/scripts/pokemon_mansion.inc
+1 -2
View File
@@ -1,7 +1,6 @@
PokemonMansion_EventScript_SecretSwitch::
msgbox PokemonMansion_Text_PressSecretSwitch, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq PokemonMansion_EventScript_DontPressSwitch
goto_if_eq VAR_RESULT, NO, PokemonMansion_EventScript_DontPressSwitch
msgbox PokemonMansion_Text_WhoWouldnt
goto_if_set FLAG_POKEMON_MANSION_SWITCH_STATE, PokemonMansion_EventScript_ResetSwitch
setflag FLAG_POKEMON_MANSION_SWITCH_STATE
data/scripts/questionnaire.inc
+7 -11
View File
@@ -1,21 +1,17 @@
EventScript_Questionnaire::
lockall
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
msgbox Text_FillOutQuestionnaire, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_DeclineQuestionnaire
goto_if_eq VAR_RESULT, NO, EventScript_DeclineQuestionnaire
setvar VAR_0x8004, EASY_CHAT_TYPE_QUESTIONNAIRE
call Common_ShowEasyChatScreen
lock
faceplayer
specialvar VAR_0x8008, GetMartClerkObjectId
textcolor 0
compare VAR_0x8004, 0
goto_if_eq EventScript_EnableMysteryGift
compare VAR_RESULT, 0
goto_if_eq EventScript_DeclineQuestionnaire
compare VAR_RESULT, 1
goto_if_eq EventScript_TookQuestionnaire
textcolor NPC_TEXT_COLOR_MALE
goto_if_eq VAR_0x8004, 0, EventScript_EnableMysteryGift
goto_if_eq VAR_RESULT, 0, EventScript_DeclineQuestionnaire
goto_if_eq VAR_RESULT, 1, EventScript_TookQuestionnaire
end
EventScript_EnableMysteryGift::
@@ -28,7 +24,7 @@ EventScript_EnableMysteryGift::
waitmovement 0
msgbox Text_YouKnowThoseWords
setflag FLAG_SYS_MYSTERY_GIFT_ENABLED
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special DisableMsgBoxWalkaway
signmsg
msgbox Text_YouCanAccessMysteryGift
data/scripts/route23.inc
+3 -5
View File
@@ -31,8 +31,7 @@ Route23_EventScript_AlreadyRecognizedBadge::
@ Duplicate of the below, only used for Boulder Badge
Route22_NorthEntrance_EventScript_BadgeGuard::
compare VAR_MAP_SCENE_ROUTE23, VAR_TEMP_1
goto_if_ge Route23_EventScript_AlreadyRecognizedBoulderBadge
goto_if_ge VAR_MAP_SCENE_ROUTE23, VAR_TEMP_1, Route23_EventScript_AlreadyRecognizedBoulderBadge
switch VAR_TEMP_1
case 1, Route23_EventScript_CheckBoulderBadge
case 2, Route23_EventScript_CheckCascadeBadge
@@ -45,8 +44,7 @@ Route22_NorthEntrance_EventScript_BadgeGuard::
end
Route23_EventScript_BadgeGuard::
compare VAR_MAP_SCENE_ROUTE23, VAR_TEMP_1
goto_if_ge Route23_EventScript_AlreadyRecognizedBadge
goto_if_ge VAR_MAP_SCENE_ROUTE23, VAR_TEMP_1, Route23_EventScript_AlreadyRecognizedBadge
switch VAR_TEMP_1
case 1, Route23_EventScript_CheckBoulderBadge
case 2, Route23_EventScript_CheckCascadeBadge
@@ -115,7 +113,7 @@ Route23_EventScript_RecognizeBadge::
end
Route23_EventScript_BadgeGuardTrigger::
textcolor 0
textcolor NPC_TEXT_COLOR_MALE
applymovement VAR_0x8009, Movement_WalkInPlaceFasterLeft
waitmovement 0
switch VAR_TEMP_1
data/scripts/safari_zone.inc
+3 -4
View File
@@ -1,21 +1,20 @@
SafariZone_EventScript_OutOfBallsMidBattle::
setvar VAR_MAP_SCENE_FUCHSIA_CITY_SAFARI_ZONE_ENTRANCE, 3
special ExitSafariMode
setwarp MAP_FUCHSIA_CITY_SAFARI_ZONE_ENTRANCE, 255, 4, 1
setwarp MAP_FUCHSIA_CITY_SAFARI_ZONE_ENTRANCE, 4, 1
end
SafariZone_EventScript_Exit::
setvar VAR_MAP_SCENE_FUCHSIA_CITY_SAFARI_ZONE_ENTRANCE, 1
special ExitSafariMode
warp MAP_FUCHSIA_CITY_SAFARI_ZONE_ENTRANCE, 255, 4, 1
warp MAP_FUCHSIA_CITY_SAFARI_ZONE_ENTRANCE, 4, 1
waitstate
end
SafariZone_EventScript_RetirePrompt::
lockall
msgbox SafariZone_Text_WouldYouLikeToExit, MSGBOX_YESNO
compare VAR_RESULT, YES
goto_if_eq SafariZone_EventScript_Retire
goto_if_eq VAR_RESULT, YES, SafariZone_EventScript_Retire
releaseall
end
data/scripts/seagallop.inc
+143 -152
View File
@@ -1,206 +1,197 @@
@ Separate selection menus for before the Rainbow Pass is obtained
EventScript_ChooseDestFromOneIsland::
compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
goto_if_ge EventScript_SeviiDestinationsPage1
compare VAR_MAP_SCENE_CINNABAR_ISLAND, 4
goto_if_ge EventScript_ChooseDestFromOneIslandVermilionAllowed
multichoice 19, 6, MULTICHOICE_ISLAND_23, FALSE
switch VAR_RESULT
case 0, EventScript_SailToTwoIsland2
case 1, EventScript_SailToThreeIsland2
case 2, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
goto_if_ge VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5, EventScript_SeviiDestinationsPage1
goto_if_ge VAR_MAP_SCENE_CINNABAR_ISLAND, 4, EventScript_ChooseDestFromOneIslandVermilionAllowed
multichoice 19, 6, MULTICHOICE_ISLAND_23, FALSE
switch VAR_RESULT
case 0, EventScript_SailToTwoIsland2
case 1, EventScript_SailToThreeIsland2
case 2, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_ChooseDestFromOneIslandVermilionAllowed::
multichoice 19, 5, MULTICHOICE_SEAGALLOP_V23, FALSE
switch VAR_RESULT
case 0, EventScript_SailToVermilion2
case 1, EventScript_SailToTwoIsland2
case 2, EventScript_SailToThreeIsland2
case 3, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
multichoice 19, 5, MULTICHOICE_SEAGALLOP_V23, FALSE
switch VAR_RESULT
case 0, EventScript_SailToVermilion2
case 1, EventScript_SailToTwoIsland2
case 2, EventScript_SailToThreeIsland2
case 3, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_ChooseDestFromTwoIsland::
compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
goto_if_ge EventScript_SeviiDestinationsPage1
compare VAR_MAP_SCENE_CINNABAR_ISLAND, 4
goto_if_ge EventScript_ChooseDestFromTwoIslandVermilionAllowed
multichoice 19, 6, MULTICHOICE_ISLAND_13, FALSE
switch VAR_RESULT
case 0, EventScript_SailToOneIsland2
case 1, EventScript_SailToThreeIsland2
case 2, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
goto_if_ge VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5, EventScript_SeviiDestinationsPage1
goto_if_ge VAR_MAP_SCENE_CINNABAR_ISLAND, 4, EventScript_ChooseDestFromTwoIslandVermilionAllowed
multichoice 19, 6, MULTICHOICE_ISLAND_13, FALSE
switch VAR_RESULT
case 0, EventScript_SailToOneIsland2
case 1, EventScript_SailToThreeIsland2
case 2, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_ChooseDestFromTwoIslandVermilionAllowed::
multichoice 19, 5, MULTICHOICE_SEAGALLOP_V13, FALSE
switch VAR_RESULT
case 0, EventScript_SailToVermilion2
case 1, EventScript_SailToOneIsland2
case 2, EventScript_SailToThreeIsland2
case 3, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
multichoice 19, 5, MULTICHOICE_SEAGALLOP_V13, FALSE
switch VAR_RESULT
case 0, EventScript_SailToVermilion2
case 1, EventScript_SailToOneIsland2
case 2, EventScript_SailToThreeIsland2
case 3, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_SailToVermilion2::
setvar VAR_0x8006, SEAGALLOP_VERMILION_CITY
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_VERMILION_CITY
goto EventScript_SailToDest
end
EventScript_SailToOneIsland2::
setvar VAR_0x8006, SEAGALLOP_ONE_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_ONE_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToTwoIsland2::
setvar VAR_0x8006, SEAGALLOP_TWO_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_TWO_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToThreeIsland2::
setvar VAR_0x8006, SEAGALLOP_THREE_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_THREE_ISLAND
goto EventScript_SailToDest
end
EventScript_ChooseDestFromIsland::
compare VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5
goto_if_ge EventScript_SeviiDestinationsPage1
compare VAR_MAP_SCENE_CINNABAR_ISLAND, 4
goto_if_ge EventScript_ChooseDestFromIslandVermilionAllowed
multichoice 19, 6, MULTICHOICE_ISLAND_12, FALSE
switch VAR_RESULT
case 0, EventScript_SailToOneIsland2
case 1, EventScript_SailToTwoIsland2
case 2, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
goto_if_ge VAR_MAP_SCENE_ONE_ISLAND_POKEMON_CENTER_1F, 5, EventScript_SeviiDestinationsPage1
goto_if_ge VAR_MAP_SCENE_CINNABAR_ISLAND, 4, EventScript_ChooseDestFromIslandVermilionAllowed
multichoice 19, 6, MULTICHOICE_ISLAND_12, FALSE
switch VAR_RESULT
case 0, EventScript_SailToOneIsland2
case 1, EventScript_SailToTwoIsland2
case 2, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_ChooseDestFromIslandVermilionAllowed::
multichoice 19, 5, MULTICHOICE_SEAGALLOP_V12, FALSE
switch VAR_RESULT
case 0, EventScript_SailToVermilion2
case 1, EventScript_SailToOneIsland2
case 2, EventScript_SailToTwoIsland2
case 3, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
multichoice 19, 5, MULTICHOICE_SEAGALLOP_V12, FALSE
switch VAR_RESULT
case 0, EventScript_SailToVermilion2
case 1, EventScript_SailToOneIsland2
case 2, EventScript_SailToTwoIsland2
case 3, EventScript_CancelSail
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_SailToDest::
specialvar VAR_RESULT, GetSeagallopNumber
getnumberstring 0, VAR_RESULT
compare VAR_0x8004, SEAGALLOP_VERMILION_CITY
goto_if_eq EventScript_DepartingVermilion
compare VAR_0x8004, SEAGALLOP_VERMILION_CITY
goto_if_ne EventScript_DepartingNotVermilion
end
specialvar VAR_RESULT, GetSeagallopNumber
buffernumberstring STR_VAR_1, VAR_RESULT
goto_if_eq VAR_0x8004, SEAGALLOP_VERMILION_CITY, EventScript_DepartingVermilion
goto_if_ne VAR_0x8004, SEAGALLOP_VERMILION_CITY, EventScript_DepartingNotVermilion
end
EventScript_DepartingVermilion::
msgbox VermilionCity_Text_Seagallop7Departing
goto EventScript_SetSail
end
msgbox VermilionCity_Text_Seagallop7Departing
goto EventScript_SetSail
end
EventScript_DepartingNotVermilion::
msgbox Text_AllAboardSeagallopNum
goto EventScript_SetSail
end
msgbox Text_AllAboardSeagallopNum
goto EventScript_SetSail
end
EventScript_SetSail::
closemessage
delay 20
goto_if_questlog EventScript_ReleaseEnd
special QuestLog_CutRecording
fadescreen FADE_TO_BLACK
special DoSeagallopFerryScene
waitstate
end
closemessage
delay 20
goto_if_questlog EventScript_ReleaseEnd
special QuestLog_CutRecording
fadescreen FADE_TO_BLACK
special DoSeagallopFerryScene
waitstate
end
EventScript_CancelSail::
specialvar VAR_RESULT, IsPlayerLeftOfVermilionSailor
compare VAR_RESULT, TRUE
goto_if_eq VermilionCity_EventScript_WalkUpPier
release
end
specialvar VAR_RESULT, IsPlayerLeftOfVermilionSailor
goto_if_eq VAR_RESULT, TRUE, VermilionCity_EventScript_WalkUpPier
release
end
VermilionCity_EventScript_WalkUpPier::
closemessage
applymovement LOCALID_FERRY_SAILOR, Movement_FaceOriginalDirection
applymovement OBJ_EVENT_ID_PLAYER, VermilionCity_Movement_WalkUp
waitmovement 0
releaseall
end
closemessage
applymovement LOCALID_FERRY_SAILOR, Movement_FaceOriginalDirection
applymovement OBJ_EVENT_ID_PLAYER, VermilionCity_Movement_WalkUp
waitmovement 0
releaseall
end
VermilionCity_Movement_WalkUp::
walk_up
step_end
walk_up
step_end
EventScript_SeviiDestinationsPage1::
setvar VAR_0x8005, 0
special DrawSeagallopDestinationMenu
waitstate
specialvar VAR_0x8006, GetSelectedSeagallopDestination
switch VAR_0x8006
case SEAGALLOP_VERMILION_CITY, EventScript_SailToVermilionCity
case SEAGALLOP_ONE_ISLAND, EventScript_SailToOneIsland
case SEAGALLOP_TWO_ISLAND, EventScript_SailToTwoIsland
case SEAGALLOP_THREE_ISLAND, EventScript_SailToThreeIsland
case SEAGALLOP_FOUR_ISLAND, EventScript_SailToFourIsland
case SEAGALLOP_MORE, EventScript_SeviiDestinationsPage2
case SCR_MENU_CANCEL, EventScript_CancelSail
end
setvar VAR_0x8005, 0
special DrawSeagallopDestinationMenu
waitstate
specialvar VAR_0x8006, GetSelectedSeagallopDestination
switch VAR_0x8006
case SEAGALLOP_VERMILION_CITY, EventScript_SailToVermilionCity
case SEAGALLOP_ONE_ISLAND, EventScript_SailToOneIsland
case SEAGALLOP_TWO_ISLAND, EventScript_SailToTwoIsland
case SEAGALLOP_THREE_ISLAND, EventScript_SailToThreeIsland
case SEAGALLOP_FOUR_ISLAND, EventScript_SailToFourIsland
case SEAGALLOP_MORE, EventScript_SeviiDestinationsPage2
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_SeviiDestinationsPage2::
setvar VAR_0x8005, 1
special DrawSeagallopDestinationMenu
waitstate
specialvar VAR_0x8006, GetSelectedSeagallopDestination
switch VAR_0x8006
case SEAGALLOP_FOUR_ISLAND, EventScript_SailToFourIsland
case SEAGALLOP_FIVE_ISLAND, EventScript_SailToFiveIsland
case SEAGALLOP_SIX_ISLAND, EventScript_SailToSixIsland
case SEAGALLOP_SEVEN_ISLAND, EventScript_SailToSevenIsland
case SEAGALLOP_MORE, EventScript_SeviiDestinationsPage1
case SCR_MENU_CANCEL, EventScript_CancelSail
end
setvar VAR_0x8005, 1
special DrawSeagallopDestinationMenu
waitstate
specialvar VAR_0x8006, GetSelectedSeagallopDestination
switch VAR_0x8006
case SEAGALLOP_FOUR_ISLAND, EventScript_SailToFourIsland
case SEAGALLOP_FIVE_ISLAND, EventScript_SailToFiveIsland
case SEAGALLOP_SIX_ISLAND, EventScript_SailToSixIsland
case SEAGALLOP_SEVEN_ISLAND, EventScript_SailToSevenIsland
case SEAGALLOP_MORE, EventScript_SeviiDestinationsPage1
case SCR_MENU_CANCEL, EventScript_CancelSail
end
EventScript_SailToVermilionCity::
setvar VAR_0x8006, SEAGALLOP_VERMILION_CITY
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_VERMILION_CITY
goto EventScript_SailToDest
end
EventScript_SailToOneIsland::
setvar VAR_0x8006, SEAGALLOP_ONE_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_ONE_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToTwoIsland::
setvar VAR_0x8006, SEAGALLOP_TWO_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_TWO_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToThreeIsland::
setvar VAR_0x8006, SEAGALLOP_THREE_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_THREE_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToFourIsland::
setvar VAR_0x8006, SEAGALLOP_FOUR_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_FOUR_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToFiveIsland::
setvar VAR_0x8006, SEAGALLOP_FIVE_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_FIVE_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToSixIsland::
setvar VAR_0x8006, SEAGALLOP_SIX_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_SIX_ISLAND
goto EventScript_SailToDest
end
EventScript_SailToSevenIsland::
setvar VAR_0x8006, SEAGALLOP_SEVEN_ISLAND
goto EventScript_SailToDest
end
setvar VAR_0x8006, SEAGALLOP_SEVEN_ISLAND
goto EventScript_SailToDest
end
data/scripts/silphco_doors.inc
+417 -437
View File
@@ -1,564 +1,544 @@
EventScript_NeedCardKey::
msgbox Text_ItNeedsCardKey
releaseall
end
msgbox Text_ItNeedsCardKey
releaseall
end
EventScript_DoorUnlocked::
msgbox Text_TheDoorIsOpen
releaseall
end
msgbox Text_TheDoorIsOpen
releaseall
end
EventScript_Close2FDoor1::
setmetatile 5, 8, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 6, 8, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 5, 9, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 6, 9, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 6, 10, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 5, 8, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 6, 8, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 5, 9, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 6, 9, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 6, 10, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close2FDoor2::
setmetatile 5, 15, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 6, 15, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 5, 16, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 6, 16, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 6, 17, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 5, 15, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 6, 15, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 5, 16, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 6, 16, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 6, 17, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close3FDoor1::
setmetatile 9, 11, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 10, 11, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 9, 12, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 10, 12, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 9, 13, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 10, 13, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 9, 11, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 10, 11, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 9, 12, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 10, 12, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 9, 13, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 10, 13, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close3FDoor2::
setmetatile 20, 11, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 21, 11, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 20, 12, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 21, 12, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 20, 13, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 21, 13, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 20, 11, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 21, 11, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 20, 12, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 21, 12, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 20, 13, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 21, 13, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close4FDoor1::
setmetatile 3, 16, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 4, 16, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 3, 17, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 4, 17, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 4, 18, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 3, 16, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 4, 16, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 3, 17, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 4, 17, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 4, 18, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close4FDoor2::
setmetatile 14, 11, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 15, 11, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 14, 12, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 15, 12, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 15, 13, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 14, 11, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 15, 11, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 14, 12, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 15, 12, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 15, 13, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close5FDoor1:: @ 81AMETATILE_SilphCo_Floor_WallRightCornerF
setmetatile 7, 8, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 8, 8, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 7, 9, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 8, 9, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 7, 10, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 8, 10, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 7, 8, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 8, 8, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 7, 9, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 8, 9, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 7, 10, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 8, 10, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close5FDoor2::
setmetatile 7, 17, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 8, 17, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 7, 18, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 8, 18, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 7, 19, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 8, 19, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 7, 17, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 8, 17, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 7, 18, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 8, 18, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 7, 19, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 8, 19, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close5FDoor3::
setmetatile 18, 12, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 19, 12, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 18, 13, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 19, 13, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 18, 14, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 19, 14, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 18, 12, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 19, 12, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 18, 13, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 19, 13, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 18, 14, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 19, 14, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close6FDoor::
setmetatile 5, 14, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 6, 14, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 5, 15, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 6, 15, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 5, 16, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 6, 16, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 5, 14, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 6, 14, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 5, 15, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 6, 15, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 5, 16, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 6, 16, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close7FDoor1::
setmetatile 11, 8, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 12, 8, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 11, 9, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 12, 9, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 12, 10, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 11, 8, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 12, 8, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 11, 9, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 12, 9, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 12, 10, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close7FDoor2::
setmetatile 24, 7, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 25, 7, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 24, 8, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 25, 8, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 25, 9, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 24, 7, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 25, 7, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 24, 8, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 25, 8, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 25, 9, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close7FDoor3::
setmetatile 25, 13, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 26, 13, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 25, 14, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 26, 14, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 26, 15, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 25, 13, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 26, 13, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 25, 14, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 26, 14, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 26, 15, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close8FDoor::
setmetatile 5, 9, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 6, 9, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 5, 10, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 6, 10, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 5, 11, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 6, 11, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 5, 9, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 6, 9, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 5, 10, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 6, 10, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 5, 11, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 6, 11, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close9FDoor1::
setmetatile 2, 9, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 3, 9, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 2, 10, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 3, 10, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 2, 11, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 3, 11, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 2, 9, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 3, 9, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 2, 10, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 3, 10, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 2, 11, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 3, 11, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close9FDoor2::
setmetatile 12, 15, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 13, 15, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 12, 16, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 13, 16, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 12, 17, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 13, 17, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
setmetatile 12, 15, METATILE_SilphCo_VerticalBarrier_TopLeft, 1
setmetatile 13, 15, METATILE_SilphCo_VerticalBarrier_TopRight, 1
setmetatile 12, 16, METATILE_SilphCo_VerticalBarrier_MidLeft, 1
setmetatile 13, 16, METATILE_SilphCo_VerticalBarrier_MidRight, 1
setmetatile 12, 17, METATILE_SilphCo_VerticalBarrier_BottomLeft, 1
setmetatile 13, 17, METATILE_SilphCo_VerticalBarrier_BottomRight, 1
return
EventScript_Close9FDoor3::
setmetatile 21, 6, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 22, 6, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 21, 7, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 22, 7, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 22, 8, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 21, 6, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 22, 6, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 21, 7, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 22, 7, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 22, 8, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close9FDoor4::
setmetatile 21, 12, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 22, 12, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 21, 13, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 22, 13, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 22, 14, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 21, 12, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 22, 12, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 21, 13, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 22, 13, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 22, 14, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close10FDoor::
setmetatile 12, 11, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 13, 11, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 12, 12, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 13, 12, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 13, 13, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 12, 11, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 13, 11, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 12, 12, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 13, 12, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 13, 13, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Close11FDoor::
setmetatile 5, 16, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 6, 16, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 5, 17, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 6, 17, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 6, 18, METATILE_SilphCo_Floor_ShadeFull, 0
return
setmetatile 5, 16, METATILE_SilphCo_HorizontalBarrier_TopLeft, 1
setmetatile 6, 16, METATILE_SilphCo_HorizontalBarrier_TopRight, 1
setmetatile 5, 17, METATILE_SilphCo_HorizontalBarrier_BottomLeft, 1
setmetatile 6, 17, METATILE_SilphCo_HorizontalBarrier_BottomRight, 1
setmetatile 6, 18, METATILE_SilphCo_Floor_ShadeFull, 0
return
EventScript_Open2FDoor1::
setmetatile 5, 8, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 8, METATILE_SilphCo_Floor, 0
setmetatile 5, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 9, METATILE_SilphCo_Floor, 0
setmetatile 6, 10, METATILE_SilphCo_Floor, 0
return
setmetatile 5, 8, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 8, METATILE_SilphCo_Floor, 0
setmetatile 5, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 9, METATILE_SilphCo_Floor, 0
setmetatile 6, 10, METATILE_SilphCo_Floor, 0
return
EventScript_Open2FDoor2::
setmetatile 5, 15, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 15, METATILE_SilphCo_Floor, 0
setmetatile 5, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 16, METATILE_SilphCo_Floor, 0
setmetatile 6, 17, METATILE_SilphCo_Floor, 0
return
setmetatile 5, 15, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 15, METATILE_SilphCo_Floor, 0
setmetatile 5, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 16, METATILE_SilphCo_Floor, 0
setmetatile 6, 17, METATILE_SilphCo_Floor, 0
return
EventScript_Open3FDoor1::
setmetatile 9, 11, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 10, 11, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 9, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 10, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 9, 13, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 10, 13, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 9, 11, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 10, 11, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 9, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 10, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 9, 13, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 10, 13, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open3FDoor2::
setmetatile 20, 11, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 21, 11, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 20, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 21, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 20, 13, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 21, 13, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 20, 11, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 21, 11, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 20, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 21, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 20, 13, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 21, 13, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open4FDoor1::
setmetatile 3, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 4, 16, METATILE_SilphCo_Floor, 0
setmetatile 3, 17, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 4, 17, METATILE_SilphCo_Floor, 0
setmetatile 4, 18, METATILE_SilphCo_Floor, 0
return
setmetatile 3, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 4, 16, METATILE_SilphCo_Floor, 0
setmetatile 3, 17, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 4, 17, METATILE_SilphCo_Floor, 0
setmetatile 4, 18, METATILE_SilphCo_Floor, 0
return
EventScript_Open4FDoor2::
setmetatile 14, 11, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 15, 11, METATILE_SilphCo_Floor, 0
setmetatile 14, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 15, 12, METATILE_SilphCo_Floor, 0
setmetatile 15, 13, METATILE_SilphCo_Floor, 0
return
setmetatile 14, 11, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 15, 11, METATILE_SilphCo_Floor, 0
setmetatile 14, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 15, 12, METATILE_SilphCo_Floor, 0
setmetatile 15, 13, METATILE_SilphCo_Floor, 0
return
EventScript_Open5FDoor1::
setmetatile 7, 8, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 8, 8, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 7, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 8, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 7, 10, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 8, 10, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 7, 8, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 8, 8, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 7, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 8, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 7, 10, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 8, 10, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open5FDoor2::
setmetatile 7, 17, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 8, 17, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 7, 18, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 8, 18, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 7, 19, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 8, 19, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 7, 17, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 8, 17, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 7, 18, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 8, 18, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 7, 19, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 8, 19, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open5FDoor3::
setmetatile 18, 12, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 19, 12, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 18, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 19, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 18, 14, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 19, 14, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 18, 12, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 19, 12, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 18, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 19, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 18, 14, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 19, 14, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open6FDoor::
setmetatile 5, 14, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 6, 14, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 5, 15, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 15, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 5, 16, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 6, 16, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 5, 14, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 6, 14, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 5, 15, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 15, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 5, 16, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 6, 16, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open7FDoor1::
setmetatile 11, 8, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 12, 8, METATILE_SilphCo_Floor, 0
setmetatile 11, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 12, 9, METATILE_SilphCo_Floor, 0
setmetatile 12, 10, METATILE_SilphCo_Floor, 0
return
setmetatile 11, 8, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 12, 8, METATILE_SilphCo_Floor, 0
setmetatile 11, 9, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 12, 9, METATILE_SilphCo_Floor, 0
setmetatile 12, 10, METATILE_SilphCo_Floor, 0
return
EventScript_Open7FDoor2::
setmetatile 24, 7, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 25, 7, METATILE_SilphCo_Floor, 0
setmetatile 24, 8, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 25, 8, METATILE_SilphCo_Floor, 0
setmetatile 25, 9, METATILE_SilphCo_Floor, 0
return
setmetatile 24, 7, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 25, 7, METATILE_SilphCo_Floor, 0
setmetatile 24, 8, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 25, 8, METATILE_SilphCo_Floor, 0
setmetatile 25, 9, METATILE_SilphCo_Floor, 0
return
EventScript_Open7FDoor3::
setmetatile 25, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 26, 13, METATILE_SilphCo_Floor, 0
setmetatile 25, 14, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 26, 14, METATILE_SilphCo_Floor, 0
setmetatile 26, 15, METATILE_SilphCo_Floor, 0
return
setmetatile 25, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 26, 13, METATILE_SilphCo_Floor, 0
setmetatile 25, 14, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 26, 14, METATILE_SilphCo_Floor, 0
setmetatile 26, 15, METATILE_SilphCo_Floor, 0
return
EventScript_Open8FDoor::
setmetatile 5, 9, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 6, 9, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 5, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 5, 11, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 6, 11, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 5, 9, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 6, 9, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 5, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 5, 11, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 6, 11, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open9FDoor1::
setmetatile 2, 9, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 3, 9, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 2, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 3, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 2, 11, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 3, 11, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 2, 9, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 3, 9, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 2, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 3, 10, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 2, 11, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 3, 11, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open9FDoor2::
setmetatile 12, 15, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 13, 15, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 12, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 13, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 12, 17, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 13, 17, METATILE_SilphCo_Floor_WallRightCorner, 0
return
setmetatile 12, 15, METATILE_SilphCo_Wall_LeftEdge, 1
setmetatile 13, 15, METATILE_SilphCo_Wall_RightEdge, 1
setmetatile 12, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 13, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 12, 17, METATILE_SilphCo_Floor_WallLeftCorner, 0
setmetatile 13, 17, METATILE_SilphCo_Floor_WallRightCorner, 0
return
EventScript_Open9FDoor3::
setmetatile 21, 6, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 6, METATILE_SilphCo_Floor, 0
setmetatile 21, 7, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 7, METATILE_SilphCo_Floor, 0
setmetatile 22, 8, METATILE_SilphCo_Floor, 0
return
setmetatile 21, 6, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 6, METATILE_SilphCo_Floor, 0
setmetatile 21, 7, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 7, METATILE_SilphCo_Floor, 0
setmetatile 22, 8, METATILE_SilphCo_Floor, 0
return
EventScript_Open9FDoor4::
setmetatile 21, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 12, METATILE_SilphCo_Floor, 0
setmetatile 21, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 13, METATILE_SilphCo_Floor, 0
setmetatile 22, 14, METATILE_SilphCo_Floor, 0
return
setmetatile 21, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 12, METATILE_SilphCo_Floor, 0
setmetatile 21, 13, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 22, 13, METATILE_SilphCo_Floor, 0
setmetatile 22, 14, METATILE_SilphCo_Floor, 0
return
EventScript_Open10FDoor::
setmetatile 12, 11, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 13, 11, METATILE_SilphCo_Floor, 0
setmetatile 12, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 13, 12, METATILE_SilphCo_Floor, 0
setmetatile 13, 13, METATILE_SilphCo_Floor, 0
return
setmetatile 12, 11, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 13, 11, METATILE_SilphCo_Floor, 0
setmetatile 12, 12, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 13, 12, METATILE_SilphCo_Floor, 0
setmetatile 13, 13, METATILE_SilphCo_Floor, 0
return
EventScript_Open11FDoor::
setmetatile 5, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 16, METATILE_SilphCo_Floor, 0
setmetatile 5, 17, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 17, METATILE_SilphCo_Floor, 0
setmetatile 6, 18, METATILE_SilphCo_Floor, 0
return
setmetatile 5, 16, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 16, METATILE_SilphCo_Floor, 0
setmetatile 5, 17, METATILE_SilphCo_Floor_ShadeFull, 0
setmetatile 6, 17, METATILE_SilphCo_Floor, 0
setmetatile 6, 18, METATILE_SilphCo_Floor, 0
return
SilphCo_2F_EventScript_Door1::
lockall
setvar VAR_TEMP_1, 1
setvar VAR_0x8004, FLAG_SILPH_2F_DOOR_1
goto_if_set FLAG_SILPH_2F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 1
setvar VAR_0x8004, FLAG_SILPH_2F_DOOR_1
goto_if_set FLAG_SILPH_2F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_2F_EventScript_Door2::
lockall
setvar VAR_TEMP_1, 2
setvar VAR_0x8004, FLAG_SILPH_2F_DOOR_2
goto_if_set FLAG_SILPH_2F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 2
setvar VAR_0x8004, FLAG_SILPH_2F_DOOR_2
goto_if_set FLAG_SILPH_2F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_3F_EventScript_Door1::
lockall
setvar VAR_TEMP_1, 3
setvar VAR_0x8004, FLAG_SILPH_3F_DOOR_1
goto_if_set FLAG_SILPH_3F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 3
setvar VAR_0x8004, FLAG_SILPH_3F_DOOR_1
goto_if_set FLAG_SILPH_3F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_3F_EventScript_Door2::
lockall
setvar VAR_TEMP_1, 4
setvar VAR_0x8004, FLAG_SILPH_3F_DOOR_2
goto_if_set FLAG_SILPH_3F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 4
setvar VAR_0x8004, FLAG_SILPH_3F_DOOR_2
goto_if_set FLAG_SILPH_3F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_4F_EventScript_Door1::
lockall
setvar VAR_TEMP_1, 5
setvar VAR_0x8004, FLAG_SILPH_4F_DOOR_1
goto_if_set FLAG_SILPH_4F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 5
setvar VAR_0x8004, FLAG_SILPH_4F_DOOR_1
goto_if_set FLAG_SILPH_4F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_4F_EventScript_Door2::
lockall
setvar VAR_TEMP_1, 6
setvar VAR_0x8004, FLAG_SILPH_4F_DOOR_2
goto_if_set FLAG_SILPH_4F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 6
setvar VAR_0x8004, FLAG_SILPH_4F_DOOR_2
goto_if_set FLAG_SILPH_4F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_5F_EventScript_Door1::
lockall
setvar VAR_TEMP_1, 7
setvar VAR_0x8004, FLAG_SILPH_5F_DOOR_1
goto_if_set FLAG_SILPH_5F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 7
setvar VAR_0x8004, FLAG_SILPH_5F_DOOR_1
goto_if_set FLAG_SILPH_5F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_5F_EventScript_Door2::
lockall
setvar VAR_TEMP_1, 8
setvar VAR_0x8004, FLAG_SILPH_5F_DOOR_2
goto_if_set FLAG_SILPH_5F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 8
setvar VAR_0x8004, FLAG_SILPH_5F_DOOR_2
goto_if_set FLAG_SILPH_5F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_5F_EventScript_Door3::
lockall
setvar VAR_TEMP_1, 9
setvar VAR_0x8004, FLAG_SILPH_5F_DOOR_3
goto_if_set FLAG_SILPH_5F_DOOR_3, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 9
setvar VAR_0x8004, FLAG_SILPH_5F_DOOR_3
goto_if_set FLAG_SILPH_5F_DOOR_3, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_6F_EventScript_Door::
lockall
setvar VAR_TEMP_1, 10
setvar VAR_0x8004, FLAG_SILPH_6F_DOOR
goto_if_set FLAG_SILPH_6F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 10
setvar VAR_0x8004, FLAG_SILPH_6F_DOOR
goto_if_set FLAG_SILPH_6F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_7F_EventScript_Door1::
lockall
setvar VAR_TEMP_1, 11
setvar VAR_0x8004, FLAG_SILPH_7F_DOOR_1
goto_if_set FLAG_SILPH_7F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 11
setvar VAR_0x8004, FLAG_SILPH_7F_DOOR_1
goto_if_set FLAG_SILPH_7F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_7F_EventScript_Door2::
lockall
setvar VAR_TEMP_1, 12
setvar VAR_0x8004, FLAG_SILPH_7F_DOOR_2
goto_if_set FLAG_SILPH_7F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 12
setvar VAR_0x8004, FLAG_SILPH_7F_DOOR_2
goto_if_set FLAG_SILPH_7F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_7F_EventScript_Door3::
lockall
setvar VAR_TEMP_1, 13
setvar VAR_0x8004, FLAG_SILPH_7F_DOOR_3
goto_if_set FLAG_SILPH_7F_DOOR_3, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 13
setvar VAR_0x8004, FLAG_SILPH_7F_DOOR_3
goto_if_set FLAG_SILPH_7F_DOOR_3, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_8F_EventScript_Door::
lockall
setvar VAR_TEMP_1, 14
setvar VAR_0x8004, FLAG_SILPH_8F_DOOR
goto_if_set FLAG_SILPH_8F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 14
setvar VAR_0x8004, FLAG_SILPH_8F_DOOR
goto_if_set FLAG_SILPH_8F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_9F_EventScript_Door1::
lockall
setvar VAR_TEMP_1, 15
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_1
goto_if_set FLAG_SILPH_9F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 15
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_1
goto_if_set FLAG_SILPH_9F_DOOR_1, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_9F_EventScript_Door2::
lockall
setvar VAR_TEMP_1, 16
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_2
goto_if_set FLAG_SILPH_9F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 16
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_2
goto_if_set FLAG_SILPH_9F_DOOR_2, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_9F_EventScript_Door3::
lockall
setvar VAR_TEMP_1, 17
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_3
goto_if_set FLAG_SILPH_9F_DOOR_3, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 17
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_3
goto_if_set FLAG_SILPH_9F_DOOR_3, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_9F_EventScript_Door4::
lockall
setvar VAR_TEMP_1, 18
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_4
goto_if_set FLAG_SILPH_9F_DOOR_4, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 18
setvar VAR_0x8004, FLAG_SILPH_9F_DOOR_4
goto_if_set FLAG_SILPH_9F_DOOR_4, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_10F_EventScript_Door::
lockall
setvar VAR_TEMP_1, 19
setvar VAR_0x8004, FLAG_SILPH_10F_DOOR
goto_if_set FLAG_SILPH_10F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 19
setvar VAR_0x8004, FLAG_SILPH_10F_DOOR
goto_if_set FLAG_SILPH_10F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
SilphCo_11F_EventScript_Door::
lockall
setvar VAR_TEMP_1, 20
setvar VAR_0x8004, FLAG_SILPH_11F_DOOR
goto_if_set FLAG_SILPH_11F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
lockall
setvar VAR_TEMP_1, 20
setvar VAR_0x8004, FLAG_SILPH_11F_DOOR
goto_if_set FLAG_SILPH_11F_DOOR, EventScript_DoorUnlocked
goto EventScript_TryUnlockDoor
end
EventScript_TryUnlockDoor::
goto_if_set FLAG_HIDE_SILPH_CO_5F_CARD_KEY, EventScript_OpenDoor
goto EventScript_NeedCardKey
end
goto_if_set FLAG_HIDE_SILPH_CO_5F_CARD_KEY, EventScript_OpenDoor
goto EventScript_NeedCardKey
end
EventScript_OpenDoor::
playfanfare MUS_LEVEL_UP
msgbox Text_CardKeyOpenedDoor
waitfanfare
compare VAR_TEMP_1, 1
call_if_eq EventScript_Open2FDoor1
compare VAR_TEMP_1, 2
call_if_eq EventScript_Open2FDoor2
compare VAR_TEMP_1, 3
call_if_eq EventScript_Open3FDoor1
compare VAR_TEMP_1, 4
call_if_eq EventScript_Open3FDoor2
compare VAR_TEMP_1, 5
call_if_eq EventScript_Open4FDoor1
compare VAR_TEMP_1, 6
call_if_eq EventScript_Open4FDoor2
compare VAR_TEMP_1, 7
call_if_eq EventScript_Open5FDoor1
compare VAR_TEMP_1, 8
call_if_eq EventScript_Open5FDoor2
compare VAR_TEMP_1, 9
call_if_eq EventScript_Open5FDoor3
compare VAR_TEMP_1, 10
call_if_eq EventScript_Open6FDoor
compare VAR_TEMP_1, 11
call_if_eq EventScript_Open7FDoor1
compare VAR_TEMP_1, 12
call_if_eq EventScript_Open7FDoor2
compare VAR_TEMP_1, 13
call_if_eq EventScript_Open7FDoor3
compare VAR_TEMP_1, 14
call_if_eq EventScript_Open8FDoor
compare VAR_TEMP_1, 15
call_if_eq EventScript_Open9FDoor1
compare VAR_TEMP_1, 16
call_if_eq EventScript_Open9FDoor2
compare VAR_TEMP_1, 17
call_if_eq EventScript_Open9FDoor3
compare VAR_TEMP_1, 18
call_if_eq EventScript_Open9FDoor4
compare VAR_TEMP_1, 19
call_if_eq EventScript_Open10FDoor
compare VAR_TEMP_1, 20
call_if_eq EventScript_Open11FDoor
waitse
playse SE_UNLOCK
special DrawWholeMapView
waitse
special SetHiddenItemFlag
releaseall
end
playfanfare MUS_LEVEL_UP
msgbox Text_CardKeyOpenedDoor
waitfanfare
call_if_eq VAR_TEMP_1, 1, EventScript_Open2FDoor1
call_if_eq VAR_TEMP_1, 2, EventScript_Open2FDoor2
call_if_eq VAR_TEMP_1, 3, EventScript_Open3FDoor1
call_if_eq VAR_TEMP_1, 4, EventScript_Open3FDoor2
call_if_eq VAR_TEMP_1, 5, EventScript_Open4FDoor1
call_if_eq VAR_TEMP_1, 6, EventScript_Open4FDoor2
call_if_eq VAR_TEMP_1, 7, EventScript_Open5FDoor1
call_if_eq VAR_TEMP_1, 8, EventScript_Open5FDoor2
call_if_eq VAR_TEMP_1, 9, EventScript_Open5FDoor3
call_if_eq VAR_TEMP_1, 10, EventScript_Open6FDoor
call_if_eq VAR_TEMP_1, 11, EventScript_Open7FDoor1
call_if_eq VAR_TEMP_1, 12, EventScript_Open7FDoor2
call_if_eq VAR_TEMP_1, 13, EventScript_Open7FDoor3
call_if_eq VAR_TEMP_1, 14, EventScript_Open8FDoor
call_if_eq VAR_TEMP_1, 15, EventScript_Open9FDoor1
call_if_eq VAR_TEMP_1, 16, EventScript_Open9FDoor2
call_if_eq VAR_TEMP_1, 17, EventScript_Open9FDoor3
call_if_eq VAR_TEMP_1, 18, EventScript_Open9FDoor4
call_if_eq VAR_TEMP_1, 19, EventScript_Open10FDoor
call_if_eq VAR_TEMP_1, 20, EventScript_Open11FDoor
waitse
playse SE_UNLOCK
special DrawWholeMapView
waitse
special SetHiddenItemFlag
releaseall
end
data/scripts/static_pokemon.inc
+1 -1
View File
@@ -9,7 +9,7 @@ EventScript_MonFlewAway::
fadescreen FADE_TO_BLACK
removeobject VAR_LAST_TALKED
fadescreen FADE_FROM_BLACK
getspeciesname 0, VAR_0x8004
bufferspeciesname STR_VAR_1, VAR_0x8004
msgbox Text_MonFlewAway
release
end
data/scripts/std_msgbox.inc
+4 -7
View File
@@ -28,16 +28,13 @@ Std_MsgboxYesNo::
return
Std_ReceivedItem::
textcolor 3
compare VAR_0x8002, MUS_LEVEL_UP
call_if_eq EventScript_ReceivedItemFanfare1
compare VAR_0x8002, MUS_OBTAIN_KEY_ITEM
call_if_eq EventScript_ReceivedItemFanfare2
textcolor NPC_TEXT_COLOR_NEUTRAL
call_if_eq VAR_0x8002, MUS_LEVEL_UP, EventScript_ReceivedItemFanfare1
call_if_eq VAR_0x8002, MUS_OBTAIN_KEY_ITEM, EventScript_ReceivedItemFanfare2
message 0x0
waitmessage
waitfanfare
compare VAR_0x8002, MUS_LEVEL_UP
call_if_eq EventScript_ReceivedItemWaitFanfare
call_if_eq VAR_0x8002, MUS_LEVEL_UP, EventScript_ReceivedItemWaitFanfare
putitemaway VAR_0x8000, VAR_0x8001
call EventScript_RestorePrevTextColor
return
data/scripts/surf.inc
+4 -6
View File
@@ -1,14 +1,12 @@
EventScript_UseSurf::
goto_if_questlog EventScript_UseSurfEnd
checkpartymove MOVE_SURF
compare VAR_RESULT, PARTY_SIZE
goto_if_eq EventScript_UseSurfEnd
getpartymonname 0, VAR_RESULT
setfieldeffectarg 0, VAR_RESULT
goto_if_eq VAR_RESULT, PARTY_SIZE, EventScript_UseSurfEnd
bufferpartymonnick STR_VAR_1, VAR_RESULT
setfieldeffectargument 0, VAR_RESULT
lockall
msgbox Text_WantToSurf, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq EventScript_UseSurfRelease
goto_if_eq VAR_RESULT, NO, EventScript_UseSurfRelease
msgbox Text_UsedSurf
dofieldeffect FLDEFF_USE_SURF
EventScript_UseSurfRelease:
data/scripts/trainer_battle.inc
+19 -30
View File
@@ -11,25 +11,22 @@ EventScript_TryDoNormalTrainerBattle::
applymovement VAR_LAST_TALKED, Movement_RevealTrainer
waitmovement 0
specialvar VAR_RESULT, Script_HasTrainerBeenFought
compare VAR_RESULT, FALSE
goto_if_ne EventScript_NoTrainerBattle
goto_if_ne VAR_RESULT, FALSE, EventScript_NoTrainerBattle
special PlayTrainerEncounterMusic
special SetUpTrainerMovement
goto EventScript_DoTrainerBattle
EventScript_NoTrainerBattle::
ontrainerbattleend
gotopostbattlescript
EventScript_TryDoDoubleTrainerBattle::
lock
faceplayer
call EventScript_RevealTrainer
specialvar VAR_RESULT, Script_HasTrainerBeenFought
compare VAR_RESULT, FALSE
goto_if_ne EventScript_NoDoubleTrainerBattle
goto_if_ne VAR_RESULT, FALSE, EventScript_NoDoubleTrainerBattle
special HasEnoughMonsForDoubleBattle
compare VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS
goto_if_ne EventScript_NotEnoughMonsForDoubleBattle
goto_if_ne VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS, EventScript_NotEnoughMonsForDoubleBattle
special PlayTrainerEncounterMusic
special SetUpTrainerMovement
goto EventScript_DoTrainerBattle
@@ -42,21 +39,20 @@ EventScript_NotEnoughMonsForDoubleBattle::
end
EventScript_NoDoubleTrainerBattle::
ontrainerbattleend
gotopostbattlescript
EventScript_DoNoIntroTrainerBattle::
applymovement VAR_LAST_TALKED, Movement_RevealTrainer
waitmovement 0
special PlayTrainerEncounterMusic
goto_if_questlog EventScript_EndQuestLogBattle
battlebegin
ontrainerbattleend
dotrainerbattle
gotopostbattlescript
EventScript_TryDoRematchBattle::
call EventScript_RevealTrainer
specialvar VAR_RESULT, IsTrainerReadyForRematch
compare VAR_RESULT, FALSE
goto_if_eq EventScript_NoRematchBattle
goto_if_eq VAR_RESULT, FALSE, EventScript_NoRematchBattle
special PlayTrainerEncounterMusic
special SetUpTrainerMovement
special ShowTrainerIntroSpeech
@@ -69,15 +65,13 @@ EventScript_TryDoRematchBattle::
end
EventScript_NoRematchBattle::
ontrainerbattleend
gotopostbattlescript
EventScript_TryDoDoubleRematchBattle::
specialvar VAR_RESULT, IsTrainerReadyForRematch
compare VAR_RESULT, FALSE
goto_if_eq EventScript_NoDoubleRematchBattle
goto_if_eq VAR_RESULT, FALSE, EventScript_NoDoubleRematchBattle
special HasEnoughMonsForDoubleBattle
compare VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS
goto_if_ne EventScript_NotEnoughMonsForDoubleRematchBattle
goto_if_ne VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS, EventScript_NotEnoughMonsForDoubleRematchBattle
special PlayTrainerEncounterMusic
special SetUpTrainerMovement
special ShowTrainerIntroSpeech
@@ -90,7 +84,7 @@ EventScript_TryDoDoubleRematchBattle::
end
EventScript_NoDoubleRematchBattle::
ontrainerbattleend
gotopostbattlescript
EventScript_NotEnoughMonsForDoubleRematchBattle::
special ShowTrainerCantBattleSpeech
@@ -117,24 +111,19 @@ EventScript_DoTrainerBattle::
waitmessage
waitbuttonpress
goto_if_questlog EventScript_EndQuestLogBattle
battlebegin
dotrainerbattle
specialvar VAR_RESULT, GetTrainerBattleMode
compare VAR_RESULT, TRAINER_BATTLE_SINGLE
goto_if_eq EventScript_EndTrainerBattle
compare VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT
goto_if_eq EventScript_EndTrainerBattleContinueScript
compare VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT_NO_MUSIC
goto_if_eq EventScript_EndTrainerBattleContinueScript
compare VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT_DOUBLE
goto_if_eq EventScript_EndTrainerBattleContinueScript
compare VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT_DOUBLE_NO_MUSIC
goto_if_eq EventScript_EndTrainerBattleContinueScript
goto_if_eq VAR_RESULT, TRAINER_BATTLE_SINGLE, EventScript_EndTrainerBattle
goto_if_eq VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT, EventScript_EndTrainerBattleContinueScript
goto_if_eq VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT_NO_MUSIC, EventScript_EndTrainerBattleContinueScript
goto_if_eq VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT_DOUBLE, EventScript_EndTrainerBattleContinueScript
goto_if_eq VAR_RESULT, TRAINER_BATTLE_CONTINUE_SCRIPT_DOUBLE_NO_MUSIC, EventScript_EndTrainerBattleContinueScript
EventScript_EndTrainerBattle::
releaseall
end
EventScript_EndTrainerBattleContinueScript::
ontrainerbattleendgoto
gotobeatenscript
EventScript_EndQuestLogBattle::
special SetBattledTrainerFlag
data/scripts/trainer_card.inc
+38 -66
View File
@@ -2,16 +2,14 @@
CeladonCity_GameCorner_EventScript_PhotoPrinter::
lockall
showmoneybox 0, 0, 0
showmoneybox 0, 0
msgbox CeladonCity_GameCorner_Text_TryPokemonPrinter, MSGBOX_YESNO
compare VAR_RESULT, NO
goto_if_eq CeladonCity_GameCorner_EventScript_DeclinePhoto
checkmoney 50, 0
compare VAR_RESULT, FALSE
goto_if_eq CeladonCity_GameCorner_EventScript_NotEnoughMoneyForPhoto
goto_if_eq VAR_RESULT, NO, CeladonCity_GameCorner_EventScript_DeclinePhoto
checkmoney 50
goto_if_eq VAR_RESULT, FALSE, CeladonCity_GameCorner_EventScript_NotEnoughMoneyForPhoto
playse SE_SHOP
removemoney 50, 0
updatemoneybox 0, 0, 0
removemoney 50
updatemoneybox
waitse
message CeladonCity_GameCorner_Text_ChoosePrintType
waitmessage
@@ -51,18 +49,18 @@ CeladonCity_GameCorner_EventScript_PrintPhoto::
delay 60
special UpdateTrainerCardPhotoIcons
msgbox CeladonCity_GameCorner_Text_PrintIsReadyCheckTrainerCard
hidemoneybox 0, 0
hidemoneybox
releaseall
end
CeladonCity_GameCorner_EventScript_DeclinePhoto::
hidemoneybox 0, 0
hidemoneybox
releaseall
end
CeladonCity_GameCorner_EventScript_NotEnoughMoneyForPhoto::
msgbox CeladonCity_GameCorner_Text_DontHaveEnoughMoney
hidemoneybox 0, 0
hidemoneybox
releaseall
end
@@ -83,8 +81,7 @@ FourIsland_House2_EventScript_MeetStickerMan::
waitmovement 0
applymovement LOCALID_STICKER_MAN, Movement_Delay48
waitmovement 0
compare VAR_0x8008, 0
goto_if_eq FourIsland_House2_EventScript_StickerManNothingToBrag
goto_if_eq VAR_0x8008, 0, FourIsland_House2_EventScript_StickerManNothingToBrag
message FourIsland_House2_Text_GiveYouStickerIfYouBrag
waitmessage
goto FourIsland_House2_EventScript_ChooseBrag
@@ -95,8 +92,7 @@ FourIsland_House2_EventScript_StickerManAskForBrag::
waitmovement 0
goto_if_questlog EventScript_ReleaseEnd
special QuestLog_CutRecording
compare VAR_0x8008, 0
goto_if_eq FourIsland_House2_EventScript_NothingToBragAbout
goto_if_eq VAR_0x8008, 0, FourIsland_House2_EventScript_NothingToBragAbout
message FourIsland_House2_Text_BragAboutWhatToday
waitmessage
goto FourIsland_House2_EventScript_ChooseBrag
@@ -185,43 +181,35 @@ FourIsland_House2_EventScript_StickerManNothingToBrag::
end
FourIsland_House2_EventScript_BragHoF::
compare VAR_0x8004, 39
goto_if_le FourIsland_House2_EventScript_BragHoFLowest
compare VAR_0x8004, 99
goto_if_le FourIsland_House2_EventScript_BragHoFLow
compare VAR_0x8004, 199
goto_if_le FourIsland_House2_EventScript_BragHoFHigh
compare VAR_0x8004, 200
goto_if_ge FourIsland_House2_EventScript_BragHoFHighest
goto_if_le VAR_0x8004, 39, FourIsland_House2_EventScript_BragHoFLowest
goto_if_le VAR_0x8004, 99, FourIsland_House2_EventScript_BragHoFLow
goto_if_le VAR_0x8004, 199, FourIsland_House2_EventScript_BragHoFHigh
goto_if_ge VAR_0x8004, 200, FourIsland_House2_EventScript_BragHoFHighest
end
FourIsland_House2_EventScript_BragHoFLowest::
compare VAR_HOF_BRAG_STATE, 1
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedHoF
goto_if_eq VAR_HOF_BRAG_STATE, 1, FourIsland_House2_EventScript_AlreadyBraggedHoF
setvar VAR_HOF_BRAG_STATE, 1
msgbox FourIsland_House2_Text_WowHoFLowest
goto FourIsland_House2_EventScript_BraggedHoF
end
FourIsland_House2_EventScript_BragHoFLow::
compare VAR_HOF_BRAG_STATE, 2
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedHoF
goto_if_eq VAR_HOF_BRAG_STATE, 2, FourIsland_House2_EventScript_AlreadyBraggedHoF
setvar VAR_HOF_BRAG_STATE, 2
msgbox FourIsland_House2_Text_WowHoFLow
goto FourIsland_House2_EventScript_BraggedHoF
end
FourIsland_House2_EventScript_BragHoFHigh::
compare VAR_HOF_BRAG_STATE, 3
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedHoF
goto_if_eq VAR_HOF_BRAG_STATE, 3, FourIsland_House2_EventScript_AlreadyBraggedHoF
setvar VAR_HOF_BRAG_STATE, 3
msgbox FourIsland_House2_Text_WowHoFHigh
goto FourIsland_House2_EventScript_BraggedHoF
end
FourIsland_House2_EventScript_BragHoFHighest::
compare VAR_HOF_BRAG_STATE, 4
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedHoFMax
goto_if_eq VAR_HOF_BRAG_STATE, 4, FourIsland_House2_EventScript_AlreadyBraggedHoFMax
setvar VAR_HOF_BRAG_STATE, 4
msgbox FourIsland_House2_Text_WowHoFHighest
goto FourIsland_House2_EventScript_BraggedHoF
@@ -238,7 +226,7 @@ FourIsland_House2_EventScript_AlreadyBraggedHoFMax::
end
FourIsland_House2_EventScript_BraggedHoF::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
playfanfare MUS_LEVEL_UP
message FourIsland_House2_Text_HoFStickerApplied
waitmessage
@@ -248,43 +236,35 @@ FourIsland_House2_EventScript_BraggedHoF::
end
FourIsland_House2_EventScript_BragEggs::
compare VAR_0x8005, 99
goto_if_le FourIsland_House2_EventScript_BragEggsLowest
compare VAR_0x8005, 199
goto_if_le FourIsland_House2_EventScript_BragEggsLow
compare VAR_0x8005, 299
goto_if_le FourIsland_House2_EventScript_BragEggsHigh
compare VAR_0x8005, 300
goto_if_ge FourIsland_House2_EventScript_BragEggsHighest
goto_if_le VAR_0x8005, 99, FourIsland_House2_EventScript_BragEggsLowest
goto_if_le VAR_0x8005, 199, FourIsland_House2_EventScript_BragEggsLow
goto_if_le VAR_0x8005, 299, FourIsland_House2_EventScript_BragEggsHigh
goto_if_ge VAR_0x8005, 300, FourIsland_House2_EventScript_BragEggsHighest
end
FourIsland_House2_EventScript_BragEggsLowest::
compare VAR_EGG_BRAG_STATE, 1
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedEggs
goto_if_eq VAR_EGG_BRAG_STATE, 1, FourIsland_House2_EventScript_AlreadyBraggedEggs
setvar VAR_EGG_BRAG_STATE, 1
msgbox FourIsland_House2_Text_WowEggsLowest
goto FourIsland_House2_EventScript_BraggedEggs
end
FourIsland_House2_EventScript_BragEggsLow::
compare VAR_EGG_BRAG_STATE, 2
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedEggs
goto_if_eq VAR_EGG_BRAG_STATE, 2, FourIsland_House2_EventScript_AlreadyBraggedEggs
setvar VAR_EGG_BRAG_STATE, 2
msgbox FourIsland_House2_Text_WowEggsLow
goto FourIsland_House2_EventScript_BraggedEggs
end
FourIsland_House2_EventScript_BragEggsHigh::
compare VAR_EGG_BRAG_STATE, 3
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedEggs
goto_if_eq VAR_EGG_BRAG_STATE, 3, FourIsland_House2_EventScript_AlreadyBraggedEggs
setvar VAR_EGG_BRAG_STATE, 3
msgbox FourIsland_House2_Text_WowEggsHigh
goto FourIsland_House2_EventScript_BraggedEggs
end
FourIsland_House2_EventScript_BragEggsHighest::
compare VAR_EGG_BRAG_STATE, 4
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedEggsMax
goto_if_eq VAR_EGG_BRAG_STATE, 4, FourIsland_House2_EventScript_AlreadyBraggedEggsMax
setvar VAR_EGG_BRAG_STATE, 4
msgbox FourIsland_House2_Text_WowEggsHighest
goto FourIsland_House2_EventScript_BraggedEggs
@@ -301,7 +281,7 @@ FourIsland_House2_EventScript_AlreadyBraggedEggsMax::
end
FourIsland_House2_EventScript_BraggedEggs::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
playfanfare MUS_LEVEL_UP
message FourIsland_House2_Text_EggStickerApplied
waitmessage
@@ -311,43 +291,35 @@ FourIsland_House2_EventScript_BraggedEggs::
end
FourIsland_House2_EventScript_BragLinkWins::
compare VAR_0x8006, 19
goto_if_le FourIsland_House2_EventScript_BragLinkWinsLowest
compare VAR_0x8006, 49
goto_if_le FourIsland_House2_EventScript_BragLinkWinsLow
compare VAR_0x8006, 99
goto_if_le FourIsland_House2_EventScript_BragLinkWinsHigh
compare VAR_0x8006, 100
goto_if_ge FourIsland_House2_EventScript_BragLinkWinsHighest
goto_if_le VAR_0x8006, 19, FourIsland_House2_EventScript_BragLinkWinsLowest
goto_if_le VAR_0x8006, 49, FourIsland_House2_EventScript_BragLinkWinsLow
goto_if_le VAR_0x8006, 99, FourIsland_House2_EventScript_BragLinkWinsHigh
goto_if_ge VAR_0x8006, 100, FourIsland_House2_EventScript_BragLinkWinsHighest
end
FourIsland_House2_EventScript_BragLinkWinsLowest::
compare VAR_LINK_WIN_BRAG_STATE, 1
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedLinkWins
goto_if_eq VAR_LINK_WIN_BRAG_STATE, 1, FourIsland_House2_EventScript_AlreadyBraggedLinkWins
setvar VAR_LINK_WIN_BRAG_STATE, 1
msgbox FourIsland_House2_Text_WowLinkWinsLowest
goto FourIsland_House2_EventScript_BraggedLinkWins
end
FourIsland_House2_EventScript_BragLinkWinsLow::
compare VAR_LINK_WIN_BRAG_STATE, 2
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedLinkWins
goto_if_eq VAR_LINK_WIN_BRAG_STATE, 2, FourIsland_House2_EventScript_AlreadyBraggedLinkWins
setvar VAR_LINK_WIN_BRAG_STATE, 2
msgbox FourIsland_House2_Text_WowLinkWinsLow
goto FourIsland_House2_EventScript_BraggedLinkWins
end
FourIsland_House2_EventScript_BragLinkWinsHigh::
compare VAR_LINK_WIN_BRAG_STATE, 3
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedLinkWins
goto_if_eq VAR_LINK_WIN_BRAG_STATE, 3, FourIsland_House2_EventScript_AlreadyBraggedLinkWins
setvar VAR_LINK_WIN_BRAG_STATE, 3
msgbox FourIsland_House2_Text_WowLinkWinsHigh
goto FourIsland_House2_EventScript_BraggedLinkWins
end
FourIsland_House2_EventScript_BragLinkWinsHighest::
compare VAR_LINK_WIN_BRAG_STATE, 4
goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedLinkWinsMax
goto_if_eq VAR_LINK_WIN_BRAG_STATE, 4, FourIsland_House2_EventScript_AlreadyBraggedLinkWinsMax
setvar VAR_LINK_WIN_BRAG_STATE, 4
msgbox FourIsland_House2_Text_WowLinkWinsHighest
goto FourIsland_House2_EventScript_BraggedLinkWins
@@ -364,7 +336,7 @@ FourIsland_House2_EventScript_AlreadyBraggedLinkWinsMax::
end
FourIsland_House2_EventScript_BraggedLinkWins::
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
playfanfare MUS_LEVEL_UP
message FourIsland_House2_Text_VictoryStickerApplied
waitmessage
data/scripts/trainer_tower.inc
+10 -16
View File
@@ -49,8 +49,7 @@ TrainerTower_EventScript_SetObjectsDoubles::
setflag HIDE_TRAINER_KNOCKOUT
setvar DISABLE_SINGLES_TRIGGER, TRUE
ttower_isfloorcleared
compare VAR_RESULT, TRUE
goto_if_eq TrainerTower_EventScript_SetObjectsDoublesAlreadyBeaten
goto_if_eq VAR_RESULT, TRUE, TrainerTower_EventScript_SetObjectsDoublesAlreadyBeaten
setobjectxyperm LOCALID_TRAINER_DOUBLES1, 10, 12
setobjectmovementtype LOCALID_TRAINER_DOUBLES1, MOVEMENT_TYPE_FACE_LEFT
setobjectxyperm LOCALID_TRAINER_DOUBLES2, 10, 13
@@ -85,19 +84,17 @@ TrainerTower_OnFrame::
TrainerTower_EventScript_EnterFloor::
setvar VAR_TEMP_2, 1
ttower_isfloorcleared
compare VAR_RESULT, FALSE
goto_if_eq TrainerTower_EventScript_EndEnterFloor
goto_if_eq VAR_RESULT, FALSE, TrainerTower_EventScript_EndEnterFloor
setvar DISABLE_SINGLES_TRIGGER, TRUE
setvar DISABLE_DOUBLES_TRIGGER, TRUE
TrainerTower_EventScript_EndEnterFloor:
ttower_shouldexit
compare VAR_RESULT, TRUE
goto_if_eq TrainerTower_EventScript_WarpToLobby
goto_if_eq VAR_RESULT, TRUE, TrainerTower_EventScript_WarpToLobby
end
@ Never reached
TrainerTower_EventScript_WarpToLobby::
warp MAP_TRAINER_TOWER_LOBBY, 255, 9, 7
warp MAP_TRAINER_TOWER_LOBBY, 9, 7
waitstate
@@ -130,8 +127,7 @@ TrainerTower_EventScript_DoDoubleBattle::
setvar VAR_0x8004, TRAINER_TOWER_FUNC_GET_SPEECH
setvar VAR_0x8005, TRAINER_TOWER_TEXT_INTRO
addvar VAR_TEMP_3, 1
compare VAR_TEMP_3, 1
goto_if_eq TrainerTower_EventScript_DoSecondTrainerIntro
goto_if_eq VAR_TEMP_3, 1, TrainerTower_EventScript_DoSecondTrainerIntro
setvar VAR_TEMP_3, 0
TrainerTower_EventScript_DoSecondTrainerIntro:
copyvar VAR_0x8006, VAR_TEMP_3
@@ -221,7 +217,7 @@ TrainerTower_EventScript_SetFloorCleared:
TrainerTower_EventScript_WarpToLobbyLost::
special HealPlayerParty
ttower_setlost
warp MAP_TRAINER_TOWER_LOBBY, 255, 9, 7
warp MAP_TRAINER_TOWER_LOBBY, 9, 7
waitstate
@@ -292,12 +288,12 @@ TrainerTower_Roof_EventScript_GivePrize:
TrainerTower_Roof_EventScript_ReceivePrize:
msgbox TrainerTower_Roof_Text_ThisIsForYou
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
playfanfare MUS_LEVEL_UP
message Text_ObtainedTheX
waitfanfare
waitmessage
getstdstring 2, STDSTRING_ITEMS_POCKET
bufferstdstring STR_VAR_3, STDSTRING_ITEMS_POCKET
msgbox Text_PutItemAway
call EventScript_RestorePrevTextColor
goto TrainerTower_Roof_EventScript_CheckFinalTime
@@ -341,8 +337,7 @@ TrainerTower_EventScript_SingleBattleTrigger::
TrainerTower_EventScript_DoubleBattleTriggerTop::
setvar VAR_TEMP_3, 0
ttower_checkdoubles
compare VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS
goto_if_ne TrainerTower_EventScript_IneligibleForDoubleBattle
goto_if_ne VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS, TrainerTower_EventScript_IneligibleForDoubleBattle
ttower_encountermusic
applymovement LOCALID_TRAINER_DOUBLES1, Movement_ExclamationMark
waitmovement 0
@@ -352,8 +347,7 @@ TrainerTower_EventScript_DoubleBattleTriggerTop::
TrainerTower_EventScript_DoubleBattleTriggerBottom::
setvar VAR_TEMP_3, 1
ttower_checkdoubles
compare VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS
goto_if_ne TrainerTower_EventScript_IneligibleForDoubleBattle
goto_if_ne VAR_RESULT, PLAYER_HAS_TWO_USABLE_MONS, TrainerTower_EventScript_IneligibleForDoubleBattle
ttower_encountermusic
applymovement LOCALID_TRAINER_DOUBLES2, Movement_ExclamationMark
waitmovement 0
data/scripts/trainers.inc
+234 -468
View File
File diff suppressed because it is too large Load Diff
data/scripts/white_out.inc
+7 -10
View File
@@ -1,6 +1,6 @@
EventScript_AfterWhiteOutHeal::
lockall
textcolor 1
textcolor NPC_TEXT_COLOR_FEMALE
msgbox Text_FirstShouldRestoreMonsHealth
call EventScript_PkmnCenterNurse_TakeAndHealPkmn
call_if_unset FLAG_DEFEATED_BROCK, EventScript_AfterWhiteOutHealMsgPreBrock
@@ -23,7 +23,7 @@ EventScript_AfterWhiteOutHealMsg::
EventScript_AfterWhiteOutMomHeal::
lockall
textcolor 1
textcolor NPC_TEXT_COLOR_FEMALE
applymovement LOCALID_MOM, Movement_WalkInPlaceFasterDown
waitmovement 0
msgbox Text_HadQuiteAnExperienceTakeRest
@@ -35,20 +35,17 @@ EventScript_AfterWhiteOutMomHeal::
EventScript_FieldPoison::
lockall
textcolor 3
textcolor NPC_TEXT_COLOR_NEUTRAL
special TryFieldPoisonWhiteOut
waitstate
compare VAR_RESULT, TRUE
goto_if_eq EventScript_FieldWhiteOut
goto_if_eq VAR_RESULT, TRUE, EventScript_FieldWhiteOut
releaseall
end
EventScript_FieldWhiteOut::
checkmoney 1, 0
compare VAR_RESULT, FALSE
goto_if_eq EventScript_FieldWhiteOutNoMoney
compare VAR_RESULT, TRUE
goto_if_eq EventScript_FieldWhiteOutHasMoney
checkmoney 1
goto_if_eq VAR_RESULT, FALSE, EventScript_FieldWhiteOutNoMoney
goto_if_eq VAR_RESULT, TRUE, EventScript_FieldWhiteOutHasMoney
end
EventScript_FieldWhiteOutNoMoney::