//===================================================================
//gefg_cas02         by kalen
//===================================================================
gef_fild13.gat,303,243,4	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gef_fild13.gat,312,243,4	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gef_fild13.gat,290,243,4	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gef_fild13.gat,324,243,4	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gefg_cas02.gat,65,130,5	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gefg_cas02.gat,30,123,5	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gefg_cas02.gat,65,139,6	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gefg_cas02.gat,37,177,6	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gefg_cas02.gat,37,168,6	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gefg_cas02.gat,68,47,2	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
gefg_cas02.gat,68,36,2	script	ギルドフラッグ	722,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (@GID != 0) goto LStartg;
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "正式所有者がないアジトであることを";
		mes "公表する。";
		next;
		mes " ";
		mes "2.";
		mes "こちらを守っている凄じい";
		mes "試練に勝って、エンペリウムを";
		mes "破壊する勇者には国王が";
		mes "認定するアジト所有権が附与される";
		close;
LStartg:
		mes "[ ルーンミッドガッツ王国領 ]";
		mes " ";
		mes "1.";
		mes "こちらはルーンミッドガッツ王国に";
		mes "よって";
		mes "ギルド ^ff0000 " + GetGuildName(@GID) + " ^000000の";
		mes "所有であることを認められている。";
		next;
		mes " ";
		mes "2.";
		mes "^ff0000 " + GetGuildName(@GID) + " ^000000 のマスターは";
		mes "^ff0000 GUILDMASTER ^000000である。";
		mes "これに異議のある者は、剣を取り";
		mes "力を以って名誉を勝ち取りなさい。";
		close;
}
//------------------------------カプラ--------------------------------
gefg_cas02.gat,23,66,3	script	カプラ職員	117,{
	cutin "kafra_01",2;
	getcastledata "gefg_cas02.gat",1,@GID;
	if (getcharid(2) == @GID) goto LStartg;
	mes "[カプラ職員]";
	mes "私は、ギルド";
	mes " ^ff0000" + GetGuildName(@GID) + "^000000";
	mes "の皆様にだけお仕えするように";
	mes "契約されております。";
	mes "他のカプラサービスを";
	mes "ご利用くださいませ。";
	goto L_EXIT;
LStartg:
	mes "[カプラ職員]";
	mes "いらっしゃいませ ^ff0000" + GetGuildName(@GID) + "^000000 の皆さん";
	mes "カプラサービスは";
	mes "いつも皆様のそばにいます。";
	next;
	menu "倉庫サービス",L2,"空間移動サービス",L3,"カートサービス",L4,"終了",L7;
L2:
	if(getskilllv(1) < 6) goto Lerror2_1;
	if (Zeny < 40) goto Lerror2_2;
		set Zeny,Zeny-40;
		openstorage;
		goto L_EXIT;
	Lerror2_1:
		mes "[カプラ職員]";
		mes "倉庫は基本スキルレベル6を";
		mes "習得してから利用可能となります。";
		goto L_EXIT;
	Lerror2_2:
		mes "[カプラ職員]";
		mes "お客様、お金が足りません。";
		mes "倉庫利用料金は 40 Zenyです。";
		goto L_EXIT;
L3:
	mes "[カプラ職員]";
	mes "目的地をお選び下さい。";
	next;
	menu "ゲフェン -> 200 z",L3_1,"取り消し",L3_2;
		L3_1:
			if (Zeny < 200) goto Lerror3;
			set Zeny,Zeny-200;set KF_PIT,KF_PIT+20;warp "geffen.gat",120,39;end;
		L3_2:
				mes "[カプラ職員]";
				mes "ありがとうございました。";
				mes "またご利用くださいませ。";
				goto L_EXIT;
		Lerror3:
				mes "[カプラ職員]";
  				mes "お客様、お金が足りません。";
   				mes "所持金をお確かめください。";
				goto L_EXIT;
L4:
	if (!((Class == 5) || (Class == 10) || (Class == 18))) goto Lerror4_1;
	mes "[カプラ職員]";
	mes "カート利用料金は 800 Zenyです。";
	mes "また、カートを利用するには";
	mes "｢プッシュカート｣スキルが必要です。";
	mes "そのスキルがないとカートを利用";
	mes "できずにお金だけ消えてしまいます。";
	mes "準備はよろしいですか？";
	next;
	menu "利用する",L4_1,"取り消し",-;
		mes "[カプラ職員]";
		mes "ありがとうございました。";
		mes "またご利用くださいませ。";
		goto L_EXIT;
	L4_1:
		if (Zeny < 800) goto Lerror4_2;
		set Zeny,Zeny-800;
		setcart;
		goto L_EXIT;
	Lerror4_1:
		mes "[カプラ職員]";
		mes "申し訳ございません。";
		mes "カートは商人とブラックスミス、";
		mes "そしてアルケミスト専用の";
		mes "サービスです。";
		goto L_EXIT;
	Lerror4_2:
		mes "[カプラ職員]";
		mes "お客様、お金が足りません。";
		mes "カート利用料金は 800 Zenyです。";
		goto L_EXIT;
//Cart already have
//Lerror4_3:
//mes "[カプラ職員]";
//mes "お客様は現在カートを";
//mes "利用されています。";
//goto L_EXIT;
L7:
	mes "[カプラ職員]";
	mes "我々カプラサービスは、より完璧な";
	mes "サービスと管理業務を目指し";
	mes "お客様が安心してご利用いただけるよう";
	mes "いつも最善を尽くしています。";
	mes "（株）カプラサービスをご利用いただき";
	mes "ありがとうございました。";
L_EXIT:
	cutin "kafra_01",255;
	close;
}
//-------------------------------執事---------------------------------
gefg_cas02.gat,12,66,5	script	エスマーク	55,{
	getcastledata "gefg_cas02.gat",1,@GID;
	if (getcharid(2) == @GID) goto LStartg;
	mes "NO MSG";
	close;
LStartgm:
	mes "[執事エスマーク]";
	mes "あなた方がいくら脅そうとも、";
	mes "私は私のマスターである";
	mes "^ff0000GUILDMASTER^000000様にのみ";
	mes "お仕えする身である。";
	mes "ガーディアンたちはどこか！";
	mes "早くこの無礼な者等を追放しなさい！";
	close;
LStartg:
	mes "執事機能は未実装です。";
	close;
}
//-----------------------------スイッチ-------------------------------
gefg_cas02.gat,137,113,0	script	　	111,{
	mes "小さなレバーがあります。";
	mes "引きますか？";
	next;
	menu "引く",-,"引かない",L2;
	warp "gefg_cas02",12,67;
	end;
L2:
	close;
}
//-----------------------------スイッチ2------------------------------
gefg_cas02.gat,167,40,0	script	　	111,{
	mes "[声]";
	mes "試練に挑むならば先へ進むがよい";
	next;
	mes " ";
	mes "小さなレバーがあります。";
	mes "引きますか？";
	next;
	menu "引く",-,"引かない",L2;
	getcastledata "gefg_cas02.gat",1,@GID;
	if (getcharid(2) != @GID) goto L1n;
	warp "gld_dun04",125,270;
	end;
L1n:
	mes " ";
	mes "しかし何も起こらなかった。";
L2:
	close;
}
