FourIsland_PokemonDayCare_MapScripts:: @ 817193F .byte 0 FourIsland_PokemonDayCare_EventScript_DaycareWoman:: @ 8171940 goto_if_questlog EventScript_ReleaseEnd lock faceplayer specialvar VAR_RESULT, GetDaycareState compare VAR_RESULT, DAYCARE_EGG_WAITING goto_if_eq FourIsland_PokemonDayCare_EggWaiting compare VAR_RESULT, DAYCARE_ONE_MON goto_if_eq FourIsland_PokemonDayCare_OneMonInDaycare compare VAR_RESULT, DAYCARE_TWO_MONS goto_if_eq FourIsland_PokemonDayCare_TwoMonsInDaycare msgbox DayCare_Text_WouldYouLikeUsToRaiseMon, MSGBOX_YESNO compare VAR_RESULT, YES goto_if_eq FourIsland_PokemonDayCare_GiveMonToRaise msgbox DayCare_Text_FineThenComeAgain release end FourIsland_PokemonDayCare_GiveMonToRaise:: @ 8171993 specialvar VAR_RESULT, CountPartyNonEggMons compare VAR_RESULT, 1 goto_if_eq FourIsland_PokemonDayCare_OnlyOneMonInParty msgbox DayCare_Text_WhichMonShouldWeRaise fadescreen FADE_TO_BLACK special ChooseSendDaycareMon waitstate compare VAR_0x8004, PARTY_SIZE goto_if_ge FourIsland_PokemonDayCare_ComeAgain specialvar VAR_RESULT, CountPartyAliveNonEggMons_IgnoreVar0x8004Slot compare VAR_RESULT, 0 goto_if_eq FourIsland_PokemonDayCare_OnlyOneAliveMonInParty specialvar VAR_0x8005, GetSelectedMonNicknameAndSpecies waitse playmoncry VAR_0x8005, 0 msgbox DayCare_Text_WellRaiseYourMon waitmoncry special StoreSelectedPokemonInDaycare incrementgamestat GAME_STAT_USED_DAYCARE specialvar VAR_RESULT, GetDaycareState compare VAR_RESULT, DAYCARE_ONE_MON goto_if_eq FourIsland_PokemonDayCare_CanRaiseOneMore release end FourIsland_PokemonDayCare_ComeAgain:: @ 81719F7 msgbox DayCare_Text_ComeAgain release end FourIsland_PokemonDayCare_CanRaiseOneMore:: @ 8171A01 msgbox DayCare_Text_WeCanRaiseOneMore, MSGBOX_YESNO compare VAR_RESULT, YES goto_if_eq FourIsland_PokemonDayCare_GiveMonToRaise goto FourIsland_PokemonDayCare_ComeAgain end FourIsland_PokemonDayCare_OnlyOneMonInParty:: @ 8171A1A msgbox DayCare_Text_YouHaveJustOneMon release end FourIsland_PokemonDayCare_OnlyOneAliveMonInParty:: @ 8171A24 msgbox DayCare_Text_WhatWillYouBattleWith release end FourIsland_PokemonDayCare_EggWaiting:: @ 8171A2E msgbox DayCare_Text_HusbandWasLookingForYou release end FourIsland_PokemonDayCare_MonHasGrownXLevels:: @ 8171A38 msgbox DayCare_Text_YourMonHasGrownXLevels return FourIsland_PokemonDayCare_DisplayLevelsGained:: @ 8171A41 specialvar VAR_RESULT, GetNumLevelsGainedFromDaycare compare VAR_RESULT, 0 call_if_ne FourIsland_PokemonDayCare_MonHasGrownXLevels return FourIsland_PokemonDayCare_OneMonInDaycare:: @ 8171A52 msgbox DayCare_Text_GoodToSeeYou setvar VAR_0x8004, 0 call FourIsland_PokemonDayCare_DisplayLevelsGained msgbox DayCare_Text_WeCanRaiseOneMore, MSGBOX_YESNO compare VAR_RESULT, YES goto_if_eq FourIsland_PokemonDayCare_GiveMonToRaise msgbox DayCare_Text_TakeYourMonBack, MSGBOX_YESNO compare VAR_RESULT, YES goto_if_eq FourIsland_PokemonDayCare_TryRetrieveMon goto FourIsland_PokemonDayCare_ComeAgain end FourIsland_PokemonDayCare_TryRetrieveMon:: @ 8171A90 specialvar VAR_RESULT, CalculatePlayerPartyCount compare VAR_RESULT, PARTY_SIZE goto_if_eq FourIsland_PokemonDayCare_NoRoomInParty specialvar VAR_RESULT, GetDaycareState setvar VAR_0x8004, 0 compare VAR_RESULT, DAYCARE_ONE_MON goto_if_eq FourIsland_PokemonDayCare_CostPrompt special ShowDaycareLevelMenu waitstate copyvar VAR_0x8004, VAR_RESULT compare VAR_RESULT, DAYCARE_EXITED_LEVEL_MENU goto_if_eq FourIsland_PokemonDayCare_ComeAgain goto FourIsland_PokemonDayCare_CostPrompt end FourIsland_PokemonDayCare_CostPrompt:: @ 8171ACF special GetDaycareCost msgbox DayCare_Text_ItWillCostX, MSGBOX_YESNO compare VAR_RESULT, YES goto_if_eq FourIsland_PokemonDayCare_CheckEnoughMoney goto FourIsland_PokemonDayCare_ComeAgain end FourIsland_PokemonDayCare_CheckEnoughMoney:: @ 8171AEB specialvar VAR_RESULT, IsEnoughForCostInVar0x8005 compare VAR_RESULT, TRUE goto_if_eq FourIsland_PokemonDayCare_RetrieveMon msgbox DayCare_Text_NotEnoughMoney release end FourIsland_PokemonDayCare_RetrieveMon:: @ 8171B05 applymovement 1, FourIsland_PokemonDayCare_Movement_RetrieveMon waitmovement 0 specialvar VAR_RESULT, TakePokemonFromDaycare special SubtractMoneyFromVar0x8005 playse SE_REGI msgbox DayCare_Text_HeresYourMon waitse playmoncry VAR_RESULT, 0 textcolor 3 msgbox DayCare_Text_TookBackMon call EventScript_RestorePrevTextColor waitmoncry specialvar VAR_RESULT, GetDaycareState compare VAR_RESULT, DAYCARE_ONE_MON goto_if_eq FourIsland_PokemonDayCare_AskRetrieveOtherMon goto FourIsland_PokemonDayCare_ComeAgain end FourIsland_PokemonDayCare_AskRetrieveOtherMon:: @ 8171B4E msgbox DayCare_Text_TakeOtherOneBackToo, MSGBOX_YESNO compare VAR_RESULT, YES goto_if_eq FourIsland_PokemonDayCare_TryRetrieveMon goto FourIsland_PokemonDayCare_ComeAgain end FourIsland_PokemonDayCare_NoRoomInParty:: @ 8171B67 msgbox DayCare_Text_YourPartyIsFull release end FourIsland_PokemonDayCare_Movement_RetrieveMon:: @ 8171B71 delay_16 delay_16 face_right delay_16 delay_16 face_left delay_16 delay_16 face_up walk_slowest_up set_invisible delay_16 delay_16 delay_16 delay_16 delay_16 face_down set_visible walk_slowest_down step_end @ Unused. Possibly a commented script, or a typo end added to the above Movement script FourIsland_PokemonDayCare_EventScript_UnusedEnd:: @ 8171B85 end FourIsland_PokemonDayCare_TwoMonsInDaycare:: @ 8171B86 msgbox DayCare_Text_GoodToSeeYou setvar VAR_0x8004, 0 call FourIsland_PokemonDayCare_DisplayLevelsGained setvar VAR_0x8004, 1 call FourIsland_PokemonDayCare_DisplayLevelsGained msgbox DayCare_Text_TakeYourMonBack, MSGBOX_YESNO compare VAR_RESULT, YES goto_if_eq FourIsland_PokemonDayCare_TryRetrieveMon msgbox DayCare_Text_ComeAgain release end @ Unused FourIsland_PokemonDayCare_EventScript_UnusedRetrieveMon:: @ 8171BBF special ShowDaycareLevelMenu waitstate compare VAR_RESULT, 2 goto_if_eq FourIsland_PokemonDayCare_ComeAgain copyvar VAR_0x8004, VAR_RESULT specialvar VAR_RESULT, TakePokemonFromDaycare msgbox DayCare_Text_HeresYourMon msgbox DayCare_Text_ComeAgain release end