AS OF SVN REV. 5901, WE ARE NOW USING TRUNK. ALL UNTESTED BUGFIXES/FEATURES GO INTO TRUNK.

IF YOU HAVE A WORKING AND TESTED BUGFIX PUT IT INTO STABLE AS WELL AS TRUNK.  EVERYTHING ELSE
GOES INTO TRUNK AND WILL BE MERGED INTO STABLE BY VALARIS AND WIZPUTER. -- VALARIS


git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@5094 54d463be-8e91-2dee-dedb-b68131a5f0ec

1 files changed, 260 insertions, 0 deletions

diff --git a/npc/custom/quests/tha_statues.txt b/npc/custom/quests/tha_statues.txt
new file mode 100644
index 000000000..d860d5c30
--- /dev/null
+++ b/npc/custom/quests/tha_statues.txt
@@ -0,0 +1,260 @@
+//===== eAthena Script =======================================

+//= Custom Thanatos Tower Quest

+//===== By: ==================================================

+//= Bibilol & Moryagorn

+//===== Current Version: =====================================

+//= 1.0

+//===== Compatible With: =====================================

+//= Any eAthena Version;

+//===== Description: =========================================

+//= Custom Thanatos Tower Quest

+//===== Additional Comments: =================================

+//=

+//============================================================

+

+

+//Statue (NPC)(U: UP, D: DOWN, R: RIGHT, L: LEFT) :

+// Explain Npc

+tha_t08.gat,69,106,4	script	Statue	111,{

+

+	mes "You can read on the back of the statue:";

+	mes "'By the spirit of olds, the walls are closed";

+	mes "Upper floors or foreign taboo";

+	mes "By the order of the Statues you will find the way";

+	mes "Which perhaps a day will bring you to me.";

+	mes ".....Thanatos '";

+	close;

+}

+

+//Tha_t09 :

+//(Thalos)(U,L)-->tha_t09.gat,17,158,4

+//(Mediane)(D,R)-->tha_t09.gat,84,99,4

+//Script:

+

+tha_t09.gat,17,158,4	script	Thalos	111,{

+

+	if(TSQ_CHK == 1) goto done;

+	mes "[Thalos]";

+	mes "You must find the 2nd Statue now.";

+	set TSQ_CHK,1;

+	close;

+

+done:

+	mes "[Thalos]";

+	mes "Go search the 2nd Statue!";

+	close;

+           

+}

+

+tha_t09.gat,84,99,4	script	Mediane	111,{

+

+	if(TSQ_CHK != 1) goto nook;

+	mes "[Mediane]";

+	mes "Okay, i am warping you to the next floor now.";

+	next;

+	set TSQ_CHK,0;

+	warp "tha_t10.gat",	165,	138; 

+	close;

+nook:

+	mes "[Mediane]";

+	mes "You must talk with the Spirit in the 1st Statue.";

+	close;

+}

+

+//Tha_t10 :

+//(Melkor)(U)-->tha_t10.gat,130,159,4

+//(Zebrus)(D,R)-->tha_t10.gat,160,98,4

+//(Veriaelle)(D,L)-->tha_t10.gat,99,97,4

+//Script:

+

+tha_t10.gat,130,159,4	script	Melkor	111,{

+

+	if(TSQ_CHK == 1) goto done;

+	mes "[Melkor]";

+	mes "You must find the other Spirits now.";

+	mes "We are 3.";

+	set TSQ_CHK,1;

+	close;

+done:

+	mes "[Melkor]";

+	mes "Go Search, They are in this floor.";

+	close;

+}

+

+tha_t10.gat,160,98,4	script	Zebrus	111,{

+

+	if(TSQ_CHK != 1) goto nook;

+	mes "[Zebrus]";

+	mes "Keep on this way, There is one Spirit left";

+	set TSQ_CHK,2;

+	close;

+nook:

+	mes "[Zebrus]";

+	mes "You seems to be lost, Go back and talk to Melkor.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+tha_t10.gat,99,97,4	script	Veriaelle	111,{

+

+	if(TSQ_CHK != 2) goto nook;

+	mes "[Veriaelle]";

+	mes "Okay, i am warping you to the next floor.";

+	next;

+	set TSQ_CHK,0;

+	warp "tha_t11.gat",	86,	38;

+	close;

+nook:

+	mes "[Veriaelle]";

+	mes "You seems to be lost, Go back and talk to Melkor.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+//Tha_t11 :

+//(Throtre)(U,L)-->tha_t11.gat,16,85,4

+//(Klermaz)(D,R)-->tha_t11.gat,85,16,4

+//(Mihane)(D,L)-->tha_t11.gat,16,16,4

+//(Seranes)(U,R)-->tha_t11.gat,85,85,4

+//Script:

+

+tha_t11.gat,16,85,4	script	Throtre	111,{

+	if(TSQ_CHK == 1) goto done;

+	mes "[Throtre]";

+	mes "You got my authorization for the next floor";

+	mes "However, you must show how strong you are to the other Spirits";

+	set TSQ_CHK,1;

+	close;

+done:

+	mes "[Throtre]";

+	mes "Go search, They Can't leave this floor.";

+	close;

+}

+

+tha_t11.gat,85,16,4	script	Klermaz	111,{

+	if(TSQ_CHK != 1) goto nook;

+	mes "[Klermaz]";

+	mes "Hmm it seems that Throtre allowed you to pass.";

+	mes "Well then you have my blessing, 2 Spirits remaining.";

+	set TSQ_CHK,2;

+	close;

+nook:

+	mes "[Klermaz]";

+	mes "You seems to be lost, Go back and talk to Throtre.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+tha_t11.gat,16,16,4	script	Mihane	111,{

+      if(TSQ_CHK != 2) goto nook;

+	mes "[Mihane]";

+	mes "Keep on this way, Only 1 Left.";

+	set TSQ_CHK,3;

+	close;

+nook:

+	mes "[Mihane]";

+	mes "Sorry, You must start over from the begining.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+tha_t11.gat,85,85,4	script	Seranes	111,{

+	if(TSQ_CHK != 3 ) goto nook;

+	mes "[Seranes]";

+	mes "Perfect, it seems that the other spirits grants you the access.";

+	mes "I am warping you to the next floor.";

+	next;

+	set TSQ_CHK,0;

+	warp "tha_t12.gat",	129,	58;

+	close;

+nook:

+	mes "[Seranes]";

+	mes "You did not follow the good order, starts again from the begining.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+//Tha_t12 ( M: Middle):

+//(Nox)(D,L)-->tha_t12.gat,103,18,4

+//(Vox)(R)-->tha_t12.gat,162,58,4

+//(Hox)(L)-->tha_t12.gat,96,57,4

+//(Dox)(D,R)-->tha_t12.gat,153,17,4

+//(Sox)(U)-->tha_t12.gat,128,88,4

+//Script:

+

+tha_t12.gat,103,18,4	script	Nox	111,{

+	if(TSQ_CHK == 1 ) goto done;

+	mes "[Nox]";

+	mes "Fine, 4 Spirits left.";

+	set TSQ_CHK,1;

+	close;

+done:

+	mes "[Nox]";

+	mes "Go search, They can't leave this floor.";

+	close;

+}

+

+tha_t12.gat,162,58,4	script	Vox	111,{

+	if(TSQ_CHK != 1 ) goto nook;

+	mes "[Vox]";

+	mes "Keep on this way, 3 Spirits remaining !";

+	set TSQ_CHK,2;

+	close;

+nook:

+	mes "[Vox]";

+	mes "Sorry, Go back and talk to Nox.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+tha_t12.gat,96,57,4	script	Hox	111,{	

+	if(TSQ_CHK != 2 ) goto nook;

+	mes "[Hox]";

+	mes "You are on the good way, 2 Spirits remaining !";

+	set TSQ_CHK,3;

+	close;

+nook:

+	mes "[Hox]";

+	mes "Sorry, Go back and talk to Nox.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+tha_t12.gat,153,17,4	script	Dox	111,{

+	if(TSQ_CHK != 3 ) goto nook;

+	mes "[Dox]";

+	mes "Perfect, 1 Spirit left.";

+	set TSQ_CHK,4;

+	close;

+nook:

+	mes "[Dox]";

+	mes "Sorry, Go back and talk to Nox.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}

+

+tha_t12.gat,128,88,4	script	Sox	111,{

+	if(TSQ_CHK != 4 ) goto nook;

+	mes "[Sox]";

+	mes "You have just passed the test successfully.";

+	mes "I will now warp you to steps of Fate.";

+	mes "Good-bye.";

+	next;

+	set TSQ_CHK,0;

+	warp "thana_step.gat",	186,	223;

+	close;

+nook:

+	mes "[Sox]";

+	mes "Sorry, Go back and talk to Nox.";

+	next;

+	set TSQ_CHK,0;

+	close;

+}