1 files changed, 53 insertions, 0 deletions
diff --git a/npc/080-1/final.txt b/npc/080-1/final.txt
index a318f6f6..5d5cbca0 100644
--- a/npc/080-1/final.txt
+++ b/npc/080-1/final.txt
@@ -200,3 +200,56 @@ OnKil:
     end;
 }
 
+027-1,105,63,0	script	#GakGate	NPC400,{
+    if (!isChristmas21()) end;
+    if (!X21GAK_GATE()) end;
+
+    mes l("There are several names in fine print below this gargoyle:");
+    // Sorry for missing names (e.g. Platyna) and spurious names (e.g. Crush)
+    // Wanted to list only TMW sysadmins but too much trouble
+    mes "Bjorn ~ Crush ~ ElvenProgrammer ~ Freeyorp ~ Frost ~ Jak1 ~ Jaxad ~ Jesusalva ~ MadCamel ~ Reid ~ Rotonen ~ Tux9th ~ Wombat ~ Wushin";
+    next;
+    mes l("Whose name do you press?");
+    select
+        l("None!"),
+        l("Bjorn"),
+        l("Crush"),
+        l("ElvenProgrammer"),
+        l("Freeyorp"),
+        l("Frost"),
+        l("Jak1"),
+        l("Jaxad"),
+        l("Jesusalva"),
+        l("MadCamel"),
+        l("Reid"),
+        l("Rotonen"),
+        l("Tux9th"),
+        l("Wombat"),
+        l("Wushin");
+    mes "";
+    .@id = @menu - 2;
+    if (.@id != XMAS21_KEYWORD) {
+        percentheal -10, -100;
+    } else {
+        X21INIT();
+	    .@mapa$="0801@"+X21ID2();
+        warp .@mapa$, 84, 145;
+    }
+    closeclientdialog;
+    close;
+OnInit:
+    .distance=2;
+    end;
+}
+
+080-1,97,140,0	script	#0801Exit	NPC424,0,0,{
+    end;
+OnTouch:
+    mes l("Warp back?");
+    next;
+    if (askyesno() == ASK_YES)
+        warp "027-2", 50, 29;
+    closeclientdialog;
+    end;
+}
+