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, 47 insertions, 0 deletions

diff --git a/npc/guild/gldfunc_dunsw.txt b/npc/guild/gldfunc_dunsw.txt
new file mode 100644
index 000000000..f70eee705
--- /dev/null
+++ b/npc/guild/gldfunc_dunsw.txt
@@ -0,0 +1,47 @@
+//===== eAthena Script =======================================

+//= War of Emperium Guild Dungeon Switch Function

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

+//= jAthena - kalen (1.0)

+//= 1.1 by Akaru, ho|yAnge|X, and Valaris

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

+//= 1.3

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

+//= eAthena 0.1+; RO Episode 4+

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

+//= Switch that warps guild members to guild dungeon.

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

+//= Break down of arguments used in the function:

+//=   arg(0): name of guild castle.

+//=   arg(1): guild dungeon level.

+//=   arg(2): x1 coordinate for warp

+//=   arg(3): y1 coordinate for warp

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

+//= 1.2: All guild Dungeon Switch npcs use this function.[kobra_k88]

+//= 1.3 Reverted back. Don't listen to ... people at forums

+//	and check all bugs yourself!

+//	Some not competent people try to change gld_dun -> gld_dun0

+//	IT is wrong, because we already supple "02","03",etc as suffix.

+//	[Lupus]

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

+

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

+function	script	F_GldDunSw	{

+

+	mes "[ Mysterious Voice ]";

+	mes " ' Only brave warriors may lead the guild base.. '";

+	next;

+	mes "(There is little switch over here....... Would you like to pull the switch?)";

+	next;

+	menu "Yes",-,"No",M_No;

+

+		set @GID, GetCastleData(getarg(0)+".gat",1);

+		if (@GID == 0 || getcharid(2) != @GID) goto L_NotGLead;

+		warp "gld_dun"+getarg(1)+".gat",getarg(2),getarg(3);

+		end;

+

+		L_NotGLead:

+			mes "[ Mysterious Voice ]";

+			mes " ' ..... it seems that you are not brave enough...... ' ";

+	M_No:

+		return;

+}