summaryrefslogtreecommitdiff
path: root/npc/functions/soul_menhir.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/functions/soul_menhir.txt')
-rw-r--r--npc/functions/soul_menhir.txt34
1 files changed, 34 insertions, 0 deletions
diff --git a/npc/functions/soul_menhir.txt b/npc/functions/soul_menhir.txt
new file mode 100644
index 00000000..b51dc593
--- /dev/null
+++ b/npc/functions/soul_menhir.txt
@@ -0,0 +1,34 @@
+function script SoulMenhir {
+ mes "[Soul Menhir]";
+ mes "(A mystical aura surrounds this stone. You feel mysteriously attracted to it. Something tells you to touch it. What do you do?)";
+ next;
+
+ menu
+ "Touch it", -,
+ "Leave it alone", return;
+
+ if (Menhir_Activated == 1) goto L_Shortversion;
+
+ mes "[Soul Menhir]";
+ mes "(You touch the mysteriouse stone. Somehow it feels warm and cold at the same time.)";
+ next;
+
+ mes "[Soul Menhir]";
+ mes "(Suddenly a strange sensation flows through you. It feels like your soul leaves your body and becomes one with the stone.)";
+ next;
+
+ mes "[Soul Menhir]";
+ mes "(As suddenly as the feeling started it stops. The strange attraction is away from one moment to the next and the menhir feels like just an ordinary stone.)";
+ next;
+
+ set Menhir_Activated, 1;
+ goto L_Save;
+
+L_Shortversion:
+ mes "[Soul Menhir]";
+ mes "(A strange sensation flows through you. It feels like your soul leaves your body and becomes one with the stone. as suddenly as the feeling started it stops.)";
+ next;
+
+L_Save:
+ savepoint @map$, @x, @y;
+}