1 files changed, 29 insertions, 0 deletions
diff --git a/npc/015-3/barrier.txt b/npc/015-3/barrier.txt
new file mode 100644
index 00000000..d532a473
--- /dev/null
+++ b/npc/015-3/barrier.txt
@@ -0,0 +1,29 @@
+// You can only enter the cat cave naked, otherwise the cat's reaction scares
+// you away. Wearing a ring or amulet should be ok, but no checks are in for
+// that yet.
+
+015-3.gat,31,36,0	script	#CatCaveBarrier	127,1,1,{
+
+    if ((getequipid(equip_head) > 0 && getequipid(equip_head) != 1217) ||
+        getequipid(equip_shield) > 0 ||
+        getequipid(equip_hand1) > 0 ||
+        getequipid(equip_hand2) > 0 ||
+        getequipid(equip_gloves) > 0 ||
+        getequipid(equip_shoes) > 0 ||
+        getequipid(equip_misc1) > 0 ||
+        getequipid(equip_misc2) > 0 ||
+        getequipid(equip_torso) > 0 ||
+        getequipid(equip_legs) > 0) goto L_Not_Naked;
+
+    if (LastHiss != 2) mes "\"Hissss...\"";
+    set LastHiss, 2;
+    close;
+
+L_Not_Naked:
+    warp "015-1.gat", 60, 32;
+    set LastHiss, 1;
+    mes "\"GRAAUWL! Hissss...\"";
+    mes "Scared of what you hear, you flee back outside.";
+    next;
+    close;
+}