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

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

+//= War of Emperium Guild Flags Function

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

+//= jAthena - kalen (1.0)

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

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

+//= 1.3a

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

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

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

+//= Flags display messages stating whether or not a guild castle has been captured.

+//= Allows the guild members to return to a captured castle.

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

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

+//=   arg(0): name of City.

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

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

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

+//=   arg(4): Teleportable (0/1) 

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

+//= v1.2: All Guild flags scripts use this function. [kobra_k88]

+//= v1.3: Can now only flag in from outside the castle [Kayla]

+//= v1.3a: Implemented k3dt's exploit fix [Vicious]

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

+

+function	script	F_Flags	{

+

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

+	if (@GID != 0) goto L_Startg;

+

+	mes "[ Edict of the Divine Rune Midgard Kingdom of " + getarg(0) + " ]";

+	mes " ";

+	mes "1. Honoring the ordinance of the Divine Rune Midgard Kingdom of " + getarg(0) + ", this guild base has not been taken by any guild yet";

+	mes " ";

+	mes "2. In order to take this guild base, you must defeat all the guardians that are protecting the guild base and eliminate the Emperium.";

+	return;

+L_Startg:

+	if ((getcharid(2) == @GID) && (getarg(4) == 1)) goto L_Startg2;

+	mes "[ Edict of the Divine Rune Midgard Kingdom of "+ getarg(0) +" ]";

+	mes " ";

+	mes "1. Honoring the ordinance of the";

+	mes "Divine Rune Midgard Kingdom of ";

+	mes getarg(0) +", we approve that this";

+	mes "base is in the private possession";

+	mes "of the ^ff0000" + GetGuildName(@GID) + "^000000 guild.";

+	mes " ";

+	mes "2. The guild master of the";

+	mes "^ff0000"+ GetGuildName(@GID) + "^000000 guild, is ^0000FF" + GetGuildMaster(@GID) + "^000000.";

+	mes "If anyone objects to that, raise your sword to honor yourself.";

+	return;

+L_Startg2:

+	mes "[ Ringing Voice ]";

+	mes "Brave one... would you return to your honorable be?";

+	next;

+	menu "Return.",M_Enter,"Cancel.",-;

+	return;

+

+	M_Enter:

+		if (getcharid(2) == GetCastleData(getarg(1)+".gat",1)) warp getarg(1)+".gat",getarg(2),getarg(3);

+		return;

+}