summaryrefslogtreecommitdiff
path: root/world/map/npc/099-1/main.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/099-1/main.txt')
-rw-r--r--world/map/npc/099-1/main.txt278
1 files changed, 0 insertions, 278 deletions
diff --git a/world/map/npc/099-1/main.txt b/world/map/npc/099-1/main.txt
deleted file mode 100644
index 0508cdfe..00000000
--- a/world/map/npc/099-1/main.txt
+++ /dev/null
@@ -1,278 +0,0 @@
-// Evol script
-// Author:
-// Jesusalva
-// Description:
-// 099-1 and 099-3 KESHLAM ADVENTURER GUILD MAIN CHAMBERS
-// Controls gates and introduction
-/////////////////////////////////////////////////////////////////////////////////
-
-099-1,35,28,0|script|Note#DD5Core|400
-{
- // Default distance is 4 tiles - all we need
- callfunc "PCtoNPCRange";
- if(@npc_check) end;
-
- mes ".:: Keshlam's Adventurer Guild ::.";
- mes "";
- mes "Welcome to the Adventurers Guild!";
- mes "Sorry I could not wait for you. It's your fault for being late.";
- next;
- mes "So, it has been a long time since you were here.";
- mes "I hope you still remember the directions?";
- mes "Hahaha! There is a lot of fake rooms in this building.";
- next;
- mes "You should have known me for long enough to know I do not take chances.";
- mes "I've put the docks where I'm waiting for you in an overlapping dimension.";
- mes "This should be enough to stop any Sparron who makes back to here.";
- next;
- mes "My dimension, my rules.";
- mes "I've set a rule that anything dying here should not respawn.";
- mes "I'm not sure if it'll work, but I did enough tests on that.";
- next;
- mes "In case you forgot, this is an, *ahem*, \"deleted\" dimension.";
- mes "You'll see notes from the adventurers who used to inhabit here.";
- mes "Maybe you even find something which used to belong to them?";
- next;
- mes "I'm sure they tried to write down possible ways to stop me.";
- mes "I do not like them, so if you find anything which belong to them...";
- mes "...Well, you're free to take it.";
- next;
- mes "I've stationed a guard here and there, to stop intruders.";
- mes "Use invisibility magic if you need to go past them.";
- mes "I'll talk to you later. Do not leave me waiting!";
- next;
- mes "Signed,";
- mes "Xakelbael the Dark";
- close;
-}
-
-099-3,69,38,0|script|Ritual Book#099-31|400
-{
- // Default distance is 4 tiles - all we need
- callfunc "PCtoNPCRange";
- if(@npc_check) end;
-
- mes ".:: Ritual Book ::.";
- mes "";
- mes "In this maze, sixteen numeric passwords lie.";
- mes "All sixteen passwords must be chanted in their sequence.";
- mes "";
- mes "Chanting can be done on the book at right.";
- mes "##9Only one player may chant all passwords.";
- mes "##9No reward is provided.";
- mes "##9If you get a number wrong, you'll be penalized!";
- close;
-}
-
-099-3,75,38,0|script|Ritual Book#099-32|400
-{
- // Default distance is 4 tiles - all we need
- callfunc "PCtoNPCRange";
- if(@npc_check) end;
- if ($@DD5_OPENSESAME) goto L_Complete;
-
- mes ".:: Ritual Book ::.";
- mes "Perform the ritual?";
- next;
- menu
- "Yes", L_RB_0,
- "No", L_Close;
-
-L_RB_0:
- mes "Say the password - ##B NULL##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[0]) goto L_Failure;
- goto L_RB_1;
-
-L_RB_1:
- mes "Say the password - ##B EIN##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[1]) goto L_Failure;
- goto L_RB_2;
-
-L_RB_2:
- mes "Say the password - ##B ZWEI##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[2]) goto L_Failure;
- goto L_RB_3;
-
-L_RB_3:
- mes "Say the password - ##B DREI##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[3]) goto L_Failure;
- goto L_RB_4;
-
-L_RB_4:
- mes "Say the password - ##B VIER##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[4]) goto L_Failure;
- goto L_RB_5;
-
-L_RB_5:
- mes "Say the password - ##B FUNF##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[5]) goto L_Failure;
- goto L_RB_6;
-
-L_RB_6:
- mes "Say the password - ##B SECHS##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[6]) goto L_Failure;
- goto L_RB_7;
-
-L_RB_7:
- mes "Say the password - ##B SIEBEN##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[7]) goto L_Failure;
- goto L_RB_8;
-
-L_RB_8:
- mes "Say the password - ##B ACHT##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[8]) goto L_Failure;
- goto L_RB_9;
-
-L_RB_9:
- mes "Say the password - ##B NEUN##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[9]) goto L_Failure;
- goto L_RB_10;
-
-L_RB_10:
- mes "Say the password - ##B ZEHN##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[10]) goto L_Failure;
- goto L_RB_11;
-
-L_RB_11:
- mes "Say the password - ##B ELF##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[11]) goto L_Failure;
- goto L_RB_12;
-
-L_RB_12:
- mes "Say the password - ##B ZWOLF##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[12]) goto L_Failure;
- goto L_RB_13;
-
-L_RB_13:
- mes "Say the password - ##B DREIZEHN##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[13]) goto L_Failure;
- goto L_RB_14;
-
-L_RB_14:
- mes "Say the password - ##B VIERZEHN##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[14]) goto L_Failure;
- goto L_RB_15;
-
-L_RB_15:
- mes "Say the password - ##B FUNFZEHN##b";
- input @pass;
-
- if (@pass != $@DD5_PASSWORDS[15]) goto L_Failure;
- goto L_Success;
-
-L_Failure:
- mes "##1THAT WAS WRONG!";
- mes "##1THE RITUAL BACKFIRES!";
- set Hp, 1;
- warp "099-1", 0, 0;
- close;
-
-L_Success:
- set $@DD5_OPENSESAME, 1;
- mes ".:: Ritual Book ::.";
- mes "The portal magic is now active.";
- close;
-
-L_Complete:
- mes ".:: Ritual Book ::.";
- mes "The ritual was already performed.";
- close;
-
-L_Close:
- close;
-}
-
-099-3,72,75,0|script|#WarpToFinalShowdown|424,0,0
-{
- // Default distance is 4 tiles - all we need
- callfunc "PCtoNPCRange";
- if(@npc_check) end;
-
- if ($@DD5_TSWITCH != 18)
- goto L_NotSwitch;
-
- if (!$@DD5_OPENSESAME)
- goto L_NotSesame;
-
- mes "Walk here to go to the ##BFinal Showdown##b.";
- mes "";
- mes "##1##BWARNING:##b##0 Come prepared!";
- close;
-
-L_NotSwitch:
- mes "All 18 switches must be flipped in order to this warp to work!";
- close;
-
-L_NotSesame:
- mes "The ritual need to be performed to use this warp!";
- close;
-
-L_Busy:
- mes "This warp cannot be used while players are on the other side!";
- close;
-
-OnTouch:
- if ($DOOMSDAY_VANILLA)
- goto L_Menu;
-
- if ($@DD5_TSWITCH != 18)
- goto L_NotSwitch;
-
- if (!$@DD5_OPENSESAME)
- goto L_NotSesame;
-
- goto L_Menu;
-
-L_Menu:
- if ($@DD5_STATUS > 1)
- goto L_Busy;
-
- mes "##BGo to the final showdown?##b";
- mes "You cannot return from there!";
- mes "";
- mes "##1Warning: Warp will be unavailable during fights!";
- if (GM < GM_SYSOP)
- close;
-
- menu
- "Yes", L_Yes,
- "No", L_No;
-L_No:
- close;
-L_Yes:
- warp "099-5", 50, 66;
- if (!$@DD5_STATUS)
- donpcevent "#TMWFinalExam::OnWarn0";
- close;
-}
-
generated by cgit v1.2.3-60-g2f50 (git 2.42.0) at 2024-06-01 21:14:54 +0000