From fb9f078b22dbf148fe24147f69f2e5aafb2e27f9 Mon Sep 17 00:00:00 2001 From: Jesusaves Date: Thu, 28 May 2020 15:30:05 -0300 Subject: Better fix. --- npc/functions/soul_menhir.txt | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) (limited to 'npc/functions/soul_menhir.txt') diff --git a/npc/functions/soul_menhir.txt b/npc/functions/soul_menhir.txt index ecde37287..8afd10bdc 100644 --- a/npc/functions/soul_menhir.txt +++ b/npc/functions/soul_menhir.txt @@ -3,6 +3,14 @@ // With parts from The Mana World. function script SoulMenhir { + // Create @x and @y for this script + @n = rand2(getarraysize(@Xs)); + @x = @Xs[@n]; + @y = @Ys[@n]; + deletearray @Xs; + deletearray @Ys; + @n = 0; + mes l("[Soul Menhir]"); mes l("(A mystical aura surrounds this stone. You feel mysteriously attracted to it. Something tells you to touch it. What do you do?)"); @@ -40,14 +48,6 @@ L_Shortversion: mes l("(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.)"); goto L_Save; -L_Save: - @n = rand2(getarraysize(@Xs)); - @x = @Xs[@n]; - @y = @Ys[@n]; - deletearray @Xs; - deletearray @Ys; - goto L_Do_Save; - L_Aeros: if (!$@GM_EVENT) goto L_DontPanic; .@gt=$@AEROS_SPWN; @@ -95,7 +95,7 @@ L_DontPanic: message strcharinfo(0), l("(A strange barrier keeps you from touching the stone at this time.)"); return; -L_Do_Save: +L_Save: if (GSET_SOULMENHIR_MANUAL) { savepoint @map$, @x, @y; specialeffect(4, SELF, getcharid(3)); -- cgit v1.2.3-60-g2f50