summaryrefslogtreecommitdiff
path: root/data/scripts/berry_blender.inc
diff options
context:
space:
mode:
Diffstat (limited to 'data/scripts/berry_blender.inc')
-rw-r--r--data/scripts/berry_blender.inc747
1 files changed, 747 insertions, 0 deletions
diff --git a/data/scripts/berry_blender.inc b/data/scripts/berry_blender.inc
new file mode 100644
index 000000000..1d0862a65
--- /dev/null
+++ b/data/scripts/berry_blender.inc
@@ -0,0 +1,747 @@
+BerryBlender_Text_WantToMakePokeblocks: @ 8292DEE
+ .string "Oh? Did you want to make some {POKEBLOCK}S\n"
+ .string "with this old-timer?$"
+
+BerryBlender_Text_Excellent: @ 8292E28
+ .string "Excellent!$"
+
+BerryBlender_Text_MadeOldTimerSad: @ 8292E33
+ .string "Oh…\n"
+ .string "You've made this old-timer sad…$"
+
+BerryBlender_Text_KnowHowToMakePokeblocks: @ 8292E57
+ .string "Do you know how to make a {POKEBLOCK}?$"
+
+BerryBlender_Text_LetsBerryBlender: @ 8292E78
+ .string "Let's get started, then!\p"
+ .string "Let's BERRY BLENDER!$"
+
+BerryBlender_Text_ExplainBerryBlending: @ 8292EA6
+ .string "Okay, a little explanation, then.\p"
+ .string "Oh, don't worry, it's quite simple.\p"
+ .string "When the BLENDER's arrow comes to\n"
+ .string "your marker, just press the A Button.\p"
+ .string "That's all you have to do.\n"
+ .string "You'll see how easy it is when you try.$"
+
+BerryBlender_Text_DontHaveAnyBerries: @ 8292F77
+ .string "Oh?\n"
+ .string "You don't have any BERRIES?\p"
+ .string "If you don't have any BERRIES,\n"
+ .string "you can't make any {POKEBLOCK}S.$"
+
+BerryBlender_Text_CanHaveOneOfMyBerries: @ 8292FD1
+ .string "Well, that won't do at all now, will it?\p"
+ .string "If you don't mind leftovers, you can\n"
+ .string "have one of my BERRIES.\p"
+ .string "That way, we could make some {POKEBLOCK}S\n"
+ .string "together using the BERRY BLENDER.$"
+
+BerryBlender_Text_DontHaveAnyBerriesToSpare: @ 829307D
+ .string "If I had some BERRIES left over,\n"
+ .string "I'd gladly give you one…\p"
+ .string "But, I don't have any to spare today.\n"
+ .string "We'll have to do this another time.$"
+
+BerryBlender_Text_PokeblockCaseIsFull: @ 8293101
+ .string "But your {POKEBLOCK} CASE is full.\p"
+ .string "You should use some {POKEBLOCK}S before\n"
+ .string "you come see me again.$"
+
+BerryBlender_Text_DontHavePokeblockCase: @ 8293157
+ .string "But you don't have a {POKEBLOCK} CASE.\p"
+ .string "You should get a {POKEBLOCK} CASE and then\n"
+ .string "come see me.$"
+
+BerryBlender_Text_LetsGetBlendingAlready: @ 82931AA
+ .string "Let's get blending already!$"
+
+BerryBlender_Text_WhatKindOfPokeblockWillIGet: @ 82931C6
+ .string "I wonder what kind of {POKEBLOCK} I'll get?\n"
+ .string "This is so exciting!$"
+
+BerryBlender_Text_WantToBlendPokeblocksWithUs: @ 8293201
+ .string "Hi, there! Did you want to blend some\n"
+ .string "{POKEBLOCK}S with us?$"
+
+BerryBlender_Text_Okay: @ 8293237
+ .string "Okay!$"
+
+BerryBlender_Text_ThatsTooBad: @ 829323D
+ .string "That's too bad…\p"
+ .string "But we'll always be around whenever\n"
+ .string "you get the urge to blend!$"
+
+BerryBlender_Text_KnowHowToMakePokeblocks2: @ 829328C
+ .string "Of course, you do know how to\n"
+ .string "blend {POKEBLOCK}S, don't you?$"
+
+BerryBlender_Text_LetsBerryBlender2: @ 82932C3
+ .string "Let's get started, then!\p"
+ .string "Let's BERRY BLENDER!$"
+
+BerryBlender_Text_ExplainBerryBlending2: @ 82932F1
+ .string "Okay!\n"
+ .string "Let me explain it to you!\p"
+ .string "When the spinning BLENDER's arrow\n"
+ .string "reaches your marker, just press\l"
+ .string "the A Button.\p"
+ .string "That's all it takes.\n"
+ .string "Pretty easy, don't you think?$"
+
+BerryBlender_Text_DontHaveAnyBerries2: @ 8293394
+ .string "Oh, but wait a second here…\n"
+ .string "You don't have any BERRIES.\p"
+ .string "You can't make any {POKEBLOCK}S without\n"
+ .string "BERRIES…\p"
+ .string "We'll always be around whenever you\n"
+ .string "get hold of some BERRIES to blend.$"
+
+BerryBlender_Text_PokeblockCaseIsFull2: @ 829343E
+ .string "Oh, but wait a second here…\n"
+ .string "Your {POKEBLOCK} CASE is full.\p"
+ .string "You should use some {POKEBLOCK}S and\n"
+ .string "then come back.$"
+
+BerryBlender_Text_DontHavePokeblockCase2: @ 82934A2
+ .string "Oh, but wait a second here…\n"
+ .string "You don't have a {POKEBLOCK} CASE.\p"
+ .string "You should get a {POKEBLOCK} CASE and\n"
+ .string "then come back.$"
+
+@ Unused
+BerryBlender_Text_MakePokeblocksWithOurGroup: @ 829350B
+ .string "Oh, hello! Did you want to make some\n"
+ .string "{POKEBLOCK}S with our little group?$"
+
+BerryBlender_Text_OhDear: @ 829354E
+ .string "Oh, dear!$"
+
+BerryBlender_Text_LeftUsInShock: @ 8293558
+ .string "Oh, dear me…\p"
+ .string "You've left us in shock!$"
+
+BerryBlender_Text_KnowHowToMakePokeblocks3: @ 829357E
+ .string "Naturally, you know how to make\n"
+ .string "{POKEBLOCK}S, don't you?$"
+
+BerryBlender_Text_LetsBerryBlender3: @ 82935B1
+ .string "Okay, dear!\n"
+ .string "Let's get started!\p"
+ .string "Let's BERRY BLENDER!$"
+
+BerryBlender_Text_ExplainBerryBlending3: @ 82935E5
+ .string "Oh, dear!\p"
+ .string "Then, I'll explain it to you nicely.\p"
+ .string "When the BLENDER's arrow spins to\n"
+ .string "your marker, press the A Button.\p"
+ .string "That's all it takes.\n"
+ .string "Isn't it simple?$"
+
+BerryBlender_Text_DontHaveAnyBerries3: @ 829367D
+ .string "You don't have any BERRIES,\n"
+ .string "do you?\p"
+ .string "If you don't have any BERRIES,\n"
+ .string "you can't make any {POKEBLOCK}S.\p"
+ .string "We'll always be making {POKEBLOCK}S here,\n"
+ .string "so let's make some together when\l"
+ .string "you get a BERRY or two.$"
+
+BerryBlender_Text_PokeblockCaseIsFull3: @ 8293738
+ .string "Your {POKEBLOCK} CASE is full,\n"
+ .string "it looks like.\p"
+ .string "You should use some {POKEBLOCK}S up\n"
+ .string "and then come back.$"
+
+BerryBlender_Text_DontHavePokeblockCase3: @ 8293792
+ .string "You haven't gotten a {POKEBLOCK} CASE\n"
+ .string "yet, it looks like.\p"
+ .string "You need to get a {POKEBLOCK} CASE before\n"
+ .string "you come back.$"
+
+BerryBlender_Text_SetNewBlenderRecord: @ 82937F9
+ .string "Okay! Today's going to be the day that\n"
+ .string "I set a new BLENDER speed record!$"
+
+BerryBlender_Text_LookGoodAtBlendingJoinUs: @ 8293842
+ .string "Oh, dear!\n"
+ .string "You look as if you're good at blending.\l"
+ .string "Would you like to join us?$"
+
+BerryBlender_Text_MakeDeliciousPokeblocks: @ 829388F
+ .string "I'm going to make delicious {POKEBLOCK}S\n"
+ .string "and make my POKéMON cuter.$"
+
+BerryBlender_Text_SaveGameBeforeBerryBlenderLink: @ 82938CD
+ .string "{POKEBLOCK}S will be made with your friends \n"
+ .string "from BERRIES in the BERRY BLENDER.\p"
+ .string "Is it okay to save the game before\n"
+ .string "linking with your friends?$"
+
+BerryBlender_Text_SearchingForFriends: @ 8293955
+ .string "Searching for your friends…\n"
+ .string "… … B Button: Cancel$"
+
+BerryBlender_Text_Player1Arrived: @ 8293986
+ .string "{STR_VAR_1} arrived.$"
+
+BerryBlender_Text_Player1And2Arrived: @ 8293992
+ .string "{STR_VAR_1} and {STR_VAR_2} arrived.$"
+
+BerryBlender_Text_AllPlayersArrived: @ 82939A5
+ .string "{STR_VAR_1}, {STR_VAR_2}, and\n"
+ .string "{STR_VAR_3} arrived.$"
+
+BerryBlender_Text_NoBerriesLink: @ 82939BD
+ .string "You have no BERRIES.\n"
+ .string "The BERRY BLENDER can't be used.$"
+
+BerryBlender_Text_PokeblockCaseIsFullLink: @ 82939F3
+ .string "Your {POKEBLOCK} CASE is full.\n"
+ .string "The BERRY BLENDER can't be used.$"
+
+BerryBlender_Text_DontHavePokeblockCaseLink: @ 8293A2D
+ .string "You don't have a {POKEBLOCK} CASE.\n"
+ .string "The BERRY BLENDER can't be used.$"
+
+BerryBlender_Text_LoveMakingPokeblocks: @ 8293A6B
+ .string "I love making {POKEBLOCK}S.\p"
+ .string "I always have some BERRIES with me.$"
+
+BerryBlender_Text_MakePokeblocksUsingBerryBlender: @ 8293AA5
+ .string "If you'd like, we could make some\n"
+ .string "{POKEBLOCK}S together using the\l"
+ .string "BERRY BLENDER.$"
+
+BerryBlender_Text_DontHaveAnyBerriesHaveOne: @ 8293AF0
+ .string "Oh?\n"
+ .string "You don't have any BERRIES?\p"
+ .string "Well, that won't do at all now, will it?\p"
+ .string "If you don't mind leftovers, you can\n"
+ .string "have one of my BERRIES.$"
+
+BerryBlender_Text_UseItToMakePokeblocksTogether: @ 8293B76
+ .string "We'll use it to make {POKEBLOCK}S together\n"
+ .string "using the BERRY BLENDER.$"
+
+BerryBlender_Text_DontHaveAnyBerriesNoneToSpare: @ 8293BB4
+ .string "Oh?\n"
+ .string "You don't have any BERRIES?\p"
+ .string "If I had some left over, I'd gladly\n"
+ .string "give you one…\p"
+ .string "But, I don't have any to spare today.\n"
+ .string "Sorry about that.$"
+
+BerryBlender_EventScript_BerryBlender1:: @ 8293C3E
+ lockall
+ goto_if_unset FLAG_HIDE_LILYCOVE_CONTEST_HALL_BLEND_MASTER, BerryBlender_EventScript_BlendMasterPresent
+ setvar VAR_0x8009, 1
+ applymovement 16, BerryBlender_Movement_BlendLeaderWalkInPlace
+ waitmovement 0
+ msgbox BerryBlender_Text_WantToMakePokeblocks, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_TryUseBerryBlender1
+ goto BerryBlender_EventScript_DeclineBlender1
+ end
+
+BerryBlender_EventScript_DeclineBlender1: @ 8293C70
+ msgbox BerryBlender_Text_MadeOldTimerSad, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender1NoBerries: @ 8293C7A
+ msgbox BerryBlender_Text_DontHaveAnyBerries, MSGBOX_DEFAULT
+ dotimebasedevents
+ goto_if_set FLAG_DAILY_CONTEST_LOBBY_RECEIVED_BERRY, BerryBlender_EventScript_Blender1NoSpareBerries
+ goto BerryBlender_EventScript_Blender1GiveSpareBerry
+ end
+
+BerryBlender_EventScript_Blender1NoSpareBerries: @ 8293C92
+ msgbox BerryBlender_Text_DontHaveAnyBerriesToSpare, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender1GiveSpareBerry: @ 8293C9C
+ msgbox BerryBlender_Text_CanHaveOneOfMyBerries, MSGBOX_DEFAULT
+ giveitem_std ITEM_PECHA_BERRY
+ setflag FLAG_DAILY_CONTEST_LOBBY_RECEIVED_BERRY
+ goto BerryBlender_EventScript_UseBerryBlender1
+ end
+
+BerryBlender_EventScript_UseBerryBlender1: @ 8293CB9
+ msgbox BerryBlender_Text_KnowHowToMakePokeblocks, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_StartBlender1
+ goto BerryBlender_EventScript_ExplainBlending1
+ end
+
+BerryBlender_EventScript_StartBlender1: @ 8293CD2
+ msgbox BerryBlender_Text_LetsBerryBlender, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_DoBerryBlending
+ end
+
+BerryBlender_EventScript_ExplainBlending1: @ 8293CE0
+ msgbox BerryBlender_Text_ExplainBerryBlending, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_StartBlender1
+ end
+
+BerryBlender_EventScript_TryUseBerryBlender1: @ 8293CEE
+ checkitem ITEM_POKEBLOCK_CASE, 1
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_Blender1NoCase
+ specialvar VAR_RESULT, GetFirstFreePokeblockSlot
+ compare VAR_RESULT, 65535
+ goto_if_eq BerryBlender_EventScript_Blender1CaseFull
+ specialvar VAR_RESULT, PlayerHasBerries
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_Blender1NoBerries
+ msgbox BerryBlender_Text_Excellent, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_UseBerryBlender1
+ end
+
+@ VAR_0x8009 here is the Blender number. 1 is top right, 2 is bottom right, 3 is bottom left
+BerryBlender_EventScript_DoBerryBlending: @ 8293D2C
+ copyvar VAR_0x8004, VAR_0x8009
+ fadescreen 1
+ special DoBerryBlending
+ waitstate
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender1CaseFull: @ 8293D39
+ msgbox BerryBlender_Text_PokeblockCaseIsFull, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender1NoCase: @ 8293D43
+ msgbox BerryBlender_Text_DontHavePokeblockCase, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_BerryBlender2:: @ 8293D4D
+ lockall
+ setvar VAR_0x8009, 2
+ applymovement 10, Common_Movement_FaceOriginalDirection
+ applymovement 3, BerryBlender_Movement_BlendLeaderWalkInPlace
+ waitmovement 0
+ msgbox BerryBlender_Text_WantToBlendPokeblocksWithUs, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_TryUseBerryBlender2
+ goto BerryBlender_EventScript_DeclineBlender2
+ end
+
+BerryBlender_EventScript_DeclineBlender2: @ 8293D7D
+ msgbox BerryBlender_Text_ThatsTooBad, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender2NoBerries: @ 8293D87
+ msgbox BerryBlender_Text_DontHaveAnyBerries2, MSGBOX_DEFAULT
+ release
+ end
+
+BerryBlender_EventScript_UseBerryBlender2: @ 8293D91
+ msgbox BerryBlender_Text_KnowHowToMakePokeblocks2, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_StartBlender2
+ goto BerryBlender_EventScript_ExplainBlending2
+ end
+
+BerryBlender_EventScript_StartBlender2: @ 8293DAA
+ msgbox BerryBlender_Text_LetsBerryBlender2, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_DoBerryBlending
+ end
+
+BerryBlender_EventScript_ExplainBlending2: @ 8293DB8
+ msgbox BerryBlender_Text_ExplainBerryBlending2, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_StartBlender2
+ end
+
+BerryBlender_EventScript_TryUseBerryBlender2: @ 8293DC6
+ specialvar VAR_RESULT, PlayerHasBerries
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_Blender2NoBerries
+ checkitem ITEM_POKEBLOCK_CASE, 1
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_Blender2NoCase
+ msgbox BerryBlender_Text_Okay, MSGBOX_DEFAULT
+ specialvar VAR_RESULT, GetFirstFreePokeblockSlot
+ compare VAR_RESULT, 65535
+ goto_if_ne BerryBlender_EventScript_UseBerryBlender2
+ compare VAR_RESULT, 65535
+ goto_if_eq BerryBlender_EventScript_Blender2CaseFull
+ end
+
+BerryBlender_EventScript_Blender2CaseFull: @ 8293E0A
+ msgbox BerryBlender_Text_PokeblockCaseIsFull2, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender2NoCase: @ 8293E14
+ msgbox BerryBlender_Text_DontHavePokeblockCase2, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_BerryBlender3:: @ 8293E1E
+ lockall
+ setvar VAR_0x8008, 15
+ setvar VAR_0x8009, 3
+ applymovement 9, Common_Movement_FaceOriginalDirection
+ applymovement 17, Common_Movement_FaceOriginalDirection
+ applymovement VAR_0x8008, BerryBlender_Movement_BlendLeaderWalkInPlace
+ waitmovement 0
+ msgbox BerryBlender_Text_LookGoodAtBlendingJoinUs, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_TryUseBlender3
+ goto BerryBlender_EventScript_DeclineBlender3
+ end
+
+BerryBlender_EventScript_DeclineBlender3: @ 8293E5A
+ msgbox BerryBlender_Text_LeftUsInShock, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender3NoBerries: @ 8293E64
+ msgbox BerryBlender_Text_DontHaveAnyBerries3, MSGBOX_DEFAULT
+ release
+ end
+
+BerryBlender_EventScript_UseBerryBlender3: @ 8293E6E
+ msgbox BerryBlender_Text_KnowHowToMakePokeblocks3, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_StartBlender3
+ goto BerryBlender_EventScript_ExplainBlending3
+ end
+
+BerryBlender_EventScript_StartBlender3: @ 8293E87
+ msgbox BerryBlender_Text_LetsBerryBlender3, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_DoBerryBlending
+ end
+
+BerryBlender_EventScript_ExplainBlending3: @ 8293E95
+ msgbox BerryBlender_Text_ExplainBerryBlending3, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_StartBlender3
+ end
+
+BerryBlender_EventScript_TryUseBlender3: @ 8293EA3
+ specialvar VAR_RESULT, PlayerHasBerries
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_Blender3NoBerries
+ checkitem ITEM_POKEBLOCK_CASE, 1
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_Blender3NoCase
+ msgbox BerryBlender_Text_OhDear, MSGBOX_DEFAULT
+ specialvar VAR_RESULT, GetFirstFreePokeblockSlot
+ compare VAR_RESULT, 65535
+ goto_if_ne BerryBlender_EventScript_UseBerryBlender3
+ compare VAR_RESULT, 65535
+ goto_if_eq BerryBlender_EventScript_Blender3CaseFull
+ end
+
+BerryBlender_EventScript_Blender3CaseFull: @ 8293EE7
+ msgbox BerryBlender_Text_PokeblockCaseIsFull3, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender3NoCase: @ 8293EF1
+ msgbox BerryBlender_Text_DontHavePokeblockCase3, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_BlendMasterPresent: @ 8293EFB
+ lockall
+ setvar VAR_0x8009, 1
+ msgbox BerryBlender_Text_SeeMyMasteryInAction, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_TryBlendWithBlendMaster
+ msgbox BerryBlender_Text_TooBusyNowIsee, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_BlendMasterNoBerries: @ 8293F1E
+ msgbox BerryBlender_Text_BlendMasterNoBerries, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_TryBlendWithBlendMaster: @ 8293F28
+ checkitem ITEM_POKEBLOCK_CASE, 1
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_BlendMasterNoCase
+ specialvar VAR_RESULT, PlayerHasBerries
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_BlendMasterNoBerries
+ specialvar VAR_RESULT, GetFirstFreePokeblockSlot
+ compare VAR_RESULT, 65535
+ goto_if_ne BerryBlender_EventScript_BlendWithBlendMaster
+ compare VAR_RESULT, 65535
+ goto_if_eq BerryBlender_EventScript_BlendMasterCaseFull
+ end
+
+BerryBlender_EventScript_BlendWithBlendMaster: @ 8293F64
+ msgbox BerryBlender_Text_BlendMasterKnowHowToMakePokeblocks, MSGBOX_YESNO
+ compare VAR_RESULT, NO
+ call_if_eq BerryBlender_EventScript_BlendMasterExplainBlending
+ msgbox BerryBlender_Text_BlendMasterLetsBerryBlender, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_DoBerryBlending
+ end
+
+BerryBlender_EventScript_BlendMasterExplainBlending: @ 8293F85
+ msgbox BerryBlender_Text_BlendMasterExplainBerryBlending, MSGBOX_DEFAULT
+ return
+
+BerryBlender_EventScript_BlendMasterNoCase: @ 8293F8E
+ msgbox BerryBlender_Text_BlendMasterNoPokeblockCase, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_BlendMasterCaseFull: @ 8293F98
+ msgbox BerryBlender_Text_BlendMasterPokeblockCaseFull, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_Blender2Man:: @ 8293FA2
+ msgbox BerryBlender_Text_SetNewBlenderRecord, MSGBOX_NPC
+ end
+
+BerryBlender_EventScript_Blender3PokefanF:: @ 8293FAB
+ msgbox BerryBlender_Text_LookGoodAtBlendingJoinUs, MSGBOX_NPC
+ end
+
+BerryBlender_EventScript_Blender2Twin:: @ 8293FB4
+ msgbox BerryBlender_Text_MakeDeliciousPokeblocks, MSGBOX_NPC
+ end
+
+BerryBlender_EventScript_Blender1ExpertM:: @ 8293FBD
+ setvar VAR_0x8008, 15
+ goto BerryBlender_EventScript_ExpertMCheckGiveBerry
+ end
+
+BerryBlender_EventScript_ExpertMCheckGiveBerry: @ 8293FC8
+ lock
+ faceplayer
+ msgbox BerryBlender_Text_LoveMakingPokeblocks, MSGBOX_DEFAULT
+ specialvar VAR_RESULT, PlayerHasBerries
+ compare VAR_RESULT, TRUE
+ goto_if_eq BerryBlender_EventScript_ExpertMPlayerHasBerries
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_ExpertMNoBerries
+ end
+
+BerryBlender_EventScript_ExpertMPlayerHasBerries: @ 8293FEE
+ msgbox BerryBlender_Text_MakePokeblocksUsingBerryBlender, MSGBOX_DEFAULT
+ release
+ end
+
+BerryBlender_EventScript_ExpertMNoBerries: @ 8293FF8
+ checkitem ITEM_POKEBLOCK_CASE, 1
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_ExpertMNoSpareBerries
+ specialvar VAR_RESULT, GetFirstFreePokeblockSlot
+ compare VAR_RESULT, 65535
+ goto_if_eq BerryBlender_EventScript_ExpertMNoSpareBerries
+ dotimebasedevents
+ goto_if_set FLAG_DAILY_CONTEST_LOBBY_RECEIVED_BERRY, BerryBlender_EventScript_ExpertMNoSpareBerries
+ goto BerryBlender_EventScript_ExpertMGiveBerry
+ end
+
+BerryBlender_EventScript_ExpertMNoSpareBerries: @ 8294028
+ msgbox BerryBlender_Text_DontHaveAnyBerriesNoneToSpare, MSGBOX_DEFAULT
+ release
+ end
+
+BerryBlender_EventScript_ExpertMGiveBerry: @ 8294032
+ msgbox BerryBlender_Text_DontHaveAnyBerriesHaveOne, MSGBOX_DEFAULT
+ giveitem_std ITEM_PECHA_BERRY
+ setflag FLAG_DAILY_CONTEST_LOBBY_RECEIVED_BERRY
+ msgbox BerryBlender_Text_UseItToMakePokeblocksTogether, MSGBOX_DEFAULT
+ release
+ end
+
+BerryBlender_Movement_BlendLeaderWalkInPlace: @ 8294053
+ walk_in_place_fastest_right
+ step_end
+
+BerryBlender_EventScript_BerryBlenderLink:: @ 8294055
+ lockall
+ specialvar VAR_RESULT, PlayerHasBerries
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_LinkBlenderNoBerries
+ checkitem ITEM_POKEBLOCK_CASE, 1
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_LinkBlenderNoCase
+ specialvar VAR_RESULT, GetFirstFreePokeblockSlot
+ compare VAR_RESULT, 65535
+ goto_if_ne BerryBlender_EventScript_LinkBlenderSaveGame
+ compare VAR_RESULT, 65535
+ goto_if_eq BerryBlender_EventScript_LinkBlenderCaseFull
+ end
+
+BerryBlender_EventScript_LinkBlenderSaveGame: @ 8294092
+ msgbox BerryBlender_Text_SaveGameBeforeBerryBlenderLink, MSGBOX_YESNO
+ compare VAR_RESULT, YES
+ goto_if_eq BerryBlender_EventScript_TryDoLinkBlender
+ compare VAR_RESULT, NO
+ goto_if_eq BerryBlender_EventScript_CancelLinkBlender
+ end
+
+BerryBlender_EventScript_LinkBlenderNoBerries: @ 82940B1
+ msgbox BerryBlender_Text_NoBerriesLink, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_TryDoLinkBlender: @ 82940BB
+ call Common_EventScript_SaveGame
+ compare VAR_RESULT, FALSE
+ goto_if_eq BerryBlender_EventScript_CancelLinkBlender
+ specialvar VAR_RESULT, IsWirelessAdapterConnected
+ compare VAR_RESULT, TRUE
+ goto_if_eq BerryBlender_EventScript_StartDecideLinkLeader
+ message BerryBlender_Text_SearchingForFriends
+ waitmessage
+ special TryBerryBlenderLinkup
+ waitstate
+ compare VAR_RESULT, 1
+ goto_if_eq BerryBlender_EventScript_SpawnLinkPartners
+ compare VAR_RESULT, 2
+ goto_if_eq BerryBlender_EventScript_CloseLinkNotReady
+ compare VAR_RESULT, 3
+ goto_if_eq BerryBlender_EventScript_CloseLinkDifferentSelections
+ compare VAR_RESULT, 5
+ goto_if_eq BerryBlender_EventScript_CloseLink
+ compare VAR_RESULT, 6
+ goto_if_eq BerryBlender_EventScript_LinkError
+ end
+
+BerryBlender_EventScript_TwoPlayerLink: @ 829411D
+ msgbox BerryBlender_Text_Player1Arrived, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_DoLinkBerryBlending
+ end
+
+BerryBlender_EventScript_ThreePlayerLink: @ 829412B
+ msgbox BerryBlender_Text_Player1And2Arrived, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_DoLinkBerryBlending
+ end
+
+BerryBlender_EventScript_FourPlayerLink: @ 8294139
+ msgbox BerryBlender_Text_AllPlayersArrived, MSGBOX_DEFAULT
+ goto BerryBlender_EventScript_DoLinkBerryBlending
+ end
+
+BerryBlender_EventScript_DoLinkBerryBlending: @ 8294147
+ setvar VAR_0x8004, 0
+ fadescreen 1
+ removeobject 240
+ removeobject 239
+ removeobject 238
+ removeobject 237
+ special DoBerryBlending
+ waitstate
+ releaseall
+ end
+
+BerryBlender_EventScript_CancelLinkBlender: @ 8294160
+ releaseall
+ end
+
+BerryBlender_EventScript_LinkBlenderCaseFull: @ 8294162
+ msgbox BerryBlender_Text_PokeblockCaseIsFullLink, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_LinkBlenderNoCase: @ 829416C
+ msgbox BerryBlender_Text_DontHavePokeblockCaseLink, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_CloseLinkNotReady: @ 8294176
+ special CloseLink
+ msgbox Text_SomeoneIsNotReadyToLink, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_CloseLinkDifferentSelections: @ 8294183
+ special CloseLink
+ msgbox Text_PlayersMadeDifferentSelections, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_CloseLink: @ 8294190
+ special CloseLink
+ msgbox gText_PokeblockLinkCanceled, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_LinkError: @ 829419D
+ special CloseLink
+ msgbox Text_LinkErrorPleaseReset, MSGBOX_DEFAULT
+ releaseall
+ end
+
+BerryBlender_EventScript_SpawnLinkPartners: @ 82941AA
+ fadescreen 1
+ specialvar VAR_RESULT, GetLinkPartnerNames
+ copyvar VAR_0x8008, VAR_RESULT
+ copyvar VAR_0x8004, VAR_0x8008
+ special SpawnLinkPartnerEventObject
+ goto BerryBlender_EventScript_LinkPlayersArrived
+ end
+
+BerryBlender_EventScript_LinkPlayersArrived: @ 82941C4
+ fadescreen 0
+ switch VAR_0x8008
+ case 2, BerryBlender_EventScript_TwoPlayerLink
+ case 3, BerryBlender_EventScript_ThreePlayerLink
+ case 4, BerryBlender_EventScript_FourPlayerLink
+ end
+
+BerryBlender_EventScript_StartDecideLinkLeader: @ 82941ED
+ setvar VAR_0x8004, LINK_GROUP_BERRY_BLENDER
+ goto BerryBlender_EventScript_DecideLinkLeader
+ end
+
+BerryBlender_EventScript_DecideLinkLeader: @ 82941F8
+ message LilycoveCity_ContestLobby_Text_PleaseDecideLinkLeader
+ waitmessage
+ multichoice 16, 6, MULTI_LINK_LEADER, 0
+ switch VAR_RESULT
+ case 0, BerryBlender_EventScript_TryJoinGroup
+ case 1, BerryBlender_EventScript_TryLeadGroup
+ case 2, BerryBlender_EventScript_CloseLink
+ case MULTI_B_PRESSED, BerryBlender_EventScript_CloseLink
+ end
+
+BerryBlender_EventScript_TryLeadGroup: @ 8294235
+ call BerryBlender_EventScript_TryBecomeLinkLeader
+ compare VAR_RESULT, 1
+ goto_if_eq BerryBlender_EventScript_LinkLeaderDecided
+ compare VAR_RESULT, 5
+ goto_if_eq BerryBlender_EventScript_DecideLinkLeader
+ compare VAR_RESULT, 8
+ goto_if_eq BerryBlender_EventScript_TryLeadGroup
+ release
+ end
+
+BerryBlender_EventScript_TryJoinGroup: @ 829425D
+ call BerryBlender_EventScript_TryJoinLinkGroup
+ compare VAR_RESULT, 1
+ goto_if_eq BerryBlender_EventScript_LinkLeaderDecided
+ compare VAR_RESULT, 5
+ goto_if_eq BerryBlender_EventScript_DecideLinkLeader
+ compare VAR_RESULT, 8
+ goto_if_eq BerryBlender_EventScript_TryJoinGroup
+ release
+ end
+
+BerryBlender_EventScript_TryBecomeLinkLeader: @ 8294285
+ special TryBecomeLinkLeader
+ waitstate
+ return
+
+BerryBlender_EventScript_TryJoinLinkGroup: @ 829428A
+ special TryJoinLinkGroup
+ waitstate
+ return
+
+BerryBlender_EventScript_LinkLeaderDecided: @ 829428F
+ goto BerryBlender_EventScript_SpawnLinkPartners
+ end