Przeglądaj źródła

- Guild folder update.
* Partially rewrote all castle files and updated all Castle flags, NPC's and warp coordinations to latest available official file.
* Renamed agit_template to agit_main and also updated it to latest available official file.
* Removed the Treasure Room Protection from agit_template and separated it into another file which will now be known as trs_rp.txt
- trs_rp.txt will allow that only the Guildleader can be in the Treasure Room, if you want to disable this protection just set an // in scripts_guild.conf before npc: npc/guild/trs_rp.txt .
- Moved payon castle map warps from warps/cities/payon.txt to warps/guild/guildcastles.txt .

git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@15923 54d463be-8e91-2dee-dedb-b68131a5f0ec

masao87 13 lat temu
rodzic
commit
49459d342e

+ 1348 - 1369
npc/guild/agit_template.txt → npc/guild/agit_main.txt

@@ -1,1369 +1,1348 @@
-//===== rAthena Script =======================================
-//= War of Emperium Guild Template File
-//===== By: ==================================================
-//= L0ne_W0lf
-//===== Current Version: =====================================
-//= 1.8
-//===== Compatible With: =====================================
-//= rAthena SVN
-//===== Description: =========================================
-//= [ Aegis Conversion]
-//= ----------------------------------------------------------
-//= - THIS FILE IS REQUIRED FOR GUILD CASTLES TO FUNCTION.
-//= ----------------------------------------------------------
-//= - Enables AGIT Manager inside Guild Strongholds.
-//=   Visible Name required: Agit
-//=   Manages the various functions used in and out of WoE.
-//=
-//= - Enables Stewards inside Guild Strongholds which let's
-//=   the guild master invest in Defense and Economy, and
-//=   to summon guardians, a Kafra, and enter master's room.
-//=
-//= - Guardian Spawning Template
-//=   Visible Name required: Guardian
-//=   Spawn guardians when guild castle data is recieved.
-//=
-//= - Enables Kafra Services inside Guild Strongholds.
-//=   Visible Name required: Kafra Staff
-//=   Storage, Guild Storage, Teleport Service, Cart rental.
-//=
-//= - Treasure Room Protection and Chest spawning.
-//=   Chests will NOT be saved anymore in the event of crashes.
-//=   Treasures will NOT spawn on a location that already has
-//=   treasure chest spawned.
-//===== Additional Comments: =================================
-//= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Daily investement will now be reset. [L0ne_W0lf]
-//=     Template will no longer try to spawn chests.
-//= 1.2 Fixed Eco Invest option charging twice. [L0ne_W0lf]
-//= 1.3 Fixed a loading flag emblem for Payon 1. [L0ne_W0lf]
-//=     Fixed two typos regarding Guild Steward name.
-//= 1.4 Fixed a typo in defense investment. [L0ne_W0lf]
-//= 1.5 Fixed spawn point of the emperium in Payon 1. [L0ne_W0lf]
-//=     Double-investing doubles the price now.
-//= 1.6 Corrected Zeny check when summoning guardians. [L0ne_W0lf]
-//=     Corrected cost for investing, thanks to Ai4rei.
-//=     Second invest is now quadruple the value of the first
-//=     Investing now happens at the turn of the day.
-//= 1.6a Corrected conditions in the new investing blocks. [L0ne_W0lf]
-//= 1.6b Moved where investments are added to eco/def. [L0ne_W0lf]
-//= 1.7 Updated Agitbreak announcements, added bc_woe [L0ne_W0lf]
-//=     and added extended anouncement format for mapannounce.
-//= 1.8 Fixed a possible exploit in guild castle investment. [Brian]
-//============================================================
-
-// AGIT Manager Template
-//============================================================
--	script	Gld_Agit_Manager::Gld_Agit_Manager	-1,{
-	end;
-
-// War of Emperium has started.
-OnAgitStart:
-	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
-	MapRespawnGuildID strnpcinfo(2),GetCastleData(strnpcinfo(2),1),2;
-	GvgOn strnpcinfo(2);
-
-// Spawn (fall through), or respawn the Emperium once it has been broken.
-OnStartArena:
-	// OnAgitStart will fall through and spawn the Emperium.
-	if (strnpcinfo(2) == "aldeg_cas01") { setarray .@emproom[0],216,23; }
-	else if (strnpcinfo(2) == "aldeg_cas02") { setarray .@emproom[0],213,23; }
-	else if (strnpcinfo(2) == "aldeg_cas03") { setarray .@emproom[0],205,31; }
-	else if (strnpcinfo(2) == "aldeg_cas04") { setarray .@emproom[0],36,217; }
-	else if (strnpcinfo(2) == "aldeg_cas05") { setarray .@emproom[0],27,101; }
-	else if (strnpcinfo(2) == "gefg_cas01") { setarray .@emproom[0],197,181; }
-	else if (strnpcinfo(2) == "gefg_cas02") { setarray .@emproom[0],176,178; }
-	else if (strnpcinfo(2) == "gefg_cas03") { setarray .@emproom[0],244,166; }
-	else if (strnpcinfo(2) == "gefg_cas04") { setarray .@emproom[0],174,177; }
-	else if (strnpcinfo(2) == "gefg_cas05") { setarray .@emproom[0],194,184; }
-	else if (strnpcinfo(2) == "payg_cas01") { setarray .@emproom[0],139,139; }
-	else if (strnpcinfo(2) == "payg_cas02") { setarray .@emproom[0],38,25; }
-	else if (strnpcinfo(2) == "payg_cas03") { setarray .@emproom[0],269,265; }
-	else if (strnpcinfo(2) == "payg_cas04") { setarray .@emproom[0],270,28; }
-	else if (strnpcinfo(2) == "payg_cas05") { setarray .@emproom[0],30,30; }
-	else if (strnpcinfo(2) == "prtg_cas01") { setarray .@emproom[0],197,197; }
-	else if (strnpcinfo(2) == "prtg_cas02") { setarray .@emproom[0],157,174; }
-	else if (strnpcinfo(2) == "prtg_cas03") { setarray .@emproom[0],16,220; }
-	else if (strnpcinfo(2) == "prtg_cas04") { setarray .@emproom[0],291,14; }
-	else if (strnpcinfo(2) == "prtg_cas05") { setarray .@emproom[0],266,266; }
-	// Add custom Guild Castles here.
-	else {
-		end;
-	}
-	if (!mobcount(strnpcinfo(2),"Agit#"+strnpcinfo(2)+"::OnAgitBreak")) {
-		monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Emperium",1288,1,"Agit#"+strnpcinfo(2)+"::OnAgitBreak";
-	}
-	end;
-
-// The Emperium has been broken.
-OnAgitBreak:
-	set .@GID,getcharid(2);
-	// Show and log error if an unguilded player breaks the Emperium. (Should NEVER happen)
-	if (.@GID <= 0) {
-		set .@notice$,"Character "+strcharinfo(0)+" ("+getcharid(0)+") broke the Emperium in Castle: "+strnpcinfo(2)+" while guildless. No data will be saved and Emperium respawned.";
- 		logmes .@notice$; debugmes .@notice$;
-		donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena";
-		end;
-	}
-	// Adjust Economy Invest Level for Castle
-	set .@Economy,GetCastleData(strnpcinfo(2),2) - 5;
-	if (.@Economy < 0) set .@Economy, 0;
-	SetCastleData strnpcinfo(2), 2, .@Economy;
-	// Adjust Defense Invest Level for Castle
-	set .@Defence,GetCastleData(strnpcinfo(2),3) - 5;
-	if (.@Defence < 0) set .@Defence, 0;
-	SetCastleData strnpcinfo(2), 3, .@Defence;
-
-	// Set new Castle Occupant
-	SetCastleData strnpcinfo(2),1, .@GID;
-
-	// Announce that the Emperium is destroyed, and respawn all but new castle-occupants.
-	mapannounce strnpcinfo(2),"The emperium has been destroyed.",bc_map|bc_woe,"0x00CCFF",FW_NORMAL,12;
-	MapRespawnGuildID strnpcinfo(2),.@GID,2;
-
-	// Refresh castle data, disable Kafra and reset Invest information.
-	donpcevent strnpcinfo(0)+"::OnRecvCastle";
-	disablenpc "Kafra Staff#"+strnpcinfo(2);
-	for( set .@i, 4; .@i <= 9; set .@i, .@i+1 ) {
-		SetCastleData strnpcinfo(2), .@i, 0;
-	}
-	// Erase Guardian Database information if the new owners do not have Guardian Research.
-	if( getgdskilllv(.@GID,10002) == 0 ) {
-		for( set .@i, 10; .@i <= 17; set .@i, .@i+1 ) {
-			SetCastleData strnpcinfo(2), .@i, 0;
-		}
-	}
-	// Respawn the Emperium, and display new owners.
-	sleep 500; // Slow down script execution slightly.
-	if( agitcheck() )
-		donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena";
-	sleep 7000;
-	announce "The [" + getcastlename(strnpcinfo(2)) + "] castle has been conquered by the [" + getguildName(.@GID) + "] guild.",bc_all|bc_woe;
-	end;
-
-// War of Emperium has ended.
-OnAgitEnd:
-	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
-	GvgOff strnpcinfo(2);
-	// If the castle has no owner at the end of WoE, do not kill Emperium.
-	if (GetCastleData(strnpcinfo(2),1)) {
-		KillMonster strnpcinfo(2),"Agit#"+strnpcinfo(2)+"::OnAgitBreak";
-	}
-	end;
-
-// Occupying Guild has been disbanded.
-OnGuildBreak:
-	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
-	// Kill guardians, disable the Kafra, and set owner to 0.
-	killmonster strnpcinfo(2),"Guardian#"+strnpcinfo(2)+"::OnGuardianDied";
-	disablenpc "Kafra Staff#"+strnpcinfo(2);
-	SetCastleData strnpcinfo(2),0,0;
-	// Wait before refreshing guild information.
-	sleep 7000;
-	Announce "Guild Base [" + GetCastleName(strnpcinfo(2)) + "] has been abandoned.",0;
-	donpcevent strnpcinfo(0)+"::OnRecvCastle";
-	end;
-
-OnAgitInit:
-OnRecvCastle:
-	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
-	// Spawn Monsters if the castle is empty.
-	set .@GID, GetCastleData(strnpcinfo(2),1);
-	if (.@GID == 0) {
-		killmonsterall strnpcinfo(2);
-		if (compare(strnpcinfo(2),"aldeg")) {
-			// Normal Spawns
-			monster strnpcinfo(2),0,0,"Evil Druid",1117,10;
-			monster strnpcinfo(2),0,0,"Khalitzburg",1132,4;
-			monster strnpcinfo(2),0,0,"Abysmal Knight",1219,2;
-			monster strnpcinfo(2),0,0,"Executioner",1205,1;
-			monster strnpcinfo(2),0,0,"Penomena",1216,10;
-			monster strnpcinfo(2),0,0,"Alarm",1193,18;
-			monster strnpcinfo(2),0,0,"Clock",1269,9;
-			monster strnpcinfo(2),0,0,"Raydric Archer",1276,7;
-			monster strnpcinfo(2),0,0,"Wanderer",1208,3;
-			monster strnpcinfo(2),0,0,"Alice",1275,1;
-			monster strnpcinfo(2),0,0,"Bloody Knight",1268,1;
-			monster strnpcinfo(2),0,0,"Dark Lord",1272,1;
-			// Set Emperium room spawn coordinates and spawn monsters.
-			if (strnpcinfo(2) == "aldeg_cas01") { setarray .@emproom[0],216,23; }
-			else if (strnpcinfo(2) == "aldeg_cas02") { setarray .@emproom[0],213,23; }
-			else if (strnpcinfo(2) == "aldeg_cas03") { setarray .@emproom[0],205,31; }
-			else if (strnpcinfo(2) == "aldeg_cas04") { setarray .@emproom[0],36,217; }
-			else if (strnpcinfo(2) == "aldeg_cas05") { setarray .@emproom[0],27,101; }
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Dark Lord",1272,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Tower Keeper",1270,4;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Bloody Knight",1268,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Abysmal Knight",1219,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Raydric Archer",1276,5;
-		}
-		else if (compare(strnpcinfo(2),"gefg")) {
-			// Normal Spawns
-			monster strnpcinfo(2),0,0,"Evil Druid",1117,10;
-			monster strnpcinfo(2),0,0,"Wind Ghost",1263,11;
-			monster strnpcinfo(2),0,0,"Bathory",1102,10;
-			monster strnpcinfo(2),0,0,"Jakk",1130,10;
-			monster strnpcinfo(2),0,0,"Marduk",1140,20;
-			monster strnpcinfo(2),0,0,"Raydric",1163,9;
-			monster strnpcinfo(2),0,0,"Alice",1275,1;
-			monster strnpcinfo(2),0,0,"Abysmal Knight",1219,1;
-			monster strnpcinfo(2),0,0,"Moonlight Flower",1150,1;
-			monster strnpcinfo(2),0,0,"Phreeoni",1159,1;
-			// Set Emperium room spawn coordinates and spawn monsters.
-			if (strnpcinfo(2) == "gefg_cas01") { setarray .@emproom[0],197,181; }
-			else if (strnpcinfo(2) == "gefg_cas02") { setarray .@emproom[0],176,178; }
-			else if (strnpcinfo(2) == "gefg_cas03") { setarray .@emproom[0],244,166; }
-			else if (strnpcinfo(2) == "gefg_cas04") { setarray .@emproom[0],174,177; }
-			else if (strnpcinfo(2) == "gefg_cas05") { setarray .@emproom[0],194,184; }
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Mysteltainn",1203,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Orc Hero",1087,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"High Orc",1213,10;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Orc Archer",1189,10;
-		}
-		else if (compare(strnpcinfo(2),"payg")) {
-			// Normal Spawns
-			monster strnpcinfo(2),0,0,"Greatest General",1277,9;
-			monster strnpcinfo(2),0,0,"Wanderer",1208,10;
-			monster strnpcinfo(2),0,0,"Mutant Dragonoid",1262,5;
-			monster strnpcinfo(2),0,0,"Bathory",1102,5;
-			monster strnpcinfo(2),0,0,"Moonlight Flower",1150,1;
-			monster strnpcinfo(2),0,0,"Eddga",1115,1;
-			monster strnpcinfo(2),0,0,"Horong",1129,11;
-			monster strnpcinfo(2),0,0,"Raydric Archer",1276,5;
-			monster strnpcinfo(2),0,0,"Kobold Archer",1282,4;
-			monster strnpcinfo(2),0,0,"Gargoyle",1253,5;
-			// Set Emperium room spawn coordinates and spawn monsters.
-			if (strnpcinfo(2) == "payg_cas01") { setarray .@emproom[0],139,139; }
-			else if (strnpcinfo(2) == "payg_cas02") { setarray .@emproom[0],38,25; }
-			else if (strnpcinfo(2) == "payg_cas03") { setarray .@emproom[0],269,265; }
-			else if (strnpcinfo(2) == "payg_cas04") { setarray .@emproom[0],270,28; }
-			else if (strnpcinfo(2) == "payg_cas05") { setarray .@emproom[0],30,30; }
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Moonlight Flower",1150,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Eddga",1115,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Wanderer",1208,6;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Raydric Archer",1276,5;
-		}
-		else if (compare(strnpcinfo(2),"prtg")) {
-			// Normal Spawns
-			monster strnpcinfo(2),0,0,"Raydric",1163,1;
-			monster strnpcinfo(2),0,0,"Khalitzburg",1132,10;
-			monster strnpcinfo(2),0,0,"Abysmal Knight",1219,5;
-			monster strnpcinfo(2),0,0,"Bloody Knight",1268,5;
-			monster strnpcinfo(2),0,0,"Stormy Knight",1251,1;
-			monster strnpcinfo(2),0,0,"Hatii",1252,1;
-			monster strnpcinfo(2),0,0,"Raydric Archer",1276,5;
-			monster strnpcinfo(2),0,0,"Gryphon",1259,2;
-			monster strnpcinfo(2),0,0,"Chimera",1283,3;
-			monster strnpcinfo(2),0,0,"Alice",1275,1;
-			monster strnpcinfo(2),0,0,"Zealotus",1200,1;
-			// Set Emperium room spawn coordinates and spawn monsters.
-			if (strnpcinfo(2) == "prtg_cas01") { setarray .@emproom[0],197,197; }
-			else if (strnpcinfo(2) == "prtg_cas02") { setarray .@emproom[0],157,174; }
-			else if (strnpcinfo(2) == "prtg_cas03") { setarray .@emproom[0],16,220; }
-			else if (strnpcinfo(2) == "prtg_cas04") { setarray .@emproom[0],291,14; }
-			else if (strnpcinfo(2) == "prtg_cas05") { setarray .@emproom[0],266,266; }
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Guardian Knight",1268,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Guardian Master",1251,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Hatii",1252,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Guardian Knight",1219,1;
-			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Raydric Archer",1276,5;
-		}
-		// Add custom Guild Castles here.
-		else {
-			end;
-		}
-		donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena";
-		// Disable Kafra Staff...
-		disablenpc "Kafra Staff#"+strnpcinfo(2);
-		end;
-	}
-	else {
-		// Otherwise place the guild emblem on flags.
-		if (strnpcinfo(2) == "aldeg_cas01") { donpcevent "::OnRecvCastleA01"; }
-		else if (strnpcinfo(2) == "aldeg_cas02") { donpcevent "::OnRecvCastleA02"; }
-		else if (strnpcinfo(2) == "aldeg_cas03") { donpcevent "::OnRecvCastleA03"; }
-		else if (strnpcinfo(2) == "aldeg_cas04") { donpcevent "::OnRecvCastleA04"; }
-		else if (strnpcinfo(2) == "aldeg_cas05") { donpcevent "::OnRecvCastleA05"; }
-		else if (strnpcinfo(2) == "gefg_cas01") { donpcevent "::OnRecvCastleG01"; }
-		else if (strnpcinfo(2) == "gefg_cas02") { donpcevent "::OnRecvCastleG02"; }
-		else if (strnpcinfo(2) == "gefg_cas03") { donpcevent "::OnRecvCastleG03"; }
-		else if (strnpcinfo(2) == "gefg_cas04") { donpcevent "::OnRecvCastleG04"; }
-		else if (strnpcinfo(2) == "gefg_cas05") { donpcevent "::OnRecvCastleG05"; }
-		else if (strnpcinfo(2) == "payg_cas01") { donpcevent "::OnRecvCastlePy01"; }
-		else if (strnpcinfo(2) == "payg_cas02") { donpcevent "::OnRecvCastlePy02"; }
-		else if (strnpcinfo(2) == "payg_cas03") { donpcevent "::OnRecvCastlePy03"; }
-		else if (strnpcinfo(2) == "payg_cas04") { donpcevent "::OnRecvCastlePy04"; }
-		else if (strnpcinfo(2) == "payg_cas05") { donpcevent "::OnRecvCastlePy05"; }
-		else if (strnpcinfo(2) == "prtg_cas01") { donpcevent "::OnRecvCastlePt01"; }
-		else if (strnpcinfo(2) == "prtg_cas02") { donpcevent "::OnRecvCastlePt02"; }
-		else if (strnpcinfo(2) == "prtg_cas03") { donpcevent "::OnRecvCastlePt03"; }
-		else if (strnpcinfo(2) == "prtg_cas04") { donpcevent "::OnRecvCastlePt04"; }
-		else if (strnpcinfo(2) == "prtg_cas05") { donpcevent "::OnRecvCastlePt05"; }
-		// Add custom Guild Castles here.
-		else {
-			end;
-		}
-		// And load purchased Guardian in castles.
-		donpcevent "Guardian#"+strnpcinfo(2)+"::OnSpawnGuardians";
-		// And display Kafra if purchased.
-		if (GetCastleData(strnpcinfo(2),9) < 1) disablenpc "Kafra Staff#"+strnpcinfo(2);
-	}
-	end;
-}
-
-// Guild Steward Template
-//============================================================
--	script	Gld_Mngr_Template::Gld_Mngr_Template	-1,{
-	// What is the Display Name of the NPC?
-	set .@name$,strnpcinfo(1);
-
-	// Store the Guild ID of castle occupant.
-	set .@GID, GetCastleData(strnpcinfo(2),1);
-
-	// Define the types of guardians on a per castle basis.
-	// 1 - Soldier Guardian; 2 - Archer Guardian; 3 - Knight Guardian
-	// Define the x spawn point for each uardian.
-	// [0] = 1st guardian's x spawn point.
-	// Define the y spawn point for each guardian.
-	// [0] = 1st guardian's y spawn point.
-	// Define the coordinates of the "Treasure Room."
-	// Aldebaran (Luina) Castles
-	if (strnpcinfo(2) == "aldeg_cas01") { 
-		setarray .@guardiantype[0],1,2,2,2,2,3,3,3;
-		setarray .@guardianposx[0],17,39,38,45,21,218,213,73;
-		setarray .@guardianposy[0],218,208,196,228,194,24,24,70;
-		setarray .@masterroom[0],113,223;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas02") {
-		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
-		setarray .@guardianposx[0],27,88,117,60,51,21,36,210;
-		setarray .@guardianposy[0],184,43,46,202,183,177,183,7;
-		setarray .@masterroom[0],134,225;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas03") {
-		setarray .@guardiantype[0],3,3,1,1,1,2,2,2;
-		setarray .@guardianposx[0],90,116,86,116,64,212,195,110;
-		setarray .@guardianposy[0],112,112,120,76,103,160,151,217;
-		setarray .@masterroom[0],229,267;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas04") {
-		setarray .@guardiantype[0],2,2,2,1,1,1,3,3;
-		setarray .@guardianposx[0],187,192,148,145,169,198,48,55;
-		setarray .@guardianposy[0],100,42,88,209,53,77,72,88;
-		setarray .@masterroom[0],83,17;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas05") {
-		setarray .@guardiantype[0],2,2,1,1,3,3,3,3;
-		setarray .@guardianposx[0],51,188,157,157,27,145,156,41;
-		setarray .@guardianposy[0],202,79,192,74,221,78,73,112;
-		setarray .@masterroom[0],64,8;
-	}
-	// Geffen (Britoniah) Castles
-	else if (strnpcinfo(2) == "gefg_cas01") {
-		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
-		setarray .@guardianposx[0],67,184,62,36,50,50,189,200;
-		setarray .@guardianposy[0],179,20,41,186,186,67,41,167;
-		setarray .@masterroom[0],152,117;
-	}
-	else if (strnpcinfo(2) == "gefg_cas02") {
-		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
-		setarray .@guardianposx[0],64,56,166,35,20,19,166,159;
-		setarray .@guardianposy[0],168,41,25,148,150,41,42,188;
-		setarray .@masterroom[0],145,115;
-	}
-	else if (strnpcinfo(2) == "gefg_cas03") {
-		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
-		setarray .@guardianposx[0],48,113,48,157,243,157,234,238;
-		setarray .@guardianposy[0],176,214,207,62,41,45,25,160;
-		setarray .@masterroom[0],275,289;
-	}
-	else if (strnpcinfo(2) == "gefg_cas04") {
-		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
-		setarray .@guardianposx[0],53,31,49,29,147,57,160,148;
-		setarray .@guardianposy[0],191,178,220,46,65,46,50,189;
-		setarray .@masterroom[0],116,123;
-	}
-	else if (strnpcinfo(2) == "gefg_cas05") {
-		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
-		setarray .@guardianposx[0],45,71,72,66,177,66,177,193;
-		setarray .@guardianposy[0],149,163,142,47,50,17,35,166;
-		setarray .@masterroom[0],149,106;
-	}
-	// Payon (Baulder) Castles
-	else if (strnpcinfo(2) == "payg_cas01") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],229,225,222,99,65,36,51,138;
-		setarray .@guardianposy[0],92,80,111,45,31,127,144,133;
-		setarray .@masterroom[0],295,8;
-	}
-	else if (strnpcinfo(2) == "payg_cas02") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],237,228,210,57,42,287,264,27;
-		setarray .@guardianposy[0],54,72,41,241,241,257,272,20;
-		setarray .@masterroom[0],141,149;
-	}
-	else if (strnpcinfo(2) == "payg_cas03") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],245,269,36,41,39,19,37,268;
-		setarray .@guardianposy[0],37,51,39,39,65,276,277,244;
-		setarray .@masterroom[0],163,167;
-	}
-	else if (strnpcinfo(2) == "payg_cas04") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],251,232,231,32,32,35,36,270;
-		setarray .@guardianposy[0],212,212,175,287,232,45,17,41;
-		setarray .@masterroom[0],151,47;
-	}
-	else if (strnpcinfo(2) == "payg_cas05") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],19,33,266,266,263,263,250,36;
-		setarray .@guardianposy[0],279,260,234,279,37,21,22,36;
-		setarray .@masterroom[0],153,137;
-	}
-	// Prontera (Valkyrie Realms) Castles
-	else if (strnpcinfo(2) == "prtg_cas01") {
-		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
-		setarray .@guardianposx[0],182,182,153,59,50,184,196,107;
-		setarray .@guardianposy[0],62,116,86,28,36,183,189,179;
-		setarray .@masterroom[0],15,209;
-	}
-	else if (strnpcinfo(2) == "prtg_cas02") {
-		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
-		setarray .@guardianposx[0],161,153,178,71,49,64,7,75;
-		setarray .@guardianposy[0],161,161,44,75,28,186,196,175;
-		setarray .@masterroom[0],207,229;
-	}
-	else if (strnpcinfo(2) == "prtg_cas03") {
-		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
-		setarray .@guardianposx[0],191,137,45,50,41,191,179,191;
-		setarray .@guardianposy[0],190,190,99,87,87,42,43,72;
-		setarray .@masterroom[0],190,130;
-	}
-	else if (strnpcinfo(2) == "prtg_cas04") {
-		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
-		setarray .@guardianposx[0],276,274,246,38,29,33,78,36;
-		setarray .@guardianposy[0],14,35,246,240,240,258,48,61;
-		setarray .@masterroom[0],275,160;
-	}
-	else if (strnpcinfo(2) == "prtg_cas05") {
-		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
-		setarray .@guardianposx[0],266,287,245,236,251,278,32,44;
-		setarray .@guardianposy[0],262,280,250,63,63,253,253,248;
-		setarray .@masterroom[0],281,176;
-	}
-	// Add custom Guild Castles here.
-	else {
-		end;
-	}
-	
-	mes "[ Steward " + .@name$ + " ]";
-	if (.@GID == 0) {
-		mes "I'm waiting for my master to return.";
-		mes "If you wish to speak with him, you will have to wait as well. ";
-		close;
-	}
-	if (getcharid(2) != .@GID || strcharinfo(0) != getguildmaster(.@GID)){
-		mes "I am loyal and I will follow my master ^ff0000" + getguildmaster(.@GID) + "^000000. We are Guardians! We defend to the bitter end!";
-		close;
-	}
-	mes "Welcome. My honorable master, ^ff0000" + getguildmaster(.@GID) + "^000000...";
-	mes "Whatever you need, I am at your service. I will be faithful in my duties.";
-	next;
-	switch(select("castle briefing:Invest in commercial growth:Invest in safeguard:Summon Guardian:Employ / discharge storehouse staff:Go into Master's room")) {
-	case 1:
-		mes "[ Steward " + .@name$ + " ]";
-		mes "I will report the Castle briefing, Master.";
-		mes " ";
-		mes " ^0000ffNow, commercial growth level is " + GetCastleData(strnpcinfo(2),2) + ".";
-		if (GetCastleData(strnpcinfo(2),4)) {
-			mes " You invested " + GetCastleData(strnpcinfo(2),4) + "times in last 1 day.";
-		}
-		mes " Now, safeguard level is " + GetCastleData(strnpcinfo(2),3) + ".^000000";
-		if (GetCastleData(strnpcinfo(2),5)) {
-			mes " ^0000ff- You invested " + GetCastleData(strnpcinfo(2),5) + "times in last 1 day.^000000";
-		}
-		mes " ";
-		mes "That's all to report, Master.";
-		close;
-	case 2:
-		set .@Economy,GetCastleData(strnpcinfo(2),2);
-		if (.@Economy < 6) { set .@eco_invest,5000; }
-		else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
-		else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
-		else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
-		else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
-		else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
-		else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
-		else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
-		else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
-		else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
-		else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
-		else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
-		else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
-		else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
-		else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
-		else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
-		else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
-		else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
-		else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
-		else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
-		//Quadruple the cost of investing if you've already invested once.
-		if (GetCastleData(strnpcinfo(2),4)) {
-			set .@eco_invest,.@eco_invest*4;
-		}
-		mes "[ Steward " + .@name$ + " ]";
-		mes "If you raise commercial growth, the quantity of goods made by the guild will increase. So if you want a prosperous future, investment will be required.";
-		mes " ";
-		mes "Originally you can invest just once but if you pay more money, you can invest twice.";
-		mes " ";
-		if (.@Economy == 100) {
-			mes "^ff0000But the commercial growth level of our castle is peaked at 100%. It doesn't need any more investment. As I expected you have a great acumen, Master.^000000";
-			close;
-		}
-		if (GetCastleData(strnpcinfo(2),4) >= 2) {
-			mes "^ff0000But you already invested twice today so you cannot invest any more.^000000 I expect our riches to increase in growth level.";
-			close;
-		}
-		if (GetCastleData(strnpcinfo(2),4) == 0) {
-			mes "Now the needed investment amount is ^ff0000" + .@eco_invest + "^000000 zeny. Will you invest?";
-		}
-		else {
-			mes "You've invested once today... if you wish to invest once more, ^ff0000" + .@eco_invest + "^000000 more zeny will be needed.";
-		}
-		next;
-		switch(select("Invest in commercial growth:Cancel")) {
-		case 1:
-			if (GetCastleData(strnpcinfo(2),4) >= 2) {
-				mes "[ Steward " + .@name$ + " ]";
-				mes "I'm sorry but you already invested twice today so you cannot invest any more.";
-				close;
-			}
-			if (Zeny < .@eco_invest) {
-				mes "[ Steward " + .@name$ + " ]";
-				mes "I'm sorry but there is not enough zeny to invest. You will have to try again when you have the funds, Master.";
-				close;
-			}
-			set zeny,zeny-.@eco_invest;
-			SetCastleData strnpcinfo(2),4,GetCastleData(strnpcinfo(2),4)+1;
-			mes "[ Steward " + .@name$ + "]";
-			mes "We finished the investment safely. I expect that our growth level will be increased by tomorrow.";
-			close;
-		case 2:
-			mes "[ Steward " + .@name$ + " ]";
-			mes "I'll do as you bid, my master... There is no hurry. We will do our best.";
-			close;
-		}
-	case 3:
-		set .@Defence,GetCastleData(strnpcinfo(2),3);
-		if (.@Defence < 6) { set .@def_invest,10000; }
-		else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
-		else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
-		else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
-		else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
-		else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
-		else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
-		else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
-		else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
-		else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
-		else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
-		else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
-		else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
-		else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
-		else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
-		else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
-		else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
-		else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
-		else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
-		else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
-		//Quadruple the cost of investing if you've already invested once.
-		if (GetCastleData(strnpcinfo(2),5)) {
-			set .@def_invest,.@def_invest*4;
-		}
-		mes "[ Steward " + .@name$ + " ]";
-		mes "If you raise the safeguard, the durability of the Guardians and emperium will increase. So if you expect more defenses in battles, investment will be required.";
-		mes " ";
-		mes "Originally you can invest just once but if you pay more money, you can invest twice.";
-		mes " ";
-		if (.@Defence == 100) {
-			mes "^ff0000But the safeguard level of our castle is peaked at 100%. It doesn't need any more investment. As I expected you have a great acumen, Master.^000000";
-			close;
-		}
-		if (GetCastleData(strnpcinfo(2),5) >= 2) {
-			mes "^ff0000But you already invested twice today so you cannot invest any more.^000000 I expect our riches to increase in growth level.";
-			close;
-		}
-		if (GetCastleData(strnpcinfo(2),5) == 0) {
-			mes "Now the needed investment amount is ^ff0000" + .@def_invest + "^000000 zeny. Will you invest?";
-		}
-		else {
-			mes "You've invested once today... if you wish to invest once more, ^ff0000" + .@def_invest + "^000000 more zeny will be needed.";
-		}
-		next;
-		switch(select("Invest in safeguard.:Cancel")) {
-		case 1:
-			if (GetCastleData(strnpcinfo(2),5) >= 2) {
-				mes "[ Steward " + .@name$ + " ]";
-				mes "I'm sorry but you already invested twice today so you cannot invest any more.";
-				close;
-			}
-			if (Zeny < .@def_invest) {
-				mes "[ Steward " + .@name$ + " ]";
-				mes "I'm sorry but there is not enough zeny to invest. You will have to try again when you have the funds, Master.";
-				close;
-			}
-			set zeny,zeny-.@def_invest;
-			SetCastleData strnpcinfo(2),5,GetCastleData(strnpcinfo(2),5)+1;
-			mes "[ Steward " + .@name$ + "]";
-			mes "We finished the investment safely. I expect that the safeguard level will be increased by tomorrow.";
-			close;
-		case 2:
-			mes "[ Steward " + .@name$ + " ]";
-			mes "I'll do as you bid, my master... There is no hurry. We will do our best.";
-			close;
-
-		}
-	case 4:
-		mes "[ Steward " + .@name$ + " ]";
-		mes "Will you summon a Guardian? It'll be a protector to defend us loyally.";
-		mes "Please select a guardian to defend us.";
-		next;
-		for( set .@i, 0; .@i <= 7 ; set .@i, .@i+1 ) {
-			if (.@guardiantype[.@i] == 1) { set .@type$,"Guardian Soldier"; }
-			else if (.@guardiantype[.@i] == 2) { set .@type$,"Guardian Archer"; }
-			else { set .@type$,"Guardian Knight"; }
-			if (guardianinfo(strnpcinfo(2),.@i,0)) {
-				setarray .@gname$[.@i], .@type$ + " - Implemented (" + guardianinfo(strnpcinfo(2),.@i,2) + "/" + guardianinfo(strnpcinfo(2),.@i,1) + ")";
-			}
-			else {
-				setarray .@gname$[.@i], .@type$ + " - Not Implemented";
-			}
-		}
-		set .@menu$,.@gname$[0]+":"+.@gname$[1]+":"+.@gname$[2]+":"+.@gname$[3]+":"+.@gname$[4]+":"+.@gname$[5]+":"+.@gname$[6]+":"+.@gname$[7];
-		set .@GDnum,select(.@menu$)+9;
-		mes "[ Steward " + .@name$ + " ]";
-		mes "Will you summon the chosen guardian? 10000 zeny is required to summon.";
-		next;
-		switch(select("Summon:Cancel")) {
-		case 1:
-			mes "[ Steward " + .@name$ + " ]";
-			if (getgdskilllv(.@GID,10002) == 0) {
-				mes "Master, we have not the resources to Summon the Guardian. If you want to accumulate them, you have to learn the Guild skill, We failed to summon the Guardian.";
-				close;
-			}
-			if (GetCastleData(strnpcinfo(2),.@GDnum) == 1) {
-				mes "Master, you already have summoned that Guardian. We cannot summon another.";
-				close;
-			}
-
-			if (Zeny < 10000) {
-				mes "Well... I'm sorry but we don't have funds to summon the Guardian. We failed to summon the Guardian.";
-				close;
-			}
-			set zeny,zeny-10000;
-			SetCastleData strnpcinfo(2),.@GDnum,1; // mark as 'installed'
-			set .@UseGID,.@GDnum - 10;
-			if (.@guardiantype[.@UseGID] == 1) { set .@type,1287; }
-			else if (.@guardiantype[.@UseGID] == 2) { set .@type,1285; }
-			else { set .@type,1286; }
-			guardian strnpcinfo(2),.@guardianposx[.@UseGID],.@guardianposy[.@UseGID],strmobinfo(2,.@type),.@type,"Guardian#"+strnpcinfo(2)+"::OnGuardianDied",.@UseGID;
-			mes "We completed the summoning of the Guardian. Our defenses are now increased with it in place.";
-			close;
-		case 2:
-			mes "[ Steward " + .@name$ + " ]";
-			mes "I did as you ordered. But please remember if you the have money to spare, it'll be better to set it up.";
-			close;
-	}
-	case 5:
-		if (GetCastleData(strnpcinfo(2),9) == 1) {
-			mes "[ Steward " + .@name$ + " ]";
-			mes "Now about the Kafra staff... Will you discharge the Kafra staff?";
-			next;
-			switch(select("Discharge:Cancel")) {
-			case 1:
-				cutin "kafra_01",2;
-				mes "[ Hired Kafra staff ]";
-				mes "I worked so hard... How can this be, Master?... I'll work harder if you're displeased... Please reconsider, Master.";
-				next;
-				switch(select("Discharge:Cancel")) {
-				case 1:
-					mes "[ Hired Kafra staff ]";
-					mes "Oh, my god! This is nonsense!";
-					next;
-					cutin "kafra_01",255;
-					break;
-				case 2:
-					mes "[ Hired Kafra staff ]";
-					mes "I'll work harder... Thank you!";
-					close2;
-					cutin "kafra_01",255;
-					end;
-				}
-				break;
-			case 2:
-				mes "[ Steward " + .@name$ + " ]";
-				mes "Those Kafra are hard workers. I thought it would be best to keep the staff.";
-				close;
-			}
-			disablenpc "Kafra Staff#"+strnpcinfo(2);
-			SetCastleData strnpcinfo(2),9,0;
-			mes "[ Steward " + .@name$ + " ]";
-			mes "....";
-			mes "Discharged Kafra staff... But... are you displeased with something?";
-			close;
-		}
-		else {
-			mes "[ Steward " + .@name$ + " ]";
-			mes "Will you contract with the Kafra head office to hire Kafra staff in our castle?";
-			mes "^ff0000 10000zeny is needed to hire. ";
-			next;
-			switch(select("Hire.:Cancel")) {
-			case 1:
-				mes "[ Steward " + .@name$ + " ]";
-				if (getgdskilllv(.@GID,10001) == 0) {
-					mes "Master, we cannot hire Kafra staff because we didn't make a contract with the Kafra head office. If you want to make a contract with the Kafra head office, you have to learn the Guild skill.";
-					close;
-				}
-				if (Zeny < 10000) {
-					mes "Well... I'm sorry but we don't have enough funds. We are unable to hire the Kafra staff.";
-					close;
-				}
-				set zeny,zeny-10000;
-				enablenpc "Kafra Staff#"+strnpcinfo(2);
-				SetCastleData strnpcinfo(2),9,1;
-				mes "We finished making the contract with the Kafra head office successfully. We hired a Kafra staff.";
-				next;
-				cutin "kafra_01",2;
-				mes "[ Hired Kafra staff ]";
-				mes "How do you do? I'm a dispatched Kafra from head office.";
-				mes "I'll do my best to upkeep the reputation of Guild.";
-				next;
-				cutin "kafra_01",255			;
-				mes "[ Steward " + .@name$ + " ]";
-				mes "The contract term of the hired Kafra staff is 1 month and after this term, you will have to pay an additional charge.";
-				mes "It will be useful for our members.";
-				close;
-			case 2:
-				mes "[ Steward " + .@name$ + " ]";
-				mes "I did as you ordered, but some of our members will be unhappy. It will be better to hire a Kafra staff quickly.";
-				close;
-			}
-		}
-	case 6:
-		mes "[ Steward " + .@name$ + " ]";
-		mes "Do you want to visit the room where our valuables are stored?";
-		mes "That room is restricted to you... you are the only one with access to it.";
-		next;
-		switch(select("Go into Master's room.:Cancel")) {
-		case 1:
-			mes "[ Steward " + .@name$ + " ]";
-			mes "Please follow me, I will show you the secret passage.";
-			mes "When you wish to return, pull this lever here...";
-			close2;
-			warp strnpcinfo(2),.@masterroom[0],.@masterroom[1];
-			end;
-		case 2:
-			mes "[ Steward " + .@name$ + " ]";
-			mes "Goods are produced once a day... if you don't make use of them, they will not produce.";
-			mes "Therefore it would be better that you remove them over time for the Guild.";
-			close;
-		}
-	}
-}
-
-
-// Guardian Spawner Template
-//============================================================
--	script	Gld_Guard_Template::Gld_Guard_Template	-1,{
-// Spawn Guardians in castles
-// When adding new castles, ensure that the coordinates coincide
-// with the coordinates defined in the Guild Steward template.
-OnSpawnGuardians:
-	// Define the types of guardians on a per castle basis.
-	// 1 - Soldier Guardian; 2 - Archer Guardian; 3 - Knight Guardian
-	// Define the x spawn point for each uardian.
-	// [0] = 1st guardian's x spawn point.
-	// Define the y spawn point for each uardian.
-	// [0] = 1st guardian's y spawn point.
-	// Aldebaran (Luina) Castles
-	if (strnpcinfo(2) == "aldeg_cas01") { 
-		setarray .@guardiantype[0],1,2,2,2,2,3,3,3;
-		setarray .@guardianposx[0],17,39,38,45,21,218,213,73;
-		setarray .@guardianposy[0],218,208,196,228,194,24,24,70;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas02") {
-		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
-		setarray .@guardianposx[0],27,88,117,60,51,21,36,210;
-		setarray .@guardianposy[0],184,43,46,202,183,177,183,7;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas03") {
-		setarray .@guardiantype[0],3,3,1,1,1,2,2,2;
-		setarray .@guardianposx[0],90,116,86,116,64,212,195,110;
-		setarray .@guardianposy[0],112,112,120,76,103,160,151,217;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas04") {
-		setarray .@guardiantype[0],2,2,2,1,1,1,3,3;
-		setarray .@guardianposx[0],187,192,148,145,169,198,48,55;
-		setarray .@guardianposy[0],100,42,88,209,53,77,72,88;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas05") {
-		setarray .@guardiantype[0],2,2,1,1,3,3,3,3;
-		setarray .@guardianposx[0],51,188,157,157,27,145,156,41;
-		setarray .@guardianposy[0],202,79,192,74,221,78,73,112;
-	}
-	// Geffen (Britoniah) Castles
-	else if (strnpcinfo(2) == "gefg_cas01") {
-		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
-		setarray .@guardianposx[0],67,184,62,36,50,50,189,200;
-		setarray .@guardianposy[0],179,20,41,186,186,67,41,167;
-	}
-	else if (strnpcinfo(2) == "gefg_cas02") {
-		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
-		setarray .@guardianposx[0],64,56,166,35,20,19,166,159;
-		setarray .@guardianposy[0],168,41,25,148,150,41,42,188;
-	}
-	else if (strnpcinfo(2) == "gefg_cas03") {
-		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
-		setarray .@guardianposx[0],48,113,48,157,243,157,234,238;
-		setarray .@guardianposy[0],176,214,207,62,41,45,25,160;
-	}
-	else if (strnpcinfo(2) == "gefg_cas04") {
-		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
-		setarray .@guardianposx[0],53,31,49,29,147,57,160,148;
-		setarray .@guardianposy[0],191,178,220,46,65,46,50,189;
-	}
-	else if (strnpcinfo(2) == "gefg_cas05") {
-		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
-		setarray .@guardianposx[0],45,71,72,66,177,66,177,193;
-		setarray .@guardianposy[0],149,163,142,47,50,17,35,166;
-	}
-	// Payon (Baulder) Castles
-	else if (strnpcinfo(2) == "payg_cas01") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],229,225,222,99,65,36,51,138;
-		setarray .@guardianposy[0],92,80,111,45,31,127,144,133;
-	}
-	else if (strnpcinfo(2) == "payg_cas02") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],237,228,210,57,42,287,264,27;
-		setarray .@guardianposy[0],54,72,41,241,241,257,272,20;
-	}
-	else if (strnpcinfo(2) == "payg_cas03") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],245,269,36,41,39,19,37,268;
-		setarray .@guardianposy[0],37,51,39,39,65,276,277,244;
-	}
-	else if (strnpcinfo(2) == "payg_cas04") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],251,232,231,32,32,35,36,270;
-		setarray .@guardianposy[0],212,212,175,287,232,45,17,41;
-	}
-	else if (strnpcinfo(2) == "payg_cas05") {
-		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
-		setarray .@guardianposx[0],19,33,266,266,263,263,250,36;
-		setarray .@guardianposy[0],279,260,234,279,37,21,22,36;
-	}
-	// Prontera (Valkyrie Realms) Castles
-	else if (strnpcinfo(2) == "prtg_cas01") {
-		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
-		setarray .@guardianposx[0],182,182,153,59,50,184,196,107;
-		setarray .@guardianposy[0],62,116,86,28,36,183,189,179;
-	}
-	else if (strnpcinfo(2) == "prtg_cas02") {
-		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
-		setarray .@guardianposx[0],161,153,178,71,49,64,7,75;
-		setarray .@guardianposy[0],161,161,44,75,28,186,196,175;
-	}
-	else if (strnpcinfo(2) == "prtg_cas03") {
-		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
-		setarray .@guardianposx[0],191,137,45,50,41,191,179,191;
-		setarray .@guardianposy[0],190,190,99,87,87,42,43,72;
-	}
-	else if (strnpcinfo(2) == "prtg_cas04") {
-		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
-		setarray .@guardianposx[0],276,274,246,38,29,33,78,36;
-		setarray .@guardianposy[0],14,35,246,240,240,258,48,61;
-	}
-	else if (strnpcinfo(2) == "prtg_cas05") {
-		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
-		setarray .@guardianposx[0],266,287,245,236,251,278,32,44;
-		setarray .@guardianposy[0],262,280,250,63,63,253,253,248;
-	}
-	// Add custom Guild Castles here.
-	else {
-		end;
-	}
-
-	// Kill all existing guardians before spawning new ones.
-	// This should prevent duplicating Guardians when char Server disconnects.
-	killmonster strnpcinfo(2),strnpcinfo(0)+"::OnGuardianDied";
-
-	for( set .@i, 0; .@i <= 7 ; set .@i, .@i+1 ) {
-		set .@UseGID,.@i + 10;
-		if (.@guardiantype[.@i] == 1) { set .@type,1287; }
-		else if (.@guardiantype[.@i] == 2) { set .@type,1285; }
-		else { set .@type,1286; }
-		if (GetCastleData(strnpcinfo(2),.@UseGID)) {
-			guardian strnpcinfo(2),.@guardianposx[.@i],.@guardianposy[.@i],strmobinfo(2,.@type),.@type,"Guardian#"+strnpcinfo(2)+"::OnGuardianDied",.@i;
-		}
-	}
-	end;
-
-OnGuardianDied:
-	end;
-}
-
-// Kafra Template
-//============================================================
--	script	Gld_Kafra_Template::Gld_Kafra_Template	-1,{
-	// Store the Guild ID of castle occupant.
-	set .@GID, GetCastleData(strnpcinfo(2),1);
-
-	if (compare(strnpcinfo(2),"aldeg")) {
-		setarray .@destination$[0],"Al De Baran","aldebaran";
-		setarray .@coordinates[0],132,103;
-	}
-	else if (compare(strnpcinfo(2),"gefg")) {
-		setarray .@destination$[0],"Geffen","geffen";
-		setarray .@coordinates[0],120,39;
-	}
-	else if (compare(strnpcinfo(2),"payg")) {
-		setarray .@destination$[0],"Payon","payon";
-		setarray .@coordinates[0],70,100;
-	}
-	else if (compare(strnpcinfo(2),"prtg")) {
-		setarray .@destination$[0],"Prontera","prontera";
-		setarray .@coordinates[0],116,72;
-	}
-	// Add custom Guild Castles here.
-	else {
-		end;
-	}
-
-	cutin "kafra_01",2;
-	if (getcharid(2) == .@GID) {
-		mes "[Kafra staff]";
-		mes "Welcome. ^ff0000" + getguildname(.@GID) + "^000000 Member.";
-		mes "The Kafra Coporation will stay with you wherever you go.";
-		next;
-		switch(select("Use Storage:Use Guild Storage:Use Warp Service:Rent a Cart:Cancel")) {
-		case 1:
-			if (basicskillcheck() && getskilllv("NV_BASIC") < 6) {
-				mes "[Kafra staff]";
-				mes "I am sorry but you have to be at least Novice skill level 6 if you want to use the storage.";
-			}
-			else {
-				callfunc("F_CheckKafCode");	//check your storage password, if set
-	 	 		openstorage;
-			}
-			break;
-		case 2:
-			// Unofficial, but since it's already been in eA for ages
-			// and used, I can't exactly remove it, now, can I? >:(
-			if(guildopenstorage() == 1){
-				mes "[Kafra Employee]";
-				mes "I'm sorry but another guild member is using the guild storage";
-				mes "right now.  Please wait until that person is finished.";
-				close2;
-				cutin "", 255;
-				end;
-			}
-			cutin "", 255;
-			close;
-		case 3:
-			mes "[Kafra staff]";
-			mes "Please let me know your destination.";
-			next;
-			switch(select(.@destination$ + " ^880000200 ^000000z:Cancel")) {
-			case 1:
-				if (Zeny < 200) {
-					mes "[Kafra staff]";
-		 			mes "You don't have enough money. Please check again.";
-				}
-				else {
-					set zeny,zeny-200;
-					set kf_10_pit,kf_10_pit+2;
-					cutin "kafra_01",255;
-					warp .@destination$[1],.@coordinates[0],.@coordinates[1];
-					end;
-				}
-				break;
-			case 2:
-				break;
-			}
-			break;
-		case 4:
-			if(baseClass != Job_Merchant){
-				mes "[Kafra staff]";
-				mes "I am sorry. The Cart Service is only provided for the Merchant and Blacksmith class.";
-			}
-			else if(checkcart() == 1){
-				mes "[Kafra staff]";
-				mes "You have a cart equipped already.";
-			}
-			else {
-				mes "[Kafra staff]"		;
-				mes "The cart fee is 800 zeny. Do you want to rent a cart?";
-				next;
-				switch(select("Yes.:Cancel.")) {
-				case 1:
-					if (Zeny < 800) {
-						mes "[Kafra staff]";
-						mes "You don't have enough Money. You need 800 Zeny to rent a cart.";
-					}
-					else {
-						close2;
-						cutin "kafra_01",255;
-						set kf_10_pit,kf_10_pit+8;
-						set zeny,zeny-800;
-						setcart;
-						end;
-					}
-					break;
-				case 2:
-					break;
-				}
-			}
-			break;
-		case 5:
-			mes "[Kafra staff]";
-			mes "The Kafra corp. always tries to give the best service.";
-			mes "Thank you for using Kafra corp. Please come again.";
-		}
-	}
-	else {
-		mes "[Kafra staff]";
-		mes "I am instructed to service only for the ^ff0000" + getguildname(.@GID) + "^000000 Guild. Please try another Kafra staff member around here. Sorry for the inconvenience.";
-	}
-	close2;
-	cutin "kafra_01",255;
-	end;
-}
-
-// Guild Dungeon Switch Template
-//============================================================
--	script	Gld_Dun_Template::Gld_Dun_Template	-1,{
-	// Store the Guild ID of castle occupant.
-	set .@GID, GetCastleData(strnpcinfo(2),1);
-
-	// Pick what Dungeon I should warp too, and where in that dungeon.
-	if (compare(strnpcinfo(2),"aldeg")) {
-		set .@destination$,"gld_dun02";
-		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],32,122;
-		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],79,32;
-		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],165,38;
-		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],160,148;
-		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],103,169;
-	}
-	else if (compare(strnpcinfo(2),"gefg")) {
-		set .@destination$,"gld_dun04";
-		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],39,258;
-		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],125,270;
-		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],268,251;
-		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],268,108;
-		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],230,35;
-	}
-	else if (compare(strnpcinfo(2),"payg")) {
-		set .@destination$,"gld_dun01";
-		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],186,165;
-		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],54,165;
-		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],54,39;
-		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],186,39;
-		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],223,202;
-	}
-	else if (compare(strnpcinfo(2),"prtg")) {
-		set .@destination$,"gld_dun03";
-		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],28,251;
-		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],164,268;
-		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],164,179;
-		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],268,203;
-		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],199,28;
-	}
-	// Add custom Guild Castles here.
-	else {
-		end;
-	}
-
-	if (.@GID == 0) {
-		mes "[ Echoing Voice ]";
-		mes " ' The one who can overcome an ordeal and show true bravery... will find the way... ' ";
-		close;
-	}
-	else {
-		mes "[ Echoing Voice ]";
-		mes " ' Only the one who can show true bravery can take this test. '";
-		next;
-		mes " ";
-		mes "There's a small lever. Will you pull it?";
-		next;
-		switch(select("Pull.:Do not.")) {
-		case 1:
-			if ((getcharid(2) == .@GID)) {
-				warp .@destination$,.@coordinates[0],.@coordinates[1];
-				end;
-			}
-			else {
-				mes " ";
-				mes " Nothing happened.";
-				close;
-			}
-		case 2:
-			close;
-		}
-	}
-}
-
-// Treasure Room Protection Template
-//============================================================
--	script	Gld_Trea_Protect::Gld_Trea_Protect	-1,{
-//OnTouch2:
-OnTouch:
-	// Store the Guild ID of castle occupant.
-	set .@GID, GetCastleData(strnpcinfo(2),1);
-
-	if (getcharid(2) != .@GID) {
-		if (compare(strnpcinfo(2),"aldeg")) {
-			warp "aldebaran",132,103;
-		}
-		else if (compare(strnpcinfo(2),"gefg")) {
-			warp "geffen",120,39;
-		}
-		else if (compare(strnpcinfo(2),"payg")) {
-			warp "payon",70,100;
-		}
-		else if (compare(strnpcinfo(2),"prtg")) {
-			warp "prontera",116,72;
-		}
-		// Add custom Guild Castles here.
-		else {
-			end;
-		}
-	}
-	end;
-}
-
-// Treasure Room Spawn Template
-//============================================================
--	script	Gld_Trea_Spawn::Gld_Trea_Spawn	-1,{
-	end;
-
-OnClock0001:
-	// Do nothing if this script is the template.
-	if (strnpcinfo(1) == "Gld_Trea_Spawn") end;
-	
-	set .@GID, GetCastleData(strnpcinfo(2),1);
-	
-	// If there is no owner, do nothing.
-	if (!.@GID) end;
-
-	// Is there Economy in this castle?
-	set .@Treasure,GetCastleData(strnpcinfo(2),2)/5+4;
-
-	// Set information
-	if (strnpcinfo(2) == "aldeg_cas01") { 
-		set .@treasurebox,1324;
-		setarray .@treasurex[0],115,122,115,122,116,117,118,119,120,121,121,121,121,121,121,120,119,118,117,116,116,116,116,116;
-		setarray .@treasurey[0],226,226,219,219,225,225,225,225,225,225,224,223,222,221,220,220,220,220,220,220,221,222,223,224;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas02") { 
-		set .@treasurebox,1326;
-		setarray .@treasurex[0],134,135,135,134,132,133,134,135,136,137,137,137,137,137,137,136,135,134,133,132,132,132,132,132;
-		setarray .@treasurey[0],231,231,230,230,233,233,233,233,233,233,232,231,230,229,228,228,228,228,228,228,229,230,231,232;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas03") { 
-		set .@treasurebox,1328;
-		setarray .@treasurex[0],224,225,225,224,222,223,224,225,226,227,227,227,227,227,227,226,225,224,223,222,222,222,222,222;
-		setarray .@treasurey[0],269,269,268,268,271,271,271,271,271,271,270,269,268,267,266,266,266,266,266,266,267,268,269,270;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas04") { 
-		set .@treasurebox,1330;
-		setarray .@treasurex[0],84,85,85,84,82,83,84,85,86,87,87,87,87,87,87,86,85,84,83,82,82,82,82,82;
-		setarray .@treasurey[0],13,13,12,12,15,15,15,15,15,15,14,13,12,11,10,10,10,10,10,10,11,12,13,14;
-	}
-	else if (strnpcinfo(2) == "aldeg_cas05") { 
-		set .@treasurebox,1332;
-		setarray .@treasurex[0],61,62,62,61,59,60,61,62,63,64,64,64,64,64,64,63,62,61,60,59,59,59,59,59;
-		setarray .@treasurey[0],12,12,11,11,14,14,14,14,14,14,13,12,11,10,9,9,9,9,9,9,10,11,12,13;
-	}
-	else if (strnpcinfo(2) == "gefg_cas01") { 
-		set .@treasurebox,1334;
-		setarray .@treasurex[0],153,154,154,153,151,152,153,154,155,156,156,156,156,156,156,155,154,153,152,151,151,151,151,151;
-		setarray .@treasurey[0],113,113,112,112,115,115,115,115,115,115,114,113,112,111,110,110,110,110,110,110,111,112,113,114;
-	}
-	else if (strnpcinfo(2) == "gefg_cas02") { 
-		set .@treasurebox,1336;
-		setarray .@treasurex[0],139,140,140,139,137,138,139,140,141,142,142,142,142,142,142,141,140,139,138,137,137,137,137,137;
-		setarray .@treasurey[0],115,115,114,114,117,117,117,117,117,117,116,115,114,113,112,112,112,112,112,112,113,114,115,116;
-	}
-	else if (strnpcinfo(2) == "gefg_cas03") { 
-		set .@treasurebox,1338;
-		setarray .@treasurex[0],269,270,270,269,267,268,269,270,271,272,272,272,272,272,272,271,270,269,268,267,267,267,267,267;
-		setarray .@treasurey[0],291,291,290,290,293,293,293,293,293,293,292,291,290,289,288,288,288,288,288,288,289,290,291,292;
-	}
-	else if (strnpcinfo(2) == "gefg_cas04") { 
-		set .@treasurebox,1340;
-		setarray .@treasurex[0],115,116,116,115,113,114,115,116,117,118,118,118,118,118,118,117,116,115,114,113,113,113,113,113;
-		setarray .@treasurey[0],119,119,118,118,121,121,121,121,121,121,120,119,118,117,116,116,116,116,116,116,117,118,119,120;
-	}
-	else if (strnpcinfo(2) == "gefg_cas05") { 
-		set .@treasurebox,1342;
-		setarray .@treasurex[0],143,144,144,143,141,142,143,144,145,146,146,146,146,146,146,145,144,143,142,141,141,141,141,141;
-		setarray .@treasurey[0],110,110,109,109,112,112,112,112,112,112,111,110,109,108,107,107,107,107,107,107,108,109,110,111;
-	}
-	else if (strnpcinfo(2) == "payg_cas01") { 
-		set .@treasurebox,1344;
-		setarray .@treasurex[0],289,292,292,289,288,289,290,291,292,293,293,293,293,293,293,292,291,290,289,288,288,288,288,288;
-		setarray .@treasurey[0],10,10,7,7,11,11,11,11,11,11,10,9,8,7,6,6,6,6,6,6,7,8,9,10;
-	}
-	else if (strnpcinfo(2) == "payg_cas02") { 
-		set .@treasurebox,1346;
-		setarray .@treasurex[0],143,146,146,143,142,143,144,145,146,147,147,147,147,147,147,146,145,144,143,142,142,142,142,142;
-		setarray .@treasurey[0],146,146,143,143,147,147,147,147,147,147,146,145,144,143,142,142,142,142,142,142,143,144,145,146;
-	}
-	else if (strnpcinfo(2) == "payg_cas03") { 
-		set .@treasurebox,1348;
-		setarray .@treasurex[0],158,159,159,158,156,157,158,159,160,161,161,161,161,161,161,160,159,158,157,156,156,156,156,156;
-		setarray .@treasurey[0],169,169,168,168,171,171,171,171,171,171,170,169,168,167,166,166,166,166,166,166,167,168,169,170;
-	}
-	else if (strnpcinfo(2) == "payg_cas04") { 
-		set .@treasurebox,1350;
-		setarray .@treasurex[0],146,147,147,146,144,145,146,147,148,149,149,149,149,149,149,148,147,146,145,144,144,144,144,144;
-		setarray .@treasurey[0],48,48,47,47,50,50,50,50,50,50,49,48,47,46,45,45,45,45,45,45,46,47,48,49;
-	}
-	else if (strnpcinfo(2) == "payg_cas05") { 
-		set .@treasurebox,1352;
-		setarray .@treasurex[0],155,158,158,155,154,155,156,157,158,159,159,159,159,159,159,158,157,156,155,154,154,154,154,154;
-		setarray .@treasurey[0],134,134,131,131,135,135,135,135,135,135,134,133,132,131,130,130,130,130,130,130,131,132,133,134;
-	}
-	else if (strnpcinfo(2) == "prtg_cas01") { 
-		set .@treasurebox,1354;
-		setarray .@treasurex[0],10,11,11,10,8,9,10,11,12,13,13,13,13,13,13,12,11,10,9,8,8,8,8,8;
-		setarray .@treasurey[0],209,209,208,208,211,211,211,211,211,211,210,209,208,207,206,206,206,206,206,206,207,208,209,210;
-	}
-	else if (strnpcinfo(2) == "prtg_cas02") { 
-		set .@treasurebox,1356;
-		setarray .@treasurex[0],201,202,202,201,199,200,201,202,203,204,204,204,204,204,204,203,202,201,200,199,199,199,199,199;
-		setarray .@treasurey[0],228,228,227,227,230,230,230,230,230,230,229,228,227,226,225,225,225,225,225,225,226,227,228,229;
-	}
-	else if (strnpcinfo(2) == "prtg_cas03") { 
-		set .@treasurebox,1358;
-		setarray .@treasurex[0],187,188,188,187,185,186,187,188,189,190,190,190,190,190,190,189,188,187,186,185,185,185,185,185;
-		setarray .@treasurey[0],132,132,131,131,134,134,134,134,134,134,133,132,131,130,129,129,129,129,129,129,130,131,132,133;
-	}
-	else if (strnpcinfo(2) == "prtg_cas04") { 
-		set .@treasurebox,1360;
-		setarray .@treasurex[0],269,270,270,269,267,268,269,270,271,272,272,272,272,272,272,271,270,269,268,267,267,267,267,267;
-		setarray .@treasurey[0],162,162,161,161,164,164,164,164,164,164,163,162,161,160,159,159,159,159,159,159,160,161,162,163;
-	}
-	else if (strnpcinfo(2) == "prtg_cas05") { 
-		set .@treasurebox,1362;
-		setarray .@treasurex[0],275,276,276,275,273,274,275,276,277,278,278,278,278,278,278,277,276,275,274,273,273,273,273,273;
-		setarray .@treasurey[0],178,178,177,177,180,180,180,180,180,180,179,178,177,176,175,175,175,175,175,175,176,177,178,179;
-	}
-	// Add custom Guild Castles here.
-	else {
-		end;
-	}
-
-	// Apply investment to Eco. and Def. Only happens if there were investments made.
-	// Permanent Development can only happen once per day.
-	if (GetCastleData(strnpcinfo(2),4)) {
-		set .@Economy,GetCastleData(strnpcinfo(2),2);
-		SetCastleData strnpcinfo(2),2,.@Economy + GetCastleData(strnpcinfo(2),4) + (rand(2) && getgdskilllv(.@GID,10014));
-		if (GetCastleData(strnpcinfo(2),2) > 100) SetCastleData strnpcinfo(2),2,100;
-	}
-	if (GetCastleData(strnpcinfo(2),5)) {
-		set .@Defence,GetCastleData(strnpcinfo(2),3);
-		SetCastleData strnpcinfo(2),3,.@Defence + GetCastleData(strnpcinfo(2),5);
-		if (GetCastleData(strnpcinfo(2),3) > 100) SetCastleData strnpcinfo(2),3,100;
-	}
-	// Reset daily investment limits.
-	setcastledata strnpcinfo(2),4,0;
-	setcastledata strnpcinfo(2),5,0;
-
-	// Spawn boxes in proper order.
-	for (set .@i,0; .@i < .@Treasure ; set .@i,.@i+1) {
-		// set treasure box ID
-		set .@boxid, .@treasurebox + (.@i+2) % 2;
-		set .@box,1 << .@i;
-		// Spawn or do not spawn chests if one already exists.
-		if ((getd("$@"+strnpcinfo(2)+"_treasure") & .@box) == 0) {
-			monster strnpcinfo(2),.@treasurex[.@i],.@treasurey[.@i],"Treasure Chest",.@boxid,1,"Treasure#"+strnpcinfo(2)+"::OnTreasureDied"+.@i;
-			setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") | .@box;
-		}
-	}
-	end;
-
-// Individual "You killed a chest" events to ensure proper spawning at the change of day.
-OnTreasureDied0:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~1;
-	end;
-OnTreasureDied1:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~2;
-	end;
-OnTreasureDied2:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~4;
-	end;
-OnTreasureDied3:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~8;
-	end;
-OnTreasureDied4:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~16;
-	end;
-OnTreasureDied5:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~32;
-	end;
-OnTreasureDied6:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~64;
-	end;
-OnTreasureDied7:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~128;
-	end;
-OnTreasureDied8:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~256;
-	end;
-OnTreasureDied9:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~512;
-	end;
-OnTreasureDied10:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~1024;
-	end;
-OnTreasureDied11:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~2048;
-	end;
-OnTreasureDied12:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~4096;
-	end;
-OnTreasureDied13:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~8192;
-	end;
-OnTreasureDied14:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~16384;
-	end;
-OnTreasureDied15:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~32768;
-	end;
-OnTreasureDied16:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~65536;
-	end;
-OnTreasureDied17:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~131072;
-	end;
-OnTreasureDied18:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~262144;
-	end;
-OnTreasureDied19:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~524288;
-	end;
-OnTreasureDied20:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~1048576;
-	end;
-OnTreasureDied21:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~2097152;
-	end;
-OnTreasureDied22:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~4194304;
-	end;
-OnTreasureDied23:
-	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~8388608;
-	end;
-}
+//===== rAthena Script =======================================
+//= War of Emperium Guild Template File
+//===== By: ==================================================
+//= L0ne_W0lf
+//===== Current Version: =====================================
+//= 1.9
+//===== Compatible With: =====================================
+//= rAthena SVN
+//===== Description: =========================================
+//= [ Aegis Conversion]
+//= ----------------------------------------------------------
+//= - THIS FILE IS REQUIRED FOR GUILD CASTLES TO FUNCTION.
+//= ----------------------------------------------------------
+//= - Enables AGIT Manager inside Guild Strongholds.
+//=   Visible Name required: Agit
+//=   Manages the various functions used in and out of WoE.
+//=
+//= - Enables Stewards inside Guild Strongholds which let's
+//=   the guild master invest in Defense and Economy, and
+//=   to summon guardians, a Kafra, and enter master's room.
+//=
+//= - Guardian Spawning Template
+//=   Visible Name required: Guardian
+//=   Spawn guardians when guild castle data is recieved.
+//=
+//= - Enables Kafra Services inside Guild Strongholds.
+//=   Visible Name required: Kafra Employee
+//=   Storage, Guild Storage, Teleport Service, Cart rental.
+//=
+//= - Treasure Chest spawning.
+//=   Chests will NOT be saved anymore in the event of crashes.
+//=   Treasures will NOT spawn on a location that already has
+//=   treasure chest spawned.
+//===== Additional Comments: =================================
+//= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
+//= 1.1 Daily investement will now be reset. [L0ne_W0lf]
+//=     Template will no longer try to spawn chests.
+//= 1.2 Fixed Eco Invest option charging twice. [L0ne_W0lf]
+//= 1.3 Fixed a loading flag emblem for Payon 1. [L0ne_W0lf]
+//=     Fixed two typos regarding Guild Steward name.
+//= 1.4 Fixed a typo in defense investment. [L0ne_W0lf]
+//= 1.5 Fixed spawn point of the emperium in Payon 1. [L0ne_W0lf]
+//=     Double-investing doubles the price now.
+//= 1.6 Corrected Zeny check when summoning guardians. [L0ne_W0lf]
+//=     Corrected cost for investing, thanks to Ai4rei.
+//=     Second invest is now quadruple the value of the first
+//=     Investing now happens at the turn of the day.
+//= 1.6a Corrected conditions in the new investing blocks. [L0ne_W0lf]
+//= 1.6b Moved where investments are added to eco/def. [L0ne_W0lf]
+//= 1.7 Updated Agitbreak announcements, added bc_woe [L0ne_W0lf]
+//=     and added extended anouncement format for mapannounce.
+//= 1.8 Fixed a possible exploit in guild castle investment. [Brian]
+//= 1.9 Partially rewrote Script. [Masao]
+//============================================================
+
+// WoE : Main Functions
+//============================================================
+-	script	Gld_Agit_Manager::Gld_Agit_Manager	-1,{
+	end;
+
+// War of Emperium has started.
+OnAgitStart:
+	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
+	MapRespawnGuildID strnpcinfo(2),GetCastleData(strnpcinfo(2),1),2;
+	GvgOn strnpcinfo(2);
+
+// Spawn (fall through), or respawn the Emperium once it has been broken.
+OnStartArena:
+	// OnAgitStart will fall through and spawn the Emperium.
+	if (strnpcinfo(2) == "aldeg_cas01") { setarray .@emproom[0],216,23; }
+	else if (strnpcinfo(2) == "aldeg_cas02") { setarray .@emproom[0],213,23; }
+	else if (strnpcinfo(2) == "aldeg_cas03") { setarray .@emproom[0],205,31; }
+	else if (strnpcinfo(2) == "aldeg_cas04") { setarray .@emproom[0],36,217; }
+	else if (strnpcinfo(2) == "aldeg_cas05") { setarray .@emproom[0],27,101; }
+	else if (strnpcinfo(2) == "gefg_cas01") { setarray .@emproom[0],197,181; }
+	else if (strnpcinfo(2) == "gefg_cas02") { setarray .@emproom[0],176,178; }
+	else if (strnpcinfo(2) == "gefg_cas03") { setarray .@emproom[0],244,166; }
+	else if (strnpcinfo(2) == "gefg_cas04") { setarray .@emproom[0],174,177; }
+	else if (strnpcinfo(2) == "gefg_cas05") { setarray .@emproom[0],194,184; }
+	else if (strnpcinfo(2) == "payg_cas01") { setarray .@emproom[0],139,139; }
+	else if (strnpcinfo(2) == "payg_cas02") { setarray .@emproom[0],38,25; }
+	else if (strnpcinfo(2) == "payg_cas03") { setarray .@emproom[0],269,265; }
+	else if (strnpcinfo(2) == "payg_cas04") { setarray .@emproom[0],270,28; }
+	else if (strnpcinfo(2) == "payg_cas05") { setarray .@emproom[0],30,30; }
+	else if (strnpcinfo(2) == "prtg_cas01") { setarray .@emproom[0],197,197; }
+	else if (strnpcinfo(2) == "prtg_cas02") { setarray .@emproom[0],157,174; }
+	else if (strnpcinfo(2) == "prtg_cas03") { setarray .@emproom[0],16,220; }
+	else if (strnpcinfo(2) == "prtg_cas04") { setarray .@emproom[0],291,14; }
+	else if (strnpcinfo(2) == "prtg_cas05") { setarray .@emproom[0],266,266; }
+	// Add custom Guild Castles here.
+	else {
+		end;
+	}
+	if (!mobcount(strnpcinfo(2),"Agit#"+strnpcinfo(2)+"::OnAgitBreak")) {
+		monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Emperium",1288,1,"Agit#"+strnpcinfo(2)+"::OnAgitBreak";
+	}
+	end;
+
+// The Emperium has been broken.
+OnAgitBreak:
+	set .@GID,getcharid(2);
+	// Show and log error if an unguilded player breaks the Emperium. (Should NEVER happen)
+	if (.@GID <= 0) {
+		set .@notice$,"Character "+strcharinfo(0)+" ("+getcharid(0)+") broke the Emperium in Castle: "+strnpcinfo(2)+" while guildless. No data will be saved and Emperium respawned.";
+ 		logmes .@notice$; debugmes .@notice$;
+		donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena";
+		end;
+	}
+	// Adjust Economy Invest Level for Castle
+	set .@Economy,GetCastleData(strnpcinfo(2),2) - 5;
+	if (.@Economy < 0) set .@Economy, 0;
+	SetCastleData strnpcinfo(2), 2, .@Economy;
+	// Adjust Defense Invest Level for Castle
+	set .@Defence,GetCastleData(strnpcinfo(2),3) - 5;
+	if (.@Defence < 0) set .@Defence, 0;
+	SetCastleData strnpcinfo(2), 3, .@Defence;
+
+	// Set new Castle Occupant
+	SetCastleData strnpcinfo(2),1, .@GID;
+
+	// Announce that the Emperium is destroyed, and respawn all but new castle-occupants.
+	mapannounce strnpcinfo(2),"The emperium has been destroyed.",bc_map|bc_woe,"0x00CCFF",FW_NORMAL,12;
+	MapRespawnGuildID strnpcinfo(2),.@GID,2;
+
+	// Refresh castle data, disable Kafra and reset Invest information.
+	donpcevent strnpcinfo(0)+"::OnRecvCastle";
+	disablenpc "Kafra Staff#"+strnpcinfo(2);
+	for( set .@i, 4; .@i <= 9; set .@i, .@i+1 ) {
+		SetCastleData strnpcinfo(2), .@i, 0;
+	}
+	// Erase Guardian Database information if the new owners do not have Guardian Research.
+	if( getgdskilllv(.@GID,10002) == 0 ) {
+		for( set .@i, 10; .@i <= 17; set .@i, .@i+1 ) {
+			SetCastleData strnpcinfo(2), .@i, 0;
+		}
+	}
+	// Respawn the Emperium, and display new owners.
+	sleep 500; // Slow down script execution slightly.
+	if( agitcheck() )
+		donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena";
+	sleep 7000;
+	announce "The [" + getcastlename(strnpcinfo(2)) + "] castle has been conquered by the [" + getguildName(.@GID) + "] guild.",bc_all|bc_woe;
+	end;
+
+// War of Emperium has ended.
+OnAgitEnd:
+	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
+	GvgOff strnpcinfo(2);
+	// If the castle has no owner at the end of WoE, do not kill Emperium.
+	if (GetCastleData(strnpcinfo(2),1)) {
+		KillMonster strnpcinfo(2),"Agit#"+strnpcinfo(2)+"::OnAgitBreak";
+	}
+	end;
+
+// Occupying Guild has been disbanded.
+OnGuildBreak:
+	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
+	// Kill guardians, disable the Kafra, and set owner to 0.
+	killmonster strnpcinfo(2),"Guardian#"+strnpcinfo(2)+"::OnGuardianDied";
+	disablenpc "Kafra Staff#"+strnpcinfo(2);
+	SetCastleData strnpcinfo(2),0,0;
+	// Wait before refreshing guild information.
+	sleep 7000;
+	Announce "Guild Base [" + GetCastleName(strnpcinfo(2)) + "] has been abandoned.",0;
+	donpcevent strnpcinfo(0)+"::OnRecvCastle";
+	end;
+
+OnAgitInit:
+OnRecvCastle:
+	if (strnpcinfo(0) == "Gld_Agit_Manager") end;
+	// Spawn Monsters if the castle is empty.
+	set .@GID, GetCastleData(strnpcinfo(2),1);
+	if (.@GID == 0) {
+		killmonsterall strnpcinfo(2);
+		if (compare(strnpcinfo(2),"aldeg")) {
+			// Normal Spawns
+			monster strnpcinfo(2),0,0,"Evil Druid",1117,10;
+			monster strnpcinfo(2),0,0,"Khalitzburg",1132,4;
+			monster strnpcinfo(2),0,0,"Abysmal Knight",1219,2;
+			monster strnpcinfo(2),0,0,"Executioner",1205,1;
+			monster strnpcinfo(2),0,0,"Penomena",1216,10;
+			monster strnpcinfo(2),0,0,"Alarm",1193,18;
+			monster strnpcinfo(2),0,0,"Clock",1269,9;
+			monster strnpcinfo(2),0,0,"Raydric Archer",1276,7;
+			monster strnpcinfo(2),0,0,"Wanderer",1208,3;
+			monster strnpcinfo(2),0,0,"Alice",1275,1;
+			monster strnpcinfo(2),0,0,"Bloody Knight",1268,1;
+			monster strnpcinfo(2),0,0,"Dark Lord",1272,1;
+			// Set Emperium room spawn coordinates and spawn monsters.
+			if (strnpcinfo(2) == "aldeg_cas01") { setarray .@emproom[0],216,23; }
+			else if (strnpcinfo(2) == "aldeg_cas02") { setarray .@emproom[0],213,23; }
+			else if (strnpcinfo(2) == "aldeg_cas03") { setarray .@emproom[0],205,31; }
+			else if (strnpcinfo(2) == "aldeg_cas04") { setarray .@emproom[0],36,217; }
+			else if (strnpcinfo(2) == "aldeg_cas05") { setarray .@emproom[0],27,101; }
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Dark Lord",1272,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Tower Keeper",1270,4;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Bloody Knight",1268,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Abysmal Knight",1219,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Raydric Archer",1276,5;
+		}
+		else if (compare(strnpcinfo(2),"gefg")) {
+			// Normal Spawns
+			monster strnpcinfo(2),0,0,"Evil Druid",1117,10;
+			monster strnpcinfo(2),0,0,"Wind Ghost",1263,11;
+			monster strnpcinfo(2),0,0,"Bathory",1102,10;
+			monster strnpcinfo(2),0,0,"Jakk",1130,10;
+			monster strnpcinfo(2),0,0,"Marduk",1140,20;
+			monster strnpcinfo(2),0,0,"Raydric",1163,9;
+			monster strnpcinfo(2),0,0,"Alice",1275,1;
+			monster strnpcinfo(2),0,0,"Abysmal Knight",1219,1;
+			monster strnpcinfo(2),0,0,"Moonlight Flower",1150,1;
+			monster strnpcinfo(2),0,0,"Phreeoni",1159,1;
+			// Set Emperium room spawn coordinates and spawn monsters.
+			if (strnpcinfo(2) == "gefg_cas01") { setarray .@emproom[0],197,181; }
+			else if (strnpcinfo(2) == "gefg_cas02") { setarray .@emproom[0],176,178; }
+			else if (strnpcinfo(2) == "gefg_cas03") { setarray .@emproom[0],244,166; }
+			else if (strnpcinfo(2) == "gefg_cas04") { setarray .@emproom[0],174,177; }
+			else if (strnpcinfo(2) == "gefg_cas05") { setarray .@emproom[0],194,184; }
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Mysteltainn",1203,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Orc Hero",1087,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"High Orc",1213,10;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Orc Archer",1189,10;
+		}
+		else if (compare(strnpcinfo(2),"payg")) {
+			// Normal Spawns
+			monster strnpcinfo(2),0,0,"Greatest General",1277,9;
+			monster strnpcinfo(2),0,0,"Wanderer",1208,10;
+			monster strnpcinfo(2),0,0,"Mutant Dragonoid",1262,5;
+			monster strnpcinfo(2),0,0,"Bathory",1102,5;
+			monster strnpcinfo(2),0,0,"Moonlight Flower",1150,1;
+			monster strnpcinfo(2),0,0,"Eddga",1115,1;
+			monster strnpcinfo(2),0,0,"Horong",1129,11;
+			monster strnpcinfo(2),0,0,"Raydric Archer",1276,5;
+			monster strnpcinfo(2),0,0,"Kobold Archer",1282,4;
+			monster strnpcinfo(2),0,0,"Gargoyle",1253,5;
+			// Set Emperium room spawn coordinates and spawn monsters.
+			if (strnpcinfo(2) == "payg_cas01") { setarray .@emproom[0],139,139; }
+			else if (strnpcinfo(2) == "payg_cas02") { setarray .@emproom[0],38,25; }
+			else if (strnpcinfo(2) == "payg_cas03") { setarray .@emproom[0],269,265; }
+			else if (strnpcinfo(2) == "payg_cas04") { setarray .@emproom[0],270,28; }
+			else if (strnpcinfo(2) == "payg_cas05") { setarray .@emproom[0],30,30; }
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Moonlight Flower",1150,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Eddga",1115,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Wanderer",1208,6;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Raydric Archer",1276,5;
+		}
+		else if (compare(strnpcinfo(2),"prtg")) {
+			// Normal Spawns
+			monster strnpcinfo(2),0,0,"Raydric",1163,1;
+			monster strnpcinfo(2),0,0,"Khalitzburg",1132,10;
+			monster strnpcinfo(2),0,0,"Abysmal Knight",1219,5;
+			monster strnpcinfo(2),0,0,"Bloody Knight",1268,5;
+			monster strnpcinfo(2),0,0,"Stormy Knight",1251,1;
+			monster strnpcinfo(2),0,0,"Hatii",1252,1;
+			monster strnpcinfo(2),0,0,"Raydric Archer",1276,5;
+			monster strnpcinfo(2),0,0,"Gryphon",1259,2;
+			monster strnpcinfo(2),0,0,"Chimera",1283,3;
+			monster strnpcinfo(2),0,0,"Alice",1275,1;
+			monster strnpcinfo(2),0,0,"Zealotus",1200,1;
+			// Set Emperium room spawn coordinates and spawn monsters.
+			if (strnpcinfo(2) == "prtg_cas01") { setarray .@emproom[0],197,197; }
+			else if (strnpcinfo(2) == "prtg_cas02") { setarray .@emproom[0],157,174; }
+			else if (strnpcinfo(2) == "prtg_cas03") { setarray .@emproom[0],16,220; }
+			else if (strnpcinfo(2) == "prtg_cas04") { setarray .@emproom[0],291,14; }
+			else if (strnpcinfo(2) == "prtg_cas05") { setarray .@emproom[0],266,266; }
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Guardian Knight",1268,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Guardian Master",1251,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Hatii",1252,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Guardian Knight",1219,1;
+			monster strnpcinfo(2),.@emproom[0],.@emproom[1],"Raydric Archer",1276,5;
+		}
+		// Add custom Guild Castles here.
+		else {
+			end;
+		}
+		donpcevent "Agit#"+strnpcinfo(2)+"::OnStartArena";
+		// Disable Kafra Staff...
+		disablenpc "Kafra Staff#"+strnpcinfo(2);
+		end;
+	}
+	else {
+		// Otherwise place the guild emblem on flags.
+		if (strnpcinfo(2) == "aldeg_cas01") { donpcevent "::OnRecvCastleA01"; }
+		else if (strnpcinfo(2) == "aldeg_cas02") { donpcevent "::OnRecvCastleA02"; }
+		else if (strnpcinfo(2) == "aldeg_cas03") { donpcevent "::OnRecvCastleA03"; }
+		else if (strnpcinfo(2) == "aldeg_cas04") { donpcevent "::OnRecvCastleA04"; }
+		else if (strnpcinfo(2) == "aldeg_cas05") { donpcevent "::OnRecvCastleA05"; }
+		else if (strnpcinfo(2) == "gefg_cas01") { donpcevent "::OnRecvCastleG01"; }
+		else if (strnpcinfo(2) == "gefg_cas02") { donpcevent "::OnRecvCastleG02"; }
+		else if (strnpcinfo(2) == "gefg_cas03") { donpcevent "::OnRecvCastleG03"; }
+		else if (strnpcinfo(2) == "gefg_cas04") { donpcevent "::OnRecvCastleG04"; }
+		else if (strnpcinfo(2) == "gefg_cas05") { donpcevent "::OnRecvCastleG05"; }
+		else if (strnpcinfo(2) == "payg_cas01") { donpcevent "::OnRecvCastlePy01"; }
+		else if (strnpcinfo(2) == "payg_cas02") { donpcevent "::OnRecvCastlePy02"; }
+		else if (strnpcinfo(2) == "payg_cas03") { donpcevent "::OnRecvCastlePy03"; }
+		else if (strnpcinfo(2) == "payg_cas04") { donpcevent "::OnRecvCastlePy04"; }
+		else if (strnpcinfo(2) == "payg_cas05") { donpcevent "::OnRecvCastlePy05"; }
+		else if (strnpcinfo(2) == "prtg_cas01") { donpcevent "::OnRecvCastlePt01"; }
+		else if (strnpcinfo(2) == "prtg_cas02") { donpcevent "::OnRecvCastlePt02"; }
+		else if (strnpcinfo(2) == "prtg_cas03") { donpcevent "::OnRecvCastlePt03"; }
+		else if (strnpcinfo(2) == "prtg_cas04") { donpcevent "::OnRecvCastlePt04"; }
+		else if (strnpcinfo(2) == "prtg_cas05") { donpcevent "::OnRecvCastlePt05"; }
+		// Add custom Guild Castles here.
+		else {
+			end;
+		}
+		// And load purchased Guardian in castles.
+		donpcevent "Guardian#"+strnpcinfo(2)+"::OnSpawnGuardians";
+		// And display Kafra if purchased.
+		if (GetCastleData(strnpcinfo(2),9) < 1) disablenpc "Kafra Staff#"+strnpcinfo(2);
+	}
+	end;
+}
+
+// WoE : Guild Kafras
+//============================================================
+-	script	Kafra Staff#woe::guildkafra	-1,{
+
+	set .@GID,GetCastleData(strnpcinfo(2),1);
+
+	if (compare(strnpcinfo(2),"aldeg")) {
+		setarray .@destination$[0],"Al De Baran","aldebaran";
+		setarray .@coordinates[0],132,103;
+	}
+	else if (compare(strnpcinfo(2),"gefg")) {
+		setarray .@destination$[0],"Geffen","geffen";
+		setarray .@coordinates[0],120,39;
+	}
+	else if (compare(strnpcinfo(2),"payg")) {
+		setarray .@destination$[0],"Payon","payon";
+		setarray .@coordinates[0],70,100;
+	}
+	else if (compare(strnpcinfo(2),"prtg")) {
+		setarray .@destination$[0],"Prontera","prontera";
+		setarray .@coordinates[0],278,211;
+	}
+	// Add custom Guild Castles here.
+	else {
+		end;
+	}
+
+	cutin "kafra_01",2;
+	if (getcharid(2) == .@GID) {
+		mes "[Kafra Employee]";
+		mes "Welcome. ^ff0000" + GetGuildName(.@GID) + "^000000 Member.";
+		mes "The Kafra Corporation will stay with you wherever you go.";
+		next;
+		switch (select("Use Storage:Use Teleport Service:Rent a Pushcart:Cancel")) {
+		case 1:
+			if (getskilllv("NV_BASIC") < 6) {
+				mes "[Kafra Employee]";
+				mes "I'm sorry, but you";
+				mes "need the Novice's";
+				mes "Basic Skill Level 6 to";
+				mes "use the Storage Service.";
+				close2;
+				cutin "",255;
+				end;
+			}
+			mes "[Kafra Employee]";
+			mes "Here, let me open";
+			mes "your Storage for you.";
+			mes "Thank you for using";
+			mes "the Kafra Service.";
+			close2;
+			cutin "",255;
+			openstorage;
+			end;
+		case 2:
+			mes "[Kafra Employee]";
+			mes "Please choose";
+			mes "your destination.";
+			next;
+			switch (select(.@destination$+" -> 200z:Cancel")) {
+			case 1:
+				if (Zeny < 200) {
+					mes "[Kafra Employee]";
+					mes "I'm sorry, but you don't have";
+					mes "enough zeny for the Teleport";
+					mes "Service. The fee to teleport";
+					mes "to "+.@destination$+" is 200 zeny.";
+					close2;
+					cutin "",255;
+					end;
+				}
+				set Zeny, Zeny - 200;
+				set RESRVPTS,RESRVPTS+2;
+				close2;
+				warp .@destination$[1],.@coordinates[0],.@coordinates[1];
+				end;
+			case 2:
+				close2;
+				cutin "",255;
+				end;
+			}
+		case 3:
+			if (BaseClass != Job_Merchant) {
+				mes "[Kafra Employee]";
+				mes "I'm sorry, but the";
+				mes "Pushcart rental service";
+				mes "is only available to Merchants,";
+				mes "Blacksmiths, Master Smiths,";
+				mes "Alchemists, Biochemists,";
+				mes "Mechanics and Geneticists.";
+				close2;
+				cutin "",255;
+				end;
+			}
+			if (checkcart()) {
+				mes "[Kafra Employee]";
+				mes "You already have";
+				mes "a Pushcart equipped.";
+				mes "Unfortunately, we can't";
+				mes "rent more than one to";
+				mes "each customer at a time.";
+				close2;
+				cutin "",255;
+				end;
+			}
+			mes "[Kafra Employee]";
+			mes "The Pushcart rental";
+			mes "fee is 800 zeny. Would";
+			mes "you like to rent a Pushcart?";
+			next;
+			switch (select("Rent a Pushcart.:Cancel")) {
+			case 1:
+				if (Zeny < 800) {
+					mes "[Kafra Employee]";
+					mes "I'm sorry, but you";
+					mes "don't have enough";
+					mes "zeny to pay the Pushcart";
+					mes "rental fee of 800 zeny.";
+					close2;
+					cutin "",255;
+					end;
+				}
+				set RESRVPTS,RESRVPTS+8;
+				set Zeny, Zeny - 800;
+				setcart;
+				close2;
+				cutin "",255;
+				end;
+			case 2:
+				close2;
+				cutin "",255;
+				end;
+			}
+		case 4:
+			mes "[Kafra Employee]";
+			mes "We, here at Kafra Corporation,";
+			mes "are always endeavoring to provide you with the best services. We hope that we meet your adventuring needs and standards of excellence.";
+			close2;
+			cutin "",255;
+			end;
+		}
+	}
+	mes "[Kafra Employee]";
+	mes "I am instructed to only offer my services to the ^ff0000"+GetGuildName(.@GID)+"^000000 Guild. Please try another Kafra Employee around here. Sorry for the inconvenience.";
+	close2;
+	cutin "",255;
+	end;
+}
+
+// WoE : Castle Managers
+//============================================================
+-	script	Castle Manager#cm::cm	-1,{
+
+	set .@GID,GetCastleData(strnpcinfo(2),1);
+
+	// .@guardiantype = Defines the types of guardians per castle basis.
+	// 1 - Soldier Guardian, 2 - Archer Guardian, 3 - Knight Guardian
+	// .@guardianposx = Define the x spawn point for each uardian.
+	// [0] = 1st guardian's x spawn point.
+	// .@guardianposy = Define the y spawn point for each guardian.
+	// [0] = 1st guardian's y spawn point.
+	// .@masterroom = Defines the coordinates of the Treasure Room.
+	if (strnpcinfo(2) == "aldeg_cas01") { 
+		setarray .@guardiantype[0],1,2,2,2,2,3,3,3;
+		setarray .@guardianposx[0],17,39,38,45,21,218,213,73;
+		setarray .@guardianposy[0],218,208,196,228,194,24,24,70;
+		setarray .@masterroom[0],113,223;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas02") {
+		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
+		setarray .@guardianposx[0],27,88,117,60,51,21,36,210;
+		setarray .@guardianposy[0],184,43,46,202,183,177,183,7;
+		setarray .@masterroom[0],134,225;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas03") {
+		setarray .@guardiantype[0],3,3,1,1,1,2,2,2;
+		setarray .@guardianposx[0],90,116,86,116,64,212,195,110;
+		setarray .@guardianposy[0],112,112,120,76,103,160,151,217;
+		setarray .@masterroom[0],229,267;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas04") {
+		setarray .@guardiantype[0],2,2,2,1,1,1,3,3;
+		setarray .@guardianposx[0],187,192,148,145,169,198,48,55;
+		setarray .@guardianposy[0],100,42,88,209,53,77,72,88;
+		setarray .@masterroom[0],83,17;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas05") {
+		setarray .@guardiantype[0],2,2,1,1,3,3,3,3;
+		setarray .@guardianposx[0],51,188,157,157,27,145,156,41;
+		setarray .@guardianposy[0],202,79,192,74,221,78,73,112;
+		setarray .@masterroom[0],64,8;
+	}
+	// Geffen (Britoniah) Castles
+	else if (strnpcinfo(2) == "gefg_cas01") {
+		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
+		setarray .@guardianposx[0],67,184,62,36,50,50,189,200;
+		setarray .@guardianposy[0],179,20,41,186,186,67,41,167;
+		setarray .@masterroom[0],152,117;
+	}
+	else if (strnpcinfo(2) == "gefg_cas02") {
+		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
+		setarray .@guardianposx[0],64,56,166,35,20,19,166,159;
+		setarray .@guardianposy[0],168,41,25,148,150,41,42,188;
+		setarray .@masterroom[0],145,115;
+	}
+	else if (strnpcinfo(2) == "gefg_cas03") {
+		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
+		setarray .@guardianposx[0],48,113,48,157,243,157,234,238;
+		setarray .@guardianposy[0],176,214,207,62,41,45,25,160;
+		setarray .@masterroom[0],275,289;
+	}
+	else if (strnpcinfo(2) == "gefg_cas04") {
+		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
+		setarray .@guardianposx[0],53,31,49,29,147,57,160,148;
+		setarray .@guardianposy[0],191,178,220,46,65,46,50,189;
+		setarray .@masterroom[0],116,123;
+	}
+	else if (strnpcinfo(2) == "gefg_cas05") {
+		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
+		setarray .@guardianposx[0],45,71,72,66,177,66,177,193;
+		setarray .@guardianposy[0],149,163,142,47,50,17,35,166;
+		setarray .@masterroom[0],149,106;
+	}
+	// Payon (Baulder) Castles
+	else if (strnpcinfo(2) == "payg_cas01") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],229,225,222,99,65,36,51,138;
+		setarray .@guardianposy[0],92,80,111,45,31,127,144,133;
+		setarray .@masterroom[0],295,8;
+	}
+	else if (strnpcinfo(2) == "payg_cas02") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],237,228,210,57,42,287,264,27;
+		setarray .@guardianposy[0],54,72,41,241,241,257,272,20;
+		setarray .@masterroom[0],141,149;
+	}
+	else if (strnpcinfo(2) == "payg_cas03") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],245,269,36,41,39,19,37,268;
+		setarray .@guardianposy[0],37,51,39,39,65,276,277,244;
+		setarray .@masterroom[0],163,167;
+	}
+	else if (strnpcinfo(2) == "payg_cas04") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],251,232,231,32,32,35,36,270;
+		setarray .@guardianposy[0],212,212,175,287,232,45,17,41;
+		setarray .@masterroom[0],151,47;
+	}
+	else if (strnpcinfo(2) == "payg_cas05") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],19,33,266,266,263,263,250,36;
+		setarray .@guardianposy[0],279,260,234,279,37,21,22,36;
+		setarray .@masterroom[0],153,137;
+	}
+	// Prontera (Valkyrie Realms) Castles
+	else if (strnpcinfo(2) == "prtg_cas01") {
+		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
+		setarray .@guardianposx[0],182,182,153,59,50,184,196,107;
+		setarray .@guardianposy[0],62,116,86,28,36,183,189,179;
+		setarray .@masterroom[0],15,209;
+	}
+	else if (strnpcinfo(2) == "prtg_cas02") {
+		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
+		setarray .@guardianposx[0],161,153,178,71,49,64,7,75;
+		setarray .@guardianposy[0],161,161,44,75,28,186,196,175;
+		setarray .@masterroom[0],207,229;
+	}
+	else if (strnpcinfo(2) == "prtg_cas03") {
+		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
+		setarray .@guardianposx[0],191,137,45,50,41,191,179,191;
+		setarray .@guardianposy[0],190,190,99,87,87,42,43,72;
+		setarray .@masterroom[0],190,130;
+	}
+	else if (strnpcinfo(2) == "prtg_cas04") {
+		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
+		setarray .@guardianposx[0],276,274,246,38,29,33,78,36;
+		setarray .@guardianposy[0],14,35,246,240,240,258,48,61;
+		setarray .@masterroom[0],275,160;
+	}
+	else if (strnpcinfo(2) == "prtg_cas05") {
+		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
+		setarray .@guardianposx[0],266,287,245,236,251,278,32,44;
+		setarray .@guardianposy[0],262,280,250,63,63,253,253,248;
+		setarray .@masterroom[0],281,176;
+	}
+	// Add custom Guild Castles here.
+	else {
+		end;
+	}
+
+	if (.@GID == 0) {
+		mes "["+strnpcinfo(1)+"]";
+		mes "I have been waiting for a master to fulfill my destiny.";
+		mes "Brave soul... fate will guide you towards your future...";
+		close;
+	}
+	if (GetGuildMaster(.@GID) != strcharinfo(0)) {
+		mes "["+strnpcinfo(1)+"]";
+		mes "No matter how much you pester me, I'll still follow my master ^ff0000"+GetGuildMaster(.@GID)+"^000000. Where are the Guardians?! Send these ruffians away right now!";
+		close;
+	}
+	mes "["+strnpcinfo(1)+"]";
+	mes "Welcome. My honorable master, ^ff0000"+strcharinfo(0)+"^000000...";
+	mes "Your humble servent, "+strnpcinfo(1)+", is here to serve you.";
+	next;
+	switch (select("Castle briefing:Invest in commercial growth:Invest in Castle Defenses:Summon Guardian:Hire / Fire a Kafra Employee:Go into Master's room")) {
+	case 1:
+		mes "["+strnpcinfo(1)+"]";
+		mes "I will report the Castle briefing, Master.";
+		mes " ";
+		mes "^0000ffNow, the commercial growth level is "+GetCastleData(strnpcinfo(2),2)+".";
+		if (GetCastleData(strnpcinfo(2),4)) {
+			mes " You invested "+GetCastleData(strnpcinfo(2),4)+" times in past 1 day.";
+		}
+		mes " Now, the Castle Defense level is "+GetCastleData(strnpcinfo(2),3)+".^000000";
+		if (GetCastleData(strnpcinfo(2),5)) {
+			mes " ^0000ff- You invested "+GetCastleData(strnpcinfo(2),5)+" times in past 1 day.^000000";
+		}
+		mes " ";
+		mes "That's all I have to report, Master.";
+		close;
+	case 2:
+		if (.@Economy < 6) { set .@eco_invest,5000; }
+		else if ((.@Economy >= 6) && (.@Economy <= 10)) { set .@eco_invest,10000; }
+		else if ((.@Economy >= 11) && (.@Economy <= 15)) { set .@eco_invest,20000; }
+		else if ((.@Economy >= 16) && (.@Economy <= 20)) { set .@eco_invest,35000; }
+		else if ((.@Economy >= 21) && (.@Economy <= 25)) { set .@eco_invest,55000; }
+		else if ((.@Economy >= 26) && (.@Economy <= 30)) { set .@eco_invest,80000; }
+		else if ((.@Economy >= 31) && (.@Economy <= 35)) { set .@eco_invest,110000; }
+		else if ((.@Economy >= 36) && (.@Economy <= 40)) { set .@eco_invest,145000; }
+		else if ((.@Economy >= 41) && (.@Economy <= 45)) { set .@eco_invest,185000; }
+		else if ((.@Economy >= 46) && (.@Economy <= 50)) { set .@eco_invest,230000; }
+		else if ((.@Economy >= 51) && (.@Economy <= 55)) { set .@eco_invest,280000; }
+		else if ((.@Economy >= 56) && (.@Economy <= 60)) { set .@eco_invest,335000; }
+		else if ((.@Economy >= 61) && (.@Economy <= 65)) { set .@eco_invest,395000; }
+		else if ((.@Economy >= 66) && (.@Economy <= 70)) { set .@eco_invest,460000; }
+		else if ((.@Economy >= 71) && (.@Economy <= 75)) { set .@eco_invest,530000; }
+		else if ((.@Economy >= 76) && (.@Economy <= 80)) { set .@eco_invest,605000; }
+		else if ((.@Economy >= 81) && (.@Economy <= 85)) { set .@eco_invest,685000; }
+		else if ((.@Economy >= 86) && (.@Economy <= 90)) { set .@eco_invest,770000; }
+		else if ((.@Economy >= 91) && (.@Economy <= 95)) { set .@eco_invest,860000; }
+		else if ((.@Economy >= 96) && (.@Economy <= 100)) { set .@eco_invest,955000; }
+		//Quadruple the cost of investing if you've already invested once.
+		if (GetCastleData(strnpcinfo(2),4)) {
+			set .@eco_invest,.@eco_invest*4;
+		}
+		mes "["+strnpcinfo(1)+"]";
+		mes "If you invest in commercial growth, the quantity of goods made by the guild will increase. Therfore, if you consider our future, investments will be a necessity.";
+		mes " ";
+		mes "Initially, you are able to invest just once but if you pay more money, you will be able to invest twice.";
+		if (.@Economy == 100) {
+			mes " ";
+			mes "^ff0000The commercial growth level of our Castle is at it's highest, 100%. No more investments are needed. Just as I have expected from a great economist like you, Master.^000000";
+			end;
+		}
+		if (GetCastleData(strnpcinfo(2),4) >= 2) {
+			mes " ";
+			mes "^ff0000You have already invested twice today. You cannot invest any more.^000000 I expect riches of the guild to grow at a high rate.";
+			end;
+		}
+		if (GetCastleData(strnpcinfo(2),4) == 0) {
+			mes " ";
+			mes "The current investment amount required is ^ff0000"+.@eco_invest+"^000000 zeny. Will you invest?";
+		}
+		else {
+			mes " ";
+			mes "You've invested once today... if you wish to invest once more, ^ff0000"+.@eco_invest+"^000000 more zeny will be needed.";
+		}
+		next;
+		switch (select("Invest in commercial growth:Cancel")) {
+		case 1:
+			if (Zeny < .@eco_invest) {
+				mes "["+strnpcinfo(1)+"]";
+				mes "I'm sorry but there is not enough zeny to invest. You will have to try again when you have the funds, Master.";
+				close;
+			}
+			set Zeny, Zeny - .@eco_invest;
+			SetCastleData strnpcinfo(2),4,GetCastleData(strnpcinfo(2),4)+1;
+			mes "[ "+strnpcinfo(1)+"]";
+			mes "We finished the investment safely. I expect that our growth level will be increased by tomorrow.";
+			close;
+		case 2:
+			mes "["+strnpcinfo(1)+"]";
+			mes "I'll do as you bid, my master... There is no hurry. We will do our best.";
+			close;
+		}
+	case 3:
+		set .@Defence,GetCastleData(strnpcinfo(2),3);
+		if (.@Defence < 6) { set .@def_invest,10000; }
+		else if ((.@Defence >= 6) && (.@Defence <= 10)) { set .@def_invest,20000; }
+		else if ((.@Defence >= 11) && (.@Defence <= 15)) { set .@def_invest,40000; }
+		else if ((.@Defence >= 16) && (.@Defence <= 20)) { set .@def_invest,70000; }
+		else if ((.@Defence >= 21) && (.@Defence <= 25)) { set .@def_invest,110000; }
+		else if ((.@Defence >= 26) && (.@Defence <= 30)) { set .@def_invest,160000; }
+		else if ((.@Defence >= 31) && (.@Defence <= 35)) { set .@def_invest,220000; }
+		else if ((.@Defence >= 36) && (.@Defence <= 40)) { set .@def_invest,290000; }
+		else if ((.@Defence >= 41) && (.@Defence <= 45)) { set .@def_invest,370000; }
+		else if ((.@Defence >= 46) && (.@Defence <= 50)) { set .@def_invest,460000; }
+		else if ((.@Defence >= 51) && (.@Defence <= 55)) { set .@def_invest,560000; }
+		else if ((.@Defence >= 56) && (.@Defence <= 60)) { set .@def_invest,670000; }
+		else if ((.@Defence >= 61) && (.@Defence <= 65)) { set .@def_invest,790000; }
+		else if ((.@Defence >= 66) && (.@Defence <= 70)) { set .@def_invest,920000; }
+		else if ((.@Defence >= 71) && (.@Defence <= 75)) { set .@def_invest,1060000; }
+		else if ((.@Defence >= 76) && (.@Defence <= 80)) { set .@def_invest,1210000; }
+		else if ((.@Defence >= 81) && (.@Defence <= 85)) { set .@def_invest,1370000; }
+		else if ((.@Defence >= 86) && (.@Defence <= 90)) { set .@def_invest,1540000; }
+		else if ((.@Defence >= 91) && (.@Defence <= 95)) { set .@def_invest,1720000; }
+		else if ((.@Defence >= 96) && (.@Defence <= 100)) { set .@def_invest,1910000; }
+		//Quadruple the cost of investing if you've already invested once.
+		if (GetCastleData(strnpcinfo(2),5)) {
+			set .@def_invest,.@def_invest*4;
+		}
+		mes "["+strnpcinfo(1)+"]";
+		mes "If you raise Castle Defenses, the durability of Guardians and the Emperium will increase. Therefore, if you consider our coming battles, some investment in this area will be required.";
+		mes " ";
+		mes "Originally you can invest just once but if you pay more money, you can invest twice.";
+		if (.@Defence == 100) {
+			mes " ";
+			mes "^ff0000But the Castle Defense level of our Castle is at it's highest, 100%. No more investments are needed. Just as I have expected from a great strategist like you, Master.^000000";
+			close;
+		}
+		if (GetCastleData(strnpcinfo(2),5) >= 2) {
+			mes " ";
+			mes "^ff0000You have already invested twice today. You cannot invest any more.^000000 I expect the Defenses of the guild to grow at a high rate.";
+			close;
+		}
+		if (GetCastleData(strnpcinfo(2),5) == 0) {
+			mes " ";
+			mes "The current investment amount required is ^ff0000"+.@def_invest+"^000000 zeny. Will you invest?";
+		}
+		else {
+			mes " ";
+			mes "You've invested once today... if you wish to invest once more, ^ff0000"+.@def_invest+"^000000 more zeny will be needed.";
+		}
+		next;
+		switch (select("Invest in Castle Defenses.:Cancel")) {
+		case 1:
+			if (Zeny < .@def_invest) {
+				mes "["+strnpcinfo(1)+"]";
+				mes "I'm sorry but there is not enough zeny to invest. You will have to try again when you have the funds, Master.";
+				close;
+			}
+			set Zeny, Zeny - .@def_invest;
+			SetCastleData strnpcinfo(2),5,GetCastleData(strnpcinfo(2),5)+1;
+			mes "[ "+strnpcinfo(1)+"]";
+			mes "We finished the investment safely. I expect that our Castle Defense level will be increased by tomorrow.";
+			close;
+		case 2:
+			mes "["+strnpcinfo(1)+"]";
+			mes "I'll do as you bid, my master... There is no hurry. We will do our best.";
+			close;
+		}
+	case 4:
+		mes "["+strnpcinfo(1)+"]";
+		mes "Will you summon a Guardian? It'll be a protector to defend us loyally.";
+		mes "Please select a guardian to defend us.";
+		next;
+		for( set .@i, 0; .@i <= 7 ; set .@i, .@i+1 ) {
+			if (.@guardiantype[.@i] == 1) { set .@type$,"Guardian Soldier"; }
+			else if (.@guardiantype[.@i] == 2) { set .@type$,"Guardian Archer"; }
+			else { set .@type$,"Guardian Knight"; }
+			if (guardianinfo(strnpcinfo(2),.@i,0)) {
+				setarray .@gname$[.@i], .@type$ + " - Implemented (" + guardianinfo(strnpcinfo(2),.@i,2) + "/" + guardianinfo(strnpcinfo(2),.@i,1) + ")";
+			}
+			else {
+				setarray .@gname$[.@i], .@type$ + " - Not Implemented";
+			}
+		}
+		set .@menu$,.@gname$[0]+":"+.@gname$[1]+":"+.@gname$[2]+":"+.@gname$[3]+":"+.@gname$[4]+":"+.@gname$[5]+":"+.@gname$[6]+":"+.@gname$[7];
+		set .@GDnum,select(.@menu$)+9;
+		mes "["+strnpcinfo(1)+"]";
+		mes "Will you summon the chosen guardian? 10,000 zeny are required to summon a Guardian.";
+		next;
+		switch (select("Summon:Cancel")) {
+		case 1:
+			if (getgdskilllv(.@GID,10002) == 0) {
+				mes "["+strnpcinfo(1)+"]";
+				mes "Master, we have not the resources to Summon the Guardian. If you want to accumulate them, you have to learn the Guild skill. We failed to summon the Guardian.";
+				close;
+			}
+			if (GetCastleData(strnpcinfo(2),.@GDnum) == 1) {
+				mes "["+strnpcinfo(1)+"]";
+				mes "Master, you already have summoned that Guardian. We cannot summon another.";
+				close;
+			}
+			if (Zeny < 10000) {
+				mes "["+strnpcinfo(1)+"]";
+				mes "Well... I'm sorry but we don't have funds to summon the Guardian. We failed to summon the Guardian.";
+				close;
+			}
+			set Zeny, Zeny - 10000;
+			SetCastleData strnpcinfo(2),.@GDnum,1; // mark as 'installed'
+			set .@UseGID,.@GDnum - 10;
+			if (.@guardiantype[.@UseGID] == 1) { set .@type,1287; }
+			else if (.@guardiantype[.@UseGID] == 2) { set .@type,1285; }
+			else { set .@type,1286; }
+			guardian strnpcinfo(2),.@guardianposx[.@UseGID],.@guardianposy[.@UseGID],strmobinfo(2,.@type),.@type,"Guardian#"+strnpcinfo(2)+"::OnGuardianDied",.@UseGID;
+			mes "["+strnpcinfo(1)+"]";
+			mes "We completed the summoning of the Guardian. Our defenses are now increased with it in place.";
+			close;
+		case 2:
+			mes "["+strnpcinfo(1)+"]";
+			mes "I did as you ordered. But please remember if you the have money to spare, it'll be better to set it up.";
+			close;
+		}
+	case 5:
+		if (GetCastleData(strnpcinfo(2),9) == 1) {
+			mes "["+strnpcinfo(1)+"]";
+			mes "We are currently hiring a Kafra Employee... Do you want to fire the Kafra Employee?";
+			next;
+			switch (select("Fire:Cancel")) {
+			case 1:
+				cutin "kafra_01",2;
+				mes "[ Hired Kafra Employee ]";
+				mes "I worked so hard... How can you do that, Master?... Please... Please reconsider... Check it again, Master... Please...";
+				next;
+				switch (select("Fire:Cancel")) {
+				case 1:
+					mes "[ Hired Kafra Employee ]";
+					mes "Oh, my goodness! This is nonsense!";
+					next;
+					cutin "",255;
+					close;
+				case 2:
+					mes "[ Hired Kafra Employee ]";
+					mes "I'll work hard for you... Thank you!";
+					close;
+				}
+			case 2:
+				mes "["+strnpcinfo(1)+"]";
+				mes "She worked hard in my opinion. It was a good decision to keep her.";
+				close;
+			}
+			disablenpc "Kafra Staff#"+strnpcinfo(2);
+			SetCastleData strnpcinfo(2),9,0;
+			mes "["+strnpcinfo(1)+"]";
+			mes "....";
+			mes "I have discharged the Kafra Employee... But... are you unsatisfied with something?";
+			close;
+		}
+		mes "["+strnpcinfo(1)+"]";
+		mes "Will you contact the kafra Main Office and Hire a Employee for our Castle?";
+		mes "^ff0000 10,000 zeny is required for their services. ";
+		next;
+		switch (select("Hire.:Cancel")) {
+		case 1:
+			if (getgdskilllv(.@GID,10001) == 0) {
+				mes "["+strnpcinfo(1)+"]";
+				mes "Master, we can't hire a Kafra Employee because we don't have a contract with the Kafra Main Office. If you want to obtain a contract with the Kafra Main Office, you will need to learn the Guild skill first.";
+				close;
+			}
+			if (Zeny < 10000) {
+				mes "["+strnpcinfo(1)+"]";
+				mes "Well... I'm sorry but we don't have enough funds to hire a Kafra Employee.";
+				close;
+			}
+			set Zeny, Zeny - 10000;
+			enablenpc "Kafra Staff#"+strnpcinfo(2);
+			SetCastleData strnpcinfo(2),9,1;
+			mes "["+strnpcinfo(1)+"]";
+			mes "We obtained a contract with the kafra Main Office, and hired a Kafra Employee.";
+			next;
+			cutin "kafra_01",2;
+			mes "[ Hired Kafra Employee ]";
+			mes "How do you do? I was dispatched from the Main Office.";
+			mes "I'll do my best to not tarnish the reputation of the Guild.";
+			next;
+			cutin "",255;
+			mes "["+strnpcinfo(1)+"]";
+			mes "The Contract terms of the hired Kafra Employee are for 1 month and after this term, you will need to to pay an additional fee.";
+			mes "It will be useful for our members.";
+			close;
+		case 2:
+			mes "["+strnpcinfo(1)+"]";
+			mes "I did as you ordered, but some of our members will be unhappy. It will be better to hire a Kafra Employee quickly.";
+			close;
+		}
+	case 6:
+		mes "["+strnpcinfo(1)+"]";
+		mes "Do you want to visit the room where our valuables are stored?";
+		mes "That room is restricted to you... you are the only one with access to it.";
+		next;
+		switch (select("Go into Master's room.:Cancel")) {
+		case 1:
+			mes "["+strnpcinfo(1)+"]";
+			mes "I'll show you the secret path. Follow me...please.";
+			mes "When you want to return here, please press the secret switch.";
+			close2;
+			warp strnpcinfo(2),.@masterroom[0],.@masterroom[1];
+			end;
+		case 2:
+			mes "["+strnpcinfo(1)+"]";
+			mes "Goods are produced once a day... if you don't remove them in time, they will not be produced anymore.";
+			mes "Therefore, it will be better if you check up on them from time to time.";
+			close;
+		}
+	}
+}
+
+// WoE : Guild Dungeon Entrances
+//============================================================
+-	script	Lever#gd::gdlever	-1,{
+
+	set .@GID,GetCastleData(strnpcinfo(2),1);
+
+	if (.@GID == 0) {
+		mes "[Ringing Voice]";
+		mes "'Those who overcome an ordeal shows a great deal of bravery... and will find their way to another ordeal.'";
+		close;
+	}
+
+	if (compare(strnpcinfo(2),"aldeg")) {
+		set .@destination$,"gld_dun02";
+		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],32,122;
+		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],79,30;
+		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],165,38;
+		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],160,148;
+		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],103,169;
+	}
+	else if (compare(strnpcinfo(2),"gefg")) {
+		set .@destination$,"gld_dun04";
+		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],39,258;
+		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],125,270;
+		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],268,251;
+		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],268,108;
+		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],230,35;
+	}
+	else if (compare(strnpcinfo(2),"payg")) {
+		set .@destination$,"gld_dun01";
+		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],186,165;
+		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],54,165;
+		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],54,39;
+		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],186,39;
+		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],223,202;
+	}
+	else if (compare(strnpcinfo(2),"prtg")) {
+		set .@destination$,"gld_dun03";
+		if (compare(strnpcinfo(2),"cas01")) setarray .@coordinates[0],28,251;
+		else if (compare(strnpcinfo(2),"cas02")) setarray .@coordinates[0],164,268;
+		else if (compare(strnpcinfo(2),"cas03")) setarray .@coordinates[0],164,179;
+		else if (compare(strnpcinfo(2),"cas04")) setarray .@coordinates[0],268,203;
+		else if (compare(strnpcinfo(2),"cas05")) setarray .@coordinates[0],199,28;
+	}
+	// Add custom Guild Castles here.
+	else {
+		end;
+	}
+
+	mes "[Ringing Voice]";
+	mes "'Only the truly brave can take the test.'";
+	next;
+	mes " ";
+	mes "There's a small lever. Will you pull it?";
+	next;
+	if(select("Pull.:Don't pull.") == 1) {
+		if (getcharid(2) == .@GID) {
+			close2;
+			warp .@destination$,.@coordinates[0],.@coordinates[1];
+			end;
+		}
+		mes " ";
+		mes "Nothing happened.";
+		close;
+	}
+	close;
+}
+
+// Guardian Spawner Template
+//============================================================
+-	script	Gld_Guard_Template::Gld_Guard_Template	-1,{
+// Spawn Guardians in castles
+// When adding new castles, ensure that the coordinates coincide
+// with the coordinates defined in the Guild Steward template.
+OnSpawnGuardians:
+	// Define the types of guardians on a per castle basis.
+	// 1 - Soldier Guardian; 2 - Archer Guardian; 3 - Knight Guardian
+	// Define the x spawn point for each uardian.
+	// [0] = 1st guardian's x spawn point.
+	// Define the y spawn point for each uardian.
+	// [0] = 1st guardian's y spawn point.
+	// Aldebaran (Luina) Castles
+	if (strnpcinfo(2) == "aldeg_cas01") { 
+		setarray .@guardiantype[0],1,2,2,2,2,3,3,3;
+		setarray .@guardianposx[0],17,39,38,45,21,218,213,73;
+		setarray .@guardianposy[0],218,208,196,228,194,24,24,70;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas02") {
+		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
+		setarray .@guardianposx[0],27,88,117,60,51,21,36,210;
+		setarray .@guardianposy[0],184,43,46,202,183,177,183,7;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas03") {
+		setarray .@guardiantype[0],3,3,1,1,1,2,2,2;
+		setarray .@guardianposx[0],90,116,86,116,64,212,195,110;
+		setarray .@guardianposy[0],112,112,120,76,103,160,151,217;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas04") {
+		setarray .@guardiantype[0],2,2,2,1,1,1,3,3;
+		setarray .@guardianposx[0],187,192,148,145,169,198,48,55;
+		setarray .@guardianposy[0],100,42,88,209,53,77,72,88;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas05") {
+		setarray .@guardiantype[0],2,2,1,1,3,3,3,3;
+		setarray .@guardianposx[0],51,188,157,157,27,145,156,41;
+		setarray .@guardianposy[0],202,79,192,74,221,78,73,112;
+	}
+	// Geffen (Britoniah) Castles
+	else if (strnpcinfo(2) == "gefg_cas01") {
+		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
+		setarray .@guardianposx[0],67,184,62,36,50,50,189,200;
+		setarray .@guardianposy[0],179,20,41,186,186,67,41,167;
+	}
+	else if (strnpcinfo(2) == "gefg_cas02") {
+		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
+		setarray .@guardianposx[0],64,56,166,35,20,19,166,159;
+		setarray .@guardianposy[0],168,41,25,148,150,41,42,188;
+	}
+	else if (strnpcinfo(2) == "gefg_cas03") {
+		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
+		setarray .@guardianposx[0],48,113,48,157,243,157,234,238;
+		setarray .@guardianposy[0],176,214,207,62,41,45,25,160;
+	}
+	else if (strnpcinfo(2) == "gefg_cas04") {
+		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
+		setarray .@guardianposx[0],53,31,49,29,147,57,160,148;
+		setarray .@guardianposy[0],191,178,220,46,65,46,50,189;
+	}
+	else if (strnpcinfo(2) == "gefg_cas05") {
+		setarray .@guardiantype[0],2,2,1,1,1,3,3,3;
+		setarray .@guardianposx[0],45,71,72,66,177,66,177,193;
+		setarray .@guardianposy[0],149,163,142,47,50,17,35,166;
+	}
+	// Payon (Baulder) Castles
+	else if (strnpcinfo(2) == "payg_cas01") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],229,225,222,99,65,36,51,138;
+		setarray .@guardianposy[0],92,80,111,45,31,127,144,133;
+	}
+	else if (strnpcinfo(2) == "payg_cas02") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],237,228,210,57,42,287,264,27;
+		setarray .@guardianposy[0],54,72,41,241,241,257,272,20;
+	}
+	else if (strnpcinfo(2) == "payg_cas03") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],245,269,36,41,39,19,37,268;
+		setarray .@guardianposy[0],37,51,39,39,65,276,277,244;
+	}
+	else if (strnpcinfo(2) == "payg_cas04") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],251,232,231,32,32,35,36,270;
+		setarray .@guardianposy[0],212,212,175,287,232,45,17,41;
+	}
+	else if (strnpcinfo(2) == "payg_cas05") {
+		setarray .@guardiantype[0],2,2,2,2,2,2,2,3;
+		setarray .@guardianposx[0],19,33,266,266,263,263,250,36;
+		setarray .@guardianposy[0],279,260,234,279,37,21,22,36;
+	}
+	// Prontera (Valkyrie Realms) Castles
+	else if (strnpcinfo(2) == "prtg_cas01") {
+		setarray .@guardiantype[0],1,1,1,2,2,3,3,3;
+		setarray .@guardianposx[0],182,182,153,59,50,184,196,107;
+		setarray .@guardianposy[0],62,116,86,28,36,183,189,179;
+	}
+	else if (strnpcinfo(2) == "prtg_cas02") {
+		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
+		setarray .@guardianposx[0],161,153,178,71,49,64,7,75;
+		setarray .@guardianposy[0],161,161,44,75,28,186,196,175;
+	}
+	else if (strnpcinfo(2) == "prtg_cas03") {
+		setarray .@guardiantype[0],3,3,3,1,1,2,2,2;
+		setarray .@guardianposx[0],191,137,45,50,41,191,179,191;
+		setarray .@guardianposy[0],190,190,99,87,87,42,43,72;
+	}
+	else if (strnpcinfo(2) == "prtg_cas04") {
+		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
+		setarray .@guardianposx[0],276,274,246,38,29,33,78,36;
+		setarray .@guardianposy[0],14,35,246,240,240,258,48,61;
+	}
+	else if (strnpcinfo(2) == "prtg_cas05") {
+		setarray .@guardiantype[0],3,3,3,1,1,1,2,2;
+		setarray .@guardianposx[0],266,287,245,236,251,278,32,44;
+		setarray .@guardianposy[0],262,280,250,63,63,253,253,248;
+	}
+	// Add custom Guild Castles here.
+	else {
+		end;
+	}
+
+	// Kill all existing guardians before spawning new ones.
+	// This should prevent duplicating Guardians when char Server disconnects.
+	killmonster strnpcinfo(2),strnpcinfo(0)+"::OnGuardianDied";
+
+	for( set .@i, 0; .@i <= 7 ; set .@i, .@i+1 ) {
+		set .@UseGID,.@i + 10;
+		if (.@guardiantype[.@i] == 1) { set .@type,1287; }
+		else if (.@guardiantype[.@i] == 2) { set .@type,1285; }
+		else { set .@type,1286; }
+		if (GetCastleData(strnpcinfo(2),.@UseGID)) {
+			guardian strnpcinfo(2),.@guardianposx[.@i],.@guardianposy[.@i],strmobinfo(2,.@type),.@type,"Guardian#"+strnpcinfo(2)+"::OnGuardianDied",.@i;
+		}
+	}
+	end;
+
+OnGuardianDied:
+	end;
+}
+
+// Treasure Room Spawn Template
+//============================================================
+-	script	Gld_Trea_Spawn::Gld_Trea_Spawn	-1,{
+	end;
+
+OnClock0001:
+	// Do nothing if this script is the template.
+	if (strnpcinfo(1) == "Gld_Trea_Spawn") end;
+	
+	set .@GID, GetCastleData(strnpcinfo(2),1);
+	
+	// If there is no owner, do nothing.
+	if (!.@GID) end;
+
+	// Is there Economy in this castle?
+	set .@Treasure,GetCastleData(strnpcinfo(2),2)/5+4;
+
+	// Set information
+	if (strnpcinfo(2) == "aldeg_cas01") { 
+		set .@treasurebox,1324;
+		setarray .@treasurex[0],115,122,115,122,116,117,118,119,120,121,121,121,121,121,121,120,119,118,117,116,116,116,116,116;
+		setarray .@treasurey[0],226,226,219,219,225,225,225,225,225,225,224,223,222,221,220,220,220,220,220,220,221,222,223,224;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas02") { 
+		set .@treasurebox,1326;
+		setarray .@treasurex[0],134,135,135,134,132,133,134,135,136,137,137,137,137,137,137,136,135,134,133,132,132,132,132,132;
+		setarray .@treasurey[0],231,231,230,230,233,233,233,233,233,233,232,231,230,229,228,228,228,228,228,228,229,230,231,232;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas03") { 
+		set .@treasurebox,1328;
+		setarray .@treasurex[0],224,225,225,224,222,223,224,225,226,227,227,227,227,227,227,226,225,224,223,222,222,222,222,222;
+		setarray .@treasurey[0],269,269,268,268,271,271,271,271,271,271,270,269,268,267,266,266,266,266,266,266,267,268,269,270;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas04") { 
+		set .@treasurebox,1330;
+		setarray .@treasurex[0],84,85,85,84,82,83,84,85,86,87,87,87,87,87,87,86,85,84,83,82,82,82,82,82;
+		setarray .@treasurey[0],13,13,12,12,15,15,15,15,15,15,14,13,12,11,10,10,10,10,10,10,11,12,13,14;
+	}
+	else if (strnpcinfo(2) == "aldeg_cas05") { 
+		set .@treasurebox,1332;
+		setarray .@treasurex[0],61,62,62,61,59,60,61,62,63,64,64,64,64,64,64,63,62,61,60,59,59,59,59,59;
+		setarray .@treasurey[0],12,12,11,11,14,14,14,14,14,14,13,12,11,10,9,9,9,9,9,9,10,11,12,13;
+	}
+	else if (strnpcinfo(2) == "gefg_cas01") { 
+		set .@treasurebox,1334;
+		setarray .@treasurex[0],153,154,154,153,151,152,153,154,155,156,156,156,156,156,156,155,154,153,152,151,151,151,151,151;
+		setarray .@treasurey[0],113,113,112,112,115,115,115,115,115,115,114,113,112,111,110,110,110,110,110,110,111,112,113,114;
+	}
+	else if (strnpcinfo(2) == "gefg_cas02") { 
+		set .@treasurebox,1336;
+		setarray .@treasurex[0],139,140,140,139,137,138,139,140,141,142,142,142,142,142,142,141,140,139,138,137,137,137,137,137;
+		setarray .@treasurey[0],115,115,114,114,117,117,117,117,117,117,116,115,114,113,112,112,112,112,112,112,113,114,115,116;
+	}
+	else if (strnpcinfo(2) == "gefg_cas03") { 
+		set .@treasurebox,1338;
+		setarray .@treasurex[0],269,270,270,269,267,268,269,270,271,272,272,272,272,272,272,271,270,269,268,267,267,267,267,267;
+		setarray .@treasurey[0],291,291,290,290,293,293,293,293,293,293,292,291,290,289,288,288,288,288,288,288,289,290,291,292;
+	}
+	else if (strnpcinfo(2) == "gefg_cas04") { 
+		set .@treasurebox,1340;
+		setarray .@treasurex[0],115,116,116,115,113,114,115,116,117,118,118,118,118,118,118,117,116,115,114,113,113,113,113,113;
+		setarray .@treasurey[0],119,119,118,118,121,121,121,121,121,121,120,119,118,117,116,116,116,116,116,116,117,118,119,120;
+	}
+	else if (strnpcinfo(2) == "gefg_cas05") { 
+		set .@treasurebox,1342;
+		setarray .@treasurex[0],143,144,144,143,141,142,143,144,145,146,146,146,146,146,146,145,144,143,142,141,141,141,141,141;
+		setarray .@treasurey[0],110,110,109,109,112,112,112,112,112,112,111,110,109,108,107,107,107,107,107,107,108,109,110,111;
+	}
+	else if (strnpcinfo(2) == "payg_cas01") { 
+		set .@treasurebox,1344;
+		setarray .@treasurex[0],289,292,292,289,288,289,290,291,292,293,293,293,293,293,293,292,291,290,289,288,288,288,288,288;
+		setarray .@treasurey[0],10,10,7,7,11,11,11,11,11,11,10,9,8,7,6,6,6,6,6,6,7,8,9,10;
+	}
+	else if (strnpcinfo(2) == "payg_cas02") { 
+		set .@treasurebox,1346;
+		setarray .@treasurex[0],143,146,146,143,142,143,144,145,146,147,147,147,147,147,147,146,145,144,143,142,142,142,142,142;
+		setarray .@treasurey[0],146,146,143,143,147,147,147,147,147,147,146,145,144,143,142,142,142,142,142,142,143,144,145,146;
+	}
+	else if (strnpcinfo(2) == "payg_cas03") { 
+		set .@treasurebox,1348;
+		setarray .@treasurex[0],158,159,159,158,156,157,158,159,160,161,161,161,161,161,161,160,159,158,157,156,156,156,156,156;
+		setarray .@treasurey[0],169,169,168,168,171,171,171,171,171,171,170,169,168,167,166,166,166,166,166,166,167,168,169,170;
+	}
+	else if (strnpcinfo(2) == "payg_cas04") { 
+		set .@treasurebox,1350;
+		setarray .@treasurex[0],146,147,147,146,144,145,146,147,148,149,149,149,149,149,149,148,147,146,145,144,144,144,144,144;
+		setarray .@treasurey[0],48,48,47,47,50,50,50,50,50,50,49,48,47,46,45,45,45,45,45,45,46,47,48,49;
+	}
+	else if (strnpcinfo(2) == "payg_cas05") { 
+		set .@treasurebox,1352;
+		setarray .@treasurex[0],155,158,158,155,154,155,156,157,158,159,159,159,159,159,159,158,157,156,155,154,154,154,154,154;
+		setarray .@treasurey[0],134,134,131,131,135,135,135,135,135,135,134,133,132,131,130,130,130,130,130,130,131,132,133,134;
+	}
+	else if (strnpcinfo(2) == "prtg_cas01") { 
+		set .@treasurebox,1354;
+		setarray .@treasurex[0],10,11,11,10,8,9,10,11,12,13,13,13,13,13,13,12,11,10,9,8,8,8,8,8;
+		setarray .@treasurey[0],209,209,208,208,211,211,211,211,211,211,210,209,208,207,206,206,206,206,206,206,207,208,209,210;
+	}
+	else if (strnpcinfo(2) == "prtg_cas02") { 
+		set .@treasurebox,1356;
+		setarray .@treasurex[0],201,202,202,201,199,200,201,202,203,204,204,204,204,204,204,203,202,201,200,199,199,199,199,199;
+		setarray .@treasurey[0],228,228,227,227,230,230,230,230,230,230,229,228,227,226,225,225,225,225,225,225,226,227,228,229;
+	}
+	else if (strnpcinfo(2) == "prtg_cas03") { 
+		set .@treasurebox,1358;
+		setarray .@treasurex[0],187,188,188,187,185,186,187,188,189,190,190,190,190,190,190,189,188,187,186,185,185,185,185,185;
+		setarray .@treasurey[0],132,132,131,131,134,134,134,134,134,134,133,132,131,130,129,129,129,129,129,129,130,131,132,133;
+	}
+	else if (strnpcinfo(2) == "prtg_cas04") { 
+		set .@treasurebox,1360;
+		setarray .@treasurex[0],269,270,270,269,267,268,269,270,271,272,272,272,272,272,272,271,270,269,268,267,267,267,267,267;
+		setarray .@treasurey[0],162,162,161,161,164,164,164,164,164,164,163,162,161,160,159,159,159,159,159,159,160,161,162,163;
+	}
+	else if (strnpcinfo(2) == "prtg_cas05") { 
+		set .@treasurebox,1362;
+		setarray .@treasurex[0],275,276,276,275,273,274,275,276,277,278,278,278,278,278,278,277,276,275,274,273,273,273,273,273;
+		setarray .@treasurey[0],178,178,177,177,180,180,180,180,180,180,179,178,177,176,175,175,175,175,175,175,176,177,178,179;
+	}
+	// Add custom Guild Castles here.
+	else {
+		end;
+	}
+
+	// Apply investment to Eco. and Def. Only happens if there were investments made.
+	// Permanent Development can only happen once per day.
+	if (GetCastleData(strnpcinfo(2),4)) {
+		set .@Economy,GetCastleData(strnpcinfo(2),2);
+		SetCastleData strnpcinfo(2),2,.@Economy + GetCastleData(strnpcinfo(2),4) + (rand(2) && getgdskilllv(.@GID,10014));
+		if (GetCastleData(strnpcinfo(2),2) > 100) SetCastleData strnpcinfo(2),2,100;
+	}
+	if (GetCastleData(strnpcinfo(2),5)) {
+		set .@Defence,GetCastleData(strnpcinfo(2),3);
+		SetCastleData strnpcinfo(2),3,.@Defence + GetCastleData(strnpcinfo(2),5);
+		if (GetCastleData(strnpcinfo(2),3) > 100) SetCastleData strnpcinfo(2),3,100;
+	}
+	// Reset daily investment limits.
+	setcastledata strnpcinfo(2),4,0;
+	setcastledata strnpcinfo(2),5,0;
+
+	// Spawn boxes in proper order.
+	for (set .@i,0; .@i < .@Treasure ; set .@i,.@i+1) {
+		// set treasure box ID
+		set .@boxid, .@treasurebox + (.@i+2) % 2;
+		set .@box,1 << .@i;
+		// Spawn or do not spawn chests if one already exists.
+		if ((getd("$@"+strnpcinfo(2)+"_treasure") & .@box) == 0) {
+			monster strnpcinfo(2),.@treasurex[.@i],.@treasurey[.@i],"Treasure Chest",.@boxid,1,"Treasure#"+strnpcinfo(2)+"::OnTreasureDied"+.@i;
+			setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") | .@box;
+		}
+	}
+	end;
+
+// Individual "You killed a chest" events to ensure proper spawning at the change of day.
+OnTreasureDied0:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~1;
+	end;
+OnTreasureDied1:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~2;
+	end;
+OnTreasureDied2:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~4;
+	end;
+OnTreasureDied3:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~8;
+	end;
+OnTreasureDied4:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~16;
+	end;
+OnTreasureDied5:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~32;
+	end;
+OnTreasureDied6:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~64;
+	end;
+OnTreasureDied7:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~128;
+	end;
+OnTreasureDied8:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~256;
+	end;
+OnTreasureDied9:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~512;
+	end;
+OnTreasureDied10:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~1024;
+	end;
+OnTreasureDied11:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~2048;
+	end;
+OnTreasureDied12:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~4096;
+	end;
+OnTreasureDied13:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~8192;
+	end;
+OnTreasureDied14:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~16384;
+	end;
+OnTreasureDied15:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~32768;
+	end;
+OnTreasureDied16:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~65536;
+	end;
+OnTreasureDied17:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~131072;
+	end;
+OnTreasureDied18:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~262144;
+	end;
+OnTreasureDied19:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~524288;
+	end;
+OnTreasureDied20:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~1048576;
+	end;
+OnTreasureDied21:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~2097152;
+	end;
+OnTreasureDied22:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~4194304;
+	end;
+OnTreasureDied23:
+	setd "$@"+strnpcinfo(2)+"_treasure",getd("$@"+strnpcinfo(2)+"_treasure") & ~8388608;
+	end;
+}

+ 78 - 76
npc/guild/aldeg_cas01.txt

@@ -1,9 +1,9 @@
 //===== rAthena Script =======================================
-//= War of Emperium (Al De baran)
+//= War of Emperium (Al De Baran)
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,26 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-aldebaran,152,97,4	script	Neuschwanstein#a1-1::Neuschwanstein	722,{
-	end;
-
-OnRecvCastleA01:
-	FlagEmblem GetCastleData("aldeg_cas01",1);
-	end;
-}
+-	script	Neuschwanstein#1::OutsideFlagsA1	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-alde_gld,61,87,6	script	Neuschwanstein#a1-2::Neuschwanstein2	722,{
 	set .@GID, GetCastleData("aldeg_cas01",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,32 +32,33 @@ alde_gld,61,87,6	script	Neuschwanstein#a1-2::Neuschwanstein2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("aldeg_cas01",1)) {
-					warp "aldeg_cas01",218,170;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("aldeg_cas01",1)) {
+				warp "aldeg_cas01",218,170;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleA01:
@@ -72,13 +66,14 @@ OnRecvCastleA01:
 	end;
 }
 
-alde_gld,61,79,6	duplicate(Neuschwanstein2)	Neuschwanstein#a1-3	722
-alde_gld,45,87,8	duplicate(Neuschwanstein2)	Neuschwanstein#a1-4	722
-alde_gld,51,87,8	duplicate(Neuschwanstein2)	Neuschwanstein#a1-5	722
+alde_gld,61,87,6	duplicate(OutsideFlagsA1)	Neuschwanstein#1-2	722
+alde_gld,61,79,6	duplicate(OutsideFlagsA1)	Neuschwanstein#2	722
+alde_gld,45,87,8	duplicate(OutsideFlagsA1)	Neuschwanstein#3	722
+alde_gld,51,87,8	duplicate(OutsideFlagsA1)	Neuschwanstein#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-aldeg_cas01,30,248,4	script	Neuschwanstein#a1-6::Neuschwanstein3	722,{
+-	script	Neuschwanstein#5::InsideFlagsA1	722,{
 	end;
 
 OnRecvCastleA01:
@@ -86,57 +81,64 @@ OnRecvCastleA01:
 	end;
 }
 
-aldeg_cas01,30,246,4	duplicate(Neuschwanstein3)	Neuschwanstein#a1-7	722
-aldeg_cas01,37,248,4	duplicate(Neuschwanstein3)	Neuschwanstein#a1-8	722
-aldeg_cas01,37,246,4	duplicate(Neuschwanstein3)	Neuschwanstein#a1-9	722
-aldeg_cas01,95,80,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-10	722
-aldeg_cas01,95,59,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-11	722
-aldeg_cas01,62,75,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-12	722
-aldeg_cas01,70,75,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-13	722
-aldeg_cas01,74,75,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-14	722
-aldeg_cas01,62,64,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-15	722
-aldeg_cas01,66,64,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-16	722
-aldeg_cas01,70,64,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-17	722
-aldeg_cas01,74,64,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-18	722
-aldeg_cas01,203,150,4	duplicate(Neuschwanstein3)	Neuschwanstein#a1-19	722
-aldeg_cas01,210,150,4	duplicate(Neuschwanstein3)	Neuschwanstein#a1-20	722
-aldeg_cas01,66,75,2	duplicate(Neuschwanstein3)	Neuschwanstein#a1-21	722
+aldeg_cas01,30,248,4	duplicate(InsideFlagsA1)	Neuschwanstein#5-2	722
+aldeg_cas01,30,248,4	duplicate(InsideFlagsA1)	Neuschwanstein#6	722
+aldeg_cas01,37,248,4	duplicate(InsideFlagsA1)	Neuschwanstein#7	722
+aldeg_cas01,37,246,4	duplicate(InsideFlagsA1)	Neuschwanstein#8	722
+aldeg_cas01,30,246,4	duplicate(InsideFlagsA1)	Neuschwanstein#9	722
+aldeg_cas01,95,80,2	duplicate(InsideFlagsA1)	Neuschwanstein#10	722
+aldeg_cas01,95,59,2	duplicate(InsideFlagsA1)	Neuschwanstein#11	722
+aldeg_cas01,62,75,2	duplicate(InsideFlagsA1)	Neuschwanstein#12	722
+aldeg_cas01,66,75,2	duplicate(InsideFlagsA1)	Neuschwanstein#13	722
+aldeg_cas01,70,75,2	duplicate(InsideFlagsA1)	Neuschwanstein#14	722
+aldeg_cas01,74,75,2	duplicate(InsideFlagsA1)	Neuschwanstein#15	722
+aldeg_cas01,62,64,2	duplicate(InsideFlagsA1)	Neuschwanstein#16	722
+aldeg_cas01,66,64,2	duplicate(InsideFlagsA1)	Neuschwanstein#17	722
+aldeg_cas01,70,64,2	duplicate(InsideFlagsA1)	Neuschwanstein#18	722
+aldeg_cas01,74,64,2	duplicate(InsideFlagsA1)	Neuschwanstein#19	722
+aldeg_cas01,74,64,2	duplicate(InsideFlagsA1)	Neuschwanstein#20	722
+aldeg_cas01,203,150,4	duplicate(InsideFlagsA1)	Neuschwanstein#21	722
+aldeg_cas01,210,150,4	duplicate(InsideFlagsA1)	Neuschwanstein#22	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-aldeg_cas01,216,24,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas01	-1
+aldebaran,152,97,4	duplicate(InsideFlagsA1)	Neuschwanstein#23	722
 
-// Steward
+// Kafra Employee
 //============================================================
-aldeg_cas01,218,175,0	duplicate(Gld_Mngr_Template)	Alfredo#aldeg_cas01	55
+aldeg_cas01,218,170,0	duplicate(guildkafra)	Kafra Staff#aldeg_cas01	117
 
-// Guardians
+// Steward
 //============================================================
-aldeg_cas01,218,175,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas01	-1
+aldeg_cas01,218,175,0	duplicate(cm)	Alfredo#aldeg_cas01	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-aldeg_cas01,218,170,0	duplicate(Gld_Kafra_Template)	Kafra Staff#aldeg_cas01	117
+aldeg_cas01,123,223,0	script	#lever_A01	111,{
 
-// Master's Room Exit
-//============================================================
-aldeg_cas01,123,223,0	script	#switch_A01	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "aldeg_cas01",218,176;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "aldeg_cas01",218,176;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-aldeg_cas01,118,223,0	duplicate(Gld_Trea_Protect)	ban_warp#aldeg_cas01	-1,8,8
+aldeg_cas01,211,181,0	duplicate(gdlever)	#aldeg_cas01	111
 
 // Guild Treasure Spawns
 //============================================================
 aldeg_cas01,118,223,0	duplicate(Gld_Trea_Spawn)	Treasure#aldeg_cas01	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+aldeg_cas01,216,24,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas01	-1
+
+// Guardians
 //============================================================
-aldeg_cas01,211,181,0	duplicate(Gld_Dun_Template)	#aldeg_cas01	111
+aldeg_cas01,218,175,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas01	-1

+ 72 - 75
npc/guild/aldeg_cas02.txt

@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-//= War of Emperium (Al De baran)
+//= War of Emperium (Al De Baran)
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
@@ -10,28 +10,20 @@
 //= NPCs that relate to Al De Baran Guild Castle 2
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
-//= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-aldebaran,149,97,4	script	Hohenschwangau#a2-1::Hohenschwangau	722,{
-	end;
-
-OnRecvCastleA02:
-	FlagEmblem GetCastleData("aldeg_cas02",1);
-	end;
-}
+-	script	Hohenschwangau#1::OutsideFlagsA2	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-alde_gld,99,251,4	script	Hohenschwangau#a2-2::Hohenschwangau2	722,{
 	set .@GID, GetCastleData("aldeg_cas02",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -40,33 +32,33 @@ alde_gld,99,251,4	script	Hohenschwangau#a2-2::Hohenschwangau2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("aldeg_cas02",1)) {
-					warp "aldeg_cas02",84,74;
-					//warp "aldeg_cas02",220,190;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("aldeg_cas02",1)) {
+				warp "aldeg_cas02",220,190;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleA02:
@@ -74,11 +66,12 @@ OnRecvCastleA02:
 	end;
 }
 
-alde_gld,99,244,4	duplicate(Hohenschwangau2)	Hohenschwangau#a2-3	722
+alde_gld,99,251,4	duplicate(OutsideFlagsA2)	Hohenschwangau#1-2	722
+alde_gld,99,244,4	duplicate(OutsideFlagsA2)	Hohenschwangau#2	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-aldeg_cas02,82,71,2	script	Hohenschwangau#a2-4::Hohenschwangau3	722,{
+-	script	Hohenschwangau#3::InsideFlagsA2	722,{
 	end;
 
 OnRecvCastleA02:
@@ -86,56 +79,60 @@ OnRecvCastleA02:
 	end;
 }
 
-aldeg_cas02,67,30,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-5	722
-aldeg_cas02,183,140,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-6	722
-aldeg_cas02,212,152,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-7	722
-aldeg_cas02,108,39,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-8	722
-aldeg_cas02,57,213,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-9	722
-aldeg_cas02,91,181,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-10	722
-aldeg_cas02,103,53,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-11	722
-aldeg_cas02,73,53,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-12	722
-aldeg_cas02,63,41,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-13	722
-aldeg_cas02,229,6,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-14	722
-aldeg_cas02,230,40,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-15	722
-aldeg_cas02,197,40,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-16	722
-aldeg_cas02,32,213,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-17	722
-aldeg_cas02,121,29,2	duplicate(Hohenschwangau3)	Hohenschwangau#a2-18	722
+aldeg_cas02,82,71,2	duplicate(InsideFlagsA2)	Hohenschwangau#3-2	722
+aldeg_cas02,67,30,2	duplicate(InsideFlagsA2)	Hohenschwangau#4	722
+aldeg_cas02,183,140,2	duplicate(InsideFlagsA2)	Hohenschwangau#5	722
+aldeg_cas02,212,152,2	duplicate(InsideFlagsA2)	Hohenschwangau#6	722
+aldeg_cas02,108,39,2	duplicate(InsideFlagsA2)	Hohenschwangau#7	722
+aldeg_cas02,57,213,2	duplicate(InsideFlagsA2)	Hohenschwangau#8	722
+aldeg_cas02,103,53,2	duplicate(InsideFlagsA2)	Hohenschwangau#9	722
+aldeg_cas02,73,53,2	duplicate(InsideFlagsA2)	Hohenschwangau#10	722
+aldeg_cas02,63,41,2	duplicate(InsideFlagsA2)	Hohenschwangau#11	722
+aldeg_cas02,229,6,2	duplicate(InsideFlagsA2)	Hohenschwangau#12	722
+aldeg_cas02,230,40,2	duplicate(InsideFlagsA2)	Hohenschwangau#13	722
+aldeg_cas02,197,40,2	duplicate(InsideFlagsA2)	Hohenschwangau#14	722
+aldeg_cas02,32,213,2	duplicate(InsideFlagsA2)	Hohenschwangau#15	722
+aldeg_cas02,121,29,2	duplicate(InsideFlagsA2)	Hohenschwangau#16	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-aldeg_cas02,214,24,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas02	-1
+aldebaran,149,97,4	duplicate(InsideFlagsA2)	Hohenschwangau#17	722
 
-// Steward
+// Kafra Employee
 //============================================================
-aldeg_cas02,78,74,0	duplicate(Gld_Mngr_Template)	Chenchenlie#aldeg_cas02	55
+aldeg_cas02,84,74,0	duplicate(guildkafra)	Kafra Staff#aldeg_cas02	117
 
-// Guardians
+// Steward
 //============================================================
-aldeg_cas02,78,74,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas02	-1
+aldeg_cas02,78,74,0	duplicate(cm)	Chenchenlie#aldeg_cas02	55
 
-// Kafra Staff
+// Treasure Room Lever
 //============================================================
-aldeg_cas02,84,74,0	duplicate(Gld_Kafra_Template)	Kafra Staff#aldeg_cas02	117
+aldeg_cas02,139,234,0	script	#lever_A02	111,{
 
-// Master's Room Exit
-//============================================================
-aldeg_cas02,139,235,0	script	#switch_A02	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "aldeg_cas02",78,75;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "aldeg_cas02",78,75;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Lever
 //============================================================
-aldeg_cas02,135,230,0	duplicate(Gld_Trea_Protect)	ban_warp#aldeg_cas02	-1,8,8
+aldeg_cas02,194,136,0	duplicate(gdlever)	#aldeg_cas02	111
 
 // Guild Treasure Spawns
 //============================================================
 aldeg_cas02,135,230,0	duplicate(Gld_Trea_Spawn)	Treasure#aldeg_cas02	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+aldeg_cas02,214,24,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas02	-1
+
+// Guardians
 //============================================================
-aldeg_cas02,194,136,0	duplicate(Gld_Dun_Template)	#aldeg_cas02	111
+aldeg_cas02,78,74,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas02	-1

+ 74 - 73
npc/guild/aldeg_cas03.txt

@@ -1,9 +1,9 @@
 //===== rAthena Script =======================================
-//= War of Emperium (Al De baran)
+//= War of Emperium (Al De Baran)
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,26 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-aldebaran,134,97,4	script	Nuenberg#a3-1::Nuenberg	722,{
-	end;
-
-OnRecvCastleA03:
-	FlagEmblem GetCastleData("aldeg_cas03",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-alde_gld,138,82,0	script	Nuenberg#a3-2::Nuenberg2	722,{
+-	script	Nuernberg#1::OutsideFlagsA3	722,{
+
 	set .@GID, GetCastleData("aldeg_cas03",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,33 +32,33 @@ alde_gld,138,82,0	script	Nuenberg#a3-2::Nuenberg2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("aldeg_cas03",1)) {
-					warp "aldeg_cas03",118,76;
-					//warp "aldeg_cas03",205,186;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("aldeg_cas03",1)) {
+				warp "aldeg_cas03",205,186;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleA03:
@@ -73,11 +66,12 @@ OnRecvCastleA03:
 	end;
 }
 
-alde_gld,146,82,0	duplicate(Nuenberg2)	Nuenberg#a3-3	722
+alde_gld,146,82,8	duplicate(OutsideFlagsA3)	Nuernberg#1-2	722
+alde_gld,138,82,8	duplicate(OutsideFlagsA3)	Nuernberg#2	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-aldeg_cas03,176,175,2	script	Nuenberg#a3-4::Nuenberg3	722,{
+-	script	Nuernberg#3::InsideFlagsA3	722,{
 	end;
 
 OnRecvCastleA03:
@@ -85,56 +79,63 @@ OnRecvCastleA03:
 	end;
 }
 
-aldeg_cas03,77,115,2	duplicate(Nuenberg3)	Nuenberg#a3-5	722
-aldeg_cas03,77,215,2	duplicate(Nuenberg3)	Nuenberg#a3-6	722
-aldeg_cas03,112,107,2	duplicate(Nuenberg3)	Nuenberg#a3-7	722
-aldeg_cas03,112,117,2	duplicate(Nuenberg3)	Nuenberg#a3-8	722
-aldeg_cas03,69,71,2	duplicate(Nuenberg3)	Nuenberg#a3-9	722
-aldeg_cas03,91,69,2	duplicate(Nuenberg3)	Nuenberg#a3-10	722
-aldeg_cas03,108,60,2	duplicate(Nuenberg3)	Nuenberg#a3-11	722
-aldeg_cas03,121,73,2	duplicate(Nuenberg3)	Nuenberg#a3-12	722
-aldeg_cas03,75,102,2	duplicate(Nuenberg3)	Nuenberg#a3-13	722
-aldeg_cas03,199,169,2	duplicate(Nuenberg3)	Nuenberg#a3-14	722
-aldeg_cas03,181,179,2	duplicate(Nuenberg3)	Nuenberg#a3-15	722
-aldeg_cas03,192,44,2	duplicate(Nuenberg3)	Nuenberg#a3-16	722
-aldeg_cas03,208,145,2	duplicate(Nuenberg3)	Nuenberg#a3-17	722
-aldeg_cas03,96,62,2	duplicate(Nuenberg3)	Nuenberg#a3-18	722
+aldeg_cas03,176,175,2	duplicate(InsideFlagsA3)	Nuernberg#3-2	722
+aldeg_cas03,77,115,2	duplicate(InsideFlagsA3)	Nuernberg#4	722
+aldeg_cas03,77,215,2	duplicate(InsideFlagsA3)	Nuernberg#5	722
+aldeg_cas03,112,107,2	duplicate(InsideFlagsA3)	Nuernberg#6	722
+aldeg_cas03,112,117,2	duplicate(InsideFlagsA3)	Nuernberg#7	722
+aldeg_cas03,69,71,2	duplicate(InsideFlagsA3)	Nuernberg#8	722
+aldeg_cas03,91,69,2	duplicate(InsideFlagsA3)	Nuernberg#9	722
+aldeg_cas03,108,60,2	duplicate(InsideFlagsA3)	Nuernberg#10	722
+aldeg_cas03,121,73,2	duplicate(InsideFlagsA3)	Nuernberg#11	722
+aldeg_cas03,121,73,2	duplicate(InsideFlagsA3)	Nuernberg#12	722
+aldeg_cas03,75,102,2	duplicate(InsideFlagsA3)	Nuernberg#13	722
+aldeg_cas03,199,169,2	duplicate(InsideFlagsA3)	Nuernberg#14	722
+aldeg_cas03,181,179,2	duplicate(InsideFlagsA3)	Nuernberg#15	722
+aldeg_cas03,192,44,2	duplicate(InsideFlagsA3)	Nuernberg#16	722
+aldeg_cas03,208,145,2	duplicate(InsideFlagsA3)	Nuernberg#17	722
+aldeg_cas03,207,75,2	duplicate(InsideFlagsA3)	Nuernberg#18	722
+aldeg_cas03,96,62,2	duplicate(InsideFlagsA3)	Nuernberg#19	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-aldeg_cas03,206,32,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas03	-1
+aldebaran,134,97,4	duplicate(InsideFlagsA3)	Nuernberg#20	722
 
-// Steward
+// Kafra Employee
 //============================================================
-aldeg_cas03,110,118,0	duplicate(Gld_Mngr_Template)	Nahzarf#aldeg_cas03	55
+aldeg_cas03,118,76,0	duplicate(guildkafra)	Kafra Staff#aldeg_cas03	117
 
-// Guardians
+// Steward
 //============================================================
-aldeg_cas03,110,118,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas03	-1
+aldeg_cas03,110,118,0	duplicate(cm)	Nahzarf#aldeg_cas03	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-aldeg_cas03,118,76,0	duplicate(Gld_Kafra_Template)	Kafra Staff#aldeg_cas03	117
+aldeg_cas03,229,267,0	script	#lever_A03	111,{
 
-// Master's Room Exit
-//============================================================
-aldeg_cas03,229,267,0	script	#switch_A03	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "aldeg_cas03",110,119;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "aldeg_cas03",110,119;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-aldeg_cas03,225,269,0	duplicate(Gld_Trea_Protect)	ban_warp#aldeg_cas03	-1,8,8
+aldeg_cas03,200,177,0	duplicate(gdlever)	#aldeg_cas03	111
 
 // Guild Treasure Spawns
 //============================================================
 aldeg_cas03,225,269,0	duplicate(Gld_Trea_Spawn)	Treasure#aldeg_cas03	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+aldeg_cas03,206,32,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas03	-1
+
+// Guardians
 //============================================================
-aldeg_cas03,200,177,0	duplicate(Gld_Dun_Template)	#aldeg_cas03	111
+aldeg_cas03,110,118,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas03	-1

+ 74 - 75
npc/guild/aldeg_cas04.txt

@@ -1,9 +1,9 @@
 //===== rAthena Script =======================================
-//= War of Emperium (Al De baran)
+//= War of Emperium (Al De Baran)
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,26 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-aldebaran,131,97,4	script	Wuerzburg#a4-1::Wuerzburg	722,{
-	end;
-
-OnRecvCastleA04:
-	FlagEmblem GetCastleData("aldeg_cas04",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-alde_gld,239,246,2	script	Wuerzburg#a4-2::Wuerzburg2	722,{
+-	script	Wuerzburg#1::OutsideFlagsA4	722,{
+
 	set .@GID, GetCastleData("aldeg_cas04",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,33 +32,33 @@ alde_gld,239,246,2	script	Wuerzburg#a4-2::Wuerzburg2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("aldeg_cas04",1)) {
-					warp "aldeg_cas04",45,88;
-					//warp "aldeg_cas04",116,217;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("aldeg_cas04",1)) {
+				warp "aldeg_cas04",116,217;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleA04:
@@ -73,11 +66,12 @@ OnRecvCastleA04:
 	end;
 }
 
-alde_gld,239,239,2	duplicate(Wuerzburg2)	Wuerzburg#a4-3	722
+alde_gld,239,246,2	duplicate(OutsideFlagsA4)	Wuerzburg#1-2	722
+alde_gld,239,239,2	duplicate(OutsideFlagsA4)	Wuerzburg#2	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-aldeg_cas04,167,61,2	script	Wuerzburg#a4-4::Wuerzburg3	722,{
+-	script	Wuerzburg#3::InsideFlagsA4	722,{
 	end;
 
 OnRecvCastleA04:
@@ -85,58 +79,63 @@ OnRecvCastleA04:
 	end;
 }
 
-aldeg_cas04,164,90,2	duplicate(Wuerzburg3)	Wuerzburg#a4-5	722
-aldeg_cas04,129,193,2	duplicate(Wuerzburg3)	Wuerzburg#a4-6	722
-aldeg_cas04,112,206,2	duplicate(Wuerzburg3)	Wuerzburg#a4-7	722
-aldeg_cas04,113,212,2	duplicate(Wuerzburg3)	Wuerzburg#a4-8	722
-aldeg_cas04,77,117,2	duplicate(Wuerzburg3)	Wuerzburg#a4-9	722
-aldeg_cas04,186,42,2	duplicate(Wuerzburg3)	Wuerzburg#a4-10	722
-aldeg_cas04,30,69,2	duplicate(Wuerzburg3)	Wuerzburg#a4-11	722
-aldeg_cas04,55,97,2	duplicate(Wuerzburg3)	Wuerzburg#a4-12	722
-aldeg_cas04,45,98,2	duplicate(Wuerzburg3)	Wuerzburg#a4-13	722
-aldeg_cas04,33,116,2	duplicate(Wuerzburg3)	Wuerzburg#a4-14	722
-aldeg_cas04,130,180,2	duplicate(Wuerzburg3)	Wuerzburg#a4-15	722
-aldeg_cas04,129,193,2	duplicate(Wuerzburg3)	Wuerzburg#a4-16	722
-aldeg_cas04,33,107,2	duplicate(Wuerzburg3)	Wuerzburg#a4-17	722
-aldeg_cas04,133,220,2	duplicate(Wuerzburg3)	Wuerzburg#a4-18	722
-aldeg_cas04,169,22,2	duplicate(Wuerzburg3)	Wuerzburg#a4-19	722
-aldeg_cas04,169,15,2	duplicate(Wuerzburg3)	Wuerzburg#a4-20	722
+aldeg_cas04,167,61,2	duplicate(InsideFlagsA4)	Wuerzburg#3-2	722
+aldeg_cas04,164,90,2	duplicate(InsideFlagsA4)	Wuerzburg#4	722
+aldeg_cas04,129,193,2	duplicate(InsideFlagsA4)	Wuerzburg#5	722
+aldeg_cas04,112,206,2	duplicate(InsideFlagsA4)	Wuerzburg#6	722
+aldeg_cas04,113,212,2	duplicate(InsideFlagsA4)	Wuerzburg#7	722
+aldeg_cas04,77,117,2	duplicate(InsideFlagsA4)	Wuerzburg#8	722
+aldeg_cas04,186,42,2	duplicate(InsideFlagsA4)	Wuerzburg#9	722
+aldeg_cas04,30,69,2	duplicate(InsideFlagsA4)	Wuerzburg#10	722
+aldeg_cas04,55,97,2	duplicate(InsideFlagsA4)	Wuerzburg#11	722
+aldeg_cas04,45,98,2	duplicate(InsideFlagsA4)	Wuerzburg#12	722
+aldeg_cas04,33,116,2	duplicate(InsideFlagsA4)	Wuerzburg#13	722
+aldeg_cas04,130,180,2	duplicate(InsideFlagsA4)	Wuerzburg#14	722
+aldeg_cas04,129,193,2	duplicate(InsideFlagsA4)	Wuerzburg#15	722
+aldeg_cas04,33,107,2	duplicate(InsideFlagsA4)	Wuerzburg#16	722
+aldeg_cas04,133,220,2	duplicate(InsideFlagsA4)	Wuerzburg#17	722
+aldeg_cas04,169,22,2	duplicate(InsideFlagsA4)	Wuerzburg#18	722
+aldeg_cas04,169,15,2	duplicate(InsideFlagsA4)	Wuerzburg#19	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-aldeg_cas04,36,218,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas04	-1
+aldebaran,131,97,4	duplicate(InsideFlagsA4)	Wuerzburg#20	722
 
-// Steward
+// Kafra Employee
 //============================================================
-aldeg_cas04,67,116,0	duplicate(Gld_Mngr_Template)	Brymhensen#aldeg_cas04	55
+aldeg_cas04,45,88,0	duplicate(guildkafra)	Kafra Staff#aldeg_cas04	117
 
-// Guardians
+// Steward
 //============================================================
-aldeg_cas04,67,116,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas04	-1
+aldeg_cas04,67,116,0	duplicate(cm)	Brymhensen#aldeg_cas04	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-aldeg_cas04,45,88,0	duplicate(Gld_Kafra_Template)	Kafra Staff#aldeg_cas04	117
+aldeg_cas04,83,17,0	script	#lever_A04	111,{
 
-// Master's Room Exit
-//============================================================
-aldeg_cas04,83,17,0	script	#switch_A04	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "aldeg_cas04",67,117;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "aldeg_cas04",67,117;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-aldeg_cas04,84,13,0	duplicate(Gld_Trea_Protect)	ban_warp#aldeg_cas04	-1,8,8
+aldeg_cas04,76,64,0	duplicate(gdlever)	#aldeg_cas04	111
 
 // Guild Treasure Spawns
 //============================================================
 aldeg_cas04,84,13,0	duplicate(Gld_Trea_Spawn)	Treasure#aldeg_cas04	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+aldeg_cas04,36,218,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas04	-1
+
+// Guardians
 //============================================================
-aldeg_cas04,38,76,0	duplicate(Gld_Dun_Template)	#aldeg_cas04	111
+aldeg_cas04,67,116,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas04	-1

+ 73 - 74
npc/guild/aldeg_cas05.txt

@@ -1,5 +1,5 @@
 //===== rAthena Script =======================================
-//= War of Emperium (Al De baran)
+//= War of Emperium (Al De Baran)
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
@@ -10,28 +10,20 @@
 //= NPCs that relate to Al De Baran Guild Castle 5
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
-//= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-aldebaran,128,97,4	script	Rothenburg#a5-1::Rothenburg	722,{
-	end;
-
-OnRecvCastleA05:
-	FlagEmblem GetCastleData("aldeg_cas05",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-alde_gld,265,93,6	script	Rothenburg#a5-2::Rothenburg2	722,{
+-	script	Rothenburg#1::OutsideFlagsA5	722,{
+
 	set .@GID, GetCastleData("aldeg_cas05",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -40,33 +32,33 @@ alde_gld,265,93,6	script	Rothenburg#a5-2::Rothenburg2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("aldeg_cas05",1)) {
-					warp "aldeg_cas05",31,190;
-					//warp "aldeg_cas05",167,225;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("aldeg_cas05",1)) {
+				warp "aldeg_cas05",167,225;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleA05:
@@ -74,11 +66,12 @@ OnRecvCastleA05:
 	end;
 }
 
-alde_gld,265,87,6	duplicate(Rothenburg2)	Rothenburg#a5-3	722
+alde_gld,265,93,6	duplicate(OutsideFlagsA5)	Rothenburg#1-2	722
+alde_gld,265,87,6	duplicate(OutsideFlagsA5)	Rothenburg#2	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-aldeg_cas05,170,85,2	script	Rothenburg#a5-4::Rothenburg3	722,{
+-	script	Rothenburg#3::InsideFlagsA5	722,{
 	end;
 
 OnRecvCastleA05:
@@ -86,56 +79,62 @@ OnRecvCastleA05:
 	end;
 }
 
-aldeg_cas05,142,212,2	duplicate(Rothenburg3)	Rothenburg#a5-5	722
-aldeg_cas05,149,196,2	duplicate(Rothenburg3)	Rothenburg#a5-6	722
-aldeg_cas05,41,180,2	duplicate(Rothenburg3)	Rothenburg#a5-7	722
-aldeg_cas05,38,201,2	duplicate(Rothenburg3)	Rothenburg#a5-8	722
-aldeg_cas05,65,182,2	duplicate(Rothenburg3)	Rothenburg#a5-9	722
-aldeg_cas05,65,205,2	duplicate(Rothenburg3)	Rothenburg#a5-10	722
-aldeg_cas05,10,218,2	duplicate(Rothenburg3)	Rothenburg#a5-11	722
-aldeg_cas05,164,201,2	duplicate(Rothenburg3)	Rothenburg#a5-12	722
-aldeg_cas05,14,117,2	duplicate(Rothenburg3)	Rothenburg#a5-14	722
-aldeg_cas05,10,225,2	duplicate(Rothenburg3)	Rothenburg#a5-15	722
-aldeg_cas05,187,59,2	duplicate(Rothenburg3)	Rothenburg#a5-16	722
-aldeg_cas05,154,51,2	duplicate(Rothenburg3)	Rothenburg#a5-17	722
-aldeg_cas05,22,211,2	duplicate(Rothenburg3)	Rothenburg#a5-18	722
-aldeg_cas05,150,202,2	duplicate(Rothenburg3)	Rothenburg#a5-19	722
+aldeg_cas05,170,85,2	duplicate(InsideFlagsA5)	Rothenburg#3-2	722
+aldeg_cas05,142,212,2	duplicate(InsideFlagsA5)	Rothenburg#4	722
+aldeg_cas05,149,196,2	duplicate(InsideFlagsA5)	Rothenburg#5	722
+aldeg_cas05,41,180,2	duplicate(InsideFlagsA5)	Rothenburg#6	722
+aldeg_cas05,38,201,2	duplicate(InsideFlagsA5)	Rothenburg#7	722
+aldeg_cas05,65,182,2	duplicate(InsideFlagsA5)	Rothenburg#8	722
+aldeg_cas05,65,205,2	duplicate(InsideFlagsA5)	Rothenburg#9	722
+aldeg_cas05,10,218,2	duplicate(InsideFlagsA5)	Rothenburg#10	722
+aldeg_cas05,10,218,2	duplicate(InsideFlagsA5)	Rothenburg#11	722
+aldeg_cas05,164,201,2	duplicate(InsideFlagsA5)	Rothenburg#12	722
+aldeg_cas05,14,117,2	duplicate(InsideFlagsA5)	Rothenburg#13	722
+aldeg_cas05,10,225,2	duplicate(InsideFlagsA5)	Rothenburg#14	722
+aldeg_cas05,187,59,2	duplicate(InsideFlagsA5)	Rothenburg#15	722
+aldeg_cas05,154,51,2	duplicate(InsideFlagsA5)	Rothenburg#16	722
+aldeg_cas05,22,211,2	duplicate(InsideFlagsA5)	Rothenburg#17	722
+aldeg_cas05,150,202,2	duplicate(InsideFlagsA5)	Rothenburg#18	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-aldeg_cas05,28,102,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas05	-1
+aldebaran,128,97,4	duplicate(InsideFlagsA5)	Rothenburg#19	722
 
-// Steward
+// Kafra Employee
 //============================================================
-aldeg_cas05,52,179,0	duplicate(Gld_Mngr_Template)	Blemhemsen#aldeg_cas05	55
+aldeg_cas05,31,190,0	duplicate(guildkafra)	Kafra Staff#aldeg_cas05	117
 
-// Guardians
+// Steward
 //============================================================
-aldeg_cas05,52,179,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas05	-1
+aldeg_cas05,51,179,0	duplicate(cm)	Esmarehk#aldeg_cas05	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-aldeg_cas05,31,190,0	duplicate(Gld_Kafra_Template)	Kafra Staff#aldeg_cas05	117
+aldeg_cas05,64,8,0	script	#lever_A05	111,{
 
-// Master's Room Exit
-//============================================================
-aldeg_cas05,64,8,0	script	#switch_A05	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "aldeg_cas05",51,179;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "aldeg_cas05",51,179;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-aldeg_cas05,62,12,0	duplicate(Gld_Trea_Protect)	ban_warp#aldeg_cas05	-1,8,8
+aldeg_cas05,22,205,0	duplicate(gdlever)	#aldeg_cas05	111
 
 // Guild Treasure Spawns
 //============================================================
 aldeg_cas05,62,12,0	duplicate(Gld_Trea_Spawn)	Treasure#aldeg_cas05	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+aldeg_cas05,28,102,0	duplicate(Gld_Agit_Manager)	Agit#aldeg_cas05	-1
+
+// Guardians
 //============================================================
-aldeg_cas05,22,205,0	duplicate(Gld_Dun_Template)	#aldeg_cas05	111
+aldeg_cas05,52,179,0	duplicate(Gld_Guard_Template)	Guardian#aldeg_cas05	-1

+ 64 - 65
npc/guild/gefg_cas01.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,26 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-geffen,109,123,2	script	Repherion#g1-1::Repherion	722,{
-	end;
-
-OnRecvCastleG01:
-	FlagEmblem GetCastleData("gefg_cas01",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-gef_fild13,148,51,5	script	Repherion#g1-2::Repherion2	722,{
+-	script	Repherion#1::OutsideFlagsG1	722,{
+
 	set .@GID, GetCastleData("gefg_cas01",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,33 +32,33 @@ gef_fild13,148,51,5	script	Repherion#g1-2::Repherion2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("gefg_cas01",1)) {
-					warp "gefg_cas01",83,47;
-					//warp "gefg_cas01",197,36;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("gefg_cas01",1)) {
+				warp "gefg_cas01",197,36;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleG01:
@@ -73,13 +66,14 @@ OnRecvCastleG01:
 	end;
 }
 
-gef_fild13,155,54,5	duplicate(Repherion2)	Repherion#g1-3	722
-gef_fild13,212,79,6	duplicate(Repherion2)	Repherion#g1-4	722
-gef_fild13,211,71,6	duplicate(Repherion2)	Repherion#g1-5	722
+gef_fild13,148,51,5	duplicate(OutsideFlagsG1)	Repherion#1-2	722
+gef_fild13,155,54,5	duplicate(OutsideFlagsG1)	Repherion#2	722
+gef_fild13,212,79,6	duplicate(OutsideFlagsG1)	Repherion#3	722
+gef_fild13,211,71,6	duplicate(OutsideFlagsG1)	Repherion#4	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-gefg_cas01,28,157,4	script	Repherion#g1-6::Repherion3	722,{
+-	script	Repherion#5::InsideFlagsG1	722,{
 	end;
 
 OnRecvCastleG01:
@@ -87,47 +81,52 @@ OnRecvCastleG01:
 	end;
 }
 
-gefg_cas01,22,156,5	duplicate(Repherion3)	Repherion#g1-7	722
-gefg_cas01,68,185,3	duplicate(Repherion3)	Repherion#g1-8	722
-gefg_cas01,17,171,5	duplicate(Repherion3)	Repherion#g1-9	722
-gefg_cas01,59,16,4	duplicate(Repherion3)	Repherion#g1-10	722
-gefg_cas01,64,16,4	duplicate(Repherion3)	Repherion#g1-11	722
+gefg_cas01,28,157,4	duplicate(InsideFlagsG1)	Repherion#5-2	722
+gefg_cas01,22,156,5	duplicate(InsideFlagsG1)	Repherion#6	722
+gefg_cas01,68,185,3	duplicate(InsideFlagsG1)	Repherion#7	722
+gefg_cas01,17,171,5	duplicate(InsideFlagsG1)	Repherion#8	722
+gefg_cas01,59,16,4	duplicate(InsideFlagsG1)	Repherion#9	722
+gefg_cas01,64,16,4	duplicate(InsideFlagsG1)	Repherion#10	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-gefg_cas01,198,182,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas01	-1
+geffen,109,123,2	duplicate(InsideFlagsG1)	Repherion#11	722
 
-// Steward
+// Kafra Employee
 //============================================================
-gefg_cas01,40,48,5	duplicate(Gld_Mngr_Template)	Gnahcher#gefg_cas01	55
+gefg_cas01,83,47,3	duplicate(guildkafra)	Kafra Staff#gefg_cas01	117
 
-// Guardians
+// Steward
 //============================================================
-gefg_cas01,40,48,5	duplicate(Gld_Guard_Template)	Guardian#gefg_cas01	-1
+gefg_cas01,40,48,5	duplicate(cm)	Gnahcher#gefg_cas01	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-gefg_cas01,84,47,0	duplicate(Gld_Kafra_Template)	Kafra Staff#gefg_cas01	117
+gefg_cas01,152,117,0	script	#lever_G01	111,{
 
-// Master's Room Exit
-//============================================================
-gefg_cas01,152,117,0	script	#switch_G01	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "gefg_cas01",40,49;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "gefg_cas01",40,49;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-gefg_cas01,154,112,0	duplicate(Gld_Trea_Protect)	ban_warp#gefg_cas01	-1,6,6
+gefg_cas01,78,84,0	duplicate(gdlever)	#gefg_cas01	111
 
 // Guild Treasure Spawns
 //============================================================
 gefg_cas01,154,112,0	duplicate(Gld_Trea_Spawn)	Treasure#gefg_cas01	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+gefg_cas01,198,182,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas01	-1
+
+// Guardians
 //============================================================
-gefg_cas01,78,84,0	duplicate(Gld_Dun_Template)	#gefg_cas01	111
+gefg_cas01,40,48,5	duplicate(Gld_Guard_Template)	Guardian#gefg_cas01	-1

+ 65 - 66
npc/guild/gefg_cas02.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,26 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-geffen,113,130,1	script	Eeyolbriggar#g2-1::Eeyolbriggar	722,{
-	end;
-
-OnRecvCastleG02:
-	FlagEmblem GetCastleData("gefg_cas02",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-gef_fild13,303,243,4	script	Eeyolbriggar#g2-2::Eeyolbriggar2	722,{
+-	script	Eeyorbriggar#1::OutsideFlagsG2	722,{
+
 	set .@GID, GetCastleData("gefg_cas02",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,33 +32,33 @@ gef_fild13,303,243,4	script	Eeyolbriggar#g2-2::Eeyolbriggar2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("gefg_cas02",1)) {
-					warp "gefg_cas02",23,66;
-					//warp "gefg_cas02",178,43;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("gefg_cas02",1)) {
+				warp "gefg_cas02",178,43;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleG02:
@@ -73,13 +66,14 @@ OnRecvCastleG02:
 	end;
 }
 
-gef_fild13,312,243,4	duplicate(Eeyolbriggar2)	Eeyolbriggar#g2-3	722
-gef_fild13,290,243,4	duplicate(Eeyolbriggar2)	Eeyolbriggar#g2-4	722
-gef_fild13,324,243,4	duplicate(Eeyolbriggar2)	Eeyolbriggar#g2-5	722
+gef_fild13,303,243,4	duplicate(OutsideFlagsG2)	Eeyorbriggar#1-2	722
+gef_fild13,312,243,4	duplicate(OutsideFlagsG2)	Eeyorbriggar#2	722
+gef_fild13,290,243,4	duplicate(OutsideFlagsG2)	Eeyorbriggar#3	722
+gef_fild13,324,243,4	duplicate(OutsideFlagsG2)	Eeyorbriggar#4	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-gefg_cas02,65,130,5	script	Eeyolbriggar#g2-6::Eeyolbriggar3	722,{
+-	script	Eeyorbriggar#5::InsideFlagsG2	722,{
 	end;
 
 OnRecvCastleG02:
@@ -87,48 +81,53 @@ OnRecvCastleG02:
 	end;
 }
 
-gefg_cas02,30,123,5	duplicate(Eeyolbriggar3)	Eeyolbriggar#g2-7	722
-gefg_cas02,65,139,6	duplicate(Eeyolbriggar3)	Eeyolbriggar#g2-8	722
-gefg_cas02,37,177,6	duplicate(Eeyolbriggar3)	Eeyolbriggar#g2-9	722
-gefg_cas02,37,168,6	duplicate(Eeyolbriggar3)	Eeyolbriggar#g2-10	722
-gefg_cas02,68,47,2	duplicate(Eeyolbriggar3)	Eeyolbriggar#g2-11	722
-gefg_cas02,68,36,2	duplicate(Eeyolbriggar3)	Eeyolbriggar#g2-12	722
+gefg_cas02,65,130,5	duplicate(InsideFlagsG2)	Eeyorbriggar#5-2	722
+gefg_cas02,30,123,5	duplicate(InsideFlagsG2)	Eeyorbriggar#6	722
+gefg_cas02,65,139,6	duplicate(InsideFlagsG2)	Eeyorbriggar#7	722
+gefg_cas02,37,177,6	duplicate(InsideFlagsG2)	Eeyorbriggar#8	722
+gefg_cas02,37,168,6	duplicate(InsideFlagsG2)	Eeyorbriggar#9	722
+gefg_cas02,68,47,2	duplicate(InsideFlagsG2)	Eeyorbriggar#10	722
+gefg_cas02,68,36,2	duplicate(InsideFlagsG2)	Eeyorbriggar#11	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-gefg_cas02,176,178,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas02	-1
+geffen,112,129,1	duplicate(InsideFlagsG2)	Eeyorbriggar#12	722
 
-// Steward
+// Kafra Employee
 //============================================================
-gefg_cas02,12,66,5	duplicate(Gld_Mngr_Template)	Esmarehk#gefg_cas02	55
+gefg_cas02,23,66,3	duplicate(guildkafra)	Kafra Staff#gefg_cas02	117
 
-// Guardians
+// Steward
 //============================================================
-gefg_cas02,12,66,5	duplicate(Gld_Guard_Template)	Guardian#gefg_cas02	-1
+gefg_cas02,12,66,5	duplicate(cm)	Esmarehk#gefg_cas02	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-gefg_cas02,23,66,3	duplicate(Gld_Kafra_Template)	Kafra Staff#gefg_cas02	117
+gefg_cas02,145,114,0	script	#lever_G02	111,{
 
-// Master's Room Exit
-//============================================================
-gefg_cas02,145,115,0	script	#switch_G02	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "gefg_cas02",12,67;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "gefg_cas02",12,67;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-gefg_cas02,140,116,0	duplicate(Gld_Trea_Protect)	ban_warp#gefg_cas02	-1,6,6
+gefg_cas02,167,40,0	duplicate(gdlever)	#gefg_cas2	111
 
 // Guild Treasure Spawns
 //============================================================
 gefg_cas02,140,116,0	duplicate(Gld_Trea_Spawn)	Treasure#gefg_cas02	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+gefg_cas02,176,178,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas02	-1
+
+// Guardians
 //============================================================
-gefg_cas02,167,40,0	duplicate(Gld_Dun_Template)	#gefg_cas02	111
+gefg_cas02,12,66,5	duplicate(Gld_Guard_Template)	Guardian#gefg_cas02	-1

+ 68 - 69
npc/guild/gefg_cas03.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,26 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-geffen,120,132,8	script	Yesnelph#g3-1::Yesnelph	722,{
-	end;
-
-OnRecvCastleG03:
-	FlagEmblem GetCastleData("gefg_cas03",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-gef_fild13,78,182,4	script	Yesnelph#g3-2::Yesnelph2	722,{
+-	script	Yesnelph#1::OutsideFlagsG3	722,{
+
 	set .@GID, GetCastleData("gefg_cas03",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,33 +32,33 @@ gef_fild13,78,182,4	script	Yesnelph#g3-2::Yesnelph2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("gefg_cas03",1)) {
-					warp "gefg_cas03",116,89;
-					//warp "gefg_cas03",221,30;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("gefg_cas03",1)) {
+				warp "gefg_cas03",221,30;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleG03:
@@ -73,15 +66,16 @@ OnRecvCastleG03:
 	end;
 }
 
-gef_fild13,87,182,4	duplicate(Yesnelph2)	Yesnelph#g3-3	722
-gef_fild13,73,295,7	duplicate(Yesnelph2)	Yesnelph#g3-4	722
-gef_fild13,113,274,7	duplicate(Yesnelph2)	Yesnelph#g3-5	722
-gef_fild13,144,235,6	duplicate(Yesnelph2)	Yesnelph#g3-6	722
-gef_fild13,144,244,4	duplicate(Yesnelph2)	Yesnelph#g3-7	722
+gef_fild13,78,182,4	duplicate(OutsideFlagsG3)	Yesnelph#1-2	722
+gef_fild13,87,182,4	duplicate(OutsideFlagsG3)	Yesnelph#2	722
+gef_fild13,73,295,7	duplicate(OutsideFlagsG3)	Yesnelph#3	722
+gef_fild13,113,274,7	duplicate(OutsideFlagsG3)	Yesnelph#4	722
+gef_fild13,144,235,6	duplicate(OutsideFlagsG3)	Yesnelph#5	722
+gef_fild13,144,244,6	duplicate(OutsideFlagsG3)	Yesnelph#6	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-gefg_cas03,122,220,6	script	Yesnelph#g3-8::Yesnelph3	722,{
+-	script	Yesnelph#7::InsideFlagsG3	722,{
 	end;
 
 OnRecvCastleG03:
@@ -89,49 +83,54 @@ OnRecvCastleG03:
 	end;
 }
 
-gefg_cas03,122,229,6	duplicate(Yesnelph3)	Yesnelph#g3-9	722
-gefg_cas03,91,257,7	duplicate(Yesnelph3)	Yesnelph#g3-10	722
-gefg_cas03,52,276,7	duplicate(Yesnelph3)	Yesnelph#g3-11	722
-gefg_cas03,56,164,4	duplicate(Yesnelph3)	Yesnelph#g3-12	722
-gefg_cas03,65,164,4	duplicate(Yesnelph3)	Yesnelph#g3-13	722
-gefg_cas03,37,214,1	duplicate(Yesnelph3)	Yesnelph#g3-14	722
-gefg_cas03,34,208,1	duplicate(Yesnelph3)	Yesnelph#g3-15	722
+gefg_cas03,122,220,6	duplicate(InsideFlagsG3)	Yesnelph#7-2	722
+gefg_cas03,122,229,6	duplicate(InsideFlagsG3)	Yesnelph#8	722
+gefg_cas03,91,257,7	duplicate(InsideFlagsG3)	Yesnelph#9	722
+gefg_cas03,52,276,7	duplicate(InsideFlagsG3)	Yesnelph#10	722
+gefg_cas03,56,164,4	duplicate(InsideFlagsG3)	Yesnelph#11	722
+gefg_cas03,65,164,4	duplicate(InsideFlagsG3)	Yesnelph#12	722
+gefg_cas03,37,214,1	duplicate(InsideFlagsG3)	Yesnelph#13	722
+gefg_cas03,34,208,1	duplicate(InsideFlagsG3)	Yesnelph#14	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-gefg_cas03,245,167,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas03	-1
+geffen,120,132,8	duplicate(InsideFlagsG3)	Yesnelph#15	722
 
-// Steward
+// Kafra Employee
 //============================================================
-gefg_cas03,106,23,5	duplicate(Gld_Mngr_Template)	Jean#gefg_cas03	55
+gefg_cas03,116,89,5	duplicate(guildkafra)	Kafra Staff#gefg_cas03	117
 
-// Guardians
+// Steward
 //============================================================
-gefg_cas03,106,23,5	duplicate(Gld_Guard_Template)	Guardian#gefg_cas03	-1
+gefg_cas03,106,23,5	duplicate(cm)	Jyang#gefg_cas03	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-gefg_cas03,116,89,5	duplicate(Gld_Kafra_Template)	Kafra Staff#gefg_cas03	117
+gefg_cas03,275,289,0	script	#lever_G03	111,{
 
-// Master's Room Exit
-//============================================================
-gefg_cas03,275,289,0	script	#switch_G03	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "gefg_cas03",106,24;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "gefg_cas03",106,24;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-gefg_cas03,271,290,0	duplicate(Gld_Trea_Protect)	ban_warp#gefg_cas03	-1,6,6
+gefg_cas03,221,43,0	duplicate(gdlever)	#gefg_cas03	111
 
 // Guild Treasure Spawns
 //============================================================
 gefg_cas03,271,290,0	duplicate(Gld_Trea_Spawn)	Treasure#gefg_cas03	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+gefg_cas03,245,167,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas03	-1
+
+// Guardians
 //============================================================
-gefg_cas03,221,43,0	duplicate(Gld_Dun_Template)	#gefg_cas03	111
+gefg_cas03,106,23,5	duplicate(Gld_Guard_Template)	Guardian#gefg_cas03	-1

+ 64 - 66
npc/guild/gefg_cas04.txt

@@ -10,28 +10,20 @@
 //= NPCs that relate to Geffen Guild Castle 4
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Corrected treasure room switch coordinates. [L0ne_W0lf]
-//= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-geffen,127,130,7	script	Bergel#g4-1::Bergel	722,{
-	end;
-
-OnRecvCastleG04:
-	FlagEmblem GetCastleData("gefg_cas04",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-gef_fild13,190,283,3	script	Bergel#g4-2::Bergel2	722,{
+-	script	Bergel#1::OutsideFlagsG4	722,{
+
 	set .@GID, GetCastleData("gefg_cas04",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -40,33 +32,33 @@ gef_fild13,190,283,3	script	Bergel#g4-2::Bergel2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("gefg_cas04",1)) {
-					warp "gefg_cas04",59,70;
-					//warp "gefg_cas04",168 43;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("gefg_cas04",1)) {
+				warp "gefg_cas04",168,43;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleG04:
@@ -74,11 +66,12 @@ OnRecvCastleG04:
 	end;
 }
 
-gef_fild13,199,274,3	duplicate(Bergel2)	Bergel#g4-3	722
+gef_fild13,190,283,3	duplicate(OutsideFlagsG4)	Bergel#1-2	722
+gef_fild13,199,274,3	duplicate(OutsideFlagsG4)	Bergel#2	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-gefg_cas04,24,157,4	script	Bergel#g4-4::Bergel3	722,{
+-	script	Bergel#3::InsideFlagsG4	722,{
 	end;
 
 OnRecvCastleG04:
@@ -86,49 +79,54 @@ OnRecvCastleG04:
 	end;
 }
 
-gefg_cas04,35,158,4	duplicate(Bergel3)	Bergel#g4-5	722
-gefg_cas04,44,184,4	duplicate(Bergel3)	Bergel#g4-6	722
-gefg_cas04,51,184,4	duplicate(Bergel3)	Bergel#g4-7	722
-gefg_cas04,39,212,7	duplicate(Bergel3)	Bergel#g4-8	722
-gefg_cas04,29,212,1	duplicate(Bergel3)	Bergel#g4-9	722
-gefg_cas04,24,73,1	duplicate(Bergel3)	Bergel#g4-10	722
-gefg_cas04,35,73,4	duplicate(Bergel3)	Bergel#g4-11	722
+gefg_cas04,24,157,4	duplicate(InsideFlagsG4)	Bergel#3-2	722
+gefg_cas04,35,158,4	duplicate(InsideFlagsG4)	Bergel#4	722
+gefg_cas04,44,184,4	duplicate(InsideFlagsG4)	Bergel#5	722
+gefg_cas04,51,184,4	duplicate(InsideFlagsG4)	Bergel#6	722
+gefg_cas04,39,212,7	duplicate(InsideFlagsG4)	Bergel#7	722
+gefg_cas04,29,212,1	duplicate(InsideFlagsG4)	Bergel#8	722
+gefg_cas04,24,73,1	duplicate(InsideFlagsG4)	Bergel#9	722
+gefg_cas04,35,73,4	duplicate(InsideFlagsG4)	Bergel#10	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-gefg_cas04,174,178,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas04	-1
+geffen,127,130,7	duplicate(InsideFlagsG4)	Bergel#11	722
 
-// Steward
+// Kafra Employee
 //============================================================
-gefg_cas04,73,46,3	duplicate(Gld_Mngr_Template)	Kellvahni#gefg_cas04	55
+gefg_cas04,59,70,3	duplicate(guildkafra)	Kafra Staff#gefg_cas04	117
 
-// Guardians
+// Steward
 //============================================================
-gefg_cas04,73,46,3	duplicate(Gld_Guard_Template)	Guardian#gefg_cas04	-1
+gefg_cas04,73,46,3	duplicate(cm)	Kellvahni#gefg_cas04	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-gefg_cas04,59,70,3	duplicate(Gld_Kafra_Template)	Kafra Staff#gefg_cas04	117
+gefg_cas04,116,123,0	script	#lever_G04	111,{
 
-// Master's Room Exit
-//============================================================
-gefg_cas04,117,123,0	script	#switch_G04	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "gefg_cas04",73,47;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "gefg_cas04",73,47;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-gefg_cas04,116,119,0	duplicate(Gld_Trea_Protect)	ban_warp#gefg_cas04	-1,6,6
+gefg_cas04,58,75,0	duplicate(gdlever)	#gefg_cas04	111
 
 // Guild Treasure Spawns
 //============================================================
 gefg_cas04,116,119,0	duplicate(Gld_Trea_Spawn)	Treasure#gefg_cas04	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+gefg_cas04,174,178,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas04	-1
+
+// Guardians
 //============================================================
-gefg_cas04,58,75,0	duplicate(Gld_Dun_Template)	#gefg_cas04	111
+gefg_cas04,73,46,3	duplicate(Gld_Guard_Template)	Guardian#gefg_cas04	-1

+ 64 - 66
npc/guild/gefg_cas05.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,26 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
-//============================================================
-geffen,131,123,6	script	Mersetzdeitz#g5-1::Mersetzdeitz	722,{
-	end;
-
-OnRecvCastleG05:
-	FlagEmblem GetCastleData("gefg_cas05",1);
-	end;
-}
-
 // Guild Flag (Outside Castle)
 //============================================================
-gef_fild13,302,87,7	script	Mersetzdeitz#g5-2::Mersetzdeitz2	722,{
+-	script	Mersetzdeitz#1::OutsideFlagsG5	722,{
+
 	set .@GID, GetCastleData("gefg_cas05",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,33 +32,33 @@ gef_fild13,302,87,7	script	Mersetzdeitz#g5-2::Mersetzdeitz2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("gefg_cas05",1)) {
-					warp "gefg_cas05",61,52;
-					//warp "gefg_cas05",168,31;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("gefg_cas05",1)) {
+				warp "gefg_cas05",168,31;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastleG05:
@@ -73,13 +66,14 @@ OnRecvCastleG05:
 	end;
 }
 
-gef_fild13,313,83,0	duplicate(Mersetzdeitz2)	Mersetzdeitz#g5-3	722
-gef_fild13,252,51,2	duplicate(Mersetzdeitz2)	Mersetzdeitz#g5-4	722
-gef_fild13,26,147,2	duplicate(Mersetzdeitz2)	Mersetzdeitz#g5-5	722
+gef_fild13,302,87,7	duplicate(OutsideFlagsG5)	Mersetzdeitz#1-2	722
+gef_fild13,313,83,0	duplicate(OutsideFlagsG5)	Mersetzdeitz#2	722
+gef_fild13,252,51,2	duplicate(OutsideFlagsG5)	Mersetzdeitz#3	722
+gef_fild13,26,147,2	duplicate(OutsideFlagsG5)	Mersetzdeitz#4	722
 
 // Guild Flag (Inside Castle)
 //============================================================
-gefg_cas05,77,185,7	script	Mersetzdeitz#g5-5::Mersetzdeitz3	722,{
+-	script	Mersetzdeitz#5::InsideFlagsG5	722,{
 	end;
 
 OnRecvCastleG05:
@@ -87,48 +81,52 @@ OnRecvCastleG05:
 	end;
 }
 
-gefg_cas05,92,181,0	duplicate(Mersetzdeitz3)	Mersetzdeitz#g5-7	722
-gefg_cas05,83,158,1	duplicate(Mersetzdeitz3)	Mersetzdeitz#g5-8	722
-gefg_cas05,62,144,7	duplicate(Mersetzdeitz3)	Mersetzdeitz#g5-9	722
-gefg_cas05,62,66,4	duplicate(Mersetzdeitz3)	Mersetzdeitz#g5-10	722
-gefg_cas05,69,66,4	duplicate(Mersetzdeitz3)	Mersetzdeitz#g5-11	722
+gefg_cas05,77,185,7	duplicate(InsideFlagsG5)	Mersetzdeitz#5-2	722
+gefg_cas05,92,181,0	duplicate(InsideFlagsG5)	Mersetzdeitz#6	722
+gefg_cas05,83,158,1	duplicate(InsideFlagsG5)	Mersetzdeitz#7	722
+gefg_cas05,62,144,7	duplicate(InsideFlagsG5)	Mersetzdeitz#8	722
+gefg_cas05,62,66,4	duplicate(InsideFlagsG5)	Mersetzdeitz#9	722
+gefg_cas05,69,66,4	duplicate(InsideFlagsG5)	Mersetzdeitz#10	722
 
-
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-gefg_cas05,194,184,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas05	-1
+geffen,131,123,6	duplicate(InsideFlagsG5)	Mersetzdeitz#11	722
 
-// Steward
+// Kafra Employee
 //============================================================
-gefg_cas05,70,52,3	duplicate(Gld_Mngr_Template)	Byohre#gefg_cas05	55
+gefg_cas05,61,52,5	duplicate(guildkafra)	Kafra Staff#gefg_cas05	117
 
-// Guardians
+// Steward
 //============================================================
-gefg_cas05,70,52,3	duplicate(Gld_Guard_Template)	Guardian#gefg_cas05	-1
+gefg_cas05,70,52,3	duplicate(cm)	Byohre#gefg_cas05	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-gefg_cas05,61,52,3	duplicate(Gld_Kafra_Template)	Kafra Staff#gefg_cas05	117
+gefg_cas05,149,107,0	script	#lever_G05	111,{
 
-// Master's Room Exit
-//============================================================
-gefg_cas05,149,107,0	script	#switch_G05	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "gefg_cas05",70,53;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "gefg_cas05",70,53;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-gefg_cas05,144,110,0	duplicate(Gld_Trea_Protect)	ban_warp#gefg_cas05	-1,6,6
+gefg_cas05,65,22,0	duplicate(gdlever)	#gefg_cas05	111
 
 // Guild Treasure Spawns
 //============================================================
 gefg_cas05,144,110,0	duplicate(Gld_Trea_Spawn)	Treasure#gefg_cas05	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+gefg_cas05,194,184,0	duplicate(Gld_Agit_Manager)	Agit#gefg_cas05	-1
+
+// Guardians
 //============================================================
-gefg_cas05,66,29,0	duplicate(Gld_Dun_Template)	#gefg_cas05	111
+gefg_cas05,70,52,3	duplicate(Gld_Guard_Template)	Guardian#gefg_cas05	-1

+ 66 - 68
npc/guild/payg_cas01.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.2
+//= 1.3
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -13,28 +13,19 @@
 //= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
 //= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
 //=     Fixed position of Guild dungeon switch.
+//= 1.3 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-payon,166,161,3	script	Bright Arbor#f1-1::BrightArbor	722,{
-	end;
-
-OnRecvCastlePy01:
-	FlagEmblem GetCastleData("payg_cas01",1);
-	end;
-}
-
-payon,90,322,4	duplicate(BrightArbor)	Bright Arbor#f1-2	722
+-	script	Bright Arbor#1::OutsideFlagsPA1	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-pay_gld,125,236,4	script	Bright Arbor#f1-3::BrightArbor2	722,{
 	set .@GID, GetCastleData("payg_cas01",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -43,33 +34,33 @@ pay_gld,125,236,4	script	Bright Arbor#f1-3::BrightArbor2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("payg_cas01",1)) {
-					warp "payg_cas01",212,108;
-					//warp "payg_cas01",54 144;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("payg_cas01",1)) {
+					warp "payg_cas01",54,144;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePy01:
@@ -77,13 +68,14 @@ OnRecvCastlePy01:
 	end;
 }
 
-pay_gld,110,233,4	duplicate(BrightArbor2)	Bright Arbor#f1-4	722
-pay_gld,116,233,4	duplicate(BrightArbor2)	Bright Arbor#f1-5	722
-pay_gld,91,239,2	duplicate(BrightArbor2)	Bright Arbor#f1-6	722
+pay_gld,125,236,4	duplicate(OutsideFlagsPA1)	Bright Arbor#1-2	722
+pay_gld,110,233,4	duplicate(OutsideFlagsPA1)	Bright Arbor#2	722
+pay_gld,116,233,4	duplicate(OutsideFlagsPA1)	Bright Arbor#3	722
+pay_gld,91,239,2	duplicate(OutsideFlagsPA1)	Bright Arbor#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-payg_cas01,238,67,4	script	Bright Arbor#f1-7::BrightArbor3	722,{
+-	script	Bright Arbor#5::InsideFlagsPA1	722,{
 	end;
 
 OnRecvCastlePy01:
@@ -91,47 +83,53 @@ OnRecvCastlePy01:
 	end;
 }
 
-payg_cas01,233,67,4	duplicate(BrightArbor3)	Bright Arbor#f1-8	722
-payg_cas01,221,123,4	duplicate(BrightArbor3)	Bright Arbor#f1-9	722
-payg_cas01,221,116,4	duplicate(BrightArbor3)	Bright Arbor#f1-10	722
-payg_cas01,206,108,4	duplicate(BrightArbor3)	Bright Arbor#f1-11	722
-payg_cas01,212,108,4	duplicate(BrightArbor3)	Bright Arbor#f1-12	722
+payg_cas01,238,67,4	duplicate(InsideFlagsPA1)	Bright Arbor#5-2	722
+payg_cas01,233,67,4	duplicate(InsideFlagsPA1)	Bright Arbor#6	722
+payg_cas01,221,123,4	duplicate(InsideFlagsPA1)	Bright Arbor#7	722
+payg_cas01,221,116,4	duplicate(InsideFlagsPA1)	Bright Arbor#8	722
+payg_cas01,206,108,4	duplicate(InsideFlagsPA1)	Bright Arbor#9	722
+payg_cas01,212,108,4	duplicate(InsideFlagsPA1)	Bright Arbor#10	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-payg_cas01,139,139,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas01	-1
+payon,90,322,4	duplicate(InsideFlagsPA1)	Bright Arbor#11	722
+payon,166,177,3	duplicate(InsideFlagsPA1)	Bright Arbor#12	722
 
-// Steward
+// Kafra Employee
 //============================================================
-payg_cas01,120,58,4	duplicate(Gld_Mngr_Template)	Kurunnadi#payg_cas01	55
+payg_cas01,128,58,3	duplicate(guildkafra)	Kafra Staff#payg_cas01	117
 
-// Guardians
+// Steward
 //============================================================
-payg_cas01,120,58,4	duplicate(Gld_Guard_Template)	Guardian#payg_cas01	-1
+payg_cas01,120,58,4	duplicate(cm)	Kurunnadi#payg_cas01	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-payg_cas01,128,58,3	duplicate(Gld_Kafra_Template)	Kafra Staff#payg_cas01	117
+payg_cas01,295,8,0	script	#lever_PA01	111,{
 
-// Master's Room Exit
-//============================================================
-payg_cas01,295,8,0	script	#switch_Py01	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "payg_cas01",120,59;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "payg_cas01",120,59;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-payg_cas01,291,8,0	duplicate(Gld_Trea_Protect)	ban_warp#payg_cas01	-1,6,6
+payg_cas01,101,25,0	duplicate(gdlever)	#payg_cas01	111
 
 // Guild Treasure Spawns
 //============================================================
 payg_cas01,291,8,0	duplicate(Gld_Trea_Spawn)	Treasure#payg_cas01	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+payg_cas01,139,139,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas01	-1
+
+// Guardians
 //============================================================
-payg_cas01,101,25,0	duplicate(Gld_Dun_Template)	#payg_cas01	111
+payg_cas01,120,58,4	duplicate(Gld_Guard_Template)	Guardian#payg_cas01	-1

+ 68 - 69
npc/guild/payg_cas02.txt

@@ -3,37 +3,29 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.2
+//= 1.3
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
-//= NPCs that relate to Payon Guild Castle 2
+//= NPCs that relate to Payon Guild Castle 1
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
 //= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//=     Fixed position of Guild dungeon switch.
+//= 1.3 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-payon,166,173,3	script	Scarlet Palace#f2-1::ScarletPalace	722,{
-	end;
-
-OnRecvCastlePy02:
-	FlagEmblem GetCastleData("payg_cas02",1);
-	end;
-}
-
-payon,97,322,4	duplicate(ScarletPalace)	Scarlet Palace#f2-2	722
+-	script	Sacred Palace#1::OutsideFlagsPA2	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-pay_gld,292,112,6	script	Scarlet Palace#f2-3::ScarletPalace2	722,{
 	set .@GID, GetCastleData("payg_cas02",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -42,33 +34,33 @@ pay_gld,292,112,6	script	Scarlet Palace#f2-3::ScarletPalace2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("payg_cas02",1)) {
-					warp "payg_cas02",22,275;
-					//warp "payg_cas02",278,251;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("payg_cas02",1)) {
+					warp "payg_cas02",278,251;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePy02:
@@ -76,13 +68,14 @@ OnRecvCastlePy02:
 	end;
 }
 
-pay_gld,292,120,6	duplicate(ScarletPalace2)	Scarlet Palace#f2-4	722
-pay_gld,291,135,6	duplicate(ScarletPalace2)	Scarlet Palace#f2-5	722
-pay_gld,271,163,0	duplicate(ScarletPalace2)	Scarlet Palace#f2-6	722
+pay_gld,292,112,6	duplicate(OutsideFlagsPA2)	Sacred Palace#1-2	722
+pay_gld,292,120,6	duplicate(OutsideFlagsPA2)	Sacred Palace#2	722
+pay_gld,291,135,6	duplicate(OutsideFlagsPA2)	Sacred Palace#3	722
+pay_gld,271,163,0	duplicate(OutsideFlagsPA2)	Sacred Palace#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-payg_cas02,254,40,6	script	Scarlet Palace#f2-7::ScarletPalace3	722,{
+-	script	Sacred Palace#5::InsideFlagsPA2	722,{
 	end;
 
 OnRecvCastlePy02:
@@ -90,47 +83,53 @@ OnRecvCastlePy02:
 	end;
 }
 
-payg_cas02,254,48,6	duplicate(ScarletPalace3)	Scarlet Palace#f2-8	722
-payg_cas02,202,49,0	duplicate(ScarletPalace3)	Scarlet Palace#f2-9	722
-payg_cas02,209,49,0	duplicate(ScarletPalace3)	Scarlet Palace#f2-10	722
-payg_cas02,59,282,4	duplicate(ScarletPalace3)	Scarlet Palace#f2-11	722
-payg_cas02,70,282,4	duplicate(ScarletPalace3)	Scarlet Palace#f2-12	722
+payg_cas02,254,40,6	duplicate(InsideFlagsPA2)	Sacred Palace#5-2	722
+payg_cas02,254,48,6	duplicate(InsideFlagsPA2)	Sacred Palace#6	722
+payg_cas02,202,49,0	duplicate(InsideFlagsPA2)	Sacred Palace#7	722
+payg_cas02,209,49,0	duplicate(InsideFlagsPA2)	Sacred Palace#8	722
+payg_cas02,59,282,4	duplicate(InsideFlagsPA2)	Sacred Palace#9	722
+payg_cas02,70,282,4	duplicate(InsideFlagsPA2)	Sacred Palace#10	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-payg_cas02,39,25,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas02	-1
+payon,97,322,4	duplicate(InsideFlagsPA2)	Sacred Altar#11	722
+payon,166,173,3	duplicate(InsideFlagsPA2)	Sacred Altar#12	722
 
-// Steward
+// Kafra Employee
 //============================================================
-payg_cas02,22,260,7	duplicate(Gld_Mngr_Template)	Cherieos#payg_cas02	55
+payg_cas02,22,275,5	duplicate(guildkafra)	Kafra Staff#payg_cas02	117
 
-// Guardians
+// Steward
 //============================================================
-payg_cas02,22,260,7	duplicate(Gld_Guard_Template)	Guardian#payg_cas02	-1
+payg_cas02,22,260,7	duplicate(cm)	Cherieos#payg_cas02	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-payg_cas02,22,275,5	duplicate(Gld_Kafra_Template)	Kafra Staff#payg_cas02	117
+payg_cas02,149,149,0	script	#lever_PA02	111,{
 
-// Master's Room Exit
-//============================================================
-payg_cas02,149,148,0	script	#switch_Py02	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "payg_cas02",22,261;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "payg_cas02",22,261;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-payg_cas02,145,144,0	duplicate(Gld_Trea_Protect)	ban_warp#payg_cas02	-1,6,6
+payg_cas02,278,247,0	duplicate(gdlever)	#payg_cas02	111
 
 // Guild Treasure Spawns
 //============================================================
 payg_cas02,145,144,0	duplicate(Gld_Trea_Spawn)	Treasure#payg_cas02	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+payg_cas02,39,25,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas02	-1
+
+// Guardians
 //============================================================
-payg_cas02,278,247,0	duplicate(Gld_Dun_Template)	#payg_cas02	111
+payg_cas02,22,260,7	duplicate(Gld_Guard_Template)	Guardian#payg_cas02	-1

+ 68 - 68
npc/guild/payg_cas03.txt

@@ -3,37 +3,29 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.2
+//= 1.3
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
-//= NPCs that relate to Payon Guild Castle 3
+//= NPCs that relate to Payon Guild Castle 1
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Corrected treasure room switch coordinates. [L0ne_W0lf]
+//= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
 //= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//=     Fixed position of Guild dungeon switch.
+//= 1.3 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-payon,166,177,3	script	Holy Shadow#f3-1::HolyShadow	722,{
-	end;
-
-OnRecvCastlePy03:
-	FlagEmblem GetCastleData("payg_cas03",1);
-	end;
-}
-
-payon,113,322,4	duplicate(HolyShadow)	Holy Shadow#f3-2	722
+-	script	Holy Shadow#1::OutsideFlagsPA3	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-pay_gld,321,298,2	script	Holy Shadow#f3-3::HolyShadow2	722,{
 	set .@GID, GetCastleData("payg_cas03",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -42,32 +34,33 @@ pay_gld,321,298,2	script	Holy Shadow#f3-3::HolyShadow2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("payg_cas03",1)) {
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("payg_cas03",1)) {
 					warp "payg_cas03",9,263;
-					end;
-				}
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePy03:
@@ -75,13 +68,14 @@ OnRecvCastlePy03:
 	end;
 }
 
-pay_gld,321,289,2	duplicate(HolyShadow2)	Holy Shadow#f3-4	722
-pay_gld,327,304,1	duplicate(HolyShadow2)	Holy Shadow#f3-5	722
-pay_gld,333,254,4	duplicate(HolyShadow2)	Holy Shadow#f3-6	722
+pay_gld,321,298,2	duplicate(OutsideFlagsPA3)	Holy Shadow#1-2	722
+pay_gld,321,289,2	duplicate(OutsideFlagsPA3)	Holy Shadow#2	722
+pay_gld,327,304,1	duplicate(OutsideFlagsPA3)	Holy Shadow#3	722
+pay_gld,333,254,4	duplicate(OutsideFlagsPA3)	Holy Shadow#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-payg_cas03,236,54,2	script	Holy Shadow#f3-7::HolyShadow3	722,{
+-	script	Holy Shadow#5::InsideFlagsPA3	722,{
 	end;
 
 OnRecvCastlePy03:
@@ -89,47 +83,53 @@ OnRecvCastlePy03:
 	end;
 }
 
-payg_cas03,236,45,2	duplicate(HolyShadow3)	Holy Shadow#f3-8	722
-payg_cas03,259,66,4	duplicate(HolyShadow3)	Holy Shadow#f3-9	722
-payg_cas03,266,66,4	duplicate(HolyShadow3)	Holy Shadow#f3-10	722
-payg_cas03,34,31,4	duplicate(HolyShadow3)	Holy Shadow#f3-11	722
-payg_cas03,43,31,4	duplicate(HolyShadow3)	Holy Shadow#f3-12	722
+payg_cas03,236,54,2	duplicate(InsideFlagsPA3)	Holy Shadow#5-2	722
+payg_cas03,236,45,2	duplicate(InsideFlagsPA3)	Holy Shadow#6	722
+payg_cas03,259,66,4	duplicate(InsideFlagsPA3)	Holy Shadow#7	722
+payg_cas03,266,66,4	duplicate(InsideFlagsPA3)	Holy Shadow#8	722
+payg_cas03,34,31,4	duplicate(InsideFlagsPA3)	Holy Shadow#9	722
+payg_cas03,43,31,4	duplicate(InsideFlagsPA3)	Holy Shadow#10	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-payg_cas03,269,265,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas03	-1
+payon,113,322,4	duplicate(InsideFlagsPA3)	Holy Shadow#11	722
+payon,166,169,3	duplicate(InsideFlagsPA3)	Holy Shadow#12	722
 
-// Steward
+// Kafra Employee
 //============================================================
-payg_cas03,10,277,0	duplicate(Gld_Mngr_Template)	Gheriot#payg_cas03	55
+payg_cas03,9,263,5	duplicate(guildkafra)	Kafra Staff#payg_cas03	117
 
-// Guardians
+// Steward
 //============================================================
-payg_cas03,10,277,0	duplicate(Gld_Guard_Template)	Guardian#payg_cas03	-1
+payg_cas03,50,261,3	duplicate(cm)	Gheriot#payg_cas03	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-payg_cas03,9,263,5	duplicate(Gld_Kafra_Template)	Kafra Staff#payg_cas03	117
+payg_cas03,163,167,0	script	#lever_PA03	111,{
 
-// Master's Room Exit
-//============================================================
-payg_cas03,163,167,0	script	#switch_Py03	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "payg_cas03",50,261;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "payg_cas03",50,261;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-payg_cas03,159,168,0	duplicate(Gld_Trea_Protect)	ban_warp#payg_cas03	-1,6,6
+payg_cas03,38,42,0	duplicate(gdlever)	#payg_cas03	111
 
 // Guild Treasure Spawns
 //============================================================
 payg_cas03,159,168,0	duplicate(Gld_Trea_Spawn)	Treasure#payg_cas03	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+payg_cas03,269,265,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas03	-1
+
+// Guardians
 //============================================================
-payg_cas03,20,44,0	duplicate(Gld_Dun_Template)	#payg_cas03	111
+payg_cas03,10,277,0	duplicate(Gld_Guard_Template)	Guardian#payg_cas03	-1

+ 69 - 68
npc/guild/payg_cas04.txt

@@ -3,36 +3,29 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.3
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
-//= NPCs that relate to Payon Guild Castle 4
+//= NPCs that relate to Payon Guild Castle 1
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
+//= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//=     Fixed position of Guild dungeon switch.
+//= 1.3 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-payon,166,169,3	script	Sacred Altar#f4-1::SacredAltar	722,{
-	end;
-
-OnRecvCastlePy04:
-	FlagEmblem GetCastleData("payg_cas04",1);
-	end;
-}
-
-payon,118,322,4	duplicate(SacredAltar)	Sacred Altar#f4-2	722
+-	script	Scarlet Palace#1::OutsideFlagsPA4	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-pay_gld,137,160,0	script	Sacred Altar#f4-3::SacredAltar2	722,{
 	set .@GID, GetCastleData("payg_cas04",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -41,32 +34,33 @@ pay_gld,137,160,0	script	Sacred Altar#f4-3::SacredAltar2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("payg_cas04",1)) {
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("payg_cas04",1)) {
 					warp "payg_cas04",40,235;
-					end;
-				}
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePy04:
@@ -74,13 +68,14 @@ OnRecvCastlePy04:
 	end;
 }
 
-pay_gld,143,160,0	duplicate(SacredAltar2)	Sacred Altar#f4-4	722
-pay_gld,133,151,2	duplicate(SacredAltar2)	Sacred Altar#f4-5	722
-pay_gld,153,166,1	duplicate(SacredAltar2)	Sacred Altar#f4-6	722
+pay_gld,137,160,0	duplicate(OutsideFlagsPA4)	Scarlet Palace#1-2	722
+pay_gld,143,160,0	duplicate(OutsideFlagsPA4)	Scarlet Palace#2	722
+pay_gld,133,151,2	duplicate(OutsideFlagsPA4)	Scarlet Palace#3	722
+pay_gld,153,166,1	duplicate(OutsideFlagsPA4)	Scarlet Palace#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-payg_cas04,255,259,0	script	Sacred Altar#f4-7::SacredAltar3	722,{
+-	script	Scarlet Palace#5::InsideFlagsPA4	722,{
 	end;
 
 OnRecvCastlePy04:
@@ -88,47 +83,53 @@ OnRecvCastlePy04:
 	end;
 }
 
-payg_cas04,248,259,0	duplicate(SacredAltar3)	Sacred Altar#f4-8	722
-payg_cas04,248,168,6	duplicate(SacredAltar3)	Sacred Altar#f4-9	722
-payg_cas04,248,160,6	duplicate(SacredAltar3)	Sacred Altar#f4-10	722
-payg_cas04,232,181,4	duplicate(SacredAltar3)	Sacred Altar#f4-11	722
-payg_cas04,239,181,4	duplicate(SacredAltar3)	Sacred Altar#f4-12	722
+payg_cas04,255,259,0	duplicate(InsideFlagsPA4)	Scarlet Palace#5-2	722
+payg_cas04,248,259,0	duplicate(InsideFlagsPA4)	Scarlet Palace#6	722
+payg_cas04,248,168,6	duplicate(InsideFlagsPA4)	Scarlet Palace#7	722
+payg_cas04,248,160,6	duplicate(InsideFlagsPA4)	Scarlet Palace#8	722
+payg_cas04,232,181,4	duplicate(InsideFlagsPA4)	Scarlet Palace#9	722
+payg_cas04,239,181,4	duplicate(InsideFlagsPA4)	Scarlet Palace#10	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-payg_cas04,271,29,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas04	-1
+payon,118,322,4	duplicate(InsideFlagsPA4)	Scarlet Palace#11	722
+payon,166,165,3	duplicate(InsideFlagsPA4)	Scarlet Palace#12	722
 
-// Steward
+// Kafra Employee
 //============================================================
-payg_cas04,38,284,3	duplicate(Gld_Mngr_Template)	DJ#payg_cas04	55
+payg_cas04,40,235,1	duplicate(guildkafra)	Kafra Staff#payg_cas04	117
 
-// Guardians
+// Steward
 //============================================================
-payg_cas04,38,284,3	duplicate(Gld_Guard_Template)	Guardian#payg_cas04	-1
+payg_cas04,38,284,3	duplicate(cm)	DJ#payg_cas04	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-payg_cas04,40,235,1	duplicate(Gld_Kafra_Template)	Kafra Staff#payg_cas04	117
+payg_cas04,151,47,0	script	#lever_PA04	111,{
 
-// Master's Room Exit
-//============================================================
-payg_cas04,151,47,0	script	#switch_Py04	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "payg_cas04",38,285;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "payg_cas04",38,285;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-payg_cas04,147,48,0	duplicate(Gld_Trea_Protect)	ban_warp#payg_cas04	-1,6,6
+payg_cas04,52,48,0	duplicate(gdlever)	#payg_cas04	111
 
 // Guild Treasure Spawns
 //============================================================
 payg_cas04,147,48,0	duplicate(Gld_Trea_Spawn)	Treasure#payg_cas04	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+payg_cas04,271,29,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas04	-1
+
+// Guardians
 //============================================================
-payg_cas04,52,48,0	duplicate(Gld_Dun_Template)	#payg_cas04	111
+payg_cas04,38,284,3	duplicate(Gld_Guard_Template)	Guardian#payg_cas04	-1

+ 70 - 70
npc/guild/payg_cas05.txt

@@ -3,36 +3,29 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.3
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
-//= NPCs that relate to Payon Guild Castle 5
+//= NPCs that relate to Payon Guild Castle 1
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
+//= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//=     Fixed position of Guild dungeon switch.
+//= 1.3 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-payon,166,165,3	script	Bamboo Grove Hill#f5-1::BambooGroveHill	722,{
-	end;
-
-OnRecvCastlePy05:
-	FlagEmblem GetCastleData("payg_cas05",1);
-	end;
-}
-
-payon,123,322,4	duplicate(BambooGroveHill)	Bamboo Grove Hill#f5-2	722
+-	script	Bamboo Grove Hill#1::OutsideFlagsPA5	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-pay_gld,208,268,4	script	Bamboo Grove Hill#f5-3::BambooGroveHill2	722,{
 	set .@GID, GetCastleData("payg_cas05",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -41,33 +34,33 @@ pay_gld,208,268,4	script	Bamboo Grove Hill#f5-3::BambooGroveHill2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("payg_cas05",1)) {
-					warp "payg_cas05",276,227;
-					//warp "payg_cas05",243;27;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("payg_cas05",1)) {
+					warp "payg_cas05",243,27;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePy05:
@@ -75,13 +68,14 @@ OnRecvCastlePy05:
 	end;
 }
 
-pay_gld,199,268,4	duplicate(BambooGroveHill2)	Bamboo Grove Hill#f5-4	722
-pay_gld,190,277,3	duplicate(BambooGroveHill2)	Bamboo Grove Hill#f5-5	722
-pay_gld,187,294,2	duplicate(BambooGroveHill2)	Bamboo Grove Hill#f5-6	722
+pay_gld,208,268,4	duplicate(OutsideFlagsPA5)	Bamboo Grove Hill#1-2	722
+pay_gld,199,268,4	duplicate(OutsideFlagsPA5)	Bamboo Grove Hill#2	722
+pay_gld,190,277,3	duplicate(OutsideFlagsPA5)	Bamboo Grove Hill#3	722
+pay_gld,187,294,2	duplicate(OutsideFlagsPA5)	Bamboo Grove Hill#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-payg_cas05,32,249,4	script	Bamboo Grove Hill#f5-7::BambooGroveHill3	722,{
+-	script	Bamboo Grove Hill#5::InsideFlagsPA5	722,{
 	end;
 
 OnRecvCastlePy05:
@@ -89,47 +83,53 @@ OnRecvCastlePy05:
 	end;
 }
 
-payg_cas05,24,249,4	duplicate(BambooGroveHill3)	Bamboo Grove Hill#f5-8	722
-payg_cas05,62,271,0	duplicate(BambooGroveHill3)	Bamboo Grove Hill#f5-9	722
-payg_cas05,57,271,0	duplicate(BambooGroveHill3)	Bamboo Grove Hill#f5-10	722
-payg_cas05,55,252,2	duplicate(BambooGroveHill3)	Bamboo Grove Hill#f5-11	722
-payg_cas05,55,260,2	duplicate(BambooGroveHill3)	Bamboo Grove Hill#f5-12	722
+payg_cas05,32,249,4	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#5-2	722
+payg_cas05,24,249,4	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#6	722
+payg_cas05,62,271,0	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#7	722
+payg_cas05,57,271,0	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#8	722
+payg_cas05,55,252,2	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#9	722
+payg_cas05,55,260,2	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#10	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-payg_cas05,30,30,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas05	-1
+payon,123,322,4	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#11	722
+payon,166,161,3	duplicate(InsideFlagsPA5)	Bamboo Grove Hill#12	722
 
-// Steward
+// Kafra Employee
 //============================================================
-payg_cas05,277,249,3	duplicate(Gld_Mngr_Template)	Nahzarf#payg_cas05	55
+payg_cas05,276,227,1	duplicate(guildkafra)	Kafra Staff#payg_cas05	117
 
-// Guardians
+// Steward
 //============================================================
-payg_cas05,277,249,3	duplicate(Gld_Guard_Template)	Guardian#payg_cas05	-1
+payg_cas05,277,249,3	duplicate(cm)	Nahzarf#payg_cas05	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-payg_cas05,276,227,1	duplicate(Gld_Kafra_Template)	Kafra Staff#payg_cas05	117
+payg_cas05,161,136,0	script	#lever_PA05	111,{
 
-// Master's Room Exit
-//============================================================
-payg_cas05,161,136,0	script	#switch_Py05	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "payg_cas05",277,250;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "payg_cas05",277,250;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-payg_cas05,157,132,0	duplicate(Gld_Trea_Protect)	ban_warp#payg_cas05	-1,6,6
+payg_cas05,249,15,0	duplicate(gdlever)	#payg_cas05	111
 
 // Guild Treasure Spawns
 //============================================================
 payg_cas05,157,132,0	duplicate(Gld_Trea_Spawn)	Treasure#payg_cas05	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+payg_cas05,30,30,0	duplicate(Gld_Agit_Manager)	Agit#payg_cas05	-1
+
+// Guardians
 //============================================================
-payg_cas05,248,14,0	duplicate(Gld_Dun_Template)	#payg_cas05	111
+payg_cas05,277,249,3	duplicate(Gld_Guard_Template)	Guardian#payg_cas05	-1

+ 69 - 69
npc/guild/prtg_cas01.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.3
+//= 1.4
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -13,26 +13,19 @@
 //= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
 //= 1.2 Corrected treasure room switch coordinates. [L0ne_W0lf]
 //= 1.3 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.4 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-prontera,155,190,4	script	Kriemhild#p1-1::Kriemhild	722,{
-	end;
-
-OnRecvCastlePt01:
-	FlagEmblem GetCastleData("prtg_cas01",1);
-	end;
-}
+-	script	Kriemhild#1::OutsideFlagsPR1	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-prt_gld,131,60,6	script	Kriemhild#p1-2::Kriemhild2	722,{
 	set .@GID, GetCastleData("prtg_cas01",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -41,32 +34,33 @@ prt_gld,131,60,6	script	Kriemhild#p1-2::Kriemhild2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("prtg_cas01",1)) {
-					warp "prtg_cas01",96,173;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("prtg_cas01",1)) {
+				warp "prtg_cas01",96,173;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePt01:
@@ -74,13 +68,14 @@ OnRecvCastlePt01:
 	end;
 }
 
-prt_gld,138,68,6	duplicate(Kriemhild2)	Kriemhild#p1-3	722
-prt_gld,138,60,6	duplicate(Kriemhild2)	Kriemhild#p1-4	722
-prt_gld,135,60,6	duplicate(Kriemhild2)	Kriemhild#p1-5	722
+prt_gld,131,60,6	duplicate(OutsideFlagsPR1)	Kriemhild#1-2	722
+prt_gld,138,68,6	duplicate(OutsideFlagsPR1)	Kriemhild#2	722
+prt_gld,138,60,6	duplicate(OutsideFlagsPR1)	Kriemhild#3	722
+prt_gld,135,60,6	duplicate(OutsideFlagsPR1)	Kriemhild#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-prtg_cas01,58,56,4	script	Kriemhild#p1-4::Kriemhild3	722,{
+-	script	Kriemhild#5::InsideFlagsPR1	722,{
 	end;
 
 OnRecvCastlePt01:
@@ -88,51 +83,56 @@ OnRecvCastlePt01:
 	end;
 }
 
-prtg_cas01,64,56,4	duplicate(Kriemhild3)	Kriemhild#p1-7	722
-prtg_cas01,76,32,4	duplicate(Kriemhild3)	Kriemhild#p1-8	722
-prtg_cas01,84,32,4	duplicate(Kriemhild3)	Kriemhild#p1-9	722
-prtg_cas01,94,39,4	duplicate(Kriemhild3)	Kriemhild#p1-10	722
-prtg_cas01,94,24,4	duplicate(Kriemhild3)	Kriemhild#p1-11	722
-prtg_cas01,73,14,4	duplicate(Kriemhild3)	Kriemhild#p1-12	722
-prtg_cas01,73,6,4	duplicate(Kriemhild3)	Kriemhild#p1-13	722
-prtg_cas01,55,46,4	duplicate(Kriemhild3)	Kriemhild#p1-14	722
-prtg_cas01,45,46,4	duplicate(Kriemhild3)	Kriemhild#p1-15	722
+prtg_cas01,58,56,4	duplicate(InsideFlagsPR1)	Kriemhild#5-2	722
+prtg_cas01,64,56,4	duplicate(InsideFlagsPR1)	Kriemhild#6	722
+prtg_cas01,76,32,4	duplicate(InsideFlagsPR1)	Kriemhild#7	722
+prtg_cas01,84,32,4	duplicate(InsideFlagsPR1)	Kriemhild#8	722
+prtg_cas01,94,39,4	duplicate(InsideFlagsPR1)	Kriemhild#9	722
+prtg_cas01,94,24,4	duplicate(InsideFlagsPR1)	Kriemhild#10	722
+prtg_cas01,73,14,4	duplicate(InsideFlagsPR1)	Kriemhild#11	722
+prtg_cas01,73,6,4	duplicate(InsideFlagsPR1)	Kriemhild#12	722
+prtg_cas01,55,46,4	duplicate(InsideFlagsPR1)	Kriemhild#13	722
+prtg_cas01,45,46,4	duplicate(InsideFlagsPR1)	Kriemhild#14	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-prtg_cas01,197,197,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas01	-1
+prontera,155,190,4	duplicate(InsideFlagsPR1)	Kriemhild#15	722
 
-// Steward
+// Kafra Employee
 //============================================================
-prtg_cas01,112,181,0	duplicate(Gld_Mngr_Template)	Ahvray#prtg_cas01	55
+prtg_cas01,96,173,0	duplicate(guildkafra)	Kafra Staff#prtg_cas01	117
 
-// Guardians
+// Steward
 //============================================================
-prtg_cas01,112,181,0	duplicate(Gld_Guard_Template)	Guardian#prtg_cas01	-1
+prtg_cas01,112,181,0	duplicate(cm)	Ahvray#prtg_cas01	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-prtg_cas01,96,173,0	duplicate(Gld_Kafra_Template)	Kafra Staff#prtg_cas01	117
+prtg_cas01,15,208,0	script	#Lever_PR01	111,{
 
-// Master's Room Exit
-//============================================================
-prtg_cas01,15,209,0	script	#switch_Pt01	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "prtg_cas01",112,183;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "prtg_cas01",112,183;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-prtg_cas01,11,208,0	duplicate(Gld_Trea_Protect)	ban_warp#prtg_cas01	-1,6,6
+prtg_cas01,94,200,0	duplicate(gdlever)	#prtg_cas01	111
 
 // Guild Treasure Spawns
 //============================================================
 prtg_cas01,11,208,0	duplicate(Gld_Trea_Spawn)	Treasure#prtg_cas01	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+prtg_cas01,197,197,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas01	-1
+
+// Guardians
 //============================================================
-prtg_cas01,94,200,0	duplicate(Gld_Dun_Template)	#prtg_cas01	111
+prtg_cas01,112,181,0	duplicate(Gld_Guard_Template)	Guardian#prtg_cas01	-1

+ 75 - 74
npc/guild/prtg_cas02.txt

@@ -3,34 +3,29 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.4
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
-//= NPCs that relate to Prontera Guild Castle 1
+//= NPCs that relate to Prontera Guild Castle 2
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
-//= 1.1 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
+//= 1.2 Corrected treasure room switch coordinates. [L0ne_W0lf]
+//= 1.3 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.4 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-prontera,146,194,3	script	Swanhild#p2-1::Swanhild	722,{
-	end;
-
-OnRecvCastlePt02:
-	FlagEmblem GetCastleData("prtg_cas02",1);
-	end;
-}
+-	script	Swanhild#1::OutsideFlagsPR2	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-prt_gld,244,126,8	script	Swanhild#p2-2::Swanhild2	722,{
 	set .@GID, GetCastleData("prtg_cas02",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -39,33 +34,33 @@ prt_gld,244,126,8	script	Swanhild#p2-2::Swanhild2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("prtg_cas02",1)) {
-					warp "prtg_cas02",71,36;
-					//warp "prtg_cas02",169,55;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("prtg_cas02",1)) {
+				warp "prtg_cas02",169,55;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePt02:
@@ -73,13 +68,14 @@ OnRecvCastlePt02:
 	end;
 }
 
-prt_gld,244,128,8	duplicate(Swanhild2)	Swanhild#p2-3	722
-prt_gld,236,126,8	duplicate(Swanhild2)	Swanhild#p2-4	722
-prt_gld,236,128,8	duplicate(Swanhild2)	Swanhild#p2-5	722
+prt_gld,244,126,8	duplicate(OutsideFlagsPR2)	Swanhild#1-2	722
+prt_gld,244,128,8	duplicate(OutsideFlagsPR2)	Swanhild#2	722
+prt_gld,236,126,8	duplicate(OutsideFlagsPR2)	Swanhild#3	722
+prt_gld,236,128,8	duplicate(OutsideFlagsPR2)	Swanhild#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-prtg_cas02,40,227,4	script	Swanhild#p2-6::Swanhild3	722,{
+-	script	Swanhild#5::InsideFlagsPR2	722,{
 	end;
 
 OnRecvCastlePt02:
@@ -87,53 +83,58 @@ OnRecvCastlePt02:
 	end;
 }
 
-prtg_cas02,46,227,4	duplicate(Swanhild3)	Swanhild#p2-7	722
-prtg_cas02,11,219,4	duplicate(Swanhild3)	Swanhild#p2-8	722
-prtg_cas02,11,214,4	duplicate(Swanhild3)	Swanhild#p2-9	722
-prtg_cas02,20,219,4	duplicate(Swanhild3)	Swanhild#p2-10	722
-prtg_cas02,20,214,4	duplicate(Swanhild3)	Swanhild#p2-11	722
-prtg_cas02,79,227,8	duplicate(Swanhild3)	Swanhild#p2-12	722
-prtg_cas02,70,227,8	duplicate(Swanhild3)	Swanhild#p2-13	722
-prtg_cas02,38,189,8	duplicate(Swanhild3)	Swanhild#p2-14	722
-prtg_cas02,34,189,8	duplicate(Swanhild3)	Swanhild#p2-15	722
-prtg_cas02,153,161,4	duplicate(Swanhild3)	Swanhild#p2-16	722
-prtg_cas02,162,161,4	duplicate(Swanhild3)	Swanhild#p2-17	722
+prtg_cas02,40,227,4	duplicate(InsideFlagsPR2)	Swanhild#5-2	722
+prtg_cas02,46,227,4	duplicate(InsideFlagsPR2)	Swanhild#6	722
+prtg_cas02,11,219,4	duplicate(InsideFlagsPR2)	Swanhild#7	722
+prtg_cas02,11,214,4	duplicate(InsideFlagsPR2)	Swanhild#8	722
+prtg_cas02,20,219,4	duplicate(InsideFlagsPR2)	Swanhild#9	722
+prtg_cas02,20,214,4	duplicate(InsideFlagsPR2)	Swanhild#10	722
+prtg_cas02,79,227,8	duplicate(InsideFlagsPR2)	Swanhild#11	722
+prtg_cas02,70,227,8	duplicate(InsideFlagsPR2)	Swanhild#12	722
+prtg_cas02,38,189,8	duplicate(InsideFlagsPR2)	Swanhild#13	722
+prtg_cas02,34,189,8	duplicate(InsideFlagsPR2)	Swanhild#14	722
+prtg_cas02,153,161,4	duplicate(InsideFlagsPR2)	Swanhild#15	722
+prtg_cas02,162,161,4	duplicate(InsideFlagsPR2)	Swanhild#16	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-prtg_cas02,158,174,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas02	-1
+prontera,146,194,3	duplicate(InsideFlagsPR2)	Swanhild#17	722
 
-// Steward
+// Kafra Employee
 //============================================================
-prtg_cas02,94,61,4	duplicate(Gld_Mngr_Template)	Roy#prtg_cas02	55
+prtg_cas02,71,36,4	duplicate(guildkafra)	Kafra Staff#prtg_cas02	117
 
-// Guardians
+// Steward
 //============================================================
-prtg_cas02,94,61,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas02	-1
+prtg_cas02,94,61,4	duplicate(cm)	Roy#prtg_cas02	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-prtg_cas02,71,36,4	duplicate(Gld_Kafra_Template)	Kafra Staff#prtg_cas02	117
+prtg_cas02,207,228,0	script	#Lever_PR02	111,{
 
-// Master's Room Exit
-//============================================================
-prtg_cas02,207,228,0	script	#switch_Pt02	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "prtg_cas02",94,62;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "prtg_cas02",94,62;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-prtg_cas02,202,228,0	duplicate(Gld_Trea_Protect)	ban_warp#prtg_cas02	-1,6,6
+prtg_cas02,84,72,0	duplicate(gdlever)	#prtg_cas02	111
 
 // Guild Treasure Spawns
 //============================================================
 prtg_cas02,202,228,0	duplicate(Gld_Trea_Spawn)	Treasure#prtg_cas02	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+prtg_cas02,158,174,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas02	-1
+
+// Guardians
 //============================================================
-prtg_cas02,84,72,0	duplicate(Gld_Dun_Template)	#prtg_cas02	111
+prtg_cas02,94,61,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas02	-1

+ 70 - 71
npc/guild/prtg_cas03.txt

@@ -3,37 +3,29 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.3
+//= 1.4
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
-//= NPCs that relate to Prontera Guild Castle 1
+//= NPCs that relate to Prontera Guild Castle 3
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
 //= 1.2 Corrected treasure room switch coordinates. [L0ne_W0lf]
 //= 1.3 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.4 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-prontera,143,203,2	script	Fadhgridh#p3-1::Fadhgridh	722,{
-	end;
-
-
-OnRecvCastlePt03:
-	FlagEmblem GetCastleData("prtg_cas03",1);
-	end;
-}
+-	script	Fadhgridh#1::OutsideFlagsPR3	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-prt_gld,147,140,4	script	Fadhgridh#p3-2::Fadhgridh2	722,{
 	set .@GID, GetCastleData("prtg_cas03",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -42,32 +34,33 @@ prt_gld,147,140,4	script	Fadhgridh#p3-2::Fadhgridh2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("prtg_cas03",1)) {
-					warp "prtg_cas03",181,215;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("prtg_cas03",1)) {
+				warp "prtg_cas03",181,215;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePt03:
@@ -75,13 +68,14 @@ OnRecvCastlePt03:
 	end;
 }
 
-prt_gld,147,136,4	duplicate(Fadhgridh2)	Fadhgridh#p3-3	722
-prt_gld,158,140,4	duplicate(Fadhgridh2)	Fadhgridh#p3-4	722
-prt_gld,158,136,4	duplicate(Fadhgridh2)	Fadhgridh#p3-5	722
+prt_gld,147,140,4	duplicate(OutsideFlagsPR3)	Fadhgridh#1-2	722
+prt_gld,147,136,4	duplicate(OutsideFlagsPR3)	Fadhgridh#2	722
+prt_gld,158,140,4	duplicate(OutsideFlagsPR3)	Fadhgridh#3	722
+prt_gld,158,136,4	duplicate(OutsideFlagsPR3)	Fadhgridh#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-prtg_cas03,168,28,4	script	Fadhgridh#p3-6::Fadhgridh3	722,{
+-	script	Fadhgridh#5::InsideFlagsPR3	722,{
 	end;
 
 OnRecvCastlePt03:
@@ -89,51 +83,56 @@ OnRecvCastlePt03:
 	end;
 }
 
-prtg_cas03,182,28,4	duplicate(Fadhgridh3)	Fadhgridh#p3-7	722
-prtg_cas03,43,50,4	duplicate(Fadhgridh3)	Fadhgridh#p3-8	722
-prtg_cas03,48,50,4	duplicate(Fadhgridh3)	Fadhgridh#p3-9	722
-prtg_cas03,43,58,4	duplicate(Fadhgridh3)	Fadhgridh#p3-10	722
-prtg_cas03,48,58,4	duplicate(Fadhgridh3)	Fadhgridh#p3-11	722
-prtg_cas03,158,210,4	duplicate(Fadhgridh3)	Fadhgridh#p3-12	722
-prtg_cas03,169,210,4	duplicate(Fadhgridh3)	Fadhgridh#p3-13	722
-prtg_cas03,162,201,4	duplicate(Fadhgridh3)	Fadhgridh#p3-14	722
-prtg_cas03,165,201,4	duplicate(Fadhgridh3)	Fadhgridh#p3-15	722
+prtg_cas03,168,28,4	duplicate(InsideFlagsPR3)	Fadhgridh#5-2	722
+prtg_cas03,182,28,4	duplicate(InsideFlagsPR3)	Fadhgridh#6	722
+prtg_cas03,43,50,4	duplicate(InsideFlagsPR3)	Fadhgridh#7	722
+prtg_cas03,48,50,4	duplicate(InsideFlagsPR3)	Fadhgridh#8	722
+prtg_cas03,43,58,4	duplicate(InsideFlagsPR3)	Fadhgridh#9	722
+prtg_cas03,48,58,4	duplicate(InsideFlagsPR3)	Fadhgridh#10	722
+prtg_cas03,158,210,4	duplicate(InsideFlagsPR3)	Fadhgridh#11	722
+prtg_cas03,169,210,4	duplicate(InsideFlagsPR3)	Fadhgridh#12	722
+prtg_cas03,162,201,4	duplicate(InsideFlagsPR3)	Fadhgridh#13	722
+prtg_cas03,165,201,4	duplicate(InsideFlagsPR3)	Fadhgridh#14	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-prtg_cas03,17,221,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas03	-1
+prontera,143,203,2	duplicate(InsideFlagsPR3)	Fadhgridh#15	722
 
-// Steward
+// Kafra Employee
 //============================================================
-prtg_cas03,51,100,4	duplicate(Gld_Mngr_Template)	Sttick#prtg_cas03	55
+prtg_cas03,181,215,4	duplicate(guildkafra)	Kafra Staff#prtg_cas03	117
 
-// Guardians
+// Steward
 //============================================================
-prtg_cas03,51,100,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas03	-1
+prtg_cas03,51,100,4	duplicate(cm)	Sttick#prtg_cas03	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-prtg_cas03,181,215,4	duplicate(Gld_Kafra_Template)	Kafra Staff#prtg_cas03	117
+prtg_cas03,193,130,0	script	#Lever_PR03	111,{
 
-// Master's Room Exit
-//============================================================
-prtg_cas03,193,130,0	script	#switch_Pt03	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "prtg_cas03",51,101;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "prtg_cas03",51,101;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-prtg_cas03,189,132,0	duplicate(Gld_Trea_Protect)	ban_warp#prtg_cas03	-1,6,6
+prtg_cas03,5,70,0	duplicate(gdlever)	#prtg_cas03	111
 
 // Guild Treasure Spawns
 //============================================================
 prtg_cas03,189,132,0	duplicate(Gld_Trea_Spawn)	Treasure#prtg_cas03	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+prtg_cas03,17,221,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas03	-1
+
+// Guardians
 //============================================================
-prtg_cas03,5,70,0	duplicate(Gld_Dun_Template)	#prtg_cas03	111
+prtg_cas03,51,100,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas03	-1

+ 70 - 69
npc/guild/prtg_cas04.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.2
+//= 1.4
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,27 +11,21 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
-//= 1.2 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.2 Corrected treasure room switch coordinates. [L0ne_W0lf]
+//= 1.3 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.4 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-prontera,167,203,6	script	Skoegul#p4-1::Skoegul	722,{
-	end;
-
-OnRecvCastlePt04:
-	FlagEmblem GetCastleData("prtg_cas04",1);
-	end;
-}
+-	script	Skoegul#1::OutsideFlagsPR4	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-prt_gld,120,243,6	script	Skoegul#p4-2::Skoegul2	722,{
 	set .@GID, GetCastleData("prtg_cas04",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -40,32 +34,33 @@ prt_gld,120,243,6	script	Skoegul#p4-2::Skoegul2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("prtg_cas04",1)) {
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("prtg_cas04",1)) {
 					warp "prtg_cas04",258,247;
-					end;
-				}
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePt04:
@@ -73,13 +68,14 @@ OnRecvCastlePt04:
 	end;
 }
 
-prt_gld,120,236,6	duplicate(Skoegul2)	Skoegul#p4-3	722
-prt_gld,122,243,6	duplicate(Skoegul2)	Skoegul#p4-4	722
-prt_gld,122,236,6	duplicate(Skoegul2)	Skoegul#p4-5	722
+prt_gld,120,243,6	duplicate(OutsideFlagsPR4)	Skoegul#1-2	722
+prt_gld,120,236,6	duplicate(OutsideFlagsPR4)	Skoegul#2	722
+prt_gld,122,243,6	duplicate(OutsideFlagsPR4)	Skoegul#3	722
+prt_gld,122,236,6	duplicate(OutsideFlagsPR4)	Skoegul#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-prtg_cas04,82,29,4	script	Skoegul#p4-6::Skoegul3	722,{
+-	script	Skoegul#5::InsideFlagsPR4	722,{
 	end;
 
 OnRecvCastlePt04:
@@ -87,51 +83,56 @@ OnRecvCastlePt04:
 	end;
 }
 
-prtg_cas04,75,29,4	duplicate(Skoegul3)	Skoegul#p4-7	722
-prtg_cas04,75,27,4	duplicate(Skoegul3)	Skoegul#p4-8	722
-prtg_cas04,82,27,4	duplicate(Skoegul3)	Skoegul#p4-9	722
-prtg_cas04,59,29,4	duplicate(Skoegul3)	Skoegul#p4-10	722
-prtg_cas04,67,29,4	duplicate(Skoegul3)	Skoegul#p4-11	722
-prtg_cas04,258,25,4	duplicate(Skoegul3)	Skoegul#p4-12	722
-prtg_cas04,258,20,4	duplicate(Skoegul3)	Skoegul#p4-13	722
-prtg_cas04,263,20,4	duplicate(Skoegul3)	Skoegul#p4-14	722
-prtg_cas04,263,27,4	duplicate(Skoegul3)	Skoegul#p4-15	722
+prtg_cas04,82,29,4	duplicate(InsideFlagsPR4)	Skoegul#5-2	722
+prtg_cas04,75,29,4	duplicate(InsideFlagsPR4)	Skoegul#6	722
+prtg_cas04,75,27,4	duplicate(InsideFlagsPR4)	Skoegul#7	722
+prtg_cas04,82,27,4	duplicate(InsideFlagsPR4)	Skoegul#8	722
+prtg_cas04,59,29,4	duplicate(InsideFlagsPR4)	Skoegul#9	722
+prtg_cas04,67,29,4	duplicate(InsideFlagsPR4)	Skoegul#10	722
+prtg_cas04,258,25,4	duplicate(InsideFlagsPR4)	Skoegul#11	722
+prtg_cas04,258,20,4	duplicate(InsideFlagsPR4)	Skoegul#12	722
+prtg_cas04,263,20,4	duplicate(InsideFlagsPR4)	Skoegul#13	722
+prtg_cas04,263,27,4	duplicate(InsideFlagsPR4)	Skoegul#14	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-prtg_cas04,292,14,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas04	-1
+prontera,167,203,6	duplicate(InsideFlagsPR4)	Skoegul#15	722
 
-// Steward
+// Kafra Employee
 //============================================================
-prtg_cas04,259,265,4	duplicate(Gld_Mngr_Template)	Van Dreth#prtg_cas04	55
+prtg_cas04,258,247,4	duplicate(guildkafra)	Kafra Staff#prtg_cas04	117
 
-// Guardians
+// Steward
 //============================================================
-prtg_cas04,259,265,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas04	-1
+prtg_cas04,259,265,4	duplicate(cm)	Van Dreth#prtg_cas04	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-prtg_cas04,258,247,4	duplicate(Gld_Kafra_Template)	Kafra Staff#prtg_cas04	117
+prtg_cas04,275,160,0	script	#Lever_PR04	111,{
 
-// Master's Room Exit
-//============================================================
-prtg_cas04,275,160,0	script	#switch_Pt04	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "prtg_cas04",259,265;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "prtg_cas04",259,265;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-prtg_cas04,271,162,0	duplicate(Gld_Trea_Protect)	ban_warp#prtg_cas04	-1,6,6
+prtg_cas04,56,283,0	duplicate(gdlever)	#prtg_cas04	111
 
 // Guild Treasure Spawns
 //============================================================
 prtg_cas04,271,162,0	duplicate(Gld_Trea_Spawn)	Treasure#prtg_cas04	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+prtg_cas04,292,14,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas04	-1
+
+// Guardians
 //============================================================
-prtg_cas04,56,283,0	duplicate(Gld_Dun_Template)	#prtg_cas04	111
+prtg_cas04,259,265,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas04	-1

+ 68 - 68
npc/guild/prtg_cas05.txt

@@ -3,36 +3,29 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.3
+//= 1.4
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
-//= NPCs that relate to Prontera Guild Castle 1
+//= NPCs that relate to Prontera Guild Castle 5
 //===== Additional Comments: =================================
 //= 1.0 First Version. No longer uses functions. [L0ne_W0lf]
 //= 1.1 Corrected flag-in spawn point. [L0ne_W0lf]
 //= 1.2 Corrected treasure room switch coordinates. [L0ne_W0lf]
 //= 1.3 Removed dialog from interior flags. [L0ne_W0lf]
+//= 1.4 Partially rewrote Script. [Masao]
 //============================================================
 
-// Guild Flag (Town)
+// Guild Flags (Outside Castle)
 //============================================================
-prontera,165,194,5	script	Gondul#p5-1::Gondul	722,{
-	end;
-
-OnRecvCastlePt05:
-	FlagEmblem GetCastleData("prtg_cas05",1);
-	end;
-}
+-	script	Gondul#1::OutsideFlagsPR5	722,{
 
-// Guild Flag (Outside Castle)
-//============================================================
-prt_gld,199,243,2	script	Gondul#p5-2::Gondul2	722,{
 	set .@GID, GetCastleData("prtg_cas05",1);
+
 	if (.@GID == 0) {
-		mes " [ Edict of the Divine Rune Midgard Kingdom ]";
+		mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
 		mes " ";
-		mes "1. Follow the ordinance of The Divine Rune Midgard Kingdom, ";
+		mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
 		mes "We declare that";
 		mes "there is no formal master of this castle.";
 		mes " ";
@@ -41,32 +34,33 @@ prt_gld,199,243,2	script	Gondul#p5-2::Gondul2	722,{
 		mes "and destroy the Emperium,";
 		mes "the king will endow the one with";
 		mes "ownership of this castle.";
+		close;
 	}
-	else {
-		if (getcharid(2) == .@GID) {
-			mes "Brave ones...";
-			mes "Do you wish to return to your honorable place?";
-			next;
-			if (select("Return to the guild castle.:Quit.") == 1) {
-				if (getcharid(2) == GetCastleData("prtg_cas05",1)) {
-					warp "prtg_cas05",52,41;
-					end;
-				}
+	if (getcharid(2) == .@GID) {
+		mes "[ Echoing Voice ]";
+		mes "Brave ones...";
+		mes "Do you wish to return to your honorable place?";
+		next;
+		if(select("Return to the guild castle.:Quit.") == 1) {
+			close2;
+			if (getcharid(2) == GetCastleData("prtg_cas05",1)) {
+				warp "prtg_cas05",52,41;
+				end;
 			}
-			close;
+			end;
 		}
-		mes "[ Edict of the Divine Rune Midgard Kingdom ]";
-		mes " ";
-		mes "1. Following the ordinance of the";
-		mes "Divine Rune Midgard Kingdom,";
-		mes "we approve that this place is in";
-		mes "the private possession of ^ff0000" + GetGuildName(.@GID) + "^000000 Guild.";
-		mes " ";
-		mes "2. The guild Master of ^ff0000"+ GetGuildName(.@GID) + "^000000 Guild is";
-		mes "^FF0000" + GetGuildMaster(.@GID) + "^000000";
-		mes "If there is anyone who objects to this,";
-		mes " prove your strength and honor with a steel blade in your hand.";
+		close;
 	}
+	mes "[ Edict of the Divine Rune-Midgarts Kingdom ]";
+	mes " ";
+	mes "1. Follow the ordinance of The Divine Rune-Midgarts Kingdom, ";
+	mes "we approve that this place is in";
+	mes "the private prossession of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild.";
+	mes " ";
+	mes "2. The guild Master of ^ff0000"+GetGuildName(.@GID)+"^000000 Guild is";
+	mes "^ff0000"+GetGuildMaster(.@GID)+"^000000";
+	mes "If there is anyone who objects to this,";
+	mes "prove your strength and honor with a steel blade in your hand.";
 	close;
 
 OnRecvCastlePt05:
@@ -74,13 +68,14 @@ OnRecvCastlePt05:
 	end;
 }
 
-prt_gld,199,236,2	duplicate(Gondul2)	Gondul#p5-3	722
-prt_gld,197,243,2	duplicate(Gondul2)	Gondul#p5-4	722
-prt_gld,197,236,2	duplicate(Gondul2)	Gondul#p5-5	722
+prt_gld,199,243,2	duplicate(OutsideFlagsPR5)	Gondul#1-2	722
+prt_gld,199,236,2	duplicate(OutsideFlagsPR5)	Gondul#2	722
+prt_gld,197,243,2	duplicate(OutsideFlagsPR5)	Gondul#3	722
+prt_gld,197,236,2	duplicate(OutsideFlagsPR5)	Gondul#4	722
 
-// Guild Flag (Inside Castle)
+// Guild Flags (Inside Castle)
 //============================================================
-prtg_cas05,19,247,4	script	Gondul#p5-6::Gondul3	722,{
+-	script	Gondul#5::InsideFlagsPR5	722,{
 	end;
 
 OnRecvCastlePt05:
@@ -88,49 +83,54 @@ OnRecvCastlePt05:
 	end;
 }
 
-prtg_cas05,19,243,4	duplicate(Gondul3)	Gondul#p5-7	722
-prtg_cas05,26,247,4	duplicate(Gondul3)	Gondul#p5-8	722
-prtg_cas05,26,243,4	duplicate(Gondul3)	Gondul#p5-9	722
-prtg_cas05,249,289,4	duplicate(Gondul3)	Gondul#p5-10	722
-prtg_cas05,256,289,4	duplicate(Gondul3)	Gondul#p5-11	722
-prtg_cas05,253,271,4	duplicate(Gondul3)	Gondul#p5-12	722
-prtg_cas05,273,257,4	duplicate(Gondul3)	Gondul#p5-13	722
+prtg_cas05,19,247,4	duplicate(InsideFlagsPR5)	Gondul#5-2	722
+prtg_cas05,19,243,4	duplicate(InsideFlagsPR5)	Gondul#6	722
+prtg_cas05,26,247,4	duplicate(InsideFlagsPR5)	Gondul#7	722
+prtg_cas05,26,243,4	duplicate(InsideFlagsPR5)	Gondul#8	722
+prtg_cas05,249,289,4	duplicate(InsideFlagsPR5)	Gondul#9	722
+prtg_cas05,256,289,4	duplicate(InsideFlagsPR5)	Gondul#10	722
+prtg_cas05,253,271,4	duplicate(InsideFlagsPR5)	Gondul#11	722
+prtg_cas05,273,257,4	duplicate(InsideFlagsPR5)	Gondul#12	722
 
-// AGIT Manager
+// Guild Flag (Town)
 //============================================================
-prtg_cas05,266,266,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas05	-1
+prontera,165,194,5	duplicate(InsideFlagsPR5)	Gondul#13	722
 
-// Steward
+// Kafra Employee
 //============================================================
-prtg_cas05,36,37,4	duplicate(Gld_Mngr_Template)	Raynor#prtg_cas05	55
+prtg_cas05,52,41,4	duplicate(guildkafra)	Kafra Staff#prtg_cas05	117
 
-// Guardians
+// Steward
 //============================================================
-prtg_cas05,36,37,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas05	-1
+prtg_cas05,36,37,4	duplicate(cm)	Raynor#prtg_cas05	55
 
-// Kafra Staff
+// Treasure Room Exit
 //============================================================
-prtg_cas05,52,41,4	duplicate(Gld_Kafra_Template)	Kafra Staff#prtg_cas05	117
+prtg_cas05,281,176,0	script	#Lever_PR05	111,{
 
-// Master's Room Exit
-//============================================================
-prtg_cas05,281,176,0	script	#switch_Pt05	111,{
 	mes " ";
-	mes "There's a small lever. Will you pull it? ";
+	mes "There's a small lever. Will you pull it?";
 	next;
-	if(select("Pull.:Do not.") == 2) close;
-	warp "prtg_cas05",36,38;
-	end;
+	if(select("Pull.:Do not.") == 1) {
+		close2;
+		warp "prtg_cas05",36,38;
+		end;
+	}
+	close;
 }
 
-// Guild Treasure Protection
+// Guild Dungeon Switch
 //============================================================
-prtg_cas05,276,178,0	duplicate(Gld_Trea_Protect)	ban_warp#prtg_cas05	-1,6,6
+prtg_cas05,212,95,0	duplicate(gdlever)	#prtg_cas05	111
 
 // Guild Treasure Spawns
 //============================================================
 prtg_cas05,276,178,0	duplicate(Gld_Trea_Spawn)	Treasure#prtg_cas05	-1
 
-// Guild Dungeon Switch
+// AGIT Manager
+//============================================================
+prtg_cas05,266,266,0	duplicate(Gld_Agit_Manager)	Agit#prtg_cas05	-1
+
+// Guardians
 //============================================================
-prtg_cas05,212,94,0	duplicate(Gld_Dun_Template)	#prtg_cas05	111
+prtg_cas05,36,37,4	duplicate(Gld_Guard_Template)	Guardian#prtg_cas05	-1

+ 82 - 0
npc/guild/trs_rp.txt

@@ -0,0 +1,82 @@
+//===== rAthena Script ======================================= 
+//= Treasure Room Protection
+//===== By: ================================================== 
+//= Masao
+//===== Current Version: ===================================== 
+//= 1.0
+//===== Compatible With: ===================================== 
+//= rAthena
+//===== Description: ========================================= 
+//= Warps every Player out of the Treasure Room except for the
+//= Guildleader.
+//===== Additional Comments: ================================= 
+//= 1.0 Converted from the official script.
+//============================================================ 
+
+-	script	ban_warp#1::prtg	139,6,6,{
+
+OnTouch:
+	set .@GID,getcharid(2);
+	if (GetGuildMaster(.@GID) != strcharinfo(0)) {
+		warp "prontera",119,64;
+		end;
+	}
+	end;
+}
+
+prtg_cas01,11,208,0	duplicate(prtg)	ban_warp#1-2	139,6,6
+prtg_cas02,202,228,0	duplicate(prtg)	ban_warp#2	139,6,6
+prtg_cas03,189,132,0	duplicate(prtg)	ban_warp#3	139,6,6
+prtg_cas04,271,162,0	duplicate(prtg)	ban_warp#4	139,6,6
+prtg_cas05,276,178,0	duplicate(prtg)	ban_warp#5	139,6,6
+
+-	script	ban_warp#6::payg	139,6,6,{
+
+OnTouch:
+	set .@GID,getcharid(2);
+	if (GetGuildMaster(.@GID) != strcharinfo(0)) {
+		warp "payon",100,100;
+		end;
+	}
+	end;
+}
+
+payg_cas01,291,8,0	duplicate(payg)	ban_warp#6-2	139,6,6
+payg_cas02,145,144,0	duplicate(payg)	ban_warp#7	139,6,6
+payg_cas03,159,168,0	duplicate(payg)	ban_warp#8	139,6,6
+payg_cas04,147,48,0	duplicate(payg)	ban_warp#9	139,6,6
+payg_cas05,157,132,0	duplicate(payg)	ban_warp#10	139,6,6
+
+-	script	ban_warp#11::aldeg	139,8,8,{
+
+OnTouch:
+	set .@GID,getcharid(2);
+	if (GetGuildMaster(.@GID) != strcharinfo(0)) {
+		warp "aldebaran",143,112;
+		end;
+	}
+	end;
+}
+
+aldeg_cas01,118,223,0	duplicate(aldeg)	ban_warp#11-2	139,8,8
+aldeg_cas02,135,230,0	duplicate(aldeg)	ban_warp#12	139,8,8
+aldeg_cas03,225,269,0	duplicate(aldeg)	ban_warp#13	139,8,8
+aldeg_cas04,84,13,0	duplicate(aldeg)	ban_warp#14	139,8,8
+aldeg_cas05,62,12,0	duplicate(aldeg)	ban_warp#15	139,8,8
+
+-	script	ban_warp#16::gefg	139,6,6,{
+
+OnTouch:
+	set .@GID,getcharid(2);
+	if (GetGuildMaster(.@GID) != strcharinfo(0)) {
+		warp "geffen",120,38;
+		end;
+	}
+	end;
+}
+
+gefg_cas01,154,112,0	duplicate(gefg)	ban_warp#16-2	139,6,6
+gefg_cas02,140,116,0	duplicate(gefg)	ban_warp#17	139,6,6
+gefg_cas03,271,290,0	duplicate(gefg)	ban_warp#18	139,6,6
+gefg_cas04,116,119,0	duplicate(gefg)	ban_warp#19	139,6,6
+gefg_cas05,144,110,0	duplicate(gefg)	ban_warp#20	139,6,6

+ 3 - 1
npc/scripts_guild.conf

@@ -4,9 +4,11 @@
 // --------------------------------------------------------------
 // ----------------------- War of Emperium ----------------------
 // Guild NPC Template file.
-npc: npc/guild/agit_template.txt
+npc: npc/guild/agit_main.txt
 // Guild WoE time settings.
 npc: npc/guild/agit_controller.txt 
+// Treasure Room Protection
+npc: npc/guild/trs_rp.txt
 // Al De Baran
 npc: npc/guild/aldeg_cas01.txt
 npc: npc/guild/aldeg_cas02.txt

+ 2 - 3
npc/warps/cities/payon.txt

@@ -5,7 +5,7 @@
 //= Darkchild (1.1)
 //= Nana (1.3)
 //===== Current Version: ===================================== 
-//= 1.6
+//= 1.7
 //===== Compatible With: ===================================== 
 //= Any rAthena Mod
 //===== Description: ========================================= 
@@ -17,13 +17,12 @@
 //= 1.4 Fixed warp payonwarp031 [Yor]
 //= 1.5 Removed Payonwarp006, it was a duplicate [MasterOfMuppets]
 //= 1.6 Changed trigger area of payon -> pay_fild08  warp. [L0ne_W0lf]
+//= 1.7 Moved Castle Map warps to warps/guild/guildcastles.txt. [Masao]
 //============================================================
 
 // == Official Warps From kRO Screenshots ==
 
 // -- Entrance / Exit --
-payon,16,142,0	warp	payonwarp001	1,1,pay_gld,370,149
-pay_gld,374,149,0	warp	payonwarp002	1,1,payon,20,142
 payon,122,27,0	warp	payonwarp003	5,3,pay_fild01,333,356
 pay_fild01,333,360,0	warp	payonwarp004	5,3,payon,122,31
 payon,267,89,0	warp	payonwarp005	1,1,pay_fild08,20,74

+ 372 - 376
npc/warps/guild/guildcastles.txt

@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= Athena (1.0)
 //===== Current Version: =====================================
-//= 2.6
+//= 2.7
 //===== Compatible With: =====================================
 //= Any Athena Version
 //===== Description: =========================================
@@ -23,385 +23,381 @@
 //= 2.4b Corrected Warp points for Juno castles 1, 4 and 5. [L0ne_W0lf]
 //= 2.5 Updated Schwaltzvalt warps and added Arunafeltz. [L0ne_W0lf]
 //= 2.6 Fixed warp position between Juno and Schwaltzvalt Realm. [Gepard]
+//= 2.7 Updated WoE:FE warps. [Masao]
 //============================================================
 
 
-//Al de Baran Guild Castles Map Connection
-aldebaran,35,140,0	warp	aldg001	1,1,alde_gld,280,160
-alde_gld,284,160,0	warp	aldg002	1,1,aldebaran,39,140
+//Prontera Castle Map
+prt_gld,159,298,0	warp	prtg01_NorthField	1,1,prt_fild01,199,30
+prt_gld,159,25,0	warp	prtg02_Castle	1,1,prt_castle,102,178
+prt_gld,129,65,0	warp	prtg-1_prtg-1-01	1,1,prtg_cas01,99,32
+prt_gld,240,124,0	warp	prtg-2_prtg-2	1,1,prtg_cas02,43,229
+prt_gld,153,141,0	warp	prtg-3_prtg-3	1,1,prtg_cas03,168,12
+prt_gld,107,240,0	warp	prtg-4_prtg-4	1,1,prtg_cas04,86,13
+prt_gld,212,240,0	warp	prtg-5_prtg-5	1,1,prtg_cas05,17,235
 
-//Al de Baran Guild Castles Map
-alde_gld,48,79,0	warp	aldg01	1,1,aldeg_cas01,34,248
-aldeg_cas01,34,252,0	warp	aldg01-1	1,1,alde_gld,48,83
-alde_gld,95,253,0	warp	aldg02	1,1,aldeg_cas02,88,163
-aldeg_cas02,88,159,0	warp	aldg02-1	1,1,alde_gld,95,249
-alde_gld,142,81,0	warp	aldg03	1,1,aldeg_cas03,114,286
-aldeg_cas03,114,290,0	warp	aldg03-1	1,1,alde_gld,142,85
-alde_gld,243,242,0	warp	aldg04	1,1,aldeg_cas04,149,17
-aldeg_cas04,145,17,0	warp	aldg04-1	1,1,alde_gld,239,242
-alde_gld,259,90,0	warp	aldg05	1,1,aldeg_cas05,216,103
-aldeg_cas05,216,107,0	warp	aldg05-1	1,1,alde_gld,264,90
+//Inside Prontera Guild Castles
+prtg_cas01,103,32,0	warp	prtg-1-01_prtg-1	1,1,prt_gld,134,65
+prtg_cas01,57,19,0	warp	prtg-1-02_prtg-1-07	1,1,prtg_cas01,80,49
+prtg_cas01,41,34,0	warp	prtg-1-03_prtg-1-08	1,1,prtg_cas01,40,47
+prtg_cas01,37,54,0	warp	prtg-1-04_prtg-1-13	1,1,prtg_cas01,192,119
+prtg_cas01,71,54,0	warp	prtg-1-05_prtg-1-12	1,1,prtg_cas01,192,65
+prtg_cas01,51,70,0	warp	prtg-1-06_prtg-1-11	1,1,prtg_cas01,202,92
+prtg_cas01,84,49,0	warp	prtg-1-07_prtg-1-02	1,1,prtg_cas01,61,19
+prtg_cas01,37,47,0	warp	prtg-1-08_prtg-1-03	1,1,prtg_cas01,45,34
+prtg_cas01,62,34,0	warp	prtg-1-09_prtg-1-13	1,1,prtg_cas01,192,119
+prtg_cas01,84,19,0	warp	prtg-1-010_prtg-1-12	1,1,prtg_cas01,192,65
+prtg_cas01,206,92,0	warp	prtg-1-11_prtg-1-06	1,1,prtg_cas01,55,70
+prtg_cas01,196,65,0	warp	prtg-1-12_prtg-1-05	1,1,prtg_cas01,75,54
+prtg_cas01,196,119,0	warp	prtg-1-13_prtg-1-04	1,1,prtg_cas01,40,54
+prtg_cas01,147,120,0	warp	prtg-1-14_prtg-1-21	1,1,prtg_cas01,75,187
+prtg_cas01,75,183,0	warp	prtg-1-21_prtg-1-14	1,1,prtg_cas01,147,116
+prtg_cas01,109,163,0	warp	prtg-1-22_prtg-1-31	1,1,prtg_cas01,202,183
+prtg_cas01,206,183,0	warp	prtg-1-31_prtg-1-22	1,1,prtg_cas01,113,163
+prtg_cas02,43,233,0	warp	prtg-2-01_prtg-2	1,1,prt_gld,240,128
+prtg_cas02,88,215,0	warp	prtg-2-02_prtg-2-22	1,1,prtg_cas02,206,41
+prtg_cas02,53,202,0	warp	prtg-2-03_prtg-2-21	1,1,prtg_cas02,165,41
+prtg_cas02,64,164,0	warp	prtg-2-04_prtg-2-12	1,1,prtg_cas02,98,25
+prtg_cas02,35,183,0	warp	prtg-2-05_prtg-2-11	1,1,prtg_cas02,71,82
+prtg_cas02,71,86,0	warp	prtg-2-11_prtg-2-05	1,1,prtg_cas02,35,187
+prtg_cas02,98,21,0	warp	prtg-2-12_prtg-2-04	1,1,prtg_cas02,64,168
+prtg_cas02,45,21,0	warp	prtg-2-13_prtg-2-24	1,1,prtg_cas02,203,25
+prtg_cas02,161,41,0	warp	prtg-2-21_prtg-2-03	1,1,prtg_cas02,57,202
+prtg_cas02,210,41,0	warp	prtg-2-22_prtg-2-02	1,1,prtg_cas02,84,215
+prtg_cas02,184,44,0	warp	prtg-2-23_prtg-2-31	1,1,prtg_cas02,157,140
+prtg_cas02,203,21,0	warp	prtg-2-24_prtg-2-13	1,1,prtg_cas02,45,25
+prtg_cas02,157,135,0	warp	prtg-2-31_prtg-2-23	1,1,prtg_cas02,184,40
+prtg_cas03,178,85,0	warp	prtg-3-01_prtg-3-12	1,1,prtg_cas03,82,73
+prtg_cas03,191,55,0	warp	prtg-3-02_prtg-3-22	1,1,prtg_cas03,190,233
+prtg_cas03,168,8,0	warp	prtg-3-03_prtg-3	1,1,prt_gld,153,137
+prtg_cas03,172,44,0	warp	prtg-3-04_prtg-3-14	1,1,prtg_cas03,10,78
+prtg_cas03,165,59,0	warp	prtg-3-05_prtg-3-13	1,1,prtg_cas03,45,47
+prtg_cas03,45,120,0	warp	prtg-3-11_prtg-3-23	1,1,prtg_cas03,164,177
+prtg_cas03,86,73,0	warp	prtg-3-12_prtg-3-01	1,1,prtg_cas03,178,81
+prtg_cas03,45,43,0	warp	prtg-3-13_prtg-3-05	1,1,prtg_cas03,165,54
+prtg_cas03,6,78,0	warp	prtg-3-14_prtg-3-04	1,1,prtg_cas03,176,44
+prtg_cas03,169,235,0	warp	prtg-3-21_prtg-3-31	1,1,prtg_cas03,11,200
+prtg_cas03,194,233,0	warp	prtg-3-22_prtg-3-02	1,1,prtg_cas03,191,59
+prtg_cas03,164,173,0	warp	prtg-3-23_prtg-3-11	1,1,prtg_cas03,45,117
+prtg_cas03,7,200,0	warp	prtg-3-31_prtg-3-21	1,1,prtg_cas03,169,231
+prtg_cas04,48,48,0	warp	prtg-4-01_prtg-4-15	1,1,prtg_cas04,10,233
+prtg_cas04,63,30,0	warp	prtg-4-02_prtg-4-14	1,1,prtg_cas04,34,229
+prtg_cas04,86,9,0	warp	prtg-4-03_prtg-3	1,1,prt_gld,111,240
+prtg_cas04,32,28,0	warp	prtg-4-04_prtg-4-16	1,1,prtg_cas04,11,254
+prtg_cas04,42,13,0	warp	prtg-4-05_prtg-4-12	1,1,prtg_cas04,56,254
+prtg_cas04,54,25,0	warp	prtg-4-06_prtg-4-13	1,1,prtg_cas04,56,233
+prtg_cas04,34,290,0	warp	prtg-4-11_prtg-4-21	1,1,prtg_cas04,238,261
+prtg_cas04,60,254,0	warp	prtg-4-12_prtg-4-05	1,1,prtg_cas04,42,17
+prtg_cas04,56,229,0	warp	prtg-4-13_prtg-4-06	1,1,prtg_cas04,54,29
+prtg_cas04,34,225,0	warp	prtg-4-14_prtg-4-02	1,1,prtg_cas04,63,26
+prtg_cas04,10,229,0	warp	prtg-4-15_prtg-4-01	1,1,prtg_cas04,48,44
+prtg_cas04,7,254,0	warp	prtg-4-16_prtg-4-04	1,1,prtg_cas04,32,32
+prtg_cas04,238,257,0	warp	prtg-4-21_prtg-4-11	1,1,prtg_cas04,34,286
+prtg_cas04,247,258,0	warp	prtg-4-22_prtg-4-31	1,1,prtg_cas04,255,14
+prtg_cas04,251,14,0	warp	prtg-4-31_prtg-4-22	1,1,prtg_cas04,247,254
+prtg_cas05,38,250,0	warp	prtg-5-01_prtg-5-14	1,1,prtg_cas05,244,7
+prtg_cas05,76,242,0	warp	prtg-5-02_prtg-5-13	1,1,prtg_cas05,288,13
+prtg_cas05,66,225,0	warp	prtg-5-03_prtg-5-12	1,1,prtg_cas05,260,92
+prtg_cas05,17,231,0	warp	prtg-5-04_prtg-5	1,1,prt_gld,208,240
+prtg_cas05,53,246,0	warp	prtg-5-05_prtg-5-15	1,1,prtg_cas05,199,13
+prtg_cas05,228,96,0	warp	prtg-5-11_prtg-5-21	1,1,prtg_cas05,26,7
+prtg_cas05,260,96,0	warp	prtg-5-12_prtg-5-03	1,1,prtg_cas05,66,229
+prtg_cas05,292,13,0	warp	prtg-5-13_prtg-5-02	1,1,prtg_cas05,76,246
+prtg_cas05,244,3,0	warp	prtg-5-14_prtg-5-01	1,1,prtg_cas05,35,247
+prtg_cas05,195,13,0	warp	prtg-5-15_prtg-5-05	1,1,prtg_cas05,55,248
+prtg_cas05,26,3,0	warp	prtg-5-21_prtg-5-11	1,1,prtg_cas05,228,92
+prtg_cas05,58,7,0	warp	prtg-5-22_prtg-5-31	1,1,prtg_cas05,253,290
+prtg_cas05,253,294,0	warp	prtg-5-31_prtg-5-22	1,1,prtg_cas05,58,11
 
-//Al de Baran Guild Castles
-aldeg_cas01,50,222,0	warp	aldg101	1,1,aldeg_cas01,104,108
-aldeg_cas01,104,112,0	warp	aldg101-1	1,1,aldeg_cas01,45,224
-aldeg_cas01,66,191,0	warp	aldg102	1,1,aldeg_cas01,122,61
-aldeg_cas01,126,61,0	warp	aldg102-1	1,1,aldeg_cas01,62,191
-aldeg_cas01,54,27,0	warp	aldg102-2	1,1,aldeg_cas01,62,191
-aldeg_cas01,26,188,0	warp	aldg103	1,1,aldeg_cas01,50,70
-aldeg_cas01,46,70,0	warp	aldg103-1	1,1,aldeg_cas01,24,188
-aldeg_cas01,70,112,0	warp	aldg104	1,1,aldeg_cas01,42,225
-aldeg_cas01,39,222,0	warp	aldg104-1	1,1,aldeg_cas01,70,108
-aldeg_cas01,89,23,0	warp	aldg105	1,1,aldeg_cas01,207,132
-aldeg_cas01,207,128,0	warp	aldg105-1	1,1,aldeg_cas01,89,27
-aldeg_cas01,206,188,0	warp	aldg106	1,1,aldeg_cas01,216,50
-aldeg_cas01,216,54,0	warp	aldg106-1	1,1,aldeg_cas01,206,184
-aldeg_cas01,232,186,0	warp	aldg107	1,1,aldeg_cas01,42,197
-aldeg_cas01,46,197,0	warp	aldg107-1	1,1,aldeg_cas01,232,182
-aldeg_cas01,171,175,0	warp	aldg108	1,1,aldeg_cas01,35,197
-aldeg_cas01,31,197,0	warp	aldg108-1	1,1,aldeg_cas01,175,175
-aldeg_cas02,84,208,0	warp	aldg201	1,1,aldeg_cas02,105,84
-aldeg_cas02,105,88,0	warp	aldg201-1	1,1,aldeg_cas02,79,208
-aldeg_cas02,45,39,0	warp	aldg201-2	1,1,aldeg_cas02,79,208
-aldeg_cas02,50,185,0	warp	aldg202	1,1,aldeg_cas02,192,192
-aldeg_cas02,192,196,0	warp	aldg202-1	1,1,aldeg_cas02,50,180
-aldeg_cas02,33,174,0	warp	aldg203	1,1,aldeg_cas02,126,61
-aldeg_cas02,130,61,0	warp	aldg203-1	1,1,aldeg_cas02,33,179
-aldeg_cas02,22,193,0	warp	aldg204	1,1,aldeg_cas02,88,11
-aldeg_cas02,88,8,0	warp	aldg204-1	1,1,aldeg_cas02,22,190
-aldeg_cas02,121,88,0	warp	aldg205	1,1,aldeg_cas02,177,135
-aldeg_cas02,177,131,0	warp	aldg205-1	1,1,aldeg_cas02,121,84
-aldeg_cas02,206,196,0	warp	aldg206	1,1,aldeg_cas02,197,13
-aldeg_cas02,197,9,0	warp	aldg206-1	1,1,aldeg_cas02,206,192
-aldeg_cas03,92,217,0	warp	aldg301	1,1,aldeg_cas03,127,90
-aldeg_cas03,130,90,0	warp	aldg301-1	1,1,aldeg_cas03,96,215
-aldeg_cas03,87,247,0	warp	aldg302	1,1,aldeg_cas03,54,90
-aldeg_cas03,51,90,0	warp	aldg302-1	1,1,aldeg_cas03,87,251
-aldeg_cas03,93,124,0	warp	aldg302-2	1,1,aldeg_cas03,87,251
-aldeg_cas03,44,222,0	warp	aldg303	1,1,aldeg_cas03,213,182
-aldeg_cas03,214,186,0	warp	aldg303-1	1,1,aldeg_cas03,49,222
-aldeg_cas03,91,57,0	warp	aldg304	1,1,aldeg_cas03,60,236
-aldeg_cas03,60,241,0	warp	aldg304-1	1,1,aldeg_cas03,91,61
-aldeg_cas03,79,130,0	warp	aldg305	1,1,aldeg_cas03,201,149
-aldeg_cas03,201,145,0	warp	aldg305-1	1,1,aldeg_cas03,79,126
-aldeg_cas03,199,190,0	warp	aldg306	1,1,aldeg_cas03,195,51
-aldeg_cas03,195,54,0	warp	aldg306-1	1,1,aldeg_cas03,199,186
-aldeg_cas04,197,40,0	warp	aldg401	1,1,aldeg_cas04,26,88
-aldeg_cas04,22,88,0	warp	aldg401-1	1,1,aldeg_cas04,192,41
-aldeg_cas04,175,54,0	warp	aldg402	1,1,aldeg_cas04,74,88
-aldeg_cas04,50,132,0	warp	aldg402-1	1,1,aldeg_cas04,74,88
-aldeg_cas04,78,88,0	warp	aldg402-2	1,1,aldeg_cas04,174,58
-aldeg_cas04,185,87,0	warp	aldg403	1,1,aldeg_cas04,111,210
-aldeg_cas04,108,210,0	warp	aldg403-1	1,1,aldeg_cas04,186,92
-aldeg_cas04,171,100,0	warp	aldg404	1,1,aldeg_cas04,152,210
-aldeg_cas04,156,210,0	warp	aldg404-1	1,1,aldeg_cas04,169,97
-aldeg_cas04,196,85,0	warp	aldg405	1,1,aldeg_cas04,49,54
-aldeg_cas04,49,52,0	warp	aldg405-1	8,1,aldeg_cas04,196,82
-aldeg_cas04,21,123,0	warp	aldg406	1,1,aldeg_cas04,125,168
-aldeg_cas04,121,168,0	warp	aldg406-1	1,1,aldeg_cas04,25,123
-aldeg_cas04,132,209,0	warp	aldg407	1,1,aldeg_cas04,14,196
-aldeg_cas04,17,196,0	warp	aldg407-1	1,1,aldeg_cas04,132,228
-aldeg_cas04,132,231,4	script	aldg408r	45,1,1,{
-	set @l0,rand(5);
-	if(@l0==1) goto w2;
-	if(@l0==2) goto w3;
-	if(@l0==3) goto w4;
-	if(@l0==4) goto w5;
-	warp "aldeg_cas04",152,210; end;
-w2:	warp "aldeg_cas04",111,210; end;
-w3:	warp "aldeg_cas04",129,212; end;
-w4:	warp "aldeg_cas04",129,212; end;
-w5:	warp "aldeg_cas04",14,196; end;
-}
-aldeg_cas05,194,71,0	warp	aldg501	1,1,aldeg_cas05,129,194
-aldeg_cas05,125,194,0	warp	aldg501-1	1,1,aldeg_cas05,199,70
-aldeg_cas05,164,86,0	warp	aldg502	1,1,aldeg_cas05,66,189
-aldeg_cas05,70,189,0	warp	aldg502-1	1,1,aldeg_cas05,166,81
-aldeg_cas05,150,67,0	warp	aldg503	1,1,aldeg_cas05,9,187
-aldeg_cas05,5,187,0	warp	aldg503-1	1,1,aldeg_cas05,151,62
-aldeg_cas05,165,232,0	warp	aldg504	1,1,aldeg_cas05,193,49
-aldeg_cas05,188,49,0	warp	aldg504-1	1,1,aldeg_cas05,165,228	//fixed [Lupus]
-aldeg_cas05,195,42,0	warp	aldg505	1,1,aldeg_cas05,19,227
-aldeg_cas05,15,227,0	warp	aldg505-1	1,1,aldeg_cas05,195,46
-aldeg_cas05,13,175,0	warp	aldg506	1,1,aldeg_cas05,162,194
-aldeg_cas05,166,194,0	warp	aldg506-1	1,1,aldeg_cas05,13,179
-aldeg_cas05,156,231,0	warp	aldg507	1,1,aldeg_cas05,18,88
-aldeg_cas05,14,88,0	warp	aldg507-1	1,1,aldeg_cas05,156,227
-
-// Geffen Castles Map
-gef_fild13,112,269,0	warp	gefg05	1,1,gefg_cas03,100,280
-gef_fild13,139,240,0	warp	gefg06	1,1,gefg_cas03,125,250
-gef_fild13,150,54,0	warp	gefg01	1,1,gefg_cas01,34,140
-gef_fild13,196,281,0	warp	gefg08	1,1,gefg_cas04,24,149
-gef_fild13,210,75,0	warp	gefg02	1,1,gefg_cas01,95,178
-gef_fild13,256,57,0	warp	gefg09	1,1,gefg_cas05,11,134
-gef_fild13,305,83,0	warp	gefg09-1	1,1,gefg_cas05,99,200
-gef_fild13,308,244,0	warp	gefg03	1,1,gefg_cas02,70,143
-gef_fild13,77,284,0	warp	gefg04	1,1,gefg_cas03,60,286
-gef_fild13,83,185,0	warp	gefg07	1,1,gefg_cas03,89,159
+//Geffen Castle Map
+gef_fild13,150,54,0	warp	gef-g1-0_gefg-1-07	1,1,gefg_cas01,34,140
+gef_fild13,210,75,0	warp	gef-g1-1_gefg-1-04	1,1,gefg_cas01,95,178
+gef_fild13,308,244,0	warp	gef-g2_gefg-2-07	1,1,gefg_cas02,70,143
+gef_fild13,77,284,0	warp	gef-g3-0_g-cas3-12	1,1,gefg_cas03,60,286
+gef_fild13,112,269,0	warp	gef-g3-1_g-cas3-13	1,1,gefg_cas03,100,280
+gef_fild13,139,240,0	warp	gef-g3-2_g-cas3-14	1,1,gefg_cas03,125,250
+gef_fild13,83,185,0	warp	gef-g3-3_g-cas3-15	1,1,gefg_cas03,89,159
+gef_fild13,196,281,0	warp	gef-g4_gefg-4-05	1,1,gefg_cas04,24,149
+gef_fild13,256,57,0	warp	gef-5-0_gefg-5-04	1,1,gefg_cas05,11,134
+gef_fild13,305,83,0	warp	gef-5-1_gefg-5-01	1,1,gefg_cas05,99,200
 
-//Geffen Guild Castles
-gefg_cas01,170,14,0	warp	gefg106-1	1,1,gefg_cas01,50,84
-gefg_cas01,170,34,0	warp	gefg105-1	1,1,gefg_cas01,30,167
-gefg_cas01,181,52,0	warp	gefg107	1,1,gefg_cas01,198,160
-gefg_cas01,202,160,0	warp	gefg107-1	1,1,gefg_cas01,185,52
-gefg_cas01,209,34,0	warp	gefg103-1	1,1,gefg_cas01,56,170
-gefg_cas01,31,185,0	warp	gefg104	1,1,gefg_cas01,33,47
-gefg_cas01,33,51,0	warp	gefg104-1	1,1,gefg_cas01,35,185
-gefg_cas01,34,136,0	warp	gefg01-1	1,1,gef_fild13,150,50
-gefg_cas01,34,167,0	warp	gefg105	1,1,gefg_cas01,174,34
-gefg_cas01,39,196,0	warp	gefg101	1,1,gefg_cas01,62,13
-gefg_cas01,54,84,0	warp	gefg106	1,1,gefg_cas01,174,14
-gefg_cas01,58,185,0	warp	gefg102	1,1,gefg_cas01,90,47
-gefg_cas01,59,170,0	warp	gefg103	1,1,gefg_cas01,205,34
-gefg_cas01,62,9,0	warp	gefg101-1	1,1,gefg_cas01,39,192
-gefg_cas01,90,51,0	warp	gefg102-1	1,1,gefg_cas01,54,185
-gefg_cas01,99,178,0	warp	gefg02-1	1,1,gef_fild13,214,75
-gefg_cas02,148,18,0	warp	gefg205-1	1,1,gefg_cas02,35,150
-gefg_cas02,150,36,0	warp	gefg208	1,1,gefg_cas02,152,186
-gefg_cas02,152,190,0	warp	gefg208-1	1,1,gefg_cas02,150,41
-gefg_cas02,174,11,0	warp	gefg207-1	1,1,gefg_cas02,21,13
-gefg_cas02,184,36,0	warp	gefg204-1	1,1,gefg_cas02,48,155
-gefg_cas02,185,18,0	warp	gefg206-1	1,1,gefg_cas02,53,136
-gefg_cas02,22,160,0	warp	gefg203	1,1,gefg_cas02,34,17
-gefg_cas02,25,13,0	warp	gefg207	1,1,gefg_cas02,170,11
-gefg_cas02,34,13,0	warp	gefg203-1	1,1,gefg_cas02,22,156
-gefg_cas02,34,152,0	warp	gefg205	1,1,gefg_cas02,153,18
-gefg_cas02,34,68,0	warp	gefg202-1	1,1,gefg_cas02,50,175
-gefg_cas02,35,173,0	warp	gefg201	1,1,gefg_cas02,76,42
-gefg_cas02,46,175,0	warp	gefg202	1,1,gefg_cas02,34,64
-gefg_cas02,48,159,0	warp	gefg204	1,1,gefg_cas02,184,41
-gefg_cas02,57,136,0	warp	gefg206	1,1,gefg_cas02,180,18
-gefg_cas02,70,147,0	warp	gefg03-1	1,1,gef_fild13,308,240
-gefg_cas02,80,42,0	warp	gefg201-1	1,1,gefg_cas02,39,173
-gefg_cas03,103,283,0	warp	gefg05-1	1,1,gef_fild13,117,273
-gefg_cas03,106,217,0	warp	gefg307	1,1,gefg_cas03,131,15
-gefg_cas03,115,210,0	warp	gefg308	1,1,gefg_cas03,92,215
-gefg_cas03,130,250,0	warp	gefg06-1	1,1,gef_fild13,143,240
-gefg_cas03,135,15,0	warp	gefg307-1	1,1,gefg_cas03,110,217
-gefg_cas03,135,92,0	warp	gefg302-1	1,1,gefg_cas03,34,282
-gefg_cas03,152,92,0	warp	gefg304-1	1,1,gefg_cas03,59,255
-gefg_cas03,154,16,0	warp	gefg314	1,1,gefg_cas03,252,11
-gefg_cas03,17,206,0	warp	gefg306-1	1,1,gefg_cas03,29,219
-gefg_cas03,212,46,0	warp	gefg315	1,1,gefg_cas03,225,158
-gefg_cas03,225,154,0	warp	gefg315-1	1,1,gefg_cas03,212,42
-gefg_cas03,237,74,0	warp	gefg312-1	1,1,gefg_cas03,62,213
-gefg_cas03,256,11,0	warp	gefg314-1	1,1,gefg_cas03,159,16
-gefg_cas03,266,47,0	warp	gefg309-1	1,1,gefg_cas03,45,175
-gefg_cas03,27,215,0	warp	gefg306-2	1,1,gefg_cas03,17,202
-gefg_cas03,34,286,0	warp	gefg302	1,1,gefg_cas03,131,92
-gefg_cas03,38,243,0	warp	gefg306	1,1,gefg_cas03,29,219
-gefg_cas03,38,259,0	warp	gefg303-1	1,1,gefg_cas03,43,271
-gefg_cas03,42,175,0	warp	gefg309	1,1,gefg_cas03,266,43
-gefg_cas03,43,191,0	warp	gefg310-1	1,1,gefg_cas03,70,185
-gefg_cas03,47,271,0	warp	gefg303	1,1,gefg_cas03,38,255
-gefg_cas03,50,248,0	warp	gefg305	1,1,gefg_cas03,54,229
-gefg_cas03,58,232,0	warp	gefg305-1	1,1,gefg_cas03,62,213
-gefg_cas03,63,255,0	warp	gefg304	1,1,gefg_cas03,156,92
-gefg_cas03,65,215,0	warp	gefg312	1,1,gefg_cas03,233,74
-gefg_cas03,66,223,0	warp	gefg301	1,1,gefg_cas03,96,53
-gefg_cas03,68,290,0	warp	gefg04-1	1,1,gef_fild13,74,287
-gefg_cas03,70,182,0	warp	gefg310	1,1,gefg_cas03,39,191
-gefg_cas03,79,244,0	warp	gefg313-1	1,1,gefg_cas03,91,250
-gefg_cas03,88,248,0	warp	gefg311-1	1,1,gefg_cas03,76,242
-gefg_cas03,90,218,0	warp	gefg308-1	1,1,gefg_cas03,111,210
-gefg_cas03,92,53,0	warp	gefg301-1	1,1,gefg_cas03,62,223
-gefg_cas03,93,159,0	warp	gefg07-1	1,1,gef_fild13,83,181
-gefg_cas03,93,209,0	warp	gefg311	1,1,gefg_cas03,92,250
-gefg_cas03,95,251,0	warp	gefg313	1,1,gefg_cas03,91,209
-gefg_cas04,140,168,0	warp	gefg407-1	1,1,gefg_cas04,178,61
-gefg_cas04,142,33,0	warp	gefg406-1	1,1,gefg_cas04,52,21
-gefg_cas04,142,55,0	warp	gefg404-1	1,1,gefg_cas04,32,180
-gefg_cas04,174,36,0	warp	gefg403-1	1,1,gefg_cas04,53,192
-gefg_cas04,178,57,0	warp	gefg407	1,1,gefg_cas04,143,166
-gefg_cas04,18,82,0	warp	gefg401-1	1,1,gefg_cas04,34,215
-gefg_cas04,18,9,0	warp	gefg402-1	1,1,gefg_cas04,57,220
-gefg_cas04,24,145,0	warp	gefg08-1	1,1,gef_fild13,193,278
-gefg_cas04,27,180,0	warp	gefg404	1,1,gefg_cas04,142,59
-gefg_cas04,34,211,0	warp	gefg401	1,1,gefg_cas04,18,78
-gefg_cas04,42,81,0	warp	gefg405	1,1,gefg_cas04,42,13
-gefg_cas04,42,9,0	warp	gefg405-1	1,1,gefg_cas04,42,77
-gefg_cas04,52,25,0	warp	gefg406	1,1,gefg_cas04,142,37
-gefg_cas04,53,196,0	warp	gefg403	1,1,gefg_cas04,170,36
-gefg_cas04,57,224,0	warp	gefg402	1,1,gefg_cas04,18,13
-gefg_cas05,149,44,0	warp	gefg506-1	1,1,gefg_cas05,37,20
-gefg_cas05,178,72,0	warp	gefg501-1	1,1,gefg_cas05,46,165
-gefg_cas05,190,20,0	warp	gefg508	1,1,gefg_cas05,194,151
-gefg_cas05,194,147,0	warp	gefg508-1	1,1,gefg_cas05,190,16
-gefg_cas05,206,44,0	warp	gefg507-1	1,1,gefg_cas05,93,20
-gefg_cas05,37,16,0	warp	gefg506	1,1,gefg_cas05,153,44
-gefg_cas05,43,62,0	warp	gefg505-1	1,1,gefg_cas05,78,138
-gefg_cas05,44,143,0	warp	gefg503	1,1,gefg_cas05,70,155
-gefg_cas05,50,165,0	warp	gefg501	1,1,gefg_cas05,178,68
-gefg_cas05,66,76,0	warp	gefg504-1	1,1,gefg_cas05,80,155
-gefg_cas05,68,150,0	warp	gefg503-1	1,1,gefg_cas05,44,147
-gefg_cas05,7,134,0	warp	gefg10	1,1,gef_fild13,252,57
-gefg_cas05,74,138,0	warp	gefg505	1,1,gefg_cas05,47,62
-gefg_cas05,83,152,0	warp	gefg504	1,1,gefg_cas05,66,72
-gefg_cas05,87,165,0	warp	gefg502	1,1,gefg_cas05,84,62
-gefg_cas05,88,62,0	warp	gefg502-1	1,1,gefg_cas05,83,165
-gefg_cas05,93,16,0	warp	gefg507	1,1,gefg_cas05,202,44
-gefg_cas05,99,204,0	warp	gefg10-1	1,1,gef_fild13,305,87
+//Inside Geffen Guild Castles
+gefg_cas01,39,196,0	warp	gefg-1-01_gefg-1-14	1,1,gefg_cas01,62,13
+gefg_cas01,58,185,0	warp	gefg-1-02_gefg-1-13	1,1,gefg_cas01,90,47
+gefg_cas01,59,170,0	warp	gefg-1-03_gefg-1-23	1,1,gefg_cas01,205,34
+gefg_cas01,99,178,0	warp	gefg-1-04_gef-g1-1	1,1,gef_fild13,214,75
+gefg_cas01,31,185,0	warp	gefg-1-05_gefg-1-12	1,1,gefg_cas01,33,47
+gefg_cas01,34,167,0	warp	gefg-1-06_gefg-1-22	1,1,gefg_cas01,174,34
+gefg_cas01,34,136,0	warp	gefg-1-07_gef-g1-0	1,1,gef_fild13,150,50
+gefg_cas01,54,84,0	warp	gefg-1-11_gefg-1-24	1,1,gefg_cas01,174,14
+gefg_cas01,33,51,0	warp	gefg-1-12_gefg-1-05	1,1,gefg_cas01,35,185
+gefg_cas01,90,51,0	warp	gefg-1-13_gefg-1-02	1,1,gefg_cas01,54,185
+gefg_cas01,62,9,0	warp	gefg-1-14_gefg-1-01	1,1,gefg_cas01,39,192
+gefg_cas01,181,52,0	warp	gefg-1-21_gefg-1-31	1,1,gefg_cas01,198,160
+gefg_cas01,170,34,0	warp	gefg-1-22_gefg-1-06	1,1,gefg_cas01,30,167
+gefg_cas01,209,34,0	warp	gefg-1-23_gefg-1-03	1,1,gefg_cas01,56,170
+gefg_cas01,170,14,0	warp	gefg-1-24_gefg-1-11	1,1,gefg_cas01,50,84
+gefg_cas01,202,160,0	warp	gefg-1-31_gefg-1-21	1,1,gefg_cas01,185,52
+gefg_cas02,35,173,0	warp	gefg-2-01_gefg-2-12	1,1,gefg_cas02,76,42
+gefg_cas02,46,175,0	warp	gefg-2-02_gefg-2-11	1,1,gefg_cas02,34,64
+gefg_cas02,22,160,0	warp	gefg-2-03_gefg-2-13	1,1,gefg_cas02,34,17
+gefg_cas02,48,159,0	warp	gefg-2-04_gefg-2-22	1,1,gefg_cas02,184,41
+gefg_cas02,34,152,0	warp	gefg-2-05_gefg-2-23	1,1,gefg_cas02,153,18
+gefg_cas02,57,136,0	warp	gefg-2-06_gefg-2-24	1,1,gefg_cas02,180,18
+gefg_cas02,70,147,0	warp	gefg-2-07_gef-g2	1,1,gef_fild13,308,240
+gefg_cas02,34,68,0	warp	gefg-2-11_gefg-2-02	1,1,gefg_cas02,50,175
+gefg_cas02,80,42,0	warp	gefg-2-12_gefg-2-01	1,1,gefg_cas02,39,173
+gefg_cas02,34,13,0	warp	gefg-2-13_gefg-2-03	1,1,gefg_cas02,22,156
+gefg_cas02,25,13,0	warp	gefg-2-14_gefg-2-25	1,1,gefg_cas02,170,11
+gefg_cas02,150,36,0	warp	gefg-2-21_gefg-2-31	1,1,gefg_cas02,152,186
+gefg_cas02,184,36,0	warp	gefg-2-22_gefg-2-04	1,1,gefg_cas02,48,155
+gefg_cas02,148,18,0	warp	gefg-2-23_gefg-2-05	1,1,gefg_cas02,35,150
+gefg_cas02,185,18,0	warp	gefg-2-24_gefg-2-06	1,1,gefg_cas02,53,136
+gefg_cas02,174,11,0	warp	gefg-2-25_gefg-2-14	1,1,gefg_cas02,21,13
+gefg_cas02,152,190,0	warp	gefg-2-31_gefg-2-21	1,1,gefg_cas02,150,41
+gefg_cas03,66,223,0	warp	g3-cas3_g3-in3	1,1,gefg_cas03,96,53
+gefg_cas03,34,286,0	warp	g-cas3-1_g-in3-1	1,1,gefg_cas03,131,92
+gefg_cas03,47,271,0	warp	g-cas3-1-1_g-cas3-3	1,1,gefg_cas03,38,255
+gefg_cas03,63,255,0	warp	g-cas3-2_g-in3-3	1,1,gefg_cas03,156,92
+gefg_cas03,50,248,0	warp	g-cas3-2-1_g-cas3-8	1,1,gefg_cas03,54,229
+gefg_cas03,38,259,0	warp	g-cas3-3_g-cas3-1-1	1,1,gefg_cas03,43,271
+gefg_cas03,38,243,0	warp	g-cas3-3-1_g-cas3-8-1	1,1,gefg_cas03,29,219
+gefg_cas03,106,217,0	warp	g-cas3-4_g-in3-2	1,1,gefg_cas03,131,15
+gefg_cas03,115,210,0	warp	g-cas3-4-1_g-cas3-6	1,1,gefg_cas03,92,215
+gefg_cas03,42,175,0	warp	g-cas3-5_g-in3-4	1,1,gefg_cas03,266,43
+gefg_cas03,70,182,0	warp	g-cas3-5-1_g-cas3-7-1	1,1,gefg_cas03,39,191
+gefg_cas03,90,218,0	warp	g-cas3-6_g-cas3-4-1	1,1,gefg_cas03,111,210
+gefg_cas03,93,209,0	warp	g-cas3-6-1_g-cas3-10	1,1,gefg_cas03,92,250
+gefg_cas03,17,206,0	warp	g-cas3-7_g-cas3-8-1	1,1,gefg_cas03,29,219
+gefg_cas03,43,191,0	warp	g-cas3-7-1_g-cas3-5-1	1,1,gefg_cas03,70,185
+gefg_cas03,58,232,0	warp	g-cas3-8_g-cas3-9	1,1,gefg_cas03,62,213
+gefg_cas03,27,215,0	warp	g-cas3-8-1_g-cas3-7	1,1,gefg_cas03,17,202
+gefg_cas03,65,215,0	warp	g-cas3-9_g-in3-5	1,1,gefg_cas03,233,74
+gefg_cas03,95,251,0	warp	g-cas3-10_g-cas3-6-1	1,1,gefg_cas03,91,209
+gefg_cas03,88,248,0	warp	g-cas3-10-1_g-cas3-11	1,1,gefg_cas03,76,242
+gefg_cas03,79,244,0	warp	g-cas3-11_g-cas3-10-1	1,1,gefg_cas03,91,250
+gefg_cas03,68,290,0	warp	g-cas3-12_gef-g3-0	1,1,gef_fild13,74,287
+gefg_cas03,103,283,0	warp	g-cas3-13_gef-g3-1	1,1,gef_fild13,117,273
+gefg_cas03,130,250,0	warp	g-cas3-14_gef-g3-2	1,1,gef_fild13,143,240
+gefg_cas03,93,159,0	warp	g-cas3-15_gef-g3-3	1,1,gef_fild13,83,181
+gefg_cas03,92,53,0	warp	g3-in_g3_cas3	1,1,gefg_cas03,62,223
+gefg_cas03,154,16,0	warp	g3-in3-01_g3-in3-02	1,1,gefg_cas03,252,11
+gefg_cas03,256,11,0	warp	g3-in3-02_g3-in3-01	1,1,gefg_cas03,159,16
+gefg_cas03,212,46,0	warp	g3-in3-03_g3-in3-04	1,1,gefg_cas03,225,158
+gefg_cas03,225,154,0	warp	g3-in3-04_g3-in3-03	1,1,gefg_cas03,212,42
+gefg_cas03,135,92,0	warp	g-in3-1_g-cas3-1	1,1,gefg_cas03,34,282
+gefg_cas03,135,15,0	warp	g-in3-2_g-cas3-4	1,1,gefg_cas03,110,217
+gefg_cas03,152,92,0	warp	g-in3-3_g-cas3-2	1,1,gefg_cas03,59,255
+gefg_cas03,266,47,0	warp	g-in3-4_g-cas3-5	1,1,gefg_cas03,45,175
+gefg_cas03,237,74,0	warp	g-in3-5_g-cas3-9	1,1,gefg_cas03,62,213
+gefg_cas04,34,211,0	warp	gefg-4-01_gefg-4-11	1,1,gefg_cas04,18,78
+gefg_cas04,57,224,0	warp	gefg-4-02_gefg-4-15	1,1,gefg_cas04,18,13
+gefg_cas04,53,196,0	warp	gefg-4-03_gefg-4-23	1,1,gefg_cas04,170,36
+gefg_cas04,27,180,0	warp	gefg-4-04_gefg-4-21	1,1,gefg_cas04,142,59
+gefg_cas04,24,145,0	warp	gefg-4-05_gef-g4	1,1,gef_fild13,193,278
+gefg_cas04,18,82,0	warp	gefg-4-11_gefg-4-01	1,1,gefg_cas04,34,215
+gefg_cas04,42,81,0	warp	gefg-4-12_gefg-4-14	1,1,gefg_cas04,42,13
+gefg_cas04,52,25,0	warp	gefg-4-13_gefg-4-24	1,1,gefg_cas04,142,37
+gefg_cas04,42,9,0	warp	gefg-4-14_gefg-4-12	1,1,gefg_cas04,42,77
+gefg_cas04,18,9,0	warp	gefg-4-15_gefg-4-02	1,1,gefg_cas04,57,220
+gefg_cas04,142,55,0	warp	gefg-4-21_gefg-4-04	1,1,gefg_cas04,32,180
+gefg_cas04,178,57,0	warp	gefg-4-22_gefg-4-31	1,1,gefg_cas04,143,166
+gefg_cas04,174,36,0	warp	gefg-4-23_gefg-4-03	1,1,gefg_cas04,53,192
+gefg_cas04,142,33,0	warp	gefg-4-24_gefg-4-13	1,1,gefg_cas04,52,21
+gefg_cas04,140,168,0	warp	gefg-4-31_gefg-4-22	1,1,gefg_cas04,178,61
+gefg_cas05,99,204,0	warp	gefg-5-01_gef-g5-1	1,1,gef_fild13,305,87
+gefg_cas05,50,165,0	warp	gefg-5-02_gefg-5-23	1,1,gefg_cas05,178,68
+gefg_cas05,87,165,0	warp	gefg-5-03_gefg-5-13	1,1,gefg_cas05,84,62
+gefg_cas05,7,134,0	warp	gefg-5-04_gef-g5-0	1,1,gef_fild13,252,57
+gefg_cas05,44,143,0	warp	gefg-5-05_gefg-5-08	1,1,gefg_cas05,70,155
+gefg_cas05,83,152,0	warp	gefg-5-06_gefg-5-11	1,1,gefg_cas05,66,72
+gefg_cas05,74,138,0	warp	gefg-5-07_gefg-5-12	1,1,gefg_cas05,47,62
+gefg_cas05,68,150,0	warp	gefg-5-08_gefg-5-05	1,1,gefg_cas05,44,147
+gefg_cas05,66,76,0	warp	gefg-5-11_gefg-5-06	1,1,gefg_cas05,80,155
+gefg_cas05,43,62,0	warp	gefg-5-12_gefg-5-07	1,1,gefg_cas05,78,138
+gefg_cas05,88,62,0	warp	gefg-5-13_gefg-5-03	1,1,gefg_cas05,83,165
+gefg_cas05,37,16,0	warp	gefg-5-14_gefg-5-21	1,1,gefg_cas05,153,44
+gefg_cas05,93,16,0	warp	gefg-5-15_gefg-5-22	1,1,gefg_cas05,202,44
+gefg_cas05,149,44,0	warp	gefg-5-21_gefg-5-14	1,1,gefg_cas05,37,20
+gefg_cas05,206,44,0	warp	gefg-5-22_gefg-5-15	1,1,gefg_cas05,93,20
+gefg_cas05,178,72,0	warp	gefg-5-23_gefg-5-02	1,1,gefg_cas05,46,165
+gefg_cas05,190,20,0	warp	gefg-5-24_gefg-5-31	1,1,gefg_cas05,194,151
+gefg_cas05,194,147,0	warp	gefg-5-31_gefg-5-24	1,1,gefg_cas05,190,16
 
-//Payon Guild Castles Map Connection
-// Temp Disabled till i replace them from the ones in payon.txt!!
-//payon,17,151,0	warp	payg001	1,1,pay_gld,370,149
-//pay_gld,374,149,0	warp	payg001-1	1,1,payon,21,151
-moc_fild02,378,272,0	warp	payg002	1,1,pay_gld,20,276
-pay_gld,16,276,0	warp	payg002-1	1,1,moc_fild02,374,272
+//Payon Castle Map
+payon,16,143,0	warp	payon-a_payg01	1,1,pay_gld,370,149
+moc_fild02,378,272,0	warp	moc02a_payg02	1,1,pay_gld,20,276
+pay_gld,374,149,0	warp	payg01_payon-a	1,1,payon,19,143
+pay_gld,16,276,0	warp	payg02_moc02a	1,1,moc_fild02,374,272
+pay_gld,121,238,0	warp	payg-1_payg-1-06	1,1,payg_cas01,214,48
+pay_gld,291,116,0	warp	payg-2_payg-2-02	1,1,payg_cas02,272,57
+pay_gld,323,293,0	warp	payg-3_payg-3-07	1,1,payg_cas03,226,26
+pay_gld,140,156,0	warp	payg-4_payg-4-01	1,1,payg_cas04,252,271
+pay_gld,204,270,0	warp	payg-5_payg-5-03	1,1,payg_cas05,62,227
 
-//Payon Guild Castles Map
-pay_gld,121,238,0	warp	payg01	1,1,payg_cas01,214,48
-payg_cas01,214,44,0	warp	payg01-1	1,1,pay_gld,121,233
-pay_gld,291,116,0	warp	payg02	1,1,payg_cas02,272,57
-payg_cas02,276,61,0	warp	payg02-1	1,1,pay_gld,295,116
-pay_gld,321,293,0	warp	payg03	1,1,payg_cas03,226,26
-payg_cas03,226,22,0	warp	payg03-1	1,1,pay_gld,317,293
-pay_gld,140,156,0	warp	payg04	1,1,payg_cas04,252,271
-payg_cas04,252,275,0	warp	payg04-1	1,1,pay_gld,140,160
-pay_gld,204,269,0	warp	payg05	3,1,payg_cas05,62,225
-payg_cas05,62,222,0	warp	payg05-1	5,1,pay_gld,204,266
+//Inside Payon Guild Castles
+payg_cas01,201,126,0	warp	payg-1-01_payg-1-12	1,1,payg_cas01,102,21
+payg_cas01,222,130,0	warp	payg-1-02_payg-1-11	1,1,payg_cas01,130,43
+payg_cas01,218,112,0	warp	payg-1-03_payg-1-04	1,1,payg_cas01,230,94
+payg_cas01,230,98,0	warp	payg-1-04_payg-1-03	1,1,payg_cas01,222,112
+payg_cas01,213,76,0	warp	payg-1-05_payg-1-07	1,1,payg_cas01,201,118
+payg_cas01,214,44,0	warp	payg-1-06_payg-1	1,1,pay_gld,121,233
+payg_cas01,201,114,0	warp	payg-1-07_payg-1-05	1,1,payg_cas01,213,72
+payg_cas01,134,43,0	warp	payg-1-11_payg-1-02	1,1,payg_cas01,226,130
+payg_cas01,102,17,0	warp	payg-1-12_payg-1-01	1,1,payg_cas01,201,121
+payg_cas01,84,15,0	warp	payg-1-13_payg-1-22	1,1,payg_cas01,15,115
+payg_cas01,53,111,0	warp	payg-1-21_payg-1-31	1,1,payg_cas01,115,147
+payg_cas01,11,115,0	warp	payg-1-22_payg-1-13	1,1,payg_cas01,81,15
+payg_cas01,115,151,0	warp	payg-1-31_payg-1-21	1,1,payg_cas01,53,115
+payg_cas02,232,72,0	warp	payg-2-01_payg-2-14	1,1,payg_cas02,28,289
+payg_cas02,276,61,0	warp	payg-2-02_payg-2	1,1,pay_gld,295,116
+payg_cas02,236,59,0	warp	payg-2-03_payg-2-01	1,1,payg_cas02,229,72
+payg_cas02,222,26,0	warp	payg-2-04_payg-2-12	1,1,payg_cas02,80,240
+payg_cas02,215,31,0	warp	payg-2-05_payg-2-11	1,1,payg_cas02,65,288
+payg_cas02,65,292,0	warp	payg-2-11_payg-2-05	1,1,payg_cas02,215,35
+payg_cas02,84,240,0	warp	payg-2-12_payg-2-04	1,1,payg_cas02,224,30
+payg_cas02,47,223,0	warp	payg-2-13_payg-2-21	1,1,payg_cas02,280,287
+payg_cas02,28,293,0	warp	payg-2-14_payg-2-01	1,1,payg_cas02,229,72
+payg_cas02,280,291,0	warp	payg-2-21_payg-2-13	1,1,payg_cas02,47,227
+payg_cas02,254,241,0	warp	payg-2-22_payg-2-31	1,1,payg_cas02,13,38
+payg_cas02,13,42,0	warp	payg-2-31_payg-2-22	1,1,payg_cas02,254,245
+payg_cas03,255,76,0	warp	payg-3-01_payg-3-14	1,1,payg_cas03,24,19
+payg_cas03,269,79,0	warp	payg-3-02_payg-3-12	1,1,payg_cas03,53,19
+payg_cas03,255,64,0	warp	payg-3-03_payg-3-08	1,1,payg_cas03,245,37
+payg_cas03,262,71,0	warp	payg-3-04_payg-3-13	1,1,payg_cas03,39,9
+payg_cas03,272,68,0	warp	payg-3-05_payg-3-06	1,1,payg_cas03,261,38
+payg_cas03,261,34,0	warp	payg-3-06_payg-3-05	1,1,payg_cas03,270,66
+payg_cas03,226,22,0	warp	payg-3-07_payg-3	1,1,pay_gld,319,293
+payg_cas03,245,41,0	warp	payg-3-08_payg-3-03	1,1,payg_cas03,255,68
+payg_cas03,39,84,0	warp	payg-3-11_payg-3-22	1,1,payg_cas03,29,249
+payg_cas03,57,19,0	warp	payg-3-12_payg-3-02	1,1,payg_cas03,269,75
+payg_cas03,39,5,0	warp	payg-3-13_payg-3-04	1,1,payg_cas03,263,66
+payg_cas03,20,19,0	warp	payg-3-14_payg-3-01	1,1,payg_cas03,255,72
+payg_cas03,29,269,0	warp	payg-3-21_payg-3-31	1,1,payg_cas03,269,287
+payg_cas03,29,245,0	warp	payg-3-22_payg-3-11	1,1,payg_cas03,39,80
+payg_cas03,269,290,0	warp	payg-3-31_payg-3-21	1,1,payg_cas03,29,273
+payg_cas04,252,275,0	warp	payg-4-01_payg-4	1,1,pay_gld,140,160
+payg_cas04,260,212,0	warp	payg-4-02_payg-4-13	1,1,payg_cas04,70,240
+payg_cas04,232,189,0	warp	payg-4-03_payg-4-12	1,1,payg_cas04,74,261
+payg_cas04,229,208,0	warp	payg-4-04_payg-4-11	1,1,payg_cas04,70,282
+payg_cas04,74,282,0	warp	payg-4-11_payg-4-04	1,1,payg_cas04,225,208
+payg_cas04,78,261,0	warp	payg-4-12_payg-4-03	1,1,payg_cas04,236,189
+payg_cas04,74,240,0	warp	payg-4-13_payg-4-02	1,1,payg_cas04,256,212
+payg_cas04,7,261,0	warp	payg-4-14_payg-4-21	1,1,payg_cas04,55,30
+payg_cas04,59,30,0	warp	payg-4-21_payg-4-14	1,1,payg_cas04,11,261
+payg_cas04,28,31,0	warp	payg-4-22_payg-4-31	1,1,payg_cas04,251,42
+payg_cas04,254,45,0	warp	payg-4-31_payg-4-22	1,1,payg_cas04,24,31
+payg_cas05,23,283,0	warp	payg-5-01_payg-5-11	1,1,payg_cas05,237,282
+payg_cas05,56,255,0	warp	payg-5-02_payg-5-14	1,1,payg_cas05,223,256
+payg_cas05,62,223,0	warp	payg-5-03_payg-5	1,1,pay_gld,198,264
+payg_cas05,39,264,0	warp	payg-5-04_payg-5-13	1,1,payg_cas05,237,231
+payg_cas05,237,286,0	warp	payg-5-11_payg-5-01	1,1,payg_cas05,19,282
+payg_cas05,283,256,0	warp	payg-5-12_payg-5-22	1,1,payg_cas05,286,43
+payg_cas05,237,227,0	warp	payg-5-13_payg-5-04	1,1,payg_cas05,40,260
+payg_cas05,219,256,0	warp	payg-5-14_payg-5-02	1,1,payg_cas05,52,255
+payg_cas05,242,41,0	warp	payg-5-21_payg-5-31	1,1,payg_cas05,18,18
+payg_cas05,290,43,0	warp	payg-5-22_payg-5-12	1,1,payg_cas05,287,256
+payg_cas05,14,14,0	warp	payg-5-31_payg-5-21	1,1,payg_cas05,246,41
 
-//Payon Guild Castles
-payg_cas01,201,125,0	warp	payg101	1,1,payg_cas01,102,19
-payg_cas01,102,16,0	warp	payg101-1	3,1,payg_cas01,201,122
-payg_cas01,222,130,0	warp	payg102	1,1,payg_cas01,130,43
-payg_cas01,134,43,0	warp	payg102-1	1,1,payg_cas01,226,130
-payg_cas01,218,112,0	warp	payg103	1,1,payg_cas01,230,94
-payg_cas01,230,98,0	warp	payg103-1	1,1,payg_cas01,222,112
-payg_cas01,213,76,0	warp	payg104	1,1,payg_cas01,201,118
-payg_cas01,201,114,0	warp	payg104-1	1,1,payg_cas01,213,72
-payg_cas01,84,15,0	warp	payg105	1,1,payg_cas01,15,115
-payg_cas01,11,115,0	warp	payg105-1	1,1,payg_cas01,81,15
-payg_cas01,53,111,0	warp	payg106	1,1,payg_cas01,115,147
-payg_cas01,115,151,0	warp	payg106-1	1,1,payg_cas01,53,115
-payg_cas02,232,72,0	warp	payg201	1,1,payg_cas02,28,289
-payg_cas02,28,293,0	warp	payg201-1	1,1,payg_cas02,229,72
-payg_cas02,236,59,0	warp	payg201-2	1,1,payg_cas02,229,72
-payg_cas02,222,26,0	warp	payg202	1,1,payg_cas02,80,240
-payg_cas02,84,240,0	warp	payg202-1	1,1,payg_cas02,224,30
-payg_cas02,215,31,0	warp	payg203	1,1,payg_cas02,65,288
-payg_cas02,65,292,0	warp	payg203-1	1,1,payg_cas02,215,35
-payg_cas02,47,223,0	warp	payg204	1,1,payg_cas02,280,287
-payg_cas02,280,291,0	warp	payg204-1	1,1,payg_cas02,47,227
-payg_cas02,254,240,0	warp	payg205	3,1,payg_cas02,13,40
-payg_cas02,13,43,0	warp	payg205-1	7,1,payg_cas02,254,243
-payg_cas03,255,76,0	warp	payg301	1,1,payg_cas03,24,19
-payg_cas03,20,19,0	warp	payg301-1	1,1,payg_cas03,255,72
-payg_cas03,269,79,0	warp	payg302	1,1,payg_cas03,53,19
-payg_cas03,57,19,0	warp	payg302-1	1,1,payg_cas03,269,75
-payg_cas03,255,64,0	warp	payg303	1,1,payg_cas03,245,37
-payg_cas03,245,41,0	warp	payg303-1	1,1,payg_cas03,255,68
-payg_cas03,262,71,0	warp	payg304	1,1,payg_cas03,39,9
-payg_cas03,39,5,0	warp	payg304-1	1,1,payg_cas03,263,66
-payg_cas03,271,68,0	warp	payg305	0,1,payg_cas03,261,37
-payg_cas03,261,34,0	warp	payg305-1	1,1,payg_cas03,269,68
-payg_cas03,39,84,0	warp	payg306	1,1,payg_cas03,29,249
-payg_cas03,29,245,0	warp	payg306-1	1,1,payg_cas03,39,80
-payg_cas03,29,269,0	warp	payg307	1,1,payg_cas03,269,287
-payg_cas03,269,290,0	warp	payg307-1	1,1,payg_cas03,29,273
-payg_cas04,259,212,0	warp	payg401	1,1,payg_cas04,72,240
-payg_cas04,75,240,0	warp	payg401-1	1,5,payg_cas04,256,212
-payg_cas04,232,189,0	warp	payg402	1,1,payg_cas04,74,261
-payg_cas04,78,261,0	warp	payg402-1	1,1,payg_cas04,236,189
-payg_cas04,229,208,0	warp	payg403	1,1,payg_cas04,70,282
-payg_cas04,74,282,0	warp	payg403-1	1,1,payg_cas04,225,208
-payg_cas04,7,261,0	warp	payg404	1,1,payg_cas04,55,30
-payg_cas04,59,30,0	warp	payg404-1	1,1,payg_cas04,11,261
-payg_cas04,28,31,0	warp	payg405	1,1,payg_cas04,251,42
-payg_cas04,254,45,0	warp	payg405-1	1,1,payg_cas04,24,31
-payg_cas05,23,283,0	warp	payg501	1,1,payg_cas05,237,282
-payg_cas05,237,286,0	warp	payg501-1	1,1,payg_cas05,19,282
-payg_cas05,56,255,0	warp	payg502	1,1,payg_cas05,223,256
-payg_cas05,219,256,0	warp	payg502-1	1,1,payg_cas05,52,255
-payg_cas05,40,263,0	warp	payg503	3,1,payg_cas05,237,229
-payg_cas05,237,226,0	warp	payg503-1	5,1,payg_cas05,40,260
-payg_cas05,283,256,0	warp	payg504	1,1,payg_cas05,286,43
-payg_cas05,290,43,0	warp	payg504-1	1,1,payg_cas05,287,256
-payg_cas05,242,41,0	warp	payg505	1,1,payg_cas05,18,18
-payg_cas05,14,14,0	warp	payg505-1	1,1,payg_cas05,246,41
+//Al De Baran Castle Map
+aldebaran,35,140,0	warp	alde-a_aldeg01	1,1,alde_gld,280,160
+alde_gld,284,160,0	warp	aldeg01_alde-a	1,1,aldebaran,39,140
+alde_gld,48,79,0	warp	aldeg-1_aldeg-1-1	1,1,aldeg_cas01,34,248
+alde_gld,95,253,0	warp	aldeg-2_aldeg-2-1	1,1,aldeg_cas02,88,163
+alde_gld,142,81,0	warp	aldeg-3_aldeg-3-1	1,1,aldeg_cas03,114,286
+alde_gld,243,242,0	warp	aldeg-4_aldeg-4-1	1,1,aldeg_cas04,149,17
+alde_gld,259,90,0	warp	aldeg-5_aldeg-5-1	1,1,aldeg_cas05,216,103
 
-//Prontera Castles Map
-prt_gld,107,240,0	warp	prtg04-1	1,1,prtg_cas04,86,13
-prt_gld,129,65,0	warp	prtg01	1,1,prtg_cas01,99,32
-prt_gld,153,141,0	warp	prtg03-1	1,1,prtg_cas03,168,12
-prt_gld,159,25,0	warp	prtg002	6,2,prt_castle,102,178
-prt_gld,159,298,0	warp	prtg001	1,1,prt_fild01,199,30
-prt_gld,212,240,0	warp	prtg05-1	1,1,prtg_cas05,17,235
-prt_gld,240,124,0	warp	prtg02-1	1,1,prtg_cas02,43,229
+//Inside Al De Baran Guild Castles
+aldeg_cas01,34,252,0	warp	aldeg-1-1_aldeg-1	1,1,alde_gld,48,83
+aldeg_cas01,50,222,0	warp	aldeg-1-2_aldeg-1-6	1,1,aldeg_cas01,104,108
+aldeg_cas01,66,191,0	warp	aldeg-1-3_aldeg-1-7	1,1,aldeg_cas01,122,61
+aldeg_cas01,26,188,0	warp	aldeg-1-4_aldeg-1-10	1,1,aldeg_cas01,50,70
+aldeg_cas01,70,112,0	warp	aldeg-1-5_aldeg-1-18	1,1,aldeg_cas01,42,225
+aldeg_cas01,104,112,0	warp	aldeg-1-6_aldeg-1-2	1,1,aldeg_cas01,45,224
+aldeg_cas01,126,61,0	warp	aldeg-1-7_aldeg-1-3	1,1,aldeg_cas01,62,191
+aldeg_cas01,89,23,0	warp	aldeg-1-8_aldeg-1-13	1,1,aldeg_cas01,207,132
+aldeg_cas01,54,27,0	warp	aldeg-1-9_aldeg-1-3	1,1,aldeg_cas01,62,191
+aldeg_cas01,46,70,0	warp	aldeg-1-10_aldeg-1-4	1,1,aldeg_cas01,24,188
+aldeg_cas01,206,188,0	warp	aldeg-1-11_aldeg-1-15	1,1,aldeg_cas01,216,50
+aldeg_cas01,232,186,0	warp	aldeg-1-12_aldeg-1-16	1,1,aldeg_cas01,42,197
+aldeg_cas01,207,128,0	warp	aldeg-1-13_aldeg-1-8	1,1,aldeg_cas01,89,27
+aldeg_cas01,171,175,0	warp	aldeg-1-14_aldeg-1-17	1,1,aldeg_cas01,35,197
+aldeg_cas01,216,54,0	warp	aldeg-1-15_aldeg-1-11	1,1,aldeg_cas01,206,184
+aldeg_cas01,46,197,0	warp	aldeg-1-16_aldeg-1-12	1,1,aldeg_cas01,232,182
+aldeg_cas01,31,197,0	warp	aldeg-1-17_aldeg-1-14	1,1,aldeg_cas01,175,175
+aldeg_cas01,39,222,0	warp	aldeg-1-18_aldeg-1-5	1,1,aldeg_cas01,70,108
+aldeg_cas02,88,159,0	warp	aldeg-2-1_aldeg-2	1,1,alde_gld,95,249
+aldeg_cas02,84,208,0	warp	aldeg-2-2_aldeg-2-10	1,1,aldeg_cas02,105,84
+aldeg_cas02,50,185,0	warp	aldeg-2-3_aldeg-2-12	1,1,aldeg_cas02,192,192
+aldeg_cas02,33,174,0	warp	aldeg-2-4_aldeg-2-8	1,1,aldeg_cas02,126,61
+aldeg_cas02,22,194,0	warp	aldeg-2-5_aldeg-2-6	1,1,aldeg_cas02,88,13
+aldeg_cas02,88,9,0	warp	aldeg-2-6_aldeg-2-5	1,1,aldeg_cas02,22,190
+aldeg_cas02,45,39,0	warp	aldeg-2-7_aldeg-2-2	1,1,aldeg_cas02,79,208
+aldeg_cas02,130,61,0	warp	aldeg-2-8_aldeg-2-4	1,1,aldeg_cas02,33,179
+aldeg_cas02,121,88,0	warp	aldeg-2-9_aldeg-2-11	1,1,aldeg_cas02,177,135
+aldeg_cas02,105,88,0	warp	aldeg-2-10_aldeg-2-2	1,1,aldeg_cas02,79,208
+aldeg_cas02,177,131,0	warp	aldeg-2-11_aldeg-2-9	1,1,aldeg_cas02,121,84
+aldeg_cas02,192,196,0	warp	aldeg-2-12_aldeg-2-3	1,1,aldeg_cas02,50,180
+aldeg_cas02,206,196,0	warp	aldeg-2-13_aldeg-2-14	1,1,aldeg_cas02,197,13
+aldeg_cas02,197,9,0	warp	aldeg-2-14_aldeg-2-13	1,1,aldeg_cas02,206,192
+aldeg_cas03,114,290,0	warp	aldeg-3-1_aldeg-3	1,1,alde_gld,142,85
+aldeg_cas03,92,217,0	warp	aldeg-3-2_aldeg-3-6	1,1,aldeg_cas03,127,90
+aldeg_cas03,87,247,0	warp	aldeg-3-3_aldeg-3-7	1,1,aldeg_cas03,54,90
+aldeg_cas03,44,222,0	warp	aldeg-3-4_aldeg-3-13	1,1,aldeg_cas03,213,182
+aldeg_cas03,91,57,0	warp	aldeg-3-5_aldeg-3-14	1,1,aldeg_cas03,60,236
+aldeg_cas03,130,90,0	warp	aldeg-3-6_aldeg-3-2	1,1,aldeg_cas03,96,215
+aldeg_cas03,51,90,0	warp	aldeg-3-7_aldeg-3-3	1,1,aldeg_cas03,87,251
+aldeg_cas03,93,124,0	warp	aldeg-3-8_aldeg-3-3	1,1,aldeg_cas03,87,251
+aldeg_cas03,79,130,0	warp	aldeg-3-9_aldeg-3-10	1,1,aldeg_cas03,201,149
+aldeg_cas03,201,145,0	warp	aldeg-3-10_aldeg-3-9	1,1,aldeg_cas03,79,126
+aldeg_cas03,199,190,0	warp	aldeg-3-11_aldeg-3-12	1,1,aldeg_cas03,195,51
+aldeg_cas03,195,54,0	warp	aldeg-3-12_aldeg-3-11	1,1,aldeg_cas03,199,186
+aldeg_cas03,214,186,0	warp	aldeg-3-13_aldeg-3-4	1,1,aldeg_cas03,49,222
+aldeg_cas03,60,241,0	warp	aldeg-3-14_aldeg-3-5	1,1,aldeg_cas03,91,61
+aldeg_cas04,145,17,0	warp	aldeg-4-1_aldeg-4	1,1,alde_gld,239,242
+aldeg_cas04,197,40,0	warp	aldeg-4-2_aldeg-4-9	1,1,aldeg_cas04,26,88
+aldeg_cas04,175,54,0	warp	aldeg-4-3_aldeg-4-8	1,1,aldeg_cas04,74,88
+aldeg_cas04,185,87,0	warp	aldeg-4-4_aldeg-4-14	1,1,aldeg_cas04,111,210
+aldeg_cas04,171,100,0	warp	aldeg-4-5_aldeg-4-13	1,1,aldeg_cas04,152,210
+aldeg_cas04,196,86,0	warp	aldeg-4-6_aldeg-4-7	1,1,aldeg_cas04,49,57
+aldeg_cas04,49,53,0	warp	aldeg-4-7_aldeg-4-6	1,1,aldeg_cas04,196,82
+aldeg_cas04,78,88,0	warp	aldeg-4-8_aldeg-4-3	1,1,aldeg_cas04,174,58
+aldeg_cas04,22,88,0	warp	aldeg-4-9_aldeg-4-2	1,1,aldeg_cas04,192,41
+aldeg_cas04,50,132,0	warp	aldeg-4-10_aldeg-4-8	1,1,aldeg_cas04,74,88
+aldeg_cas04,21,123,0	warp	aldeg-4-11_aldeg-4-12	1,1,aldeg_cas04,125,168
+aldeg_cas04,121,168,0	warp	aldeg-4-12_aldeg-4-11	1,1,aldeg_cas04,25,123
+aldeg_cas04,156,210,0	warp	aldeg-4-13_aldeg-4-5	1,1,aldeg_cas04,169,97
+aldeg_cas04,108,210,0	warp	aldeg-4-14_aldeg-4-4	1,1,aldeg_cas04,186,92
+aldeg_cas04,132,231,0	script	aldeg-4-15_aldeg-4-	45,1,1,{
 
-//Prontera Guild Castles
-prtg_cas01,103,32,0	warp	prtg01-1	1,1,prt_gld,134,65
-prtg_cas01,109,163,0	warp	prtg107	1,1,prtg_cas01,202,183
-prtg_cas01,147,120,0	warp	prtg106	1,1,prtg_cas01,75,187
-prtg_cas01,196,119,0	warp	prtg103-1	1,1,prtg_cas01,40,54
-prtg_cas01,196,65,0	warp	prtg104-1	1,1,prtg_cas01,75,54
-prtg_cas01,206,183,0	warp	prtg107-1	1,1,prtg_cas01,113,163
-prtg_cas01,206,92,0	warp	prtg105-1	1,1,prtg_cas01,55,70
-prtg_cas01,37,47,0	warp	prtg102-1	1,1,prtg_cas01,45,34
-prtg_cas01,37,54,0	warp	prtg103	1,1,prtg_cas01,192,119
-prtg_cas01,41,34,0	warp	prtg102	1,1,prtg_cas01,40,47
-prtg_cas01,51,70,0	warp	prtg105	1,1,prtg_cas01,202,92
-prtg_cas01,57,19,0	warp	prtg101	1,1,prtg_cas01,80,49
-prtg_cas01,62,34,0	warp	prtg108	1,1,prtg_cas01,192,119
-prtg_cas01,71,54,0	warp	prtg104	1,1,prtg_cas01,192,65
-prtg_cas01,75,183,0	warp	prtg106-1	1,1,prtg_cas01,147,116
-prtg_cas01,84,19,0	warp	prtg109	1,1,prtg_cas01,192,65
-prtg_cas01,84,49,0	warp	prtg101-1	1,1,prtg_cas01,61,19
-prtg_cas02,157,135,0	warp	prtg206-1	1,1,prtg_cas02,184,40
-prtg_cas02,161,41,0	warp	prtg202-1	1,1,prtg_cas02,57,202
-prtg_cas02,184,44,0	warp	prtg206	1,1,prtg_cas02,157,140
-prtg_cas02,203,21,0	warp	prtg205-1	1,1,prtg_cas02,45,25
-prtg_cas02,210,41,0	warp	prtg201-1	1,1,prtg_cas02,84,215
-prtg_cas02,35,183,0	warp	prtg204	1,1,prtg_cas02,71,82
-prtg_cas02,43,233,0	warp	prtg02	1,1,prt_gld,240,128
-prtg_cas02,45,21,0	warp	prtg205	1,1,prtg_cas02,203,25
-prtg_cas02,53,202,0	warp	prtg202	1,1,prtg_cas02,165,41
-prtg_cas02,64,164,0	warp	prtg203	1,1,prtg_cas02,98,25
-prtg_cas02,71,86,0	warp	prtg204-1	1,1,prtg_cas02,35,187
-prtg_cas02,88,215,0	warp	prtg201	1,1,prtg_cas02,206,41
-prtg_cas02,98,21,0	warp	prtg203-1	1,1,prtg_cas02,64,168
-prtg_cas03,164,173,0	warp	prtg305-1	1,1,prtg_cas03,45,117
-prtg_cas03,165,59,0	warp	prtg304	1,1,prtg_cas03,45,47
-prtg_cas03,168,8,0	warp	prtg03	1,1,prt_gld,153,137
-prtg_cas03,169,235,0	warp	prtg306	1,1,prtg_cas03,11,200
-prtg_cas03,172,44,0	warp	prtg303	1,1,prtg_cas03,10,78
-prtg_cas03,178,85,0	warp	prtg301	1,1,prtg_cas03,82,73
-prtg_cas03,191,55,0	warp	prtg302	1,1,prtg_cas03,190,233
-prtg_cas03,194,233,0	warp	prtg302-1	1,1,prtg_cas03,191,59
-prtg_cas03,45,120,0	warp	prtg305	1,1,prtg_cas03,164,177
-prtg_cas03,45,43,0	warp	prtg304-1	1,1,prtg_cas03,165,54
-prtg_cas03,6,78,0	warp	prtg303-1	1,1,prtg_cas03,176,44
-prtg_cas03,7,200,0	warp	prtg306-1	1,1,prtg_cas03,169,231
-prtg_cas03,86,73,0	warp	prtg301-1	1,1,prtg_cas03,178,81
-prtg_cas04,10,229,0	warp	prtg401-1	1,1,prtg_cas04,48,44
-prtg_cas04,238,257,0	warp	prtg406-1	1,1,prtg_cas04,34,286
-prtg_cas04,247,258,0	warp	prtg407	1,1,prtg_cas04,255,14
-prtg_cas04,251,14,0	warp	prtg407-1	1,1,prtg_cas04,247,254
-prtg_cas04,32,28,0	warp	prtg403	1,1,prtg_cas04,11,254
-prtg_cas04,34,225,0	warp	prtg402-1	1,1,prtg_cas04,63,26
-prtg_cas04,34,290,0	warp	prtg406	1,1,prtg_cas04,238,261 
-prtg_cas04,42,13,0	warp	prtg404	1,1,prtg_cas04,56,254
-prtg_cas04,48,48,0	warp	prtg401	1,1,prtg_cas04,10,233
-prtg_cas04,54,25,0	warp	prtg405	1,1,prtg_cas04,56,233
-prtg_cas04,56,229,0	warp	prtg405-1	1,1,prtg_cas04,54,29
-prtg_cas04,60,254,0	warp	prtg404-1	1,1,prtg_cas04,42,17
-prtg_cas04,63,30,0	warp	prtg402	1,1,prtg_cas04,34,229
-prtg_cas04,7,254,0	warp	prtg403-1	1,1,prtg_cas04,32,32
-prtg_cas04,86,9,0	warp	prtg04	1,1,prt_gld,111,240
-prtg_cas05,17,231,0	warp	prtg05	1,1,prt_gld,208,240
-prtg_cas05,195,13,0	warp	prtg504-1	1,1,prtg_cas05,55,248
-prtg_cas05,228,96,0	warp	prtg505	1,1,prtg_cas05,26,7
-prtg_cas05,244,3,0	warp	prtg501-1	1,1,prtg_cas05,35,247
-prtg_cas05,253,294,0	warp	prtg506-1	1,1,prtg_cas05,58,11
-prtg_cas05,26,3,0	warp	prtg505-1	1,1,prtg_cas05,228,92
-prtg_cas05,260,96,0	warp	prtg503-1	1,1,prtg_cas05,66,229
-prtg_cas05,292,13,0	warp	prtg502-1	1,1,prtg_cas05,76,246
-prtg_cas05,38,250,0	warp	prtg501	1,1,prtg_cas05,244,7
-prtg_cas05,53,246,0	warp	prtg504	1,1,prtg_cas05,199,13
-prtg_cas05,58,7,0	warp	prtg506	1,1,prtg_cas05,253,290
-prtg_cas05,66,225,0	warp	prtg503	1,1,prtg_cas05,260,92
-prtg_cas05,76,242,0	warp	prtg502	1,1,prtg_cas05,288,13
+OnTouch:
+	switch (rand(1,5)) {
+		case 1:	warp "aldeg_cas04",152,210; end;
+		case 2:	warp "aldeg_cas04",111,210; end;
+		case 3:	warp "aldeg_cas04",129,212; end;
+		case 4:	warp "aldeg_cas04",129,212; end;
+		case 5:	warp "aldeg_cas04",14,196; end;
+	}
+	end;
+}
+aldeg_cas04,132,209,0	warp	aldeg-4-16_aldeg-4-17	1,1,aldeg_cas04,14,196
+aldeg_cas04,17,196,0	warp	aldeg-4-17_aldeg-4-15	1,1,aldeg_cas04,132,228
+aldeg_cas05,216,107,0	warp	aldeg-5-1_aldeg-5	1,1,alde_gld,264,90
+aldeg_cas05,194,71,0	warp	aldeg-5-3_aldeg-5-13	1,1,aldeg_cas05,129,194
+aldeg_cas05,164,86,0	warp	aldeg-5-4_aldeg-5-10	1,1,aldeg_cas05,66,189
+aldeg_cas05,150,67,0	warp	aldeg-5-5_aldeg-5-9	1,1,aldeg_cas05,9,187
+aldeg_cas05,188,49,0	warp	aldeg-5-6_aldeg-5-14	1,1,aldeg_cas05,165,228
+aldeg_cas05,195,42,0	warp	aldeg-5-7_aldeg-5-8	1,1,aldeg_cas05,19,227
+aldeg_cas05,15,227,0	warp	aldeg-5-8_aldeg-5-7	1,1,aldeg_cas05,195,46
+aldeg_cas05,5,187,0	warp	aldeg-5-9_aldeg-5-5	1,1,aldeg_cas05,151,62
+aldeg_cas05,70,189,0	warp	aldeg-5-10_aldeg-5-4	1,1,aldeg_cas05,166,81
+aldeg_cas05,13,175,0	warp	aldeg-5-11_aldeg-5-12	1,1,aldeg_cas05,162,194
+aldeg_cas05,166,194,0	warp	aldeg-5-12_aldeg-5-11	1,1,aldeg_cas05,13,179
+aldeg_cas05,125,194,0	warp	aldeg-5-13_aldeg-5-3	1,1,aldeg_cas05,199,70
+aldeg_cas05,165,232,0	warp	aldeg-5-14_aldeg-5-6	1,1,aldeg_cas05,193,49
+aldeg_cas05,156,231,0	warp	aldeg-5-15_aldeg-5-16	1,1,aldeg_cas05,18,88
+aldeg_cas05,14,88,0	warp	aldeg-5-16_aldeg-5-15	1,1,aldeg_cas05,156,227
 
 // Episode 12: WoE:SE
 // Schwaltzvalt Guild Castles Map Connection
@@ -528,10 +524,10 @@ nguild_prt,84,19,0	warp	nprtg109	1,1,nguild_prt,192,65
 nguild_prt,84,49,0	warp	nprtg101-1	1,1,nguild_prt,61,19
 
 //Guild Dungeons
-gld_dun01,119,14,0	warp	gldd_001	1,1,pay_gld,53,141
-gld_dun02,180,112,0	warp	gldd_002	1,1,alde_gld,242,121
-gld_dun02,20,160,0	warp	gldd_003	1,1,alde_gld,229,185
-gld_dun03,42,30,0	warp	gldd_004	1,1,prt_gld,63,66
-gld_dun03,238,274,0	warp	gldd_005	1,1,prt_gld,252,247
-gld_dun04,37,230,0	warp	gldd_006	1,1,gef_fild13,42,331
-gld_dun04,110,20,0	warp	gldd_007	1,1,gef_fild13,373,62
+gld_dun03,238,274,0	warp	gdun03a_prtg	1,1,prt_gld,252,247
+gld_dun03,42,30,0	warp	gdun03b_prtg	1,1,prt_gld,63,66
+gld_dun02,20,160,0	warp	gdun02a_aldega	1,1,alde_gld,229,185
+gld_dun02,180,112,0	warp	gdun02b_aldegb	1,1,alde_gld,242,121
+gld_dun01,119,14,0	warp	gdun01_payg	1,1,pay_gld,53,141
+gld_dun04,37,230,0	warp	gdun04_g13a	1,1,gef_fild13,42,331
+gld_dun04,110,20,0	warp	gdun04_g13b	1,1,gef_fild13,373,62