diff options
Diffstat (limited to 'world/map/npc/099-1/main.txt')
-rw-r--r-- | world/map/npc/099-1/main.txt | 278 |
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; -} - |