summaryrefslogtreecommitdiff
path: root/data/scripts/questionnaire.inc
diff options
context:
space:
mode:
authorultima-soul <akshayjhanji@hotmail.com>2020-03-13 00:32:04 -0700
committerultima-soul <akshayjhanji@hotmail.com>2020-03-13 00:32:04 -0700
commit99e4de062ae43aa978ad4f1a8cd70bc739c64c9d (patch)
tree1164d31577e6ebddc1cb313d40bb69ce0d426170 /data/scripts/questionnaire.inc
parent339c2914affc3c62ac9a5725aa1a0c7ccc3161ca (diff)
parent6af8c04d8fa6aaeaeb6c8b919e7770a65b9a883d (diff)
Merge branch 'master' into event_object_movement
Diffstat (limited to 'data/scripts/questionnaire.inc')
-rw-r--r--data/scripts/questionnaire.inc48
1 files changed, 48 insertions, 0 deletions
diff --git a/data/scripts/questionnaire.inc b/data/scripts/questionnaire.inc
new file mode 100644
index 000000000..c7636ce22
--- /dev/null
+++ b/data/scripts/questionnaire.inc
@@ -0,0 +1,48 @@
+EventScript_Questionnaire:: @ 81A7702
+ lockall
+ textcolor 3
+ msgbox Text_FillOutQuestionnaire, MSGBOX_YESNO
+ compare VAR_RESULT, NO
+ goto_if_eq 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
+ end
+
+EventScript_EnableMysteryGift:: @ 81A774D
+ applymovement VAR_0x8008, Movement_FaceDown
+ waitmovement 0
+ playse SE_PIN
+ applymovement VAR_0x8008, Movement_ExclamationMark
+ waitmovement 0
+ applymovement VAR_0x8008, Movement_Delay48
+ waitmovement 0
+ msgbox Text_YouKnowThoseWords
+ setflag FLAG_SYS_MYSTERY_GIFT_ENABLED
+ textcolor 3
+ special sub_80699BC
+ signmsg
+ msgbox Text_YouCanAccessMysteryGift
+ normalmsg
+ releaseall
+ end
+
+EventScript_DeclineQuestionnaire:: @ 81A778A
+ releaseall
+ end
+
+EventScript_TookQuestionnaire:: @ 81A778C
+ applymovement VAR_0x8008, Movement_FaceDown
+ waitmovement 0
+ msgbox Text_QuestionnaireThankYou
+ releaseall
+ end