//==================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// ---------------------------------
// - ]kv ¾} - 
//===================================
// G1.7a
//===================================

geffen_in,164,124,4	script	]ku|AȤH#gef1	123,{
	if (Upper == 1) {
		if (ADVJOB == Job_High_Wizard || ADVJOB == Job_Professor) {
			if (Class == Job_Novice_High) {
				mes "[]ku|AȤH]";
				mes "zAn[SݨAF";
				mes "٥HAwgFO";
				next;
				mes "[]ku|AȤH]";
				mes "AӬOoͤFaA";
				mes "ޫˡAA@w";
				next;
				if (getskilllv(1) < 9) {
					mes "[]ku|AȤH]";
					mes "....ǳƦnF?";
					mes "....٨SǳƦnڡA'򥻧ޯ'٤";
					mes "F'򥻧ޯ'ūAӧa";
					close;
				}
				skill 143,0,0;
				jobchange Job_Mage_High;
				skill 157,1,0;
				mes "[]ku|AȤH]";
				mes "߱z¾\!";
				mes "ol]ЬF]ku|_VOİa!";
				close;
			}
			else {
				mes "[]ku|AȤH]";
				mes ".....";
				close;
			}
		}
		else {
			mes "[]ku|AȤH]";
			mes "A]k? NO]k";
			mes "Aݩo̡A";
			mes "AӨAӥha";
			close;
		}
	}
	mes "[]ku|AȤH]";
	mes "AnAƱ?";
	next;
	switch(select("¾]kv:߰ݦ¾]kvһݭn:")) {
	case 1:
		mes "[]ku|AȤH]";
		if (BaseJob == Job_Mage) {
			mes "...AwgO]kvF?";
			mes "DAD?";
			mes "nŤܥXKɡAA~DۤvO]kv?";
			mes "h~ODڡAAOO?";
			close;
		}
		if (BaseJob != Job_Novice) {
			mes "...Awg¾]kvF";
			mes "AOwgL¾~F?";
			close;
		}
		if (job_magician_q == 0) {
			mes "AQ]kv?";
			if (sex)
				mes "AoiRpӭ";
			else {
				mes "AoiRf";
			}
			mes "pGন]ku|@A@w|ܨw諸~";
			next;
			mes "[]ku|AȤH]";
			mes "kAAQ¾]kv?";
			mes "A·ЧAb]kv¾ӽЮѤWñӦW";
			next;
			if (select("ӽ¾]kv:") == 1) {
				mes "[]ku|AȤH]";
				mes "AbñW....";
				mes "AgounݡX";
				mes "AnFAnF";
				mes "Wrs...." +strcharinfo(0)+ "a";
				next;
				mes "[]ku|AȤH]";
				mes "A¾ҸնجO....";
				mes "X]kv¾ҸխnD";
				switch(rand(3)) {
				case 1:
					mes "^3355FFVXG^000000";
					set job_magician_q,1;
					break;
				case 2:
					mes "^3355FFVXG^000000";
					set job_magician_q,2;
					break;
				case 3:
					mes "^3355FFVXG^000000";
					set job_magician_q,3;
					break;
				default:
					mes "^3355FFVXG^000000";
					set job_magician_q,4;
				}
				next;
				getitem 1092,1; //Ÿպ
				mes "[]ku|AȤH]";
				mes "VXGһݪҦơA";
				mes "u|̪yWgAЧAۤvhA";
				mes "ѩbAk䤤d";
				next;
				mes "[]ku|AȤH]";
				mes "Aݱo줤Ӿa?";
				mes "nջsVXGܡAЧQΨӾ";
				mes "A[oa~";
				close;
			}
			mes "[]ku|AȤH]";
			mes "!AOLQ]kv?";
			mes "II!";
			close;
		}
		mes "....ǳƦnF?";
		if (getskilllv(1) < 9) {
			mes "....٨SǳƦnڡA";
			mes "Ǫ̪ޯ൥٤";
			mes "FǪ̧ޯ൥ūAӧa";
			close;
		}
		mes strcharinfo(0)+ "¾ҸնجO....";
		mes "X]kv¾ҸխnD";
		if (job_magician_q == 1)
			mes "VXG";
		else if (job_magician_q == 2)
			mes "VXG";
		else if (job_magician_q == 3)
			mes "VXG";
		else
			mes "VXG";
		next;
		mes "[]ku|AȤH]";
		mes "ˬd@U";
		mes "As@VXGa";
		next;
		mes "[]ku|AȤH]";
		if (countitem(1071) == 0 && countitem(1085) == 0 && countitem(1086) == 0 && countitem(1087) == 0 && countitem(1090) == 0) {
			mes "eVXGGպަb̩O....?";
			mes "o˵LkAO_ন]kv";
			close;
		}
		else {
			if ((job_magician_q == 1 && countitem(1071) == 0) || (job_magician_q == 2 && countitem(1085) == 0) || (job_magician_q == 3 && countitem(1086) == 0) || (job_magician_q == 4 && countitem(1087) == 0)) {
				mes "....OOdF";
				mes "oOA¾ҸթҭnD";
				mes "VXG";
				mes "ЧAss@F....";
				next;
				mes "[]ku|AȤH]";
				mes "A¾ҸնجO....";
				mes "X]kv¾ҸխnD";
				if (job_magician_q == 1)
					mes "VXG";
				else if (job_magician_q == 2)
					mes "VXG";
				else if (job_magician_q == 3)
					mes "VXG";
				else
					mes "VXG";

				if (countitem(1071) != 0) delitem 1071,1; //Mage_Test_1
				else if (countitem(1085) != 0) delitem 1085,1; //Mage_Test_2
				else if (countitem(1086) != 0) delitem 1086,1; //Mage_Test_3
				else if (countitem(1087) != 0) delitem 1087,1; //Mage_Test_4
				else delitem 1090,1; //Mage_Test_Etc
				close;
			}
		}
		if (countitem(1071) != 0) delitem 1071,1; //Mage_Test_1
		else if (countitem(1085) != 0) delitem 1085,1; //Mage_Test_2
		else if (countitem(1086) != 0) delitem 1086,1; //Mage_Test_3
		else if (countitem(1087) != 0) delitem 1087,1; //Mage_Test_4
		else delitem 1090,1; //Mage_Test_Etc
		mes "....A۫HAwgɤOF";
		mes "MOܧA";
		mes "Ooӵ{ӥiHF";
		mes "........";
		next;
		mes "[]ku|AȤH]";
		mes "ܦn!AwgqL]kv¾ҸաA";
		mes "ڴŅAN@NA¾]kva!";
		mes "AFڭ̪S̩nf~";
		mes "ANO]kv!";
		mes "ߧAڭ]ku|@!";
		next;
		callfunc "Job_Change",Job_Mage;
		callfunc "F_ClearJobVar";
		set Zeny,Zeny+50;
		mes "[]ku|AȤH]";
		mes "wAӨ]ku|!";
		mes "uAuOө۩IA";
		mes "A]yX";
		mes "򤣻yܩOX";
		next;
		mes "[]ku|AȤH]";
		mes "`AߧAڭ]ku|@!";
		mes "HٽЦhh~";
		close;
	case 2:
		mes "[]ku|AȤH]";
		mes "AQ]kv?";
		mes "pGAন]ku|@A";
		mes "@w|ܨw諸~";
		next;
		mes "[]ku|AȤH]";
		mes "AǪ̪ޯnF좸HW";
		mes "䦸AnX]kv¾nDVXG";
		next;
		mes "[]ku|AȤH]";
		mes "An˪VXGA";
		mes "nAg]kv¾ӽЮѫA";
		mes "ڤ~iDA";
		next;
		mes "[]ku|AȤH]";
		mes "A{ۤvwgŦXoⶵ¾A";
		mes "AӦVڸ߰ݨLƶa";
		close;
	case 3:
		mes "[]ku|AȤH]";
		mes "ӨSƤFaA?";
		close;
	}
}

geffen_in,164,112,4	script	~ թM	111,{
	mes "[~ թM]";
	mes "]kv¾ҸձMΪ~թM";
	mes "ON]k|Ҧ";
	mes "е[Q";
	next;
	if (select("ϥΪ~թM:") == 1) {
		mes "[~ թM]";
		mes "пܭnթMG";
		next;
		switch(select("G:ùJG:ϥΤG")) {
		case 1:
			if (countitem(1089) == 0) {
				mes "[~ թM]";
				mes "~AzWSӪ~";
				close;
			}
			set .@mixitem2,1;
			break;
		case 2:
			if (countitem(1088) == 0) {
				mes "[~ թM]";
				mes "~AzWSӤG";
				close;
			}
			set .@mixitem2,2;
			break;
		case 3:
			set .@mixitem2,0;
			break;
		}
		while (1) {
			if (.@progress == 2) {
				mes "[~ թM]";
				if (.@mixitem1_1 != 0) mes "ǰǤ񵲴: " + .@mixitem1_1 + "";
				if (.@mixitem1_2 != 0) mes ": " + .@mixitem1_2 + "";
				if (.@mixitem1_3 != 0) mes ": " + .@mixitem1_3 + "";
				if (.@mixitem2 == 0) mes "G: L";
				if (.@mixitem2 == 1) mes "G: G.";
				if (.@mixitem2 == 2) mes "G: ùJG";
				next;
				mes "[~ թM]";
				mes "{bnթM~?";
				mes "٬On~]w~O?";
				next;
				switch(select("թM~:~]w~:s]w")) {
				case 1:
					mes "[~ թM]";
					mes "ЧAN]wn~JթM";
					mes "@N~ihANA[ƶq";
					next;
					mes "[~ թM]";
					mes "ЦAJӽT{A";
					mes "T{Ы'թM}l'sA";
					mes "pGnЫ''s";
					next;
					if (select("թM}l:") == 1) {
						mes "[~ թM]";
						mes "N]wn~JթM";
						mes "еy";
						next;
						mes "[~ թM]";
						if (countitem(909) < .@mixitem1_1) {
							mes "'ǰǤ񵲴'ƶq~AЭsT{";
							close;
						}
						else if (countitem(914) < .@mixitem1_2) {
							mes "''ƶq~AЭsT{";
							close;
						}
						else if (countitem(519) < .@mixitem1_3) {
							mes "''ƶq~AЭsT{";
							close;
						}
						else if (.@mixitem2 == 1 || .@mixitem2 == 2) {
							if (countitem(1089) == 0 && countitem(1088) == 0) {
								mes "LkGAЭsT{";
								close;
							}
						}
						if (.@mixitem1_1 != 0) delitem 909,.@mixitem1_1; //Jellopy
						if (.@mixitem1_2 != 0) delitem 914,.@mixitem1_2; //Fluff
						if (.@mixitem1_3 != 0) delitem 519,.@mixitem1_3; //Milk
						if (.@mixitem2 == 1) delitem 1089,1; //Payon_Potion
						if (.@mixitem2 == 2) delitem 1088,1; //Morocc_Potion
						mes "N]wn~JթMcl";
						mes "թMcl";
						set .@progress,3;
						next;
					}
					break;
				case 2:
					set .@continue,0;
					next;
					break;
				case 3:
					set .@mixitem1_1,0;
					set .@mixitem1_2,0;
					set .@mixitem1_3,0;
					set .@progress,0;
					set .@continue,0;
					mes "[~ թM]";
					mes "Reset Complete.";
					mes "Initiate again?";
					next;
					if (select("Yes.:No.") == 1)
						break;
					mes "[~ թM]";
					mes "§Aϥ";
					close;
				}
				if (.@progress == 3) break;
			}
			else if (.@progress == 1) {
				mes "[~ թM]";
				mes "䤣F";
				next;
			}
			mes "[~ թM]";
			mes "пܭnթM~G";
			while(1) {
				switch(select("ǰǤ񵲴:::dݩҳ]w~")) {
				case 1:
					while(1) {
						input .@input;
						if (.@input > 10000) {
							next;
							mes "[~ թM]";
							mes "~ƶqJWXd";
							mes "г]m10000ӥHUDt";
							next;
						}
						else {
							if (countitem(909) > 0) set .@mixitem1_1,.@mixitem1_1 + .@input;
							set .@progress,2;
							break;
						}
					}
					break;
				case 2:
					while(1) {
						input .@input;
						if (.@input > 10000) {
							next;
							mes "[~ թM]";
							mes "~ƶqJWXd";
							mes "г]m10000ӥHUDt";
							next;
						}
						else {
							if (countitem(914) > 0) set .@mixitem1_2,.@mixitem1_2 + .@input;
							set .@progress,2;
							break;
						}
					}
					break;
				case 3:
					while(1) {
						input .@input;
						if (.@input > 10000) {
							next;
							mes "[~ թM]";
							mes "~ƶqJWXd";
							mes "г]m10000ӥHUDt";
							next;
						}
						else {
						if (countitem(519) > 0) set .@mixitem1_3,.@mixitem1_3 + .@input;
							set .@progress,2;
							break;
						}
					}
					break;

				case 4:
					if (.@progress != 2)
						set .@progress,1;
					set .@continue,1;
					next;
				}
				if (.@continue) break;
			}
		}
		mes "[~ թM]";
		mes "бNթM]kXgU";
		next;
		while(1) {
			input .@input;
			if (.@input < 1000 || .@input > 9999) {
				mes "[~ թM]";
				if (.@input == 0) {
					mes "Twϥ]k?";
					next;
					if (select("O:") == 1) {
						break;
					}
				}
				else {
					mes "WXJd";
					mes "ЭsJ";
					next;
				}
			}
			else {
				mes "[~ թM]";
				mes "X #" + .@input + " ]k";
				mes "?";
				next;
				if (select("O:O") == 1) {
					if (.@input == 8472)
						set .@magic_powder,1;
					else if (.@input == 3735)
						set .@magic_powder,2;
					else if (.@input == 2750)
						set .@magic_powder,3;
					else if (.@input == 5429)
						set .@magic_powder,4;
					else
						set .@magic_powder,5;
				}
				break;
			}
		}
		mes "[~ թM]";
		mes "̫Aпܶʤƥ";
		next;
		switch(select("]O_:]O_:Ŧ]O_:z_:L")) {
		case 1: set .@mixitem3,1; break;
		case 2: set .@mixitem3,2; break;
		case 3: set .@mixitem3,3; break;
		case 4: set .@mixitem3,4; break;
		case 5: break;
		}
		mes "[~ թM]";
		mes "wgǳƦnFA{biH}lթMF";
		mes "еy";
		next;
		mes "[~ թM]";
		mes "- C@y -";
		switch(rand(1,5)) {
		case 1:
			mes "uQ̫HHIqv";
			mes "NNOӹLeHOHA˪|Oۤv";
			break;
		case 2:
			mes "uޮav";
			mes "NNOPH誺ܵLiקK٬Oo򨺭ӤHIA̫eۤvۨӾ";
			break;
		case 3:
			mes "uˤpFv";
			mes "NNOƱoͪɭԦbBˤHBWAAˬOYѧHiHA@U";
			break;
		case 4:
			mes "NO`ܪܡA̫i|oja۫HAaB";
			break;
		default:
			mes "NNOAnDʹOHnAOH~|]An";
		}
		next;
		if (.@mixitem1_1 == 2 && .@mixitem1_2 == 3 && .@mixitem1_3 == 1 && .@mixitem2 == 1 && .@mixitem3 == 1 && .@magic_powder == 1) {
			mes "[~ թM]";
			mes "]kv¾ҸխnDVXG1";
			getitem 1071,1; //Mage_Test_1
			next;
		}
		else if (.@mixitem1_1 == 3 && .@mixitem1_2 == 1 && .@mixitem1_3 == 1 && .@mixitem2 == 0 && .@mixitem3 == 2 && .@magic_powder == 2) {
			mes "[~ թM]";
			mes "]kv¾ҸխnDVXG2";
			getitem 1085,1; //Mage_Test_2
			next;
		}
		else if (.@mixitem1_1 == 6 && .@mixitem1_2 == 1 && .@mixitem1_3 == 0 && .@mixitem2 == 1 && .@mixitem3 == 3 && .@magic_powder == 3) {
			mes "[~ թM]";
			mes "]kv¾ҸխnDVXG3";
			getitem 1086,1; //Mage_Test_3
			next;
		}
		else if (.@mixitem1_1 == 2 && .@mixitem1_2 == 3 && .@mixitem1_3 == 0 && .@mixitem2 == 2 && .@mixitem3 == 4 && .@magic_powder == 4) {
			mes "[~ թM]";
			mes "]kv¾ҸխnDVXG4";
			getitem 1087,1; //Mage_Test_4
			next;
		}
		else {
			mes "[~ թM]";
			mes "s@VXGL{oͤFYǰD";
			getitem 1090,1; //Mage_Test_Etc
			next;
		}
		mes "[~ թM]";
		mes "թMF";
		mes "թM@~פ";
		mes "P§Aϥ";
	}
	close;
}

pay_arche,122,100,0	script	]ku|AȤH#pay1	88,{
	mes "[]ku|AȤH]";
	mes "nʶRG?";
	mes "ݭn50 Mܤ֢ӪŸպ";
	next;
	if (select("ʶRG:") == 1) {
		mes "[]ku|AȤH]";
		if (Zeny < 50) {
			mes "ܥiAz";
			close;
		}
		if (countitem(1092) == 0) {
			mes "ŵۤ⪺ܪ~naO?";
			mes "a@ӪŸպ޸˨ӧa";
			close;
		}
		delitem 1092,1; //Ÿպ
		set zeny,zeny-50;
		getitem 1089,1; //Payon_Potion
	}
	close;
}

moc_ruins,91,150,0	script	]ku|AȤH#moc1	93,{
	mes "[]ku|AȤH]";
	mes "nʶRG?";
	mes "ݭn50 Mܤ֢ӪŸպ";
	next;
	if (select("ʶRG:") == 1) {
		mes "[]ku|AȤH]";
		if (Zeny < 50) {
			mes "ܥiAz";
			close;
		}
		if (countitem(1092) == 0) {
			mes "ŵۤ⪺ܪ~naO?";
			mes "a@ӪŸպ޸˨ӧa";
			close;
		}
		delitem 1092,1; //Ÿպ
		set zeny,zeny-50;
		getitem 1088,1; //Morocc_Potion
	}
	close;
}

geffen_in,177,112,0	script	Ѭ[#geffen	111,{
	mes "[~թMy]";
	mes "ѬON]k|ҦA";
	mes "е[Q";
	next;
	switch (select("VXG1:VXG2:VXG3:VXG4:")) {
	case 1:
		mes "[]kv¾ҸխnDVXG1]";
		mes "* Ʃ *";
		mes " - ǰǤ񵲴 2 ";
		mes " -  3 ";
		mes " -  1 ";
		next;
		mes "[]kv¾ҸխnDVXG1]";
		mes "*  *";
		mes "G";
		mes "ҦbaG}bpu";
		next;
		mes "[]kv¾ҸխnDVXG1]";
		mes "* ]k *";
		mes " - 8472";
		next;
		mes "[]kv¾ҸխnDVXG1]";
		mes "* ʤƪ *";
		mes " - ]Oq";
		mes "(æb~թM)";
		close;
	case 2:
		mes "[]kv¾ҸխnDVXG2]";
		mes "* Ʃ *";
		mes " - ǰǤ񵲴 3 ";
		mes " -  1 ";
		mes " -  1 ";
		next;
		mes "[]kv¾ҸխnDVXG2]";
		mes "*  *";
		mes " - ݭn";
		next;
		mes "[]kv¾ҸխnDVXG2]";
		mes "* ]k *";
		mes " - 3735";
		next;
		mes "[]kv¾ҸխnDVXG2]";
		mes "* ʤƪ *";
		mes " - ]Oq";
		mes "(æb~թM)";
		close;
	case 3:
		mes "[]kv¾ҸխnDVXG3]";
		mes "* Ʃ *";
		mes " - ǰǤ񵲴 6 ";
		mes " -  1 ";
		next;
		mes "[]kv¾ҸխnDVXG3]";
		mes "*  *";
		mes "G";
		mes "ҦbaG}bpu";
		next;
		mes "[]kv¾ҸխnDVXG3]";
		mes "* ]k *";
		mes " - 2750";
		next;
		mes "[]kv¾ҸխnDVXG3]";
		mes "* ʤƪ *";
		mes " - Ŧ]Oq";
		mes "(æb~թM)";
		close;
	case 4:
		mes "[]kv¾ҸխnDVXG4]";
		mes "* Ʃ *";
		mes " - ǰǤ񵲴 2 ";
		mes " -  3 ";
		next;
		mes "[]kv¾ҸխnDVXG4]";
		mes "*  *";
		mes "ùJG";
		mes "ҦbaGùJrJf񪺤pu";
		next;
		mes "[]kv¾ҸխnDVXG4]";
		mes "* ]k *";
		mes " - 5429";
		next;
		mes "[]kv¾ҸխnDVXG4]";
		mes "* ʤƪ *";
		mes " - z_";
		mes "(æb~թM)";
	case 5:
	}
	close;
}