diff options
Diffstat (limited to 'data/scripts/trainer_card.inc')
| -rw-r--r-- | data/scripts/trainer_card.inc | 376 |
1 files changed, 376 insertions, 0 deletions
diff --git a/data/scripts/trainer_card.inc b/data/scripts/trainer_card.inc new file mode 100644 index 000000000..993db55bc --- /dev/null +++ b/data/scripts/trainer_card.inc @@ -0,0 +1,376 @@ +CeladonCity_GameCorner_EventScript_PhotoPrinter:: @ 81B2867 + lockall + showmoneybox 0, 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 + playse SE_SHOP + removemoney 50, 0 + updatemoneybox 0, 0, 0 + waitse + message CeladonCity_GameCorner_Text_ChoosePrintType + waitmessage + multichoice 21, 0, MULTICHOICE_TRAINER_CARD_ICON_TINT, TRUE + switch VAR_RESULT + case 0, CeladonCity_GameCorner_EventScript_PrintTypeNormal + case 1, CeladonCity_GameCorner_EventScript_PrintTypeBlack + case 2, CeladonCity_GameCorner_EventScript_PrintTypePink + case 3, CeladonCity_GameCorner_EventScript_PrintTypeSepia + end + +CeladonCity_GameCorner_EventScript_PrintTypeNormal:: @ 81B28DB + setvar VAR_0x8004, MON_ICON_TINT_NORMAL + goto CeladonCity_GameCorner_EventScript_PrintPhoto + end + +CeladonCity_GameCorner_EventScript_PrintTypeBlack:: @ 81B28E6 + setvar VAR_0x8004, MON_ICON_TINT_BLACK + goto CeladonCity_GameCorner_EventScript_PrintPhoto + end + +CeladonCity_GameCorner_EventScript_PrintTypePink:: @ 81B28F1 + setvar VAR_0x8004, MON_ICON_TINT_PINK + goto CeladonCity_GameCorner_EventScript_PrintPhoto + end + +CeladonCity_GameCorner_EventScript_PrintTypeSepia:: @ 81B28FC + setvar VAR_0x8004, MON_ICON_TINT_SEPIA + goto CeladonCity_GameCorner_EventScript_PrintPhoto + end + +CeladonCity_GameCorner_EventScript_PrintPhoto:: @ 81B2907 + message CeladonCity_GameCorner_Text_BigSmileForPhoto + waitmessage + playse MUS_ME_PHOTO + dofieldeffect FLDEFF_UNK_45 + delay 60 + special UpdateTrainerCardPhotoIcons + msgbox CeladonCity_GameCorner_Text_PrintIsReadyCheckTrainerCard + hidemoneybox 0, 0 + releaseall + end + +CeladonCity_GameCorner_EventScript_DeclinePhoto:: @ 81B2926 + hidemoneybox 0, 0 + releaseall + end + +CeladonCity_GameCorner_EventScript_NotEnoughMoneyForPhoto:: @ 81B292B + msgbox CeladonCity_GameCorner_Text_DontHaveEnoughMoney + hidemoneybox 0, 0 + releaseall + end + +FourIsland_House2_EventScript_StickerMan:: @ 81B2938 + lock + specialvar VAR_0x8008, StickerManGetBragFlags + goto_if_unset FLAG_MET_STICKER_MAN, FourIsland_House2_EventScript_MeetStickerMan + goto_if_set FLAG_MET_STICKER_MAN, FourIsland_House2_EventScript_StickerManAskForBrag + end + +FourIsland_House2_EventScript_MeetStickerMan:: @ 81B2951 + setflag FLAG_MET_STICKER_MAN + msgbox FourIsland_House2_Text_WishICouldShowOffStickers + applymovement 1, Movement_FacePlayer + waitmovement 0 + playse SE_PIN + applymovement 1, Movement_ExclamationMark + waitmovement 0 + applymovement 1, Movement_Delay48 + waitmovement 0 + compare VAR_0x8008, 0 + goto_if_eq FourIsland_House2_EventScript_StickerManNothingToBrag + message FourIsland_House2_Text_GiveYouStickerIfYouBrag + waitmessage + goto FourIsland_House2_EventScript_ChooseBrag + end + +FourIsland_House2_EventScript_StickerManAskForBrag:: @ 81B2994 + applymovement 1, Movement_FacePlayer + waitmovement 0 + goto_if_questlog EventScript_ReleaseEnd + special sub_8112364 + compare VAR_0x8008, 0 + goto_if_eq FourIsland_House2_EventScript_NothingToBragAbout + message FourIsland_House2_Text_BragAboutWhatToday + waitmessage + goto FourIsland_House2_EventScript_ChooseBrag + end + +FourIsland_House2_EventScript_NothingToBragAbout:: @ 81B29C6 + msgbox FourIsland_House2_Text_BragAboutSomethingForMe + release + end + +FourIsland_House2_EventScript_ChooseBrag:: @ 81B29D0 + switch VAR_0x8008 + case 1, FourIsland_House2_EventScript_ChooseBragHoF + case 2, FourIsland_House2_EventScript_ChooseBragEggs + case 4, FourIsland_House2_EventScript_ChooseBragLinkWins + case 3, FourIsland_House2_EventScript_ChooseBragHoFEggs + case 5, FourIsland_House2_EventScript_ChooseBragHoFLinkWins + case 6, FourIsland_House2_EventScript_ChooseBragEggsLinkWins + case 7, FourIsland_House2_EventScript_ChooseBragHofEggsLinkWins + end + +FourIsland_House2_EventScript_ChooseBragHoF:: @ 81B2A23 + multichoice 15, 8, MULTICHOICE_HOF_QUIT, FALSE + switch VAR_RESULT + case 0, FourIsland_House2_EventScript_BragHoF + case 1, FourIsland_House2_EventScript_QuitBrag + case SCR_MENU_CANCEL, FourIsland_House2_EventScript_QuitBrag + end + +FourIsland_House2_EventScript_ChooseBragEggs:: @ 81B2A4F + multichoice 16, 8, MULTICHOICE_EGGS_QUIT, FALSE + switch VAR_RESULT + case 0, FourIsland_House2_EventScript_BragEggs + case 1, FourIsland_House2_EventScript_QuitBrag + case SCR_MENU_CANCEL, FourIsland_House2_EventScript_QuitBrag + end + +FourIsland_House2_EventScript_ChooseBragLinkWins:: @ 81B2A7B + multichoice 15, 8, MULTICHOICE_VICTORIES_QUIT, FALSE + switch VAR_RESULT + case 0, FourIsland_House2_EventScript_BragLinkWins + case 1, FourIsland_House2_EventScript_QuitBrag + case SCR_MENU_CANCEL, FourIsland_House2_EventScript_QuitBrag + end + +FourIsland_House2_EventScript_ChooseBragHoFEggs:: @ 81B2AA7 + multichoice 15, 6, MULTICHOICE_HOF_EGGS_QUIT, FALSE + switch VAR_RESULT + case 0, FourIsland_House2_EventScript_BragHoF + case 1, FourIsland_House2_EventScript_BragEggs + case 2, FourIsland_House2_EventScript_QuitBrag + case SCR_MENU_CANCEL, FourIsland_House2_EventScript_QuitBrag + end + +FourIsland_House2_EventScript_ChooseBragHoFLinkWins:: @ 81B2ADE + multichoice 15, 6, MULTICHOICE_HOF_VICTORIES_QUIT, FALSE + switch VAR_RESULT + case 0, FourIsland_House2_EventScript_BragHoF + case 1, FourIsland_House2_EventScript_BragLinkWins + case 2, FourIsland_House2_EventScript_QuitBrag + case SCR_MENU_CANCEL, FourIsland_House2_EventScript_QuitBrag + end + +FourIsland_House2_EventScript_ChooseBragEggsLinkWins:: @ 81B2B15 + multichoice 15, 6, MULTICHOICE_EGGS_VICTORIES_QUIT, FALSE + switch VAR_RESULT + case 0, FourIsland_House2_EventScript_BragEggs + case 1, FourIsland_House2_EventScript_BragLinkWins + case 2, FourIsland_House2_EventScript_QuitBrag + case SCR_MENU_CANCEL, FourIsland_House2_EventScript_QuitBrag + end + +FourIsland_House2_EventScript_ChooseBragHofEggsLinkWins:: @ 81B2B4C + multichoice 15, 5, MULTICHOICE_HOF_EGGS_VICTORIES_QUIT, FALSE + switch VAR_RESULT + case 0, FourIsland_House2_EventScript_BragHoF + case 1, FourIsland_House2_EventScript_BragEggs + case 2, FourIsland_House2_EventScript_BragLinkWins + case 3, FourIsland_House2_EventScript_QuitBrag + case SCR_MENU_CANCEL, FourIsland_House2_EventScript_QuitBrag + end + +FourIsland_House2_EventScript_StickerManNothingToBrag:: @ 81B2B8E + msgbox FourIsland_House2_Text_GiveYouStickerIfYouBrag + release + end + +FourIsland_House2_EventScript_BragHoF:: @ 81B2B98 + 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 + end + +FourIsland_House2_EventScript_BragHoFLowest:: @ 81B2BC5 + compare VAR_HOF_BRAG_STATE, 1 + goto_if_eq 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:: @ 81B2BE3 + compare VAR_HOF_BRAG_STATE, 2 + goto_if_eq 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:: @ 81B2C01 + compare VAR_HOF_BRAG_STATE, 3 + goto_if_eq 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:: @ 81B2C1F + compare VAR_HOF_BRAG_STATE, 4 + goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedHoFMax + setvar VAR_HOF_BRAG_STATE, 4 + msgbox FourIsland_House2_Text_WowHoFHighest + goto FourIsland_House2_EventScript_BraggedHoF + end + +FourIsland_House2_EventScript_AlreadyBraggedHoF:: @ 81B2C3D + msgbox FourIsland_House2_Text_ComeBackWithBetterStoryHoF + release + end + +FourIsland_House2_EventScript_AlreadyBraggedHoFMax:: @ 81B2C47 + msgbox FourIsland_House2_Text_LivingLegendHoF + release + end + +FourIsland_House2_EventScript_BraggedHoF:: @ 81B2C51 + textcolor 3 + playfanfare MUS_FANFA1 + message FourIsland_House2_Text_HoFStickerApplied + waitmessage + waitfanfare + delay 90 + release + end + +FourIsland_House2_EventScript_BragEggs:: @ 81B2C62 + 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 + end + +FourIsland_House2_EventScript_BragEggsLowest:: @ 81B2C8F + compare VAR_EGG_BRAG_STATE, 1 + goto_if_eq 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:: @ 81B2CAD + compare VAR_EGG_BRAG_STATE, 2 + goto_if_eq 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:: @ 81B2CCB + compare VAR_EGG_BRAG_STATE, 3 + goto_if_eq 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:: @ 81B2CE9 + compare VAR_EGG_BRAG_STATE, 4 + goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedEggsMax + setvar VAR_EGG_BRAG_STATE, 4 + msgbox FourIsland_House2_Text_WowEggsHighest + goto FourIsland_House2_EventScript_BraggedEggs + end + +FourIsland_House2_EventScript_AlreadyBraggedEggs:: @ 81B2D07 + msgbox FourIsland_House2_Text_ComeBackWithBetterStoryEggs + release + end + +FourIsland_House2_EventScript_AlreadyBraggedEggsMax:: @ 81B2D11 + msgbox FourIsland_House2_Text_LivingLegendEggs + release + end + +FourIsland_House2_EventScript_BraggedEggs:: @ 81B2D1B + textcolor 3 + playfanfare MUS_FANFA1 + message FourIsland_House2_Text_EggStickerApplied + waitmessage + waitfanfare + delay 90 + release + end + +FourIsland_House2_EventScript_BragLinkWins:: @ 81B2D2C + 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 + end + +FourIsland_House2_EventScript_BragLinkWinsLowest:: @ 81B2D59 + compare VAR_LINK_WIN_BRAG_STATE, 1 + goto_if_eq 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:: @ 81B2D77 + compare VAR_LINK_WIN_BRAG_STATE, 2 + goto_if_eq 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:: @ 81B2D95 + compare VAR_LINK_WIN_BRAG_STATE, 3 + goto_if_eq 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:: @ 81B2DB3 + compare VAR_LINK_WIN_BRAG_STATE, 4 + goto_if_eq FourIsland_House2_EventScript_AlreadyBraggedLinkWinsMax + setvar VAR_LINK_WIN_BRAG_STATE, 4 + msgbox FourIsland_House2_Text_WowLinkWinsHighest + goto FourIsland_House2_EventScript_BraggedLinkWins + end + +FourIsland_House2_EventScript_AlreadyBraggedLinkWins:: @ 81B2DD1 + msgbox FourIsland_House2_Text_ComeBackWithBetterStoryLinkWins + release + end + +FourIsland_House2_EventScript_AlreadyBraggedLinkWinsMax:: @ 81B2DDB + msgbox FourIsland_House2_Text_LivingLegendLinkWins + release + end + +FourIsland_House2_EventScript_BraggedLinkWins:: @ 81B2DE5 + textcolor 3 + playfanfare MUS_FANFA1 + message FourIsland_House2_Text_VictoryStickerApplied + waitmessage + waitfanfare + delay 90 + release + end + +FourIsland_House2_EventScript_QuitBrag:: @ 81B2DF6 + release + end |