//===================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// ---------------------------------
// - ùJ aϥȸ} - 
//===================================
// G2.5
//===================================
//= * лxYs@
//= * 滷s@
//= * ]ùJ/wڽö 
//===================================

//лxYs@
moc_ruins,114,181,4	script		89,{
	mes "[]";
	mes "w{CwzӨHs@^3355FF' лxY '^000000 DWaڰөC";
	next;
	mes "DzO_ťLڭ̪aڥv..";
	mes "ڭ̮abHDnquɥNN}ls@qxPAܤwgʤQ~vFC";
	mes "ӧڭ̱`@ǱMq^3355FF' лxY '^000000 qA{byNӷ˹~C";
	next;
	switch( select( "q^3355FF' лxY '^000000C:ܡC")) {
	case 1:
		mes "Ѿ֦ʤQ~y[vaکһs@^3355FF' лxY '^000000oiXӪ˹~..";
		mes "ŧۥqлxPǲΧ޳NAOH@GBT@ΡC";
		mes "۫H@w|ϭqʪUȥC";
		next;
		mes "q^3355FF' лxY'^000000 ݭnOz^3355FF' { 91100  '^000000 P ..";
		mes "^3355FF' Y 50  '^000000 ٦ ^3355FF' ¦V 1  '^000000 C";
		next;
		if(countitem(1019) > 49 && countitem(983) > 0 && Zeny > 91099) {
			delitem 1019,50;
			delitem 983,1;
			set Zeny,Zeny-91100;
			mes "[]";
			mes "nF IoO֦ʤQ~y[vaکһs@^3355FF' лxY '^000000 I";
			mes "±z{AwUAӡI";
			getitem 2272,1;
			close;
		}
		mes "[]";
		mes "zҷǳƪƤ?";
		mes "бzAT{@UC";
		close;
	case 2:
		mes "[]";
		mes "P±zVaڭqʰӫ~C";
		mes "zƨƶߡC";
		close;
	}
}


//滷s@
moc_ruins,118,176,4	script	ҪN|	64,{
	mes "[i߼ڦNR]";
	mes " - SUȤWӰաI";
	mes "ڪDAnC";
	mes "AOF]kӨӪa ?";
	next;
	switch(select( "s]k?:s@]kC:LC")) {
	case 1:
		mes "[i߼ڦNR]";
		mes "O I WӬO ' ^3355FF滷^000000 ' I";
		mes "~OAY";
		mes "nXӬ|b@_I";
		mes "OQΥuϮg@";
		mes "ӬݲMb誺F";
		mes "ݪܬOݤMI";
		next;
		mes "[i߼ڦNR]";
		mes "ıop? ܴΧa?I";
		mes "I";
		mes ". . . . .";
		mes "..  ?Aݰ_ӦnӬ۫Hˤl?";
		mes "ڻiOuII";
		next;
		mes "[i߼ڦNR]";
		mes "s@滷һݭnF";
		mes "@Ӥ@ӰOU ..";
		mes "^3355FF^000000 @ӡI ^3355FFK^000000 @ʤI ٦AOάO ^3355FF50000 ^000000 I";
		close;
	case 2:
		if (countitem(2243) > 0 && countitem(999) > 99 && Zeny > 49999) {
			mes "[i߼ڦNR]";
			mes "nIƱoƲAaӧhּ";
			next;
			delitem 2243,1;
			delitem 999, 100;
			set Zeny,Zeny-50000;
			next;
			mes "[i߼ڦNR]";
			mes "oNOFI]kI";
			getitem 2296,1;
			next;
			mes "[i߼ڦNR]";
			mes "OAڥ......";
			mes "nΥӬݧAӬݪF@III...";
			close;
		}
		mes "[i߼ڦNR]";
		mes " I  I ڡ@II";
		mes "AiHbХ@jW̳yҪ";
		mes "򤣷qI";
		mes "uOӹLFII";
		close;
	case 3:
		mes "[i߼ڦNR]";
		mes "޳޳޳ޡI";
		mes "AoO";
		mes "bХ@j񹣦W";
		mes "Ǥjvi߼ڦNRЧڥH";
		mes "ӻܶ ?  ?I";
		close;
	}
}

// Morroc Assassin Guild Bar
// ============================================================
morocc,43,108,5	script	UQLH֦~#dan_07	82,{
	if (BaseClass == Job_Assassin) {
		mes "[Jack]";
		mes "In spite of the chaotic mess in their town, ";
		mes "there are still some of those who pay visits here.";
		mes "Maybe the stronghold itself is a real one of a kind..";
		close;
	}
	else {
		if (countitem(7416) > 0) {
			mes "[Jack]";
			mes "A letter of recommendation?";
			mes "Oh, boy. Looks like you've brought me a very, very old relic from the past.";
			mes "Well, guess you should go in and see the master.";
			close;
		}
		else {
			mes "[]";
			mes "AݤO?";
			mes "A̦n}o̥hwaa?";
			close;
		}
	}
}

morocc,45,110,0	script	que_job01#01	45,2,2,{
OnTouch:
	if (BaseClass == Job_Assassin) {
		warp "que_job01",9,94;
		end;
	}
	else {
		mes "[ǧJ]";
		mes "! ؤOHiHi........";
		mes "......";
		mes "h";
		next;
		mes "[ǧJ]";
		mes "pDFA";
		mes "AHKa!";
		close2;
		warp "que_job01",9,94;
		end;
	}
}

que_job01,6,94,0	warp	morocc#01	2,2,morocc,45,103
que_job01,17,48,0	warp	que_job01#02	2,2,que_job01,68,92
que_job01,68,96,0	warp	que_job01#03	2,2,que_job01,17,53

que_job01,80,77,0	script	que_job01#04	45,2,2,{
OnTouch:
	if (BaseClass == Job_Assassin) {
		warp "que_job01",61,50;
		end;
	}
	else if (mao_request > 0) {
		warp "que_job01",61,50;
		end;
	}
	else {
		mes "[]";
		mes "ާAA̤OAoسåiHiJaA- jv! oåOA\?";
		next;
		if (prt_curse == 24) {
			mes "[" + strcharinfo(0) + "]";
			mes "ާA! ڤ@wno̪tdH!!!";
			next;
			mes "[]";
			mes "jv-! oåO?ݰ_ӤӮeoˤl?";
			next;
			mes "[jv]";
			mes "AHLhaAϥqL]ܤF";
			next;
			mes "[]";
			mes "ťFa?Чڳܤ@MNA@";
			next;
			switch(select("na:n")) {
			case 1:
				if (Zeny > 999) {
					mes "[]";
					mes "ܦn~ ӳoˡAjv-! еڤ@M!jf~";
					set zeny,zeny-1000;
					next;
					mes "[]";
					mes "nAiha!";
					close2;
					warp "que_job01",61,50;
					end;
				}
				else {
					mes "[]";
					mes "QЫȨWoSa?";
					mes "QihܴNڵ@Ia";
					close2;
					warp "que_job01",85,77;
					end;
				}
			case 2:
				mes "[]";
				mes "An?ڤ]n!";
				close2;
				warp "que_job01",85,77;
				end;
			}
		}
		else {
			mes "[]";
			mes "ާAA̤OAoسåiHiJaA";
			mes "- jv! oåOA\?";
			next;
			mes "[jv]";
			mes "OAOL";
			next;
			mes "[]";
			mes "OA";
			close2;
			warp "que_job01",85,77;
			end;
		}
	}
}

que_job01,65,50,0	warp	que_job01#05	2,2,que_job01,84,77

que_job01,81,79,5	script	֪ Mh#dan_08	733,{
	mes "[]";
	mes "? AMhbo̷F?";
	mes "DMhNӳo̶?";
	if (BaseClass == Job_Knight) {
		mes "MAboAFO?";
	}
	next;
	mes "[]";
	mes "ڰڡA]ؤu@֫ӼȮɨӥ𮧤@UӤwAAHఽܤ@Maܦh?";
	close;
}

que_job01,82,95,3	script	sa jv#moc_main01	46,{
	if (checkweight(908,200) == 0) {
		mes "^3355FFtq!^000000";
		close;
	}
	if (BaseClass == Job_Assassin) {
		mes "[jv]";
		mes "Please, come in.";
		mes "Care for a drink?";
	}
	else if ((BaseJob == Job_Thief) && (BaseClass != Job_Assassin)) {
		mes "[jv]";
		mes "......Huh. How did a ruffian like you get in here?";
		mes "Well, I guess Jack's not doing his job.";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "Hey,master, don't be so harsh. We know each other, don't we?";
		mes "You don't wanna hurt your old friend's feeling~";
		next;
		mes "[jv]";
		mes "Whatever you say.";
		mes "So,what do you wanna drink?";
	}
	else {
		mes "[jv]";
		mes "uOǨơA";
		mes "...";
		mes "nIF?";
	}
	next;
	switch(select("ڭnI:TݦȤ譱Ʊ:")) {
	case 1:
		mes "[jv]";
		mes "aĬԯSơB";
		mes "yơA";
		mes "AnI@өO?";
		next;
		switch(select("aĬԯS:y:SKO?")) {
		case 1:
			if (checkweight(908,200) == 0) {
				mes "[jv]";
				mes "Hey, why did you bring";
				mes "so much stuff with you?";
				mes "I can't give you anything";
				mes "to drink if you don't have";
				mes "the room to carry it around.";
				mes "Clear out your inventory!";
				close;
			}
			else {
				if (BaseClass == Job_Assassin) {
					if (Zeny < 800) {
						mes "[jv]";
						mes "You know...";
						mes "I was going to charge you";
						mes "800 zeny for this drink, but";
						mes "it looks like you can't afford";
						mes "it right now. Come back when";
						mes "you have the zeny, alright?";
					}
					else {
						mes "[jv]";
						mes "Most bartenders would";
						mes "usually charge 1,000 zeny";
						mes "for this stuff, but I'll only";
						mes "ask you for 800. Enjoy it,";
						mes "my friend, and drink it as";
						mes "deeply as you would life.";
						set zeny,zeny-800;
						getitem 12112,1; //aĬԯS
					}
					close;
				}
				else {
					if (Zeny < 1000) {
						mes "[jv]";
						mes "Hey, you don't have";
						mes "the zeny for this drink.";
						mes "Make sure you come back";
						mes "with 1,000 zeny if you want";
						mes "me to fix you something, okay?";
						close;
					}
					else {
						mes "[jv]";
						mes "boAA";
						mes "LnLqΰ";
						set zeny,zeny-1000;
						getitem 12112,1; //aĬԯS
						close;
					}
				}
			}
		case 2:
			if (checkweight(908,200) == 0) {
				mes "[jv]";
				mes "Hey, why did you bring";
				mes "so much stuff with you?";
				mes "I can't give you anything";
				mes "to drink if you don't have";
				mes "the room to carry it around.";
				mes "Clear out your inventory!";
				close;
			}
			else {
				if (BaseClass == Job_Assassin) {
					if (Zeny < 800) {
						mes "[jv]";
						mes "You know...";
						mes "I was going to charge you";
						mes "800 zeny for this drink, but";
						mes "it looks like you can't afford";
						mes "it right now. Come back when";
						mes "you have the zeny, alright?";
					}
					else {
						mes "[jv]";
						mes "Most bartenders would";
						mes "usually charge 1,000 zeny";
						mes "for this stuff, but I'll only";
						mes "ask you for 800. Enjoy it,";
						mes "my friend, and drink it as";
						mes "deeply as you would life.";
						set zeny,zeny-800;
						getitem 12113,1; //y
					}
					close;
				}
				else {
					if (Zeny < 1000) {
						mes "[jv]";
						mes "Hey, you don't have";
						mes "the zeny for this drink.";
						mes "Make sure you come back";
						mes "with 1,000 zeny if you want";
						mes "me to fix you something, okay?";
						close;
					}
					else {
						mes "[jv]";
						mes "boAA";
						mes "MDnOGġA";
						mes "LnLqΰ";
						set zeny,zeny-1000;
						getitem 12113,1; //y
						close;
					}
				}
			}
		case 3:
			mes "[jv]";
			mes ".........";
			mes "Xh";
			close;
		}
	case 2:
		if (mao_request == 1) {
			if (BaseClass == Job_Assassin) {
				mes "[jv]";
				mes "A mission...";
				mes "Don't you think you're little too late?";
				mes "All the requests were cancelled and there's nothing left for you to do.";
				mes "Besides, first things first. The restoration work for the city is the most urgent.";
				close;
			}
			else {
				mes "[jv]";
				mes "Huh?";
				next;
				select("Show him the Letter of Recommendation.");
				if (countitem(7416) > 0) {
					mes "[jv]";
					mes "Ah.. I think you're little too late.";
					mes "I've got nothing to say if this's about the request sent to each guild.";
					mes "I'm sorry you've come this far for nothing.";
					close;
				}
				else {
					mes "[jv]";
					mes "What are you talking about?";
					next;
					mes "[jv]";
					mes "................You're looking way too suspicious now.";
					mes " ";
					mes "Boys, show this guy the door!!";
					next;
					mes "[Drinking Boys]";
					mes "- Yes, Sir!";
					next;
					mes "- You've got kicked out of the place. -";
					close2;
					warp "morocc",45,106;
					end;
				}
			}
		}
		else {
			if (BaseClass == Job_Assassin) {
				mes "[jv]";
				mes "Let me take a guess. You haven't been assigned any missions from this joint, eh?";
				mes "By the way, you like this place?";
				next;
				mes "[jv]";
				mes "You know, I kinda...";
				mes "happen to really love this little pub of mine..";
				mes "where some secret businesses take place..";
				next;
				mes "[jv]";
				mes "If you want, I'll recommend";
				mes "you to the guildmaster for";
				mes "a mission. Until then, you've";
				mes "got to focus on your training.";
				mes "And until you train... Why";
				mes "don't you enjoy a drink?";
				close;
			}
			else {
				mes "[jv]";
				mes "? Ab?";
				mes "ڸALܥiA";
				mes "AIFa";
				close;
			}
		}
	case 3:
		mes "[jv]";
		mes "";
		close;
	}
}

que_job01,49,49,5	script	#dan_09	877,{
	if (BaseClass == Job_Assassin) {
		mes "[]";
		mes "wAp~";
		mes "Ʊ? p~";
		next;
		if (prt_curse == 24) {
			switch(select("²[ b?:ڬOӧڪ")) {
			case 1:
				mes "[]";
				mes "obA䪺жOAp~";
				mes "LA򪾹Dobo̩OAp~";
				close;
			case 2:
				mes "[]";
				mes "ǫSaiHOAp~";
				mes "Aݰ_ӦnJFƤ⪺DOAp~";
				close;
			}
		}
		else {
			mes "[]";
			mes "Is this all because of that dude called Raiyan Moore or More.. or.. blar?";
			mes "... Meow..";
			next;
			mes "[]";
			mes "Ugh, you've got nothing to do, then get lost, meow?!";
			mes "You know this place is prohibited, meow.";
			mes "You won'e even be able to go into that room, anyway, meow~.";
			next;
			mes "[]";
			mes "Or, else.... You could?.. Oh, who knows, meow..";
			mes " hates to watch the gate anymore, meow~ meow~";
			close;
		}
	}
	else {
		mes "[]";
		mes "ƶ! p!";
		next;
		switch(select("So, it's just you, little brat?:What has gotten into you?!:Hey, stop meowing?!")) {
		case 1:
			mes "[]";
			mes "What are you talking about, meow!";
			mes "'s the greatest gate keeper!";
			mes "Don't ever low estimate, meow!";
			next;
			mes "[]";
			mes "Looks like you came for some reasons, but don't even dream of getting my help, meow!!";
			mes "Do you think I'm stupid enough to tell you that";
			mes "the Master and ²[ are in that room on the right? Meow, meow, meow~~";
			close;
		case 2:
			mes "[]";
			mes "Are you looking down on me because I'm a gate keeper?!";
			mes "Grrrr...";
			next;
			mes "[]";
			mes "Get outta here while you have chances!!!!";
			close;
		case 3:
			mes "[]";
			mes "Meow, meow.";
			mes "It's a long story, meow.";
			mes "That day,  really wanted a Big Ribbon, meow.";
			next;
			mes "[]";
			mes "So I went out looking for Wild Roses, meow...";
			mes "...Meow? Wait a minute, why am I telling this story, meow?!";
			next;
			mes "[]";
			mes "Krrrr!";
			mes "Who the hell are you!";
			next;
			mes "[]";
			mes "Get out of here, meow!!!";
			close;
		}
	}
}

que_job01,51,55,0	script	que_job01#room_1	45,1,1,{
OnInit:
	set $maobar_room,0;
	end;

Onreset:
	set $maobar_room,0;
	end;

OnTouch:
	if (prt_curse == 24) {
		if ($maobar_room == 0) {
			set $maobar_room,1;
			donpcevent " #room1timer::OnEnable";
			donpcevent "²[#poison::OnEnable";
			mes "[]";
			mes "wgJOw]kpAA^0000FF4^000000 ɶpAnbWwɶp";
			close2;
			warp "que_job01",11,7;
			end;
		}
		else {
			mes "[]";
			mes "Sooo sorry, meow~";
			mes "Someone else is already";
			mes "inside. Just come back";
			mes "again later, meow?";
			close2;
			warp "que_job01",52,50;
			end;
		}
	}
	else if (mao_request > 0) {
		if ($maobar_room == 0) {
			set $maobar_room,1;
			donpcevent " #room1timer::OnEnable";
			donpcevent "Valdes#moc_master_1::OnEnable";
			mes "[]";
			mes "wgJOw]kpAA^0000FF4^000000 ɶpAnbWwɶp";
			close2;
			warp "que_job01",11,7;
			end;
		}
		else {
			mes "[]";
			mes "Sooo sorry, meow~";
			mes "Someone else is already";
			mes "inside. Just come back";
			mes "again later, meow?";
			close2;
			warp "que_job01",52,50;
			end;
		}
	}
	else {
		mes "[]";
		mes "Wh-who are you?";
		mes "This is a restricted";
		mes "area, meow! If you don't";
		mes "have permission, then get";
		mes "out of there right meow!";
		close2;
		warp "que_job01",52,50;
		end;
	}
}

que_job01,1,1,0	script	 #room1timer	844,{
OnEnable:
	initnpctimer;
	mapannounce "que_job01","jvϰ1ϰiJĵ٪A",bc_map,"0x70DBDB";
	end;

Onstop:
	mapannounce "que_job01","jvϰ1ϰ쨾m]ks]w",bc_map,"0x70DBDB";
	donpcevent "#room1_warp::OnDisable";
	donpcevent "Valdes#moc_master_1::OnDisable";
	donpcevent "²[#poison::OnDisable";
	donpcevent "que_job01#room_1::Onreset";
	stopnpctimer;
	end;

OnTimer240000:
	donpcevent "#room1_warp::OnEnable";
	end;

OnTimer245000:
	donpcevent "#room1_warp::OnDisable";
	donpcevent "Valdes#moc_master_1::OnDisable";
	donpcevent "²[#poison::OnDisable";
	end;

OnTimer250000:
	mapannounce "que_job01","jvϰ1ϰ쨾m]ks]w",bc_map,"0x70DBDB";
	donpcevent "que_job01#room_1::Onreset";
	stopnpctimer;
	end;
}

que_job01,12,13,0	script	#room1_warp	-1,15,15,{
OnInit:
	disablenpc "#room1_warp";
	end;

OnEnable:
	enablenpc "#room1_warp";
	end;

OnDisable:
	disablenpc "#room1_warp";
	end;

OnTouch:
	warp "que_job01",52,50;
	end;
}

que_job01,51,44,0	warp	que_job01#room_2	1,1,que_job01,80,23

que_job01,11,4,0	script	que_job01#room1_out	45,1,1,{
OnTouch:
	warp "que_job01",52,50;
	donpcevent " #room1timer::OnStop";
	end;
}

que_job01,80,27,0	warp	que_job01#room2_1_out	1,1,que_job01,52,50

que_job01,16,21,5	script	Valdes#moc_master_1	55,{
	if (BaseClass == Job_Assassin) {
		mes "[Valdes]";
		mes "What is it? I have nothing to ask you to do.";
		mes "Could you please leave me alone? I have a bad headache.";
		next;
		mes "[Valdes]";
		mes "I'll ask you for a help some other time.";
		mes "You look pretty passionate after all.";
	}
	else {
		mes "[Valdez]";
		mes "....Sorry, but could you please leave?";
		mes "I'm really stressed out right now.";
		mes "If you're here for the request that we made earlier, you can just forget about it.";
	}
	if (countitem(7417) > 0) {
		delitem 7417,countitem(7417); //Mission_ScrollA
	}
	if (countitem(7418) > 0) {
		delitem 7418,countitem(7418); //Mission_ScrollB
	}
	if (countitem(7416) > 0) {
		delitem 7416,countitem(7416); //Letter_Of_Recommend
	}
	close;

OnInit:
	disablenpc "Valdes#moc_master_1";
	end;

OnEnable:
	enablenpc "Valdes#moc_master_1";
	end;

OnDisable:
	disablenpc "Valdes#moc_master_1";
	end;
}

yuno_in04,180,106,3	script	Reading Girl#moc_girl1	73,{
	mes "[" + strcharinfo(0) + "]";
	mes "Excuse me, but may I ask";
	mes "you a question?";
	next;
	mes "[Yunia]";
	mes "Eh? Oh, I'm sorry, I was";
	mes "so busy reading this book!";
	mes "So, uh, what exactly did";
	mes "you want to ask me?";
	next;
	select("What are you reading?");
	mes "[Yunia]";
	mes "Ah! This is one of the best sellers of Joshua Vansei's.";
	mes "The main character is a writer, and it's so touching that this guy writes a story of his mistress...";
	next;
	mes "[Yunia]";
	mes "Oh.. I can't wait to see Hoein Special..";
	mes "And this, you could have a look if you want to.";
	next;
	mes "[" + strcharinfo(0) + "]";
	mes "Oh, now, I shouldn't.";
	mes "Looks like the cover's rounded with a red strap,";
	mes "which..I really think is for adults only.";
	mes "ex..cuse me~!";
	close;
}

morocc_in,46,125,5	script	uUz#moc_ex1	729,{
	mes "[ɥ֯S]";
	mes "ڬ۫H@ɤW]sb..";
	mes ".. H٬Oݭn[@I";
	next;
	mes "[ɥ֯S]";
	mes "SQbPӮɥNݨ].....";
	close;
}

que_job01,70,84,1	script	֤k#moc_ex002	882,{
	mes "[֤k]";
	mes "o@.. 쩳O@^ơA";
	mes "..";
	mes "S@ƬOQ";
	emotion e_sob;
	next;
	mes "["+ strcharinfo(0) +"]";
	mes "....ɹ...";
	mes "~N|ɰsT....";
	close;
}

// wڽö / ]ùJ
// ============================================================
moc_fild20,354,183,3	script	wڽö ĵçL#01::ĵçL	707,3,3,{
	if ((rebirth_moc_edq == 0) && (rebirth_moc_edq < 4)) {
		mes "[wڽö ĵçL]";
		mes "o̬OT@HiXaAo̫D`MIФŦbo񨫰";
		next;
		switch(select(":߰ݫ^")) {
		case 1:
			close;
		case 2:
			mes "[wڽö ĵçL]";
			mes "A٤D? ʦLbùJ]ùJ_F";
			next;
			mes "[wڽö ĵçL]";
			mes "]ùJ]_ᲾʦĬJԯSFzhFAMӨ񪺨FzNF]`";
			next;
			mes "[wڽö ĵçL]";
			mes "ثeùJ]]_vTADH_تjˮ`";
			next;
			mes "[wڽö ĵçL]";
			mes "w ꪺ^wԤꪺ@OAثeݩùJQjhTXJӳB";
			next;
			mes "[wڽö ĵçL]";
			mes "Ӹ`譱ЧA˦ۥh߰ݦbùJt";
			mes "d{wڽöa?";
			next;
			switch(select(":߰ݬwڽöm")) {
			case 1:
				close;
			case 2:
				mes "[wڽö ĵçL]";
				mes "AOݬwڽöm? wڽöثenϦbùJaW";
				next;
				mes "[wڽö ĵçL]";
				mes "A@NܧڥiHeALh...";
				next;
				switch(select("ΤF:·ЧAF")) {
				case 1:
					mes "[wڽö ĵçL]";
					mes "ζ?... WpߡAĳA}o";
					close;
				case 2:
					mes "[wڽö ĵçL]";
					mes "SDAڥߨeAùJ{";
					close2;
					warp "morocc",160,61;
					end;
				}
			}
		}
	}
	else if ((rebirth_moc_edq > 3) && (rebirth_moc_edq < 8)) {
		mes "[wڽö ĵçL]";
		mes "o̬OT@HiXaAo̫D`MIФŦbo񨫰";
		next;
		switch(select(":Fլdnh쳥:eùJ{")) {
		case 1:
			close;
		case 2:
			if ($@re_moc < 3) {
				getpartymember(getcharid(1));
				set .@partymembercount,$@partymembercount;
				copyarray .@partymembername$[0],$@partymembername$[0],.@partymembercount;
				while (.@partymembercount >= 0) {
					set .@name$,.@partymembername$[.@partymembercount];
					if (isloggedin(getcharid(3,.@name$))) {
						set .@onlinemembers,.@onlinemembers + 1;
					}
					set .@partymembercount,.@partymembercount - 1;
				}
				if ((.@onlinemembers > 1) && (countitem(7826) > 0)) {
					mes "[wڽö ĵçL]";
					mes "......";
					next;
					mes "[wڽö ĵçL]";
					mes "T{LFAAOwڽöAAQaFȧa";
					next;
					mes "[wڽö ĵçL]";
					mes "bߧYeA쳥A^ӮɥizL쳥JfBǰeIAN୫s^ǫӤF";
					close2;
					warp "moc_fild21",38,193;
					end;
				}
				else if ((.@onlinemembers < 2) && (countitem(7826) > 0)) {
					mes "[wڽö ĵçL]";
					mes "T{LFAAOwڽöAnӦۤڸSSOROAڨӰᵹAť";
					next;
					mes "[wڽö ĵçL]";
					mes "']o̬OצMIaaAҥHYT̪Wլd欰AUOȥus2HHW~'";
					next;
					mes "[wڽö ĵçL]";
					mes "Ц^{䶤̲նAӧa";
					close;
				}
				else if (countitem(7826) < 1) {
					mes "[wڽö ĵçL]";
					mes "Only members of the Continental Guards with Continental Guard Certificates are allowed to proceed beyond this point.";
					close;
				}
				else {
					close;
				}
			}
			else {
				mes "[wڽö ĵçL]";
				mes "We've received orders from Headquarters to block access to this area since an unusual space-time phenomenon has been detected from the Morroc field.";
				next;
				mes "[wڽö ĵçL]";
				mes "We need to wait until the phenomenon is over, and then we'll let you proceed with your investigation.";
				close;
			}
		case 3:
			mes "[wڽö ĵçL]";
			mes "SDAڥߨeAùJ{";
			close2;
			warp "morocc",160,61;
			end;
		}
	}
	else if (rebirth_moc_edq == 8) {
		mes "[wڽö ĵçL]";
		mes "AOݩwڽö_IaAAnڡAڦƶ?";
		next;
		switch(select("Fլdnh쳥:^ùJ{:")) {
		case 1:
			getpartymember(getcharid(1));
			set .@partymembercount,$@partymembercount;
			copyarray .@partymembername$[0],$@partymembername$[0],.@partymembercount;
			while (.@partymembercount >= 0) {
				set .@name$,.@partymembername$[.@partymembercount];
				if (isloggedin(getcharid(3,.@name$))) {
					set .@onlinemembers,.@onlinemembers + 1;
				}
				set .@partymembercount,.@partymembercount - 1;
			}
			if ((.@onlinemembers > 1) && (countitem(7826) > 0)) {
				mes "[wڽö ĵçL]";
				mes "......";
				next;
				mes "[wڽö ĵçL]";
				mes "T{LFAAOwڽöAAQaFȧa";
				next;
				mes "[wڽö ĵçL]";
				mes "bߧYeA쳥A^ӮɥizL쳥JfBǰeIAN୫s^ǫӤF";
				close2;
				warp "moc_fild22",38,193;
				end;
			}
			else if ((.@onlinemembers < 2) && (countitem(7826) > 0)) {
				mes "[wڽö ĵçL]";
				mes "T{LFAAOwڽöAnӦۤڸSSOROAڨӰᵹAť";
				next;
				mes "[wڽö ĵçL]";
				mes "']o̬OצMIaaAҥHYT̪Wլd欰AUOȥus2HHW~'";
				next;
				mes "[wڽö ĵçL]";
				mes "Ц^{䶤̲նAӧa";
				close;
			}
			else if (countitem(7826) < 1) {
				mes "[wڽö ĵçL]";
				mes "Only members of the Continental Guards with Continental Guard Certificates are allowed to proceed beyond this point.";
				close;
			}
			else {
				end;
			}
		case 2:
			mes "[wڽö ĵçL]";
			mes "SDAڥߨeAùJ{";
			close2;
			warp "morocc",160,61;
			end;
		case 3:
			close;
		}
	}
	else {
		end;
	}

//OnTouch2:
OnTouch:
	mes "[wڽö ĵçL]";
	mes "o̬OT@HiXaAo̫D`MIФŦbo񨫰";
	close;
	end;
}

moc_fild20,354,174,3	duplicate(ĵçL)	wڽö ĵçL#02	707,3,3
moc_fild20,38,174,5	duplicate(ĵçL)	wڽö ĵçL#03	707,3,3
moc_fild20,38,183,5	duplicate(ĵçL)	wڽö ĵçL#04	707,3,3
moc_fild20,189,21,7	duplicate(ĵçL)	wڽö ĵçL#05	707,3,3
moc_fild20,200,21,7	duplicate(ĵçL)	wڽö ĵçL#06	707,3,3
moc_fild20,203,336,5	duplicate(ĵçL)	wڽö ĵçL#07	707,3,3
moc_fild20,215,336,3	duplicate(ĵçL)	wڽö ĵçL#08	707,3,3

prontera,164,304,3	script	ùJwڽöǥOL#01::ǥOL	997,3,3,{
	set .@area$,strnpcinfo(2);
	if (.@area$ == "01") { set .@area$,"w"; }
	else if (.@area$ == "02") { set .@area$,"N"; }
	else if (.@area$ == "03") { set .@area$,""; }
	else if (.@area$ == "04") { set .@area$,"㺸"; }
	else if (.@area$ == "05") { set .@area$,"㺸"; }
	mes "[wڽö ǥOL]";
	if (BaseLevel > 79) {
		mes "AO"+ strcharinfo(0) +"ڡAoOƥA";
		mes "ҥHڴNIa";
		next;
		mes "[wڽö ǥOL]";
		mes "ڬOqùJwڽö`" + .@area$ + "";
		mes "ǥOLAڬOӶǸܵA"+ strcharinfo(0) +"o˦";
		mes "n檺U_Ia";
	}
	else {
		mes "ڬOqùJwڽö`" + .@area$ + "";
		mes "ǥOLAڬOӺĵic";
		mes "̼w[H";
	}
	next;
	select("ùJwڽö`O@^ư?");
	mes "[wڽö ǥOL]";
	mes "ɶhFAڴN²nVAa";
	next;
	mes "[wڽö ǥOL]";
	mes "]ùJ...";
	mes "wg_FAƥ@HӫʦLbùJaUcx`BùJ...";
	mes "NOӹùJ";
	next;
	mes "[wڽö ǥOL]";
	mes "vTA{bùPaFoV";
	next;
	mes "[wڽö ǥOL]";
	mes "²OdHʤ...";
	mes "LӵLΡA{bùJPe{@I";
	next;
	mes "[wڽö ǥOL]";
	mes "MӺﵦNOPF´]ùJwڽö... ڬOӦVc";
	mes "̼w[P϶ǹFo";
	next;
	mes "[wڽö ǥOL]";
	if (BaseLevel > 79) {
		mes "M󭫭nOpݭn"+ strcharinfo(0) +"@";
		mes "X⪺_Ia̪AFAʦLùJ...";
		next;
		mes "[wڽö ǥOL]";
		mes "ԲӤeh߰ݧڭ̬wڽöa!";
		mes "LԵ"+ strcharinfo(0) +"zO";
		next;
		mes "[wڽö ǥOL]";
		mes "Qj`O...";
		mes "ثe]bùJcʪ{ɭҤW";
	} 
	else {
		mes "M̭nOpݭno̩Ҧuq_Ia̪UAFAʦLùJ...";
		next;
		mes "[wڽö ǥOL]";
		mes "ثeùJ]]_vTAO 7HWYla";
		next;
		mes "[wڽö ǥOL]";
		mes "PF񪺨Fz]ùJMeۼvAHαjj]X{AvܦaF... AnhhO";
	}
	close;

OnTouch:
	if (BaseLevel > 79) {
		mes "[wڽö ǥOL]";
		mes "аݧAO... "+ strcharinfo(0) +"?";
		mes "TܽЧAťڻAoOD`nƱ";
		next;
		mes "[wڽö ǥOL]";
		mes "ƺAAаȥťڻ";
		close;
	}
	end;
}

geffen,128,90,3	duplicate(ǥOL)	ùJwڽöǥOL#02	997,3,3
payon,200,113,3	duplicate(ǥOL)	ùJwڽöǥOL#03	997,3,3
alberta,127,64,3	duplicate(ǥOL)	ùJwڽöǥOL#04	998,3,3
aldebaran,135,128,3	duplicate(ǥOL)	ùJwڽöǥOL#05	998,3,3

morocc,176,103,3	script	wڽö Fx	754,{
	if (rebirth_moc_edq > 3) {
		mes "[wڽö Fx]";
		mes "WAFAӦ`s...";
		next;
		mes "[wڽö Fx]";
		mes "...";
		next;
		mes "[wڽö Fx]";
		mes "ثe٨Ss... AQFȡAi";
		close;
	}
	else if (rebirth_moc_edq == 0) {
		mes "[wڽö Fx]";
		mes "ڬOtdùJQjtߩxAаݦƶ?";
		next;
		switch(select("o̬OaO?:ڨӳW:߰ݧ{p")) {
		case 1:
			mes "[wڽö Fx]";
			mes "o̬OtdMGjUair_Ia̡AF]ùJӻEWwڽöa";
			next;
			mes "[wڽö Fx]";
			mes "A]D]_c ̼w[Pojҭ{MOY";
			next;
			mes "[wڽö Fx]";
			mes "^ꤧRN]ө۶wڽöAثeppi]Uǳ";
			next;
			mes "[wڽö Fx]";
			mes "pGA]O@OάOۤvOHߪ_IaܡAЧA{bWH@ojMa";
			close;
		case 2:
			if (BaseLevel > 79) {
				mes "[wڽö Fx]";
				mes "... AO";
				mes strcharinfo(0) + "aAڥbAAڷQAwgFѧڭ̳o̪pa";
				next;
				mes "[wڽö Fx]";
				mes "ڷ|ߨnOeWhAеy@U";
				next;
				mes "[wڽö Fx]";
				mes "{bЧAh󤤥wڽöڸSܧaA§A";
				set rebirth_moc_edq,1;
				//getquest(3050),1;
				close;
			}
			else {
				mes "[wڽö Fx]";
				mes "ת֩wAN... ]aNӴNiHѨMƱ";
				next;
				mes "[wڽö Fx]";
				mes "]ùJADJL]jjA󦳩ʩRMI";
				next;
				mes "[wڽö Fx]";
				mes "{bЧAUnۤvwMʩRa";
				close;
			}
		case 3:
			mes "[wڽö Fx]";
			mes "pܤzQAA]DwDYˮ`Asao]D`MIF";
			next;
			mes "[wڽö Fx]";
			mes "MU@OᳰUa_Ia̩Mih̳EQjU... OOqHmjj]";
			next;
			mes "[wڽö Fx]";
			mes "boоi઺ťqڭ̪ܡA`NۨwHKDJ";
			close;
		}
	}
	else {
		mes "[wڽö Fx]";
		mes "AwgWFAЧڸSܧa";
		close;
	}
}

morocc,159,113,3	script	 ڸS	752,{
	if (rebirth_moc_edq == 0) {
		mes "[ ڸS]";
		mes "~HAboD`ɴӨFùJAڬOQӪ]ùJ_wڽöڸS";
		next;
		mes "[ ڸS]";
		mes "ڹbӦFLk@@VAo˪_IaAЧAho񪺨LHa";
		next;
		mes "[ ڸS]";
		mes "ڥثeDn[Jڭ̬wڽösH~";
		close;
	}
	else if (rebirth_moc_edq == 1) {
		mes "[ ڸS]";
		mes "~HAboD`ɴӨFùJAڬOQӪ]ùJ_wڽöڸS";
		next;
		mes "[ ڸS]";
		mes "Aڦƶ? ڲ{bܦЧAN²na";
		next;
		switch(select("߰wڽö:Q[Jwڽö:")) {
		case 1:
			mes "[ ڸS]";
			mes "...";
			mes "ڷQAӳo̪~Ӧo{FaAʦLbo̹ùJcaU]ùJ_F";
			next;
			mes "[ ڸS]";
			mes "vTo̹ùJXGbFA]ʦܪĬJԯSFzNev";
			next;
			mes "[ ڸS]";
			mes "ӳoˤUhȬOo̹ùJAsӦ̼w[j|Do...";
			next;
			mes "[ ڸS]";
			mes "ҥHbꪺ@n@OUAN̺UMnW_Ia̻EզQjH]I";
			next;
			mes "[ ڸS]";
			mes "MܨW... ]OҵGp...";
			mes "ڭ̥hAFo@ɪ...";
			next;
			mes "[ ڸS]";
			mes "UAboMIɶդU^annιLۤvͬa";
			close;
		case 2:
			mes "[ ڸS]";
			mes "?... ...";
			mes "A]Q[Jڭ̬wڽö?";
			next;
			if (BaseLevel > 79) {
				mes "[ ڸS]";
				mes "... AsjWO? O" + strcharinfo(0) + "?";
				mes "... ڤ]A{Ѥ@";
				next;
				mes "[ ڸS]";
				mes "LAi٤MoƱDPpiA]ùJASťL? HO]";
				next;
				mes "[ ڸS]";
				mes "nxjFAADCѦhֹA@˪泾Faߦӵwn[Jڭ̪?";
				next;
				mes "[ ڸS]";
				mes "oYۤjRBjƥAڥuݭniHӥȪuqUӤw";
				next;
				mes "[ ڸS]";
				mes "pG©媺_IaӴ@}ܡAϦӷ|os_QUAڤoبƱo͡AЧA^ha";
				next;
				switch(select(":AnD[Jwڽö")) {
				case 1:
					close;
				case 2:
					mes "[ ڸS]";
					mes "... HA{bOLk[JAA٤ճoOhMIƱ";
					next;
					mes "[ ڸS]";
					mes "AnLۤvͩR?";
					mes "]ƸAe]OҵMP";
					next;
					mes "[ ڸS]";
					mes "ڬO]D`~AwM~A̦nAOΦbiQaa";
					next;
					switch(select(":ڤ@wn[Jwڽö")) {
					case 1:
						close;
					case 2:
						mes "[ ڸS]";
						mes "... ~HٯuOTAڬݧAOYF߰\lxaAڦA@";
						next;
						mes "[ ڸS]";
						mes "H{bצMIBҤUALk泾[JAǦhhL̤ıoi?";
						next;
						mes "[ ڸS]";
						mes "A@˪_Iawg;MAҥHOAӷЧڤFAA[Ju|֧ڭ̦Ӥw";
						next;
						switch(select(":ҩڪO")) {
						case 1:
							close;
						case 2:
							mes "[ ڸS]";
							mes "? AOnҩAO?";
							mes "...";
							next;
							mes "[" + strcharinfo(0) + "]";
							mes "ҩOAݪܡANڥ[Jwڽöa";
							next;
							mes "[ ڸS]";
							mes "...";
							next;
							mes "[ ڸS]";
							mes "naAAnjfN@@AƧaAAYoƿ짴ܡAڴNӻ{AO";
							next;
							mes "[ ڸS]";
							mes "ڭ̬wڽöFקKDŧAOpɪboùJMFzĵ";
							next;
							mes "[ ڸS]";
							mes "FS窺hĻڭ̥Υ۲MӥͤAuO̪۲Mѵq";
							next;
							mes "[ ڸS]";
							mes "ťb}ީMs}޸̪]";
							mes "a|... ?";
							mes "hǤبӧa";
							next;
							switch(select("iAAҼ{@U:SDA")) {
							case 1:
								mes "[ ڸS]";
								mes "... AbAڶ?";
								mes "OڮɶAְ֧hU";
								close;
							case 2:
								mes "[ ڸS]";
								mes "ܦnAڴNإHݧaAO ^0000FF 30^000000";
								mes "OF?";
								set rebirth_moc_edq,2;
								//deletequest(3050);
								//getquest(3051),1;
								close;
							}
						}
					}
				}
			}
			else {
				mes "[ ڸS]";
				mes "What? How can you even think of joining us when you don't have any real skills to offer?";
				next;
				mes "[ ڸS]";
				mes "I guarantee that you'd just drag my soldiers down with you. You'd only be a threat to Satan Morroc in your dreams. Just give it up.";
				next;
				mes "[ ڸS]";
				mes "You won't be able to help us if you don't fully understand the risks. I've seen thousands of foolhardy adventurers throw their lives away by thinking they could defeat Satan Morroc with their own strength.";
				next;
				mes "[ ڸS]";
				mes "We are facing a threat that will determine the world's future, and fools that can't work in a team will be liabilities, not assets.";
				next;
				mes "[ ڸS]";
				mes "I'm sorry, but inexperienced adventurers would just get in our way. I hope you understand. If you really want to help us, then please focus on your training for now.";
				close;
			}
		case 3:
			close;
		}
	}
	else if (rebirth_moc_edq == 2) {
		mes "[ ڸS]";
		mes "A ^0000FF 30^000000 aӤF?";
		mes "A|UjܫoOŪŪa?";
		next;
		if (countitem(7098) > 29) {
			mes "[ ڸS]";
			mes "... @GT...";
			mes "ƶqSAoO򥻥\OAnhY";
			next;
			mes "[ ڸS]";
			mes "`§AءAAQuq";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "A@Nڥ[Jwڽö?";
			next;
			mes "[ ڸS]";
			mes "! A...";
			mes "pGƱo²N|ڵA";
			next;
			mes "[ ڸS]";
			mes "ڷQ@U... ...";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "ڤ]QӨSo²AҥHɶqէڧa";
			next;
			mes "[ ڸS]";
			mes "AOʧڵ@UA...";
			next;
			mes "[ ڸS]";
			mes "F";
			mes "AiHoӡAڪëDѦ̼w[LhLҲզAǬOq_sJħLA٦HqoowpXWq֤JhL...";
			next;
			mes "[ ڸS]";
			mes "DOL̥bFzLȡAǤHƦܳsFz]SݹLAoǤHO_೻oFzMF...";
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "(ӥLOӵѤHNH...)";
			next;
			mes "[ ڸS]";
			mes "ťb_B}޳BXS֦BŦ]ApG঳ǤhL]eF...";
			next;
			switch(select("ڵLରO:ڥhAݭnh֩O?")) {
			case 1:
				mes "[ ڸS]";
				mes "{bhX٨ӱoΡAڷپ߳QAǤҤi`ۤv";
				next;
				mes "[ ڸS]";
				mes "̦nAIwaaAHKDJ";
				close;
			case 2:
				mes "[ ڸS]";
				mes "? Au@Nh? ...";
				next;
				mes "[ ڸS]";
				mes "ڻݭnƶqֳAܤ֭n 50";
				next;
				mes "[ ڸS]";
				mes "? a ^0000FFBŦ 50^000000aAMVֶVn";
				delitem 7098,30; //Live_Coal
				set rebirth_moc_edq,3;
				//deletequest(3051);
				//getquest(3052),1;
				close;
			}
		}
		else {
			mes "[ ڸS]";
			mes "... ASťM? ݭn 30ӡA 30Ӱ";
			next;
			mes "[ ڸS]";
			mes "A֥haAMA]iHHɩ...";
			close;
		}
	}
	else if (rebirth_moc_edq == 3) {
		mes "[ ڸS]";
		mes "An? BŦ 50ӳF?";
		next;
		if (countitem(7561) > 49) {
			mes "[ ڸS]";
			mes "... WFAڷ|nnϥΧAaӪBŦ";
			next;
			mes "[ ڸS]";
			mes "oӽЧAUa";
			delitem 7561,50; //Ice_Heart
			getitem 7826,1; //Continental_Guard_Paper
			set rebirth_moc_edq,4;
			//deletequest(3052);
			//getquest(3053),1;
			next;
			mes "[" + strcharinfo(0) + "]";
			mes "oO...?";
			next;
			mes "[ ڸS]";
			mes "NOӻ{Aڭ̬wڽöҮѡAڤ]oتAA^i{";
			next;
			mes "[ ڸS]";
			mes "q{b_NPA@_ʡAAǳƦnF? n묹ۤv";
			next;
			mes "[ ڸS]";
			mes "{bAnƱeS²AЧAP[Jwڽö]ùJH_a";
			next;
			mes "[ ڸS]";
			mes "eùJXSaϪWA{bѧڭ̪϶ˮ`̤֡AûP]UEPr";
			next;
			mes "[ ڸS]";
			mes "{bUj㨭⪺ɭԤFAjanBo";
			close;
		}
		else {
			mes "[ ڸS]";
			mes "... ASťM? ݭnBŦ 50ӡABŦ 50Ӱ";
			next;
			mes "[ ڸS]";
			mes "A֥haAMA]iHHɩ?...";
			close;
		}
	}
	else if (rebirth_moc_edq == 4) {
		mes "[ ڸS]";
		mes "Ӧp...";
		mes "nOڨSJӦVAo񪺲{p";
		mes "... AQť?";
		next;
		switch(select("ڷQťť:ڤQť")) {
		case 1:
			mes "[ ڸS]";
			mes "ڭniDAOwڽöA]ùJӭnD";
			next;
			mes "[ ڸS]";
			mes "AٰOooƺAoieùJ? MڷQAe]\ӹL...";
			next;
			mes "[ ڸS]";
			mes "A]DثeùJUJfMqL~쳥Ҧڭ̬wڽöޱ";
			next;
			mes "[ ڸS]";
			mes "zѰFO]]_AثebĬJԯSFzWXS]W[FMI... ٦L]";
			next;
			mes "[ ڸS]";
			mes "]ùJjjOqް_FɪŦtAMثeuvToӤw... ߷|iΨLa";
			next;
			mes "[ ڸS]";
			mes "]ɪŦtAϲ{bùJFzܧΡAƦܦǦa̪Ů`{H";
			next;
			mes "[ ڸS]";
			mes "t~k]դOjj]̻P]ۼv~jqX{AyY¯";
			next;
			mes "[ ڸS]";
			mes "A]iH˦ۥhҹ... ڭ̩ұo쪺³oǤFAԲӪAhݬwڽöFxa";
			next;
			mes "[ ڸS]";
			mes "OѤFojӴxbڭ̡̪AЧAOHuh]AڻF";
			close;
		case 2:
			mes "[ ڸS]";
			mes "O? DF... h򶤭̱MߧȧaApGڭ̤]ܡAoj]NSӤF";
			close;
		}
	}
	else if (rebirth_moc_edq == 5) {
		mes "[ ڸS]";
		mes "? AѤF]ùJ?";
		next;
		mes "[ ڸS]";
		mes "]{bˤFO?";
		mes "ѪҾکO?";
		next;
		mes "[ ڸS]";
		mes "...No, I can't just accept and trust your verbal account. I mean, if you've completed such an important mission, you must bring me some evidence.";
		next;
		mes "[ ڸS]";
		mes "Go back, bring proof of your victory, and then come back.";
		close;
	}
	else if (rebirth_moc_edq == 6) {
		mes "[ ڸS]";
		mes "? AѤF]ùJ?";
		next;
		mes "[ ڸS]";
		mes "]{bˤFO?";
		mes "ѪҾکO?";
		next;
		if (countitem(7820) > 0) {
			mes "[ ڸS]";
			mes "o...oO...";
			next;
			mes "[ ڸS]";
			mes "...";
			mes "ӨSAڰת֩wA\ҡAojnA~MwF";
			next;
			mes "[ ڸS]";
			mes "ڬݼˤl";
			mes "]ùJODAYˮ`AJɪŪ_ظ̤F";
			next;
			mes "[ ڸS]";
			mes "OHOڭ̥ثeSO]ɪŪt@hlùJAܤ֦\F]A׭{AiHȮɳݤ@fF...";
			next;
			mes "[ ڸS]";
			mes "oH...";
			mes "iHѵڭ״I]BթMﵦ";
			next;
			mes "[ ڸS]";
			mes "A\ҧڥNwڽöM̼w[VAܤQU·NAڷ|çiU";
			next;
			delitem 7820,1; //Morroc_Skin
			getexp 2000000,0;
			set rebirth_moc_edq,7;
			//deletequest(3055);
			//getquest(3056),1;
			mes "[ ڸS]";
			mes "ڷǳƤFXy~Aڬݬ...";
			mes "@TAӬDa?";
			next;
			switch(select("1. wڽöLŲ:2. crGy:3.`")) {
			case 1:
				mes "[ ڸS]";
				mes "wڽöLŲOjHxAoOѤҿ˽窺öQ~";
				next;
				mes "[ ڸS]";
				mes "^0000FF MHP+50A˳Ʈɧt׷|W[";
				mes "3%^000000ĪG˹~";
				next;
				mes "[ ڸS]";
				mes "AnUoӬwڽöLŲ?";
				next;
				switch(select("1. U:2. 怜OF")) {
				case 1:
					mes "[ ڸS]";
					mes "DFAڷ|eAwڽöLŲ";
					next;
					getitem 2730,1; //Morroc_Seal
					set rebirth_moc_edq,8;
					//deletequest(3056);
					mes "[ ڸS]";
					mes "LڷQA]Do@|A]O٪oO...";
					next;
					mes "[ ڸS]";
					mes "ЧAnP~뱴ıMOާaAMڷ|ǳƾAy";
					next;
					mes "[ ڸS]";
					mes "WAF...";
					mes "AiHߪ^h𮧩Mɼ֤FAo̴N浹ڭ̧a...";
					close;
				case 2:
					mes "[ ڸS]";
					mes "O...";
					mes "դFAЧAD䥦FACCQa";
					close;
				}
			case 2:
				mes "[ ڸS]";
				mes "crGy۬OR]OHxAoOѤҿ˽窺öQ~";
				next;
				mes "[ ڸS]";
				mes "";
				mes "^0000FFMSP+50AĪG˹~˳ƮɬIk";
				mes "| 1%^000000ĪG˹~";
				next;
				mes "[ ڸS]";
				mes "AnUoӿcrGy۶?";
				next;
				switch(select("1. U:2. 怜OF")) {
				case 1:
					mes "[ ڸS]";
					mes "DFAڷ|eAcrGy";
					next;
					getitem 2731,1; //Morroc_Charm_Stone
					set rebirth_moc_edq,8;
					//deletequest(3056);
					mes "[ ڸS]";
					mes "LڷQA]Do@|A]O٪oO...";
					next;
					mes "[ ڸS]";
					mes "ЧAnP~뱴ıMOާaAMڷ|ǳƾAy";
					next;
					mes "[ ڸS]";
					mes "WAF...";
					mes "AiHߪ^h𮧩Mɼ֤FAo̴N浹ڭ̧a...";
					close;
				case 2:
					mes "[ ڸS]";
					mes "O...";
					mes "դFAЧAD䥦FACCQa";
					close;
				}
			case 3:
				mes "[ ڸS]";
				mes "`OPROqHxAoOѤҿ˽窺öQ~";
				next;
				mes "[ ڸS]";
				mes "^0000FF CRI + 5^000000  ĪG˹~";
				next;
				mes "[ ڸS]";
				mes "AnUoӦ`?";
				next;
				switch(select("1. U:2. 怜OF")) {
				case 1:
					mes "[ ڸS]";
					mes "DFAڷ|eA`";
					next;
					getitem 2732,1; //Morroc_Ring
					set rebirth_moc_edq,8;
					//deletequest(3056);
					mes "[ ڸS]";
					mes "LڷQA]Do@|A]O٪oO...";
					next;
					mes "[ ڸS]";
					mes "ЧAnP~뱴ıMOާaAMڷ|ǳƾAy";
					next;
					mes "[ ڸS]";
					mes "WAF...";
					mes "AiHߪ^h𮧩Mɼ֤FAo̴N浹ڭ̧a...";
					close;
				case 2:
					mes "[ ڸS]";
					mes "O...";
					mes "դFAЧAD䥦FACCQa";
					close;
				}
			}
		}
		else {
			mes "[ ڸS]";
			mes "...No, I can't just accept and trust your verbal account. I mean, if you've completed such an important mission, you must bring me some evidence.";
			next;
			mes "[ ڸS]";
			mes "Go back, bring proof of your victory, and then come back.";
			close;
		}
	}
	else if (rebirth_moc_edq == 7) {
		mes "[ ڸS]";
		mes "ڷǳƤFXy~Aڬݬ...";
		mes "@TAӬDa?";
		next;
		switch(select("1. wڽöLŲ:2. crGy:3.`")) {
		case 1:
			mes "[ ڸS]";
			mes "wڽöLŲOjHxAoOѤҿ˽窺öQ~";
			next;
			mes "[ ڸS]";
			mes "^0000FF MHP+50A˳Ʈɧt׷|W[";
			mes "3%^000000ĪG˹~";
			next;
			mes "[ ڸS]";
			mes "AnUoӬwڽöLŲ?";
			next;
			switch(select("1. U:2. 怜OF")) {
			case 1:
				mes "[ ڸS]";
				mes "DFAڷ|eAwڽöLŲ";
				next;
				getitem 2730,1; //Morroc_Seal
				set rebirth_moc_edq,8;
				//deletequest(3056);
				mes "[ ڸS]";
				mes "LڷQA]Do@|A]O٪oO...";
				next;
				mes "[ ڸS]";
				mes "ЧAnP~뱴ıMOާaAMڷ|ǳƾAy";
				next;
				mes "[ ڸS]";
				mes "WAF...";
				mes "AiHߪ^h𮧩Mɼ֤FAo̴N浹ڭ̧a...";
				close;
			case 2:
				mes "[ ڸS]";
				mes "O...";
				mes "դFAЧAD䥦FACCQa";
				close;
			}
		case 2:
			mes "[ ڸS]";
			mes "crGy۬OR]OHxAoOѤҿ˽窺öQ~";
			next;
			mes "[ ڸS]";
			mes "";
			mes "^0000FFMSP+50AĪG˹~˳ƮɬIk";
			mes "| 1%^000000ĪG˹~";
			next;
			mes "[ ڸS]";
			mes "AnUoӿcrGy۶?";
			next;
			switch(select("1. U:2. 怜OF")) {
			case 1:
				mes "[ ڸS]";
				mes "DFAڷ|eAcrGy";
				next;
				getitem 2731,1; //Morroc_Charm_Stone
				set rebirth_moc_edq,8;
				//deletequest(3056);
				mes "[ ڸS]";
				mes "LڷQA]Do@|A]O٪oO...";
				next;
				mes "[ ڸS]";
				mes "ЧAnP~뱴ıMOާaAMڷ|ǳƾAy";
				next;
				mes "[ ڸS]";
				mes "WAF...";
				mes "AiHߪ^h𮧩Mɼ֤FAo̴N浹ڭ̧a...";
				close;
			case 2:
				mes "[ ڸS]";
				mes "O...";
				mes "դFAЧAD䥦FACCQa";
				close;
			}
		case 3:
			mes "[ ڸS]";
			mes "`OPROqHxAoOѤҿ˽窺öQ~";
			next;
			mes "[ ڸS]";
			mes "^0000FF CRI + 5^000000  ĪG˹~";
			next;
			mes "[ ڸS]";
			mes "AnUoӦ`?";
			next;
			switch(select("1. U:2. 怜OF")) {
			case 1:
				mes "[ ڸS]";
				mes "DFAڷ|eA`";
				next;
				getitem 2732,1; //Morroc_Ring
				set rebirth_moc_edq,8;
				//deletequest(3056);
				mes "[ ڸS]";
				mes "LڷQA]Do@|A]O٪oO...";
				next;
				mes "[ ڸS]";
				mes "ЧAnP~뱴ıMOާaAMڷ|ǳƾAy";
				next;
				mes "[ ڸS]";
				mes "WAF...";
				mes "AiHߪ^h𮧩Mɼ֤FAo̴N浹ڭ̧a...";
				close;
			case 2:
				mes "[ ڸS]";
				mes "O...";
				mes "դFAЧAD䥦FACCQa";
				close;
			}
		}
	}
	else if (rebirth_moc_edq == 8) {
		mes "[ ڸS]";
		mes "ڻ{ǳƬjWҪshլd]ùJbɩҳy̰";
		next;
		mes "[ ڸS]";
		mes "{b_AMڳn᪺LFAkɫ]]ɷ|AX{...";
		next;
		mes "[ ڸS]";
		mes "]nh·ЧAFAЧAOojs`P_xbAڪ";
		close;
	}
	else {
		mes "[ ڸS]";
		mes "~HAboD`ɴӨFùJAڬOQӪ]ùJ_wڽöڸS";
		next;
		mes "[ ڸS]";
		mes "ڹbӦFLk@@VAo˪_IaAЧAho񪺨LHa";
		next;
		mes "[ ڸS]";
		mes "ڥثeDn[Jڭ̬wڽösH~";
		close;
	}
}

moc_fild21,38,193,0	script	Morocc Timer#edq	-1,6,6,{
OnInit:
	set $@re_moc,0;
	end;

OnTouch:
	if ($@re_moc == 0) {
		set $@re_moc,1;
		donpcevent "Satan Broadcast#edq::OnEnable";
	}
	end;
}

moc_fild21,1,1,0	script	Satan Broadcast#edq	844,{
OnInit:
	disablenpc "Satan Broadcast#edq";
	end;

OnEnable:
	enablenpc "Satan Broadcast#edq";
	initnpctimer;
	end;

OnTimer5000:
	mapannounce "moc_fild21","]ùJ : sγpA̡AiuOiŰ...",bc_map,"0xFFFF00";
	end;

OnTimer15000:
	mapannounce "moc_fild21","]ùJ : {bQᮬ]ӤΤFAƦܳsᮬɶ]|...",bc_map,"0xFFFF00";
	end;

OnTimer25000:
	mapannounce "moc_fild21","]ùJ : A@Ua... iå̡AA@UU...",bc_map,"0xFFFF00";
	stopnpctimer;
	end;

OnDisable:
	disablenpc "Satan Broadcast#edq";
	end;
}

moc_fild21,178,239,0	script	·t{#edq	844,1,1,{
	if (((rebirth_moc_edq == 4) || (rebirth_moc_edq == 7)) && ($@re_moc == 1)) {
		set $@re_moc,2;
		mes "۵Lkήej·tɪŪ_سBAQP~ӤۥDVhFXB";
		next;
		mes "bR~P·tPɪ_ؤWAPıjPˮ";
		next;
		mes "[" + strcharinfo(0) + "]";
		mes "... ";
		close2;
		donpcevent "Satan Summon#edq::OnEnable";
		end;
	}
	else {
		mes "۵Lkήej·tɪŪ_سBAQP~ӤۥDhFXB";
		next;
		mes "bR~P·tPɪ_ؤWAPıjPˮ";
		close;
	}

OnInit:
	enablenpc "·t{#edq";
	end;

OnEnable:
	enablenpc "·t{#edq";
	end;

OnDisable:
	disablenpc "·t{#edq";
	donpcevent "ɪŪ_#edq::OnEnable";
	end;
}

moc_fild21,177,239,0	script	ɪŪ_#edq	844,1,1,{
	if ((rebirth_moc_edq == 4) && ($@re_moc == 3)) {
		mes "b]ɪŪ_سBA쥻ťߪ·t𮧤]hF";
		next;
		mes "bCC_R_ؤBA쥻oX~H]hF";
		next;
		mes "߰_Fh~H";
		getitem 7820,1; //Morroc_Skin
		set rebirth_moc_edq,6;
		//deletequest(3053);
		//getquest(3055),1;
		close;
	}
	else {
		mes "wCa...";
		mes "D`äS_·tc}la}";
		next;
		mes "PıYAaӷ|MI";
		close;
	}

OnInit:
	disablenpc "ɪŪ_#edq";
	end;

OnEnable:
	initnpctimer;
	enablenpc "ɪŪ_#edq";
	end;

OnDisable:
	stopnpctimer;
	disablenpc "ɪŪ_#edq";
	donpcevent "·t{#edq::OnEnable";
	set $@re_moc,0;
	end;

OnTimer1800000:
	set $@re_moc,4;
	end;

OnTimer21600000:
	stopnpctimer;
	set $@re_moc,0;
	donpcevent "ɪŪ_#edq::OnDisable";
	end;
}

moc_fild21,3,1,0	script	Satan Summon#edq	844,{
OnInit:
	disablenpc "Satan Summon#edq";
	end;

OnEnable:
	enablenpc "Satan Summon#edq";
	initnpctimer;
	monster "moc_fild21",177,217,"]ùJ",1916,1,"Satan Summon#edq::OnMyMobDead";
	end;

OnDisable:
	stopnpctimer;
	killmonster "moc_fild21","Satan Summon#edq::OnMyMobDead";
	set $@re_moc,0;
	disablenpc "Satan Summon#edq";
	end;

OnMyMobDead:
	set $@re_moc,3;
	mapannounce "moc_fild21","ڼȮAAݳݤ@UaAA̬O䤣첾ɪŵ_",bc_map,"0xFFFF00";
	donpcevent "ɪŪ_#edq::OnEnable";
	donpcevent "Satan Broadcast#edq::OnDisable";
	donpcevent "·t{#edq::OnDisable";
	disablenpc "Satan Summon#edq";
	end;

OnTimer5400000:
	mapannounce "moc_fild21","nIA̳oǤYplٮ֤H",bc_map,"0xFFFF00";
	end;

OnTimer5415000:
	mapannounce "moc_fild21","ګܦAڥiSɶObĄW!!",bc_map,"0xFFFF00";
	stopnpctimer;
	killmonster "moc_fild21","Satan Summon#edq::OnMyMobDead";
	set $@re_moc,0;
	donpcevent "Satan Summon#edq::OnDiable";
	end;
}