1 files changed, 27 insertions, 0 deletions
diff --git a/npc/013-3/barrier.txt b/npc/013-3/barrier.txt
new file mode 100644
index 00000000..aa8a1918
--- /dev/null
+++ b/npc/013-3/barrier.txt
@@ -0,0 +1,27 @@
+
+013-3,71,21,0	script	#DemonMineBarrier1#_M	NPC32767,1,0,{
+    @state = ((QUEST_Hurnscald & NIBBLE_2_MASK) >> NIBBLE_2_SHIFT);
+
+    if (@state >= 2) goto L_End;
+    if (@state == 1 && countitem("Soul") >= 1) goto L_Has_Soul;
+
+    message strcharinfo(0), "Barrier : ##3A barrier around the opening pushes you back as you approach.";
+
+    warp "013-3", 71, 25;
+    goto L_End;
+
+L_Has_Soul:
+    message strcharinfo(0), "Barrier : ##3The barrier around the opening allows you passage.";
+    @state = 2;
+    callsub S_Update_Mask;
+    delitem "Soul", 1;
+    goto L_End;
+
+L_End:
+    @state = 0;
+    end;
+
+S_Update_Mask:
+    QUEST_Hurnscald = (QUEST_Hurnscald & ~(NIBBLE_2_MASK)) | (@state << NIBBLE_2_SHIFT);
+    return;
+}