//==================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// ---------------------------------
// - A ¾} - 
//===================================
// G1.9
//===================================

prt_church,184,41,4	script	t #aco	60,{
	if (Upper == 1) {
		if (ADVJOB == Job_High_Priest || ADVJOB == Job_Champion) {
			if (Class == Job_Novice_High) {
				mes "[Ǧ贵 ]";
				mes "gF\h";
				mes "AD{ڤ]ťD";
				next;
				if (getskilllv(1) < 9) {
					mes "[Ǧ贵 ]";
					mes "MڪDAQ·¾AơA";
					mes "O]ӭsǲߤ@U򥻧ޯ";
					next;
					mes "[Ǧ贵 ]";
					mes "UAa";
					close;
				}
				mes "[Ǧ贵 ]";
				mes "nɱ`h۷Pªߨͩ^Rڭ̪A";
				mes "ᤣޭ{xPimA";
				mes "]nH@۪HӨͩ^ڭ̪";
				next;
				skill 143,0,0;
				jobchange Job_Acolyte_High;
				skill 156,1,0;
				mes "[Ǧ贵 ]";
				mes "̫AߧA̫AJAxPimAo@sꪺצ";
				close;
			}
			else {
				mes "[Ǧ贵 ]";
				mes "]Ч@HqӤ_VOa";
				mes "zӱNR!";
				close;
			}
		}
		else {
			mes "[Ǧ贵 ]";
			mes "׹LF@qԪAsϥͤF";
			mes "AӬݨBťBgܦhFFa";
			next;
			mes "[Ǧ贵 ]";
			mes "LAƳoAMAg礣ӲŦX";
			mes "ЧA^СAݩA";
			close;
		}
	}
	mes "[Ǧ贵 ]";
	mes "аݦƱ?";
	next;
	switch(select("¾A:߰ݦ¾Aƪ:")) {
	case 1:
		mes "[Ǧ贵 ]";
		if (BaseJob == Job_Acolyte) {
			mes "}a?";
			mes "ANwgOAƤF?";
			close;
		}
		else if (BaseJob != Job_Novice) {
			mes "AnwgL¾~Fa?";
			mes "nAƥߵL";
			mes "MߪHڭ̪";
			close;
		}
		if (job_acolyte_q == 0) {
			mes "AOu߷QHq?";
			next;
			if (select("O:٬OF") == 1) {
				mes "[Ǧ贵 ]";
				mes "ܦn" +strcharinfo(0)+ " ...";
				mes "ڱA¾ӽЮ";
				mes "AӪDnHqA";
				mes "ngL@sY檺׽ma";
				next;
				mes "[Ǧ贵 ]";
				mes "ܦn...AȬO...";
				next;
				mes "[Ǧ贵 ]";
				switch(rand(3)) {
				default:
					set job_acolyte_q,2;
					mes "ЧAh^000077wԪF_誺а^000000A";
					mes "M䥿bצ椤^000077|dk^000000";
					break;
				case 1:
					set job_acolyte_q,3;
		          		mes "ЧAh^000077wԦn誺ùJ^000000A";
					mes "M䥿bצ椤^000077fH^000000פk";
					break;
				case 2:
					set job_acolyte_q,4;
					mes "ЧAh^000077wԦ_誺[^000000A";
					mes "䥿bצ椤^000077വJ^000000";
					break;
				}
				next;
				mes "[Ǧ贵 ]";
				mes "ݵ۬FAƦӰ@߭צ檺H";
				mes "ЧAhiDLAN@a!";
				close;
			}
			mes "[Ǧ贵 ]";
			mes "OoˤlڡApGALߨͩ^ڭ̪";
			mes "A]OLk'A'";
			close;
		}
		mes "oִN^ӤF?";
		mes "ѰOAȤF...?";
		next;
		mes "[Ǧ贵 ]";
		if (getskilllv(1) < 9) {
			mes "?!{b٨SǺ'򥻧ޯ'!";
			mes "Ǧn'򥻧ޯ'~¾!";
			close;
		}
		if (job_acolyte_q < 5) {
			mes "צ槹WW٨SAWr...";
			next;
			switch(job_acolyte_q) {
			case 2:
				mes "[Ǧ贵 ]";
				mes "ЧAh^000077wԪF_誺а^000000A";
				mes "M䥿bצ椤^000077|dk^000000";
				break;
			case 3:
				mes "[Ǧ贵 ]";
	          		mes "ЧAh^000077wԦn誺ùJ^000000A";
				mes "M䥿bצ椤^000077fH^000000פk";
				break;
			case 4:
				mes "[Ǧ贵 ]";
				mes "ЧAh^000077wԦ_誺[^000000A";
				mes "䥿bצ椤^000077വJ^000000";
				break;
			}
			next;
			mes "[Ǧ贵 ]";
			mes "ݵ۬FAƦӰ@߭צ檺H";
			mes "ЧAhiDLAN@a!";
			close;
		}
		mes "ܰSAF";
		mes "{bצ槹WWwg[JAWrF";
		mes "ڤwgӻ{FAצAPNA¾AƤF";
		next;
		skill 143,0,0;
		callfunc "Job_Change",Job_Acolyte;
		callfunc "F_ClearJobVar";
		mes "[Ǧ贵 ]";
		mes "nɱ`h۷Pªߨͩ^Rڭ̪A";
		mes "ᤣޭ{xPimA";
		mes "]nH@۪HӨͩ^ڭ̪";
		next;
		mes "[Ǧ贵 ]";
		mes "̫AߧA̫AJAxPimAo@sꪺצ";
		close;
	case 2:
		mes "[Ǧ贵 ]";
		mes "AQn¾Aƶ?";
		mes "AAnqLHUo׽m~";
		mes "л{uJAx";
		next;
		mes "[Ǧ贵 ]";
		mes "Ĥ@AǪ̪򥻧ޯ൥ŭnF";
		mes "oOnbo@ɤWͦsUh̰򥻭צAЧAnn׽m";
		next;
		mes "[Ǧ贵 ]";
		mes "ĤGAnJAҦA^o";
		mes "unbA¾ӽЮѤWAgWAҿܪצaNiHF";
		next;
		mes "[Ǧ贵 ]";
		mes "Aoⶵ׽mЦA^oӦaӡA";
		mes "ANAƳoӯt¾~F";
		close;
	case 3:
		close;
	}
}

prt_fild03,365,255,2	script	צ椤#aco	89,{
	mes "[ |dk]";
	if (BaseJob == Job_Novice) {
		if (job_acolyte_q == 6) {
			mes "A֭nFɭԡA";
			mes "ڴNwgtpnF";
			mes "A^hWnpI";
			next;
			mes "[ |dk]";
			mes "oHFO_wgtF...";
			close;
		}
		if (job_acolyte_q != 0) {
			if (job_acolyte_q == 2) {
				mes "AANOQAƪH?";
				mes "ڤwgt䦳AF";
				mes "zWrO... " +strcharinfo(0)+ "...";
				mes "!NOA";
				next;
				mes "[ |dk]";
				mes "AӤwgqǦ贵FѦAƪƱFa!";
				mes "ҥHڴNAhF";
				mes "...";
				next;
				mes "[ |dk]";
				mes "pGQn׽mܡAЧA@wnOoG|bA";
				mes "]]OIq訥...";
				next;
				mes "[ |dk]";
				mes "ޫˡAڷ|HXAӹLoT{ѡAAiHаXoF";
				next;
				mes "[ |dk]";
				mes "@Wp";
				close2;
				savepoint "prt_fild03",361,255;
				set job_acolyte_q,6;
				end;
			}
			else {
				mes "?";
				mes "ANOQAƪH?";
				mes "ڤwgt䦳AF";
				mes "AWrO... " +strcharinfo(0)+ "...";
				mes "iOWWèSAWr...";
				next;
				mes "[ |dk]";
				mes "....ЧA^thT{@Un...?";
				close;
			}
		}
		else {
			mes "?A|o˪a?";
			mes "ڤDAOAƭצ٬OȦ̡A";
			mes "AӻoaӦMIFA";
			mes "٬OI^ha";
			close;
		}
	}
	else if (BaseJob == Job_Acolyte) callfunc "F_FatherRub";
	else {
		if (BaseJob == Job_Priest) {
			mes "S^o̤FO?";
			mes "֦^h~Aצ";
			close;
		}
		else {
			mes "ur?@ӤHoئaצ?٬OȦ?";
			mes "nHo̪ǪˤlݨӨnI";
			close;
		}
	}
}

moc_fild07,41,355,4	script	צ椤פk#2aco	95,{
	mes "[פk fH]";
	if (BaseJob == Job_Novice) {
		if (job_acolyte_q == 7) {
			mes "ڷ|HFNT{ѱHXhA";
			mes "A֭nFt󪺮ɭԡA";
			mes "tdӤwgqF";
			mes "AWAƪA|Aë";
			close;
		}
		if (job_acolyte_q != 0) {
			if (job_acolyte_q == 3) {
				mes "ڡAAOAƭצ̰";
				mes "ܰA७wFo";
				next;
				set CHANGE_AL,5;
				savepoint "moc_fild07",36,355;
				mes "[פk fH]";
				mes "WrOO?ڬݬ...";
				mes "ڡAbo!";
				mes strcharinfo(0)+ "AWWAWr";
				mes "JMwӨoAڷ|AHXT{Ѫ";
				mes "ЧA^thtdT{@Ua";
				close2;
				savepoint "moc_fild07",35,355;
				set job_acolyte_q,7;
				end;
			}
			else {
				mes "AOAƭצ̰";
				mes "ܰA७wFo";
				mes "WrOO?ڬݬ...";
				mes "?Sݨ즳AWr...";
				next;
				mes "[פk fH]";
				mes "A̦n^th򯫤AT{@Un";
				close;
			}
		}
		else {
			mes "...";
			close;
		}
	}
	else if (BaseJob == Job_Acolyte) callfunc "F_MotherMart";
	else {
		mes "@OA...";
		close;
	}
}

prt_fild00,208,218,6	script	צ椤#3aco	98,{
	mes "[ വJ]";
	if (BaseJob == Job_Novice) {
		if (job_acolyte_q == 8) {
			mes "ASӤF?AΦAӧڤF";
			mes "Aӭn^з|h!";
			close;
		}
		if (job_acolyte_q != 0) {
			if (job_acolyte_q == 4) {
				mes "AOAƭצ̶?";
				next;
				mes "[ വJ]";
				mes "ܰA७wFo";
				mes "WrO " +strcharinfo(0)+ " a?";
				next;
				mes "[ വJ]";
				mes "WrO " +strcharinfo(0)+ "";
				mes "ڷ|NAwgӹLo̪T{ѱHX";
				mes "Ц^th򯫤T{@Ua";
				close2;
				savepoint "prt_fild00",206,230;
				set job_acolyte_q,8;
				end;
			}
			else {
				mes "AnaF";
				mes "...ЧAA^th򯫤T{@Ua";
				close;
			}
		}
		else {
			mes "OǪ̰ڡA";
			mes "ܷQnڻ?";
			close;
		}
	}
	else if (BaseJob == Job_Acolyte) callfunc "F_FatherYos";
	else {
		mes "....";
		close;
	}
}

