- Massive EOL normalization & 'svn:eol-style native' flag setting for all txt/conf/h/c files.

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

1 files changed, 419 insertions, 419 deletions

diff --git a/npc/guild/gldfunc_manager.txt b/npc/guild/gldfunc_manager.txt
index bd45344b6..d42f37ed7 100644
--- a/npc/guild/gldfunc_manager.txt
+++ b/npc/guild/gldfunc_manager.txt
@@ -1,419 +1,419 @@
-//===== eAthena Script =======================================

-//= War of Emperium Guild Manager Function

-//===== By: ==================================================

-//= jAthena - kalen (1.0) & eAthena Team

-//===== Current Version: =====================================

-//= 1.6a

-//===== Compatible With: =====================================

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

-//===== Description: =========================================

-//= The Guild Manager allows the Guildmaster to invest in comerce

-//= and defense, hire guardians and kafras, go to the treasure room,

-//= and surrender the guild castle.

-//==============================================

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

-//=   arg(0): name of Castle Manager

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

-//=   arg(2): x1 coordinate for warp to treasure room

-//=   arg(3): y1 coordinate for warp to treasure room

-//=   arg(4): guild script suffix for kafra, Guardian scripts etc.

-//===== Additional Comments: =================================

-//= 1.31: Added support for Emsolute Develop [celest]

-//= 1.2: All Guild manager scripts use this function. Optimized Comerce and Defense investment. [kobra_k88]

-//= 1.2a Function now returns to script that called it. Added disablenpc line to surrender castle option to remove kafra upon surrender.[kobra_k88]

-//= 1.2b U can't surrender the base during WOE [Lupus]

-//= 1.2c Fixed issue of guardians hp not increasing upon defense investment.[kobra_k88]

-//= 1.3 Now you can't install Guardians during WOE [Lupus]

-//= 1.4 Remove surrender abbility (Was 100% custom as far as I can tell) [Kayla]

-//= 1.41 Fixed possible Economy investment overflow with Emsolute Develop learnt [Lupus]

-//= 1.5 Official Novice Castles Menu (u can't invest / hire guardians) [Lupus]

-//= 1.6 According to recent info u can re-install Guardians during WoE [Lupus]

-//= 1.6a Fix for guild manager recognizing [KarLaeda]

-//============================================================

-

-

-

-//==============================================

-function	script	F_GldManager	{

-

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

-	mes "[ "+getarg(0)+" ]";

-	if (@GID == 0){

-		mes "I am waiting for my master.  Brave adventurer, follow your destiny!";

-		return 0;

-	}

-	if (getcharid(2) != @GID){

-		mes "I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command! Hey! Your not even a part of the guild!!";

-		mes "Where are the guardians? Destroy these intruders!";

-		return 0;

-	}

-	if (strcharinfo(0) != getguildmaster(@GID)){

-		mes "You're not ^5533FF" + getguildmaster(@GID) + "^000000! I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command only";

-		return 0;

-	}

-

-	mes "Welcome Master ^5533FF" + getguildmaster(@GID) + "^000000 ! I will assist you in any way I can!";

-	next;

-

-	//Novice Castles. (we don't need ELSE here. Menu has direct labels)

-	if(getarg(1) == "nguild_prt" || getarg(1) == "nguild_alde" || getarg(1) == "nguild_gef" || getarg(1) == "nguild_pay" )

-		menu "Kafra Service Employment / Dismissal",M_Kaf, "Enter Treasure Room",M_Treas, "Cancel",M_End;

-

-	//Common WoE Castles	

-	menu 	"Guild Base Briefing",M_Base, "Commerce Investment",M_Comrc, "Defence Investment",M_Def, "Guardian Installation",M_Guard, 

-		"Kafra Service Employment / Dismissal",M_Kaf, "Enter Treasure Room",M_Treas, "Cancel",M_End;

-

-	//========================

-	M_Base:

-	//=========

-		mes "[ "+getarg(0)+" ]";

-		mes "Guild Base Investment Information.";

-		mes " ";

-		mes "Current Commerce Investment is : ^FF3322" + GetCastleData(getarg(1)+".gat",2) + "^000000 points.";

-		mes "^0000ff - You have invested " + GetCastleData(getarg(1)+".gat",4) + " times today.^000000";

-		next;

-		mes "[ "+getarg(0)+" ]";

-		mes "Current Defence Investment is : ^FF3322" + GetCastleData(getarg(1)+".gat",3)  + "^000000 points.";

-		mes "^0000ff- You have invested " +  GetCastleData(getarg(1)+".gat",5)  + " times today.^000000";

-		mes " ";

-		mes "That is about it.";

-		return 0;

-

-	//========================

-	M_Comrc:

-	//=========

-		set @TriggerE,GetCastleData(getarg(1)+".gat",4);

-		set @Economy,GetCastleData(getarg(1)+".gat",2);

-		if(@Economy < 8) set @eco_invest,10000;

-		if(@Economy >= 8) set @eco_invest,20000;

-		if(@Economy >= 16) set @eco_invest,40000;

-		if(@Economy >= 25) set @eco_invest,80000;

-		if(@Economy >= 34) set @eco_invest,160000;

-		if(@Economy >= 44) set @eco_invest,320000;

-		if(@Economy >= 54) set @eco_invest,640000;

-		if(@Economy >= 65) set @eco_invest,1280000;

-		if(@Economy >= 76) set @eco_invest,2560000;

-		if(@Economy >= 88) set @eco_invest,5120000;

-

-		mes "[ "+getarg(0)+" ]";

-		if(@TriggerE == 2){

-			mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level.";

- 			return 0;

-		}

-		if(@Economy >= 100){

-			mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000";

-	 		return 0;

-		}

-		mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods.";

-		mes "So an investment will be required if you're considering future growth.";

-		next;

-		mes "[ "+getarg(0)+" ]";

-		if(@TriggerE == 0) {

-			mes "You can invest up to two times a day, but the second time costs more";

-			mes "The needed investment amount is ^5533FF" + @eco_invest + "^000000 zeny.";

-		} else {

-			set @eco_invest,@eco_invest*4;

-			mes "You've already invested once today, but you can invest again at ^5533FF" + @eco_invest + "^000000 Zeny.";

-		}

-		next;

-		mes "[ "+getarg(0)+" ]";

-		mes "Would you like to invest?";

-		next;

-		menu "Invest Commerce.",-,"Cancel.",M_End;

-

-			mes "[ "+getarg(0)+" ]";

-			if(Zeny < @eco_invest){

-				mes "Master, you do not have enough money to invest.  Investment has been cancelled.";

-				return 0;

-			}

-			set Zeny,Zeny-@eco_invest;

-			SetCastleData getarg(1)+".gat",4,@TriggerE+1;

-			// if we learnt Emsolute Develop there's 50% chance to get +1 investment again

-			SetCastleData getarg(1)+".gat",2,@Economy + 1 + (getgdskilllv(@GID,10014)>0 && rand(100)>50 && @Economy<99);

-

-			mes "You have invested successfully.";

-			return 0;

-

-	//=========================

-	M_Def:

-	//========

-		set @TriggerD,GetCastleData(getarg(1)+".gat",5);

-		set @Defence,GetCastleData(getarg(1)+".gat",3);

-		if(@Defence < 8) set @def_invest,20000;

-		if(@Defence >= 8) set @def_invest,40000;

-		if(@Defence >= 16) set @def_invest,80000;

-		if(@Defence >= 25) set @def_invest,160000;

-		if(@Defence >= 34) set @def_invest,320000;

-		if(@Defence >= 44) set @def_invest,640000;

-		if(@Defence >= 54) set @def_invest,1280000;

-		if(@Defence >= 65) set @def_invest,2560000;

-		if(@Defence >= 76) set @def_invest,5120000;

-		if(@Defence >= 88) set @def_invest,10240000;

-

-		mes "[ "+getarg(0)+" ]";

-		if(@TriggerD == 2){

-			mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level.";

- 			return 0;

-		}

-		if(@Defence >= 100){

-			mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000";

-	 		return 0;

-		}

-		mes "If you improve investment of defence, the durability of our Guardians and the Emperium will increase.";

-		mes "So if you consider our future battles, an investment will be required.";

-		next;

-		mes "[ "+getarg(0)+" ]";

-		if(@TriggerD == 0) {

-			mes "You can invest up to two times a day, but the second time costs more";

-			mes "The needed investment amount is ^5533FF" + @def_invest + "^000000 zeny.";

-		} else {

-			set @def_invest,@def_invest*4;

-			mes "You've already invested once today, but you can invest again at ^5533FF" + @def_invest + "^000000 Zeny.";

-		}

-		next;

-		mes "[ "+getarg(0)+" ]";

-		mes "Would you like to invest?";

-		next;

-		menu "Invest Defence.",-, "Cancel",M_End;

-

-			mes "[ "+getarg(0)+" ]";

-			if(Zeny < @def_invest){

-				mes "Master, you do not have enough money to invest in Defence.  Defence investment has been cancelled.";

-				return 0;

-			}

-			set Zeny,Zeny-@def_invest;

-			SetCastleData getarg(1)+".gat",5,@TriggerD+1;

-			SetCastleData getarg(1)+".gat",3,@Defence+1;

-			// set new hp values for guardians

-			set @Defence, @Defence + 1;

-			set @AGuardian, 28634 + (@Defence*2000);

-			set @KGuardian, 30214 + (@Defence*2000);

-			set @SGuardian, 15670 + (@Defence*2000);

-			//set @AGuardian,strmobinfo(4,1285) + (@Defence*2000);

-			//set @KGuardian,strmobinfo(4,1286) + (@Defence*2000);

-			//set @SGuardian,strmobinfo(4,1287) + (@Defence*2000);

-			if (GetCastleData(getarg(1)+".gat",10) == 1) SetCastleData getarg(1)+".gat",18,@SGuardian;

-			if (GetCastleData(getarg(1)+".gat",11) == 1) SetCastleData getarg(1)+".gat",19,@SGuardian;

-			if (GetCastleData(getarg(1)+".gat",12) == 1) SetCastleData getarg(1)+".gat",20,@SGuardian;

-			if (GetCastleData(getarg(1)+".gat",13) == 1) SetCastleData getarg(1)+".gat",21,@AGuardian;

-			if (GetCastleData(getarg(1)+".gat",14) == 1) SetCastleData getarg(1)+".gat",22,@AGuardian;

-			if (GetCastleData(getarg(1)+".gat",15) == 1) SetCastleData getarg(1)+".gat",23,@KGuardian;

-			if (GetCastleData(getarg(1)+".gat",16) == 1) SetCastleData getarg(1)+".gat",24,@KGuardian;

-			if (GetCastleData(getarg(1)+".gat",17) == 1) SetCastleData getarg(1)+".gat",25,@KGuardian;

-

-			mes "You have invested successfully.";

-			return 0;

-

-	//=========================

-	M_Guard:

-	//=========

-		mes "[ "+getarg(0)+" ]";

-		if (getgdskilllv(@GID,10002) == 0){

-			mes "I'm sorry Master but you cannot install any guardians right now.  Your guild must learn the Guild skill ^5533FFGuardian Research^000000 first.";

-			mes "Guardian Installation has been cancelled.";

-			return 0;

-		}

-

-		set @Defence,GetCastleData(getarg(1)+".gat",3);

-		set @Guardian0,guardianinfo(0);

-		set @Guardian1,guardianinfo(1);

-		set @Guardian2,guardianinfo(2);

-		set @Guardian3,guardianinfo(3);

-		set @Guardian4,guardianinfo(4);

-		set @Guardian5,guardianinfo(5);

-		set @Guardian6,guardianinfo(6);

-		set @Guardian7,guardianinfo(7);

-		set @AGuardian, 28634 + (@Defence*2000);

-		set @KGuardian, 30214 + (@Defence*2000);

-		set @SGuardian, 15670 + (@Defence*2000);

-		//set @AGuardian,strmobinfo(4,1285) + (@Defence*2000);

-		//set @KGuardian,strmobinfo(4,1286) + (@Defence*2000);

-		//set @SGuardian,strmobinfo(4,1287) + (@Defence*2000);

-

-		//uncomment the following line to disable guardians Installation during WoE

-		//if(agitcheck(0) != 0) goto L_CantGuard;

-		mes "Would you like to install a guardian? Guardians will protect the guild base from enemies.";

-		mes "Please choose a guardian.";

-		next;

-	

-		menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1,

-			"Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2,

-			"Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3,

-			"Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4,

-			"Archer Guardian (" + @Guardian4 + "/" + @AGuardian + ")",L4_5,

-			"Knight Guardian (" + @Guardian5 + "/" + @KGuardian + ")",L4_6,

-			"Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7,

-			"Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8;

-	

-		L4_1:

-			if (GetCastleData(getarg(1)+".gat",10) == 1) goto L_GotGuard;

-			set @GDnum,10;

-			set @GDnum2,18;

-			set @GuardianHP,@SGuardian;

-			goto L4_9;

-		L4_2:

-			if (GetCastleData(getarg(1)+".gat",11) == 1) goto L_GotGuard;

-			set @GDnum,11;

-			set @GDnum2,19;

-			set @GuardianHP,@SGuardian;

-			goto L4_9;

-		L4_3:

-			if (GetCastleData(getarg(1)+".gat",12) == 1) goto L_GotGuard;

-			set @GDnum,12;

-			set @GDnum2,20;

-			set @GuardianHP,@SGuardian;

-			goto L4_9;

-		L4_4:

-			if (GetCastleData(getarg(1)+".gat",13) == 1) goto L_GotGuard;

-			set @GDnum,13;

-			set @GDnum2,21;

-			set @GuardianHP,@AGuardian;

-			goto L4_9;

-		L4_5:

-			if (GetCastleData(getarg(1)+".gat",14) == 1) goto L_GotGuard;

-			set @GDnum,14;

-			set @GDnum2,22;

-			set @GuardianHP,@AGuardian;

-			goto L4_9;

-		L4_6:

-			if (GetCastleData(getarg(1)+".gat",15) == 1) goto L_GotGuard;

-			set @GDnum,15;

-			set @GDnum2,23;

-			set @GuardianHP,@KGuardian;

-			goto L4_9;

-		L4_7:

-			if (GetCastleData(getarg(1)+".gat",16) == 1) goto L_GotGuard;

-			set @GDnum,16;

-			set @GDnum2,24;

-			set @GuardianHP,@KGuardian;

-			goto L4_9;

-		L4_8:

-			if (GetCastleData(getarg(1)+".gat",17) == 1) goto L_GotGuard;

-			set @GDnum,17;

-			set @GDnum2,25;

-			set @GuardianHP,@KGuardian;

-		L4_9:

-			mes "[ "+getarg(0)+" ]";

-			mes "Would you really like to install a guardian? You need ^5533FF10,000 zeny^000000 to install one....";

-			next;

-			menu "Install",-, "Cancel",M_End;

-

-				if (Zeny < 10000){

-					mes "[ "+getarg(0)+" ]";

-					mes "I'm sorry Master, but you do not have enough zeny for a Guardian.";

-					return 0;

-				}

-				set Zeny,Zeny-10000;

-				SetCastleData getarg(1)+".gat",@GDnum,1;

-				SetCastleData getarg(1)+".gat",@GDnum2,@GuardianHP;

-				return 1;

-

-		L_GotGuard:

-			mes "[ "+getarg(0)+" ]";

-			mes "Excuse me Master, but that guardian has already been installed.....";

-			emotion 4;

-			return 0;

-		L_CantGuard:

-			mes "Master.... don't you know that we can't install guardians during the War Of Emperium?!!";

-			emotion 4;

-			return 0;

-

-	//===========================

-	M_Kaf:

-	//======

-		mes "[ "+getarg(0)+" ]";

-		if (GetCastleData(getarg(1)+".gat",9) == 1) goto L_Dismiss;

-		if (getgdskilllv(@GID,10001) == 0){

-			mes "Master, you don't have a contract with the Kafra Service Company.";

-			mes "In order to hire a Kafra, you must first learn the Guild skill ^5533FFContract With Kafra^000000.";

-			return 0;

-		}

-

-		L_Hire:

-			mes "Would you like to employ the services of a Kafra? You will need ^5533FF10,000 Zeny^000000 to do so... ";

-			next;

-			menu "Employ Kafra.",-,"Cancel",sM_KafEnd;

-

-				mes "[ "+getarg(0)+" ]";

-				if (Zeny < 10000){

-					mes "Master, you do not have enough money to employ a Kafra. Employment has been cancelled.";

-					return 0;

-				}

-				set Zeny,Zeny-10000;

-				enablenpc "Kafra Service#"+getarg(4);

-				SetCastleData getarg(1)+".gat",9,1;

-				mes "You have created a contract with the Kafra Service Company.";

-				next;

-				cutin "kafra_01",2;

-				mes "[ Kafra Service ]";

-				mes "How do you do? I'm here to provide you with helpful service! I'll do the best I can to serve you.";

-				next;

-				cutin "kafra_01",255;

-				mes "[ "+getarg(0)+" ]";

-				//mes "Your employment contract lasts ^5533FF1 month^000000.  After this term is over you will have to create a new contract.";

-				mes "I think the Kafra Service will benefit our guild members.";

-				return 0;

-

-			sM_KafEnd:

-				mes "[ "+getarg(0)+" ]";

-				mes "As you wish Master.  But I suggest we get a Kafra as soon as possible!";

-				return 0;

-

-		L_Dismiss:

-			mes "Would you like to dismiss the current Kafra?";

-			next;

-			menu "Dismissal",-,"Cancel",sM_KafEnd2;

-

-				cutin "kafra_01",2;

-				mes "[ Kafra Service ]";

-				mes "Have I done anything wrong? If I did, will you please forgive me?";

-				next;

-				menu "Dismiss",-,"Cancel",ssM_KafEnd2;

-

-					mes "[ Kafra Service ]";

-					mes "It's unfortunate that I won't be able to serve your guild anymore....";

-					next;

-					disablenpc "Kafra Service#"+getarg(4);

-					SetCastleData getarg(1)+".gat",9,0;

-					cutin "kafra_01",255;

-					mes "[ "+getarg(0)+" ]";

-					mes "The Kafra has been dismissed.  But... we should really get a Kafra as soon as possible!";

-					return 0;

-				ssM_KafEnd2:

-					mes "[ Kafra Service ]";

-					mes "Thank you master, I'll do my best! ^^.";

-					cutin "kafra_01",255;

-					return 0;

-			sM_KafEnd2:

-				mes "[ "+getarg(0)+" ]";

-				mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us";

-				return 0;

-

-	//=========================

-	M_Treas:

-	//========

-		mes "[ "+getarg(0)+" ]";

-		mes "Would you to go to our Treasure Room? Only you, the Guild Master, are allowed to enter this room.";

-		next;

-		menu "Enter Treasure room.",-,"Cancel",sM_TresEnd;

-

-			mes "[ "+getarg(0)+" ]";

-			mes "Please follow me through the secret passage way.";

-			mes "You must pull down on the secret switch in order to get out.";

-			next;

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

-			return 0;

-		sM_TresEnd:

-			mes "[ "+getarg(0)+" ]";

-			mes "The goods are produced everyday.";

-			mes "You should get them whenever you can because they might dissapear if you take them at the wrong time.";

-			return 0;

-

-

-	//==========================

-	M_End:

-	//=======

-		mes "[ "+getarg(0)+" ]";

-		mes "As you wish, master.";

-		return 0;

-}

+//===== eAthena Script =======================================
+//= War of Emperium Guild Manager Function
+//===== By: ==================================================
+//= jAthena - kalen (1.0) & eAthena Team
+//===== Current Version: =====================================
+//= 1.6a
+//===== Compatible With: =====================================
+//= eAthena 0.1+; RO Episode 4+
+//===== Description: =========================================
+//= The Guild Manager allows the Guildmaster to invest in comerce
+//= and defense, hire guardians and kafras, go to the treasure room,
+//= and surrender the guild castle.
+//==============================================
+//= Break down of arguments used in the function:
+//=   arg(0): name of Castle Manager
+//=   arg(1): name of guild castle.
+//=   arg(2): x1 coordinate for warp to treasure room
+//=   arg(3): y1 coordinate for warp to treasure room
+//=   arg(4): guild script suffix for kafra, Guardian scripts etc.
+//===== Additional Comments: =================================
+//= 1.31: Added support for Emsolute Develop [celest]
+//= 1.2: All Guild manager scripts use this function. Optimized Comerce and Defense investment. [kobra_k88]
+//= 1.2a Function now returns to script that called it. Added disablenpc line to surrender castle option to remove kafra upon surrender.[kobra_k88]
+//= 1.2b U can't surrender the base during WOE [Lupus]
+//= 1.2c Fixed issue of guardians hp not increasing upon defense investment.[kobra_k88]
+//= 1.3 Now you can't install Guardians during WOE [Lupus]
+//= 1.4 Remove surrender abbility (Was 100% custom as far as I can tell) [Kayla]
+//= 1.41 Fixed possible Economy investment overflow with Emsolute Develop learnt [Lupus]
+//= 1.5 Official Novice Castles Menu (u can't invest / hire guardians) [Lupus]
+//= 1.6 According to recent info u can re-install Guardians during WoE [Lupus]
+//= 1.6a Fix for guild manager recognizing [KarLaeda]
+//============================================================
+
+
+
+//==============================================
+function	script	F_GldManager	{
+
+	set @GID, GetCastleData(getarg(1)+".gat",1);
+	mes "[ "+getarg(0)+" ]";
+	if (@GID == 0){
+		mes "I am waiting for my master.  Brave adventurer, follow your destiny!";
+		return 0;
+	}
+	if (getcharid(2) != @GID){
+		mes "I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command! Hey! Your not even a part of the guild!!";
+		mes "Where are the guardians? Destroy these intruders!";
+		return 0;
+	}
+	if (strcharinfo(0) != getguildmaster(@GID)){
+		mes "You're not ^5533FF" + getguildmaster(@GID) + "^000000! I am here to follow ^5533FF" + getguildmaster(@GID) + "^000000's command only";
+		return 0;
+	}
+
+	mes "Welcome Master ^5533FF" + getguildmaster(@GID) + "^000000 ! I will assist you in any way I can!";
+	next;
+
+	//Novice Castles. (we don't need ELSE here. Menu has direct labels)
+	if(getarg(1) == "nguild_prt" || getarg(1) == "nguild_alde" || getarg(1) == "nguild_gef" || getarg(1) == "nguild_pay" )
+		menu "Kafra Service Employment / Dismissal",M_Kaf, "Enter Treasure Room",M_Treas, "Cancel",M_End;
+
+	//Common WoE Castles	
+	menu 	"Guild Base Briefing",M_Base, "Commerce Investment",M_Comrc, "Defence Investment",M_Def, "Guardian Installation",M_Guard, 
+		"Kafra Service Employment / Dismissal",M_Kaf, "Enter Treasure Room",M_Treas, "Cancel",M_End;
+
+	//========================
+	M_Base:
+	//=========
+		mes "[ "+getarg(0)+" ]";
+		mes "Guild Base Investment Information.";
+		mes " ";
+		mes "Current Commerce Investment is : ^FF3322" + GetCastleData(getarg(1)+".gat",2) + "^000000 points.";
+		mes "^0000ff - You have invested " + GetCastleData(getarg(1)+".gat",4) + " times today.^000000";
+		next;
+		mes "[ "+getarg(0)+" ]";
+		mes "Current Defence Investment is : ^FF3322" + GetCastleData(getarg(1)+".gat",3)  + "^000000 points.";
+		mes "^0000ff- You have invested " +  GetCastleData(getarg(1)+".gat",5)  + " times today.^000000";
+		mes " ";
+		mes "That is about it.";
+		return 0;
+
+	//========================
+	M_Comrc:
+	//=========
+		set @TriggerE,GetCastleData(getarg(1)+".gat",4);
+		set @Economy,GetCastleData(getarg(1)+".gat",2);
+		if(@Economy < 8) set @eco_invest,10000;
+		if(@Economy >= 8) set @eco_invest,20000;
+		if(@Economy >= 16) set @eco_invest,40000;
+		if(@Economy >= 25) set @eco_invest,80000;
+		if(@Economy >= 34) set @eco_invest,160000;
+		if(@Economy >= 44) set @eco_invest,320000;
+		if(@Economy >= 54) set @eco_invest,640000;
+		if(@Economy >= 65) set @eco_invest,1280000;
+		if(@Economy >= 76) set @eco_invest,2560000;
+		if(@Economy >= 88) set @eco_invest,5120000;
+
+		mes "[ "+getarg(0)+" ]";
+		if(@TriggerE == 2){
+			mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level.";
+ 			return 0;
+		}
+		if(@Economy >= 100){
+			mes "^ff0000This Castle's commerce investment is already maxed at 100 points. You don't have to invest any further.^000000";
+	 		return 0;
+		}
+		mes "If you improve your Commerce Investment, the guild's productive power increases to produce more goods.";
+		mes "So an investment will be required if you're considering future growth.";
+		next;
+		mes "[ "+getarg(0)+" ]";
+		if(@TriggerE == 0) {
+			mes "You can invest up to two times a day, but the second time costs more";
+			mes "The needed investment amount is ^5533FF" + @eco_invest + "^000000 zeny.";
+		} else {
+			set @eco_invest,@eco_invest*4;
+			mes "You've already invested once today, but you can invest again at ^5533FF" + @eco_invest + "^000000 Zeny.";
+		}
+		next;
+		mes "[ "+getarg(0)+" ]";
+		mes "Would you like to invest?";
+		next;
+		menu "Invest Commerce.",-,"Cancel.",M_End;
+
+			mes "[ "+getarg(0)+" ]";
+			if(Zeny < @eco_invest){
+				mes "Master, you do not have enough money to invest.  Investment has been cancelled.";
+				return 0;
+			}
+			set Zeny,Zeny-@eco_invest;
+			SetCastleData getarg(1)+".gat",4,@TriggerE+1;
+			// if we learnt Emsolute Develop there's 50% chance to get +1 investment again
+			SetCastleData getarg(1)+".gat",2,@Economy + 1 + (getgdskilllv(@GID,10014)>0 && rand(100)>50 && @Economy<99);
+
+			mes "You have invested successfully.";
+			return 0;
+
+	//=========================
+	M_Def:
+	//========
+		set @TriggerD,GetCastleData(getarg(1)+".gat",5);
+		set @Defence,GetCastleData(getarg(1)+".gat",3);
+		if(@Defence < 8) set @def_invest,20000;
+		if(@Defence >= 8) set @def_invest,40000;
+		if(@Defence >= 16) set @def_invest,80000;
+		if(@Defence >= 25) set @def_invest,160000;
+		if(@Defence >= 34) set @def_invest,320000;
+		if(@Defence >= 44) set @def_invest,640000;
+		if(@Defence >= 54) set @def_invest,1280000;
+		if(@Defence >= 65) set @def_invest,2560000;
+		if(@Defence >= 76) set @def_invest,5120000;
+		if(@Defence >= 88) set @def_invest,10240000;
+
+		mes "[ "+getarg(0)+" ]";
+		if(@TriggerD == 2){
+			mes "^ff0000You have already invested twice today, and that's the limit.^000000 I'm expecting to see our riches grow at a high level.";
+ 			return 0;
+		}
+		if(@Defence >= 100){
+			mes "^ff0000This Castle's Defence Investment is already maxed at 100 points. You don't have to invest any further.^000000";
+	 		return 0;
+		}
+		mes "If you improve investment of defence, the durability of our Guardians and the Emperium will increase.";
+		mes "So if you consider our future battles, an investment will be required.";
+		next;
+		mes "[ "+getarg(0)+" ]";
+		if(@TriggerD == 0) {
+			mes "You can invest up to two times a day, but the second time costs more";
+			mes "The needed investment amount is ^5533FF" + @def_invest + "^000000 zeny.";
+		} else {
+			set @def_invest,@def_invest*4;
+			mes "You've already invested once today, but you can invest again at ^5533FF" + @def_invest + "^000000 Zeny.";
+		}
+		next;
+		mes "[ "+getarg(0)+" ]";
+		mes "Would you like to invest?";
+		next;
+		menu "Invest Defence.",-, "Cancel",M_End;
+
+			mes "[ "+getarg(0)+" ]";
+			if(Zeny < @def_invest){
+				mes "Master, you do not have enough money to invest in Defence.  Defence investment has been cancelled.";
+				return 0;
+			}
+			set Zeny,Zeny-@def_invest;
+			SetCastleData getarg(1)+".gat",5,@TriggerD+1;
+			SetCastleData getarg(1)+".gat",3,@Defence+1;
+			// set new hp values for guardians
+			set @Defence, @Defence + 1;
+			set @AGuardian, 28634 + (@Defence*2000);
+			set @KGuardian, 30214 + (@Defence*2000);
+			set @SGuardian, 15670 + (@Defence*2000);
+			//set @AGuardian,strmobinfo(4,1285) + (@Defence*2000);
+			//set @KGuardian,strmobinfo(4,1286) + (@Defence*2000);
+			//set @SGuardian,strmobinfo(4,1287) + (@Defence*2000);
+			if (GetCastleData(getarg(1)+".gat",10) == 1) SetCastleData getarg(1)+".gat",18,@SGuardian;
+			if (GetCastleData(getarg(1)+".gat",11) == 1) SetCastleData getarg(1)+".gat",19,@SGuardian;
+			if (GetCastleData(getarg(1)+".gat",12) == 1) SetCastleData getarg(1)+".gat",20,@SGuardian;
+			if (GetCastleData(getarg(1)+".gat",13) == 1) SetCastleData getarg(1)+".gat",21,@AGuardian;
+			if (GetCastleData(getarg(1)+".gat",14) == 1) SetCastleData getarg(1)+".gat",22,@AGuardian;
+			if (GetCastleData(getarg(1)+".gat",15) == 1) SetCastleData getarg(1)+".gat",23,@KGuardian;
+			if (GetCastleData(getarg(1)+".gat",16) == 1) SetCastleData getarg(1)+".gat",24,@KGuardian;
+			if (GetCastleData(getarg(1)+".gat",17) == 1) SetCastleData getarg(1)+".gat",25,@KGuardian;
+
+			mes "You have invested successfully.";
+			return 0;
+
+	//=========================
+	M_Guard:
+	//=========
+		mes "[ "+getarg(0)+" ]";
+		if (getgdskilllv(@GID,10002) == 0){
+			mes "I'm sorry Master but you cannot install any guardians right now.  Your guild must learn the Guild skill ^5533FFGuardian Research^000000 first.";
+			mes "Guardian Installation has been cancelled.";
+			return 0;
+		}
+
+		set @Defence,GetCastleData(getarg(1)+".gat",3);
+		set @Guardian0,guardianinfo(0);
+		set @Guardian1,guardianinfo(1);
+		set @Guardian2,guardianinfo(2);
+		set @Guardian3,guardianinfo(3);
+		set @Guardian4,guardianinfo(4);
+		set @Guardian5,guardianinfo(5);
+		set @Guardian6,guardianinfo(6);
+		set @Guardian7,guardianinfo(7);
+		set @AGuardian, 28634 + (@Defence*2000);
+		set @KGuardian, 30214 + (@Defence*2000);
+		set @SGuardian, 15670 + (@Defence*2000);
+		//set @AGuardian,strmobinfo(4,1285) + (@Defence*2000);
+		//set @KGuardian,strmobinfo(4,1286) + (@Defence*2000);
+		//set @SGuardian,strmobinfo(4,1287) + (@Defence*2000);
+
+		//uncomment the following line to disable guardians Installation during WoE
+		//if(agitcheck(0) != 0) goto L_CantGuard;
+		mes "Would you like to install a guardian? Guardians will protect the guild base from enemies.";
+		mes "Please choose a guardian.";
+		next;
+	
+		menu "Soldier Guardian (" + @Guardian0 + "/" + @SGuardian + ")",L4_1,
+			"Soldier Guardian (" + @Guardian1 + "/" + @SGuardian + ")",L4_2,
+			"Soldier Guardian (" + @Guardian2 + "/" + @SGuardian + ")",L4_3,
+			"Archer Guardian (" + @Guardian3 + "/" + @AGuardian + ")",L4_4,
+			"Archer Guardian (" + @Guardian4 + "/" + @AGuardian + ")",L4_5,
+			"Knight Guardian (" + @Guardian5 + "/" + @KGuardian + ")",L4_6,
+			"Knight Guardian (" + @Guardian6 + "/" + @KGuardian + ")",L4_7,
+			"Knight Guardian (" + @Guardian7 + "/" + @KGuardian + ")",L4_8;
+	
+		L4_1:
+			if (GetCastleData(getarg(1)+".gat",10) == 1) goto L_GotGuard;
+			set @GDnum,10;
+			set @GDnum2,18;
+			set @GuardianHP,@SGuardian;
+			goto L4_9;
+		L4_2:
+			if (GetCastleData(getarg(1)+".gat",11) == 1) goto L_GotGuard;
+			set @GDnum,11;
+			set @GDnum2,19;
+			set @GuardianHP,@SGuardian;
+			goto L4_9;
+		L4_3:
+			if (GetCastleData(getarg(1)+".gat",12) == 1) goto L_GotGuard;
+			set @GDnum,12;
+			set @GDnum2,20;
+			set @GuardianHP,@SGuardian;
+			goto L4_9;
+		L4_4:
+			if (GetCastleData(getarg(1)+".gat",13) == 1) goto L_GotGuard;
+			set @GDnum,13;
+			set @GDnum2,21;
+			set @GuardianHP,@AGuardian;
+			goto L4_9;
+		L4_5:
+			if (GetCastleData(getarg(1)+".gat",14) == 1) goto L_GotGuard;
+			set @GDnum,14;
+			set @GDnum2,22;
+			set @GuardianHP,@AGuardian;
+			goto L4_9;
+		L4_6:
+			if (GetCastleData(getarg(1)+".gat",15) == 1) goto L_GotGuard;
+			set @GDnum,15;
+			set @GDnum2,23;
+			set @GuardianHP,@KGuardian;
+			goto L4_9;
+		L4_7:
+			if (GetCastleData(getarg(1)+".gat",16) == 1) goto L_GotGuard;
+			set @GDnum,16;
+			set @GDnum2,24;
+			set @GuardianHP,@KGuardian;
+			goto L4_9;
+		L4_8:
+			if (GetCastleData(getarg(1)+".gat",17) == 1) goto L_GotGuard;
+			set @GDnum,17;
+			set @GDnum2,25;
+			set @GuardianHP,@KGuardian;
+		L4_9:
+			mes "[ "+getarg(0)+" ]";
+			mes "Would you really like to install a guardian? You need ^5533FF10,000 zeny^000000 to install one....";
+			next;
+			menu "Install",-, "Cancel",M_End;
+
+				if (Zeny < 10000){
+					mes "[ "+getarg(0)+" ]";
+					mes "I'm sorry Master, but you do not have enough zeny for a Guardian.";
+					return 0;
+				}
+				set Zeny,Zeny-10000;
+				SetCastleData getarg(1)+".gat",@GDnum,1;
+				SetCastleData getarg(1)+".gat",@GDnum2,@GuardianHP;
+				return 1;
+
+		L_GotGuard:
+			mes "[ "+getarg(0)+" ]";
+			mes "Excuse me Master, but that guardian has already been installed.....";
+			emotion 4;
+			return 0;
+		L_CantGuard:
+			mes "Master.... don't you know that we can't install guardians during the War Of Emperium?!!";
+			emotion 4;
+			return 0;
+
+	//===========================
+	M_Kaf:
+	//======
+		mes "[ "+getarg(0)+" ]";
+		if (GetCastleData(getarg(1)+".gat",9) == 1) goto L_Dismiss;
+		if (getgdskilllv(@GID,10001) == 0){
+			mes "Master, you don't have a contract with the Kafra Service Company.";
+			mes "In order to hire a Kafra, you must first learn the Guild skill ^5533FFContract With Kafra^000000.";
+			return 0;
+		}
+
+		L_Hire:
+			mes "Would you like to employ the services of a Kafra? You will need ^5533FF10,000 Zeny^000000 to do so... ";
+			next;
+			menu "Employ Kafra.",-,"Cancel",sM_KafEnd;
+
+				mes "[ "+getarg(0)+" ]";
+				if (Zeny < 10000){
+					mes "Master, you do not have enough money to employ a Kafra. Employment has been cancelled.";
+					return 0;
+				}
+				set Zeny,Zeny-10000;
+				enablenpc "Kafra Service#"+getarg(4);
+				SetCastleData getarg(1)+".gat",9,1;
+				mes "You have created a contract with the Kafra Service Company.";
+				next;
+				cutin "kafra_01",2;
+				mes "[ Kafra Service ]";
+				mes "How do you do? I'm here to provide you with helpful service! I'll do the best I can to serve you.";
+				next;
+				cutin "kafra_01",255;
+				mes "[ "+getarg(0)+" ]";
+				//mes "Your employment contract lasts ^5533FF1 month^000000.  After this term is over you will have to create a new contract.";
+				mes "I think the Kafra Service will benefit our guild members.";
+				return 0;
+
+			sM_KafEnd:
+				mes "[ "+getarg(0)+" ]";
+				mes "As you wish Master.  But I suggest we get a Kafra as soon as possible!";
+				return 0;
+
+		L_Dismiss:
+			mes "Would you like to dismiss the current Kafra?";
+			next;
+			menu "Dismissal",-,"Cancel",sM_KafEnd2;
+
+				cutin "kafra_01",2;
+				mes "[ Kafra Service ]";
+				mes "Have I done anything wrong? If I did, will you please forgive me?";
+				next;
+				menu "Dismiss",-,"Cancel",ssM_KafEnd2;
+
+					mes "[ Kafra Service ]";
+					mes "It's unfortunate that I won't be able to serve your guild anymore....";
+					next;
+					disablenpc "Kafra Service#"+getarg(4);
+					SetCastleData getarg(1)+".gat",9,0;
+					cutin "kafra_01",255;
+					mes "[ "+getarg(0)+" ]";
+					mes "The Kafra has been dismissed.  But... we should really get a Kafra as soon as possible!";
+					return 0;
+				ssM_KafEnd2:
+					mes "[ Kafra Service ]";
+					mes "Thank you master, I'll do my best! ^^.";
+					cutin "kafra_01",255;
+					return 0;
+			sM_KafEnd2:
+				mes "[ "+getarg(0)+" ]";
+				mes "Master, I think you should keep the current Kafra Service because she is already trying her best to serve us";
+				return 0;
+
+	//=========================
+	M_Treas:
+	//========
+		mes "[ "+getarg(0)+" ]";
+		mes "Would you to go to our Treasure Room? Only you, the Guild Master, are allowed to enter this room.";
+		next;
+		menu "Enter Treasure room.",-,"Cancel",sM_TresEnd;
+
+			mes "[ "+getarg(0)+" ]";
+			mes "Please follow me through the secret passage way.";
+			mes "You must pull down on the secret switch in order to get out.";
+			next;
+			warp getarg(1)+".gat",getarg(2),getarg(3);
+			return 0;
+		sM_TresEnd:
+			mes "[ "+getarg(0)+" ]";
+			mes "The goods are produced everyday.";
+			mes "You should get them whenever you can because they might dissapear if you take them at the wrong time.";
+			return 0;
+
+
+	//==========================
+	M_End:
+	//=======
+		mes "[ "+getarg(0)+" ]";
+		mes "As you wish, master.";
+		return 0;
+}