// ---------------------------------
// - ħʦ תְű - 
//===================================
// 汾1.7a
//===================================

geffen_in,164,124,4	script	ħԱ#gef1	123,{
	if (Upper == 1) {
		if (ADVJOB == Job_High_Wizard || ADVJOB == Job_Professor) {
			if (Class == Job_Novice_High) {
				mes "[ħԱ]";
				mes "ۣþû";
				mes "һΪѾ";
				next;
				mes "[ħԱ]";
				mes "Ӧǻ˰ɣ";
				mes "ףһƽ";
				next;
				if (getskilllv(1) < 9) {
					mes "[ħԱ]";
					mes "....׼?";
					mes "....ʲôû׼ð''ȼ";
					mes "''ȼ";
					close;
				}
				skill 143,0,0;
				jobchange Job_Mage_High;
				skill 157,1,0;
				mes "[ħԱ]";
				mes "ϲתְɹ!";
				mes "ⱲҲΪħĸŬܶ!";
				close;
			}
			else {
				mes "[ħԱ]";
				mes ".....";
				close;
			}
		}
		else {
			mes "[ħԱ]";
			mes "ħȤ? Ҳ취";
			mes "Ͼ㲻";
			mes "Ӧõȥĵط";
			close;
		}
	}
	mes "[ħԱ]";
	mes "ãʲô?";
	next;
	switch(select("תְΪħʦ:ѯйתְΪħʦҪ:ȡ")) {
	case 1:
		mes "[ħԱ]";
		if (BaseJob == Job_Mage) {
			mes "...㲻Ѿħʦ?";
			mes "ѵ㲻֪?";
			mes "ѲҪֱܿʱ֪Լħʦ?";
			mes "ʵ˵ǲ?";
			close;
		}
		if (BaseJob != Job_Novice) {
			mes "Ӵ...ѾתְΪħʦ";
			mes "㲻Ѿְҵ?";
			close;
		}
		if (job_magician_q == 0) {
			mes "Ϊħʦ?";
			if (sex)
				mes "ôɰС˧";
			else {
				mes "ôɰ";
			}
			mes "ܳΪħһԱһܻӭ~";
			next;
			mes "[ħԱ]";
			mes "˵˵תְΪħʦ?";
			mes "ô鷳ħʦתְǩ";
			next;
			if (select("תְΪħʦ:ȡ") == 1) {
				mes "[ħԱ]";
				mes "ԣǩ....";
				mes "ޣдÿ";
				mes "ţˣ";
				mes "ֽ...." +strcharinfo(0)+ "";
				next;
				mes "[ħԱ]";
				mes "תְĿ....";
				mes "ħʦתְҪ";
				switch(rand(3)) {
				case 1:
					mes "^3355FFҺ^000000";
					set job_magician_q,1;
					break;
				case 2:
					mes "^3355FFҺ^000000";
					set job_magician_q,2;
					break;
				case 3:
					mes "^3355FFҺ^000000";
					set job_magician_q,3;
					break;
				default:
					mes "^3355FFҺ^000000";
					set job_magician_q,4;
				}
				next;
				getitem 1092,1; //Թ
				mes "[ħԱ]";
				mes "Һвϣ";
				mes "鼮϶дԼȥң";
				mes "ұ";
				next;
				mes "[ħԱ]";
				mes "㿴õмǸ?";
				mes "ҪƻҺĻǸ";
				mes "ôͰ~";
				close;
			}
			mes "[ħԱ]";
			mes "ʲô!㲻˵뵱ħʦ?";
			mes "!";
			close;
		}
		mes "....׼?";
		if (getskilllv(1) < 9) {
			mes "....ʲôû׼ð";
			mes "ѧߵļܵȼ";
			mes "˳ѧ߼ܵȼ";
			close;
		}
		mes strcharinfo(0)+ "תְĿ....";
		mes "ħʦתְҪ";
		if (job_magician_q == 1)
			mes "Һ";
		else if (job_magician_q == 2)
			mes "Һ";
		else if (job_magician_q == 3)
			mes "Һ";
		else
			mes "Һ";
		next;
		mes "[ħԱ]";
		mes "ôҼһ";
		mes "ĻҺ";
		next;
		mes "[ħԱ]";
		if (countitem(1071) == 0 && countitem(1085) == 0 && countitem(1086) == 0 && countitem(1087) == 0 && countitem(1090) == 0) {
			mes "֮ǰĻҺҺԹ....?";
			mes "޷ǷܳΪħʦ";
			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 "....ǲǸ";
				mes "ⲻתְҪ";
				mes "Һ";
				mes "....";
				next;
				mes "[ħԱ]";
				mes "תְĿ....";
				mes "ħʦתְҪ";
				if (job_magician_q == 1)
					mes "Һ";
				else if (job_magician_q == 2)
					mes "Һ";
				else if (job_magician_q == 3)
					mes "Һ";
				else
					mes "Һ";

				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 "....ţѾ";
		mes "ȻĲǺ";
		mes "̶Ӧÿ";
		mes "........";
		next;
		mes "[ħԱ]";
		mes "ܺ!Ѿͨħʦתְԣ";
		mes "ҾԸתְΪħʦ!";
		mes "Ϊǵֵ~";
		mes "ħʦ!";
		mes "ϲΪħһԱ!";
		next;
		callfunc "Job_Change",Job_Mage;
		callfunc "F_ClearJobVar";
		set Zeny,Zeny+50;
		mes "[ħԱ]";
		mes "ӭħ!";
		mes "ӴֻǴк";
		mes "Ҳġ";
		mes "ô˵仰ء";
		next;
		mes "[ħԱ]";
		mes "֮ϲΪħһԱ!";
		mes "Ժָ~";
		close;
	case 2:
		mes "[ħԱ]";
		mes "Ϊħʦ?";
		mes "ܳΪħһԱ";
		mes "һܻӭ~";
		next;
		mes "[ħԱ]";
		mes "ȣѧߵļҪﵽ";
		mes "ΣҪħʦתְҪĻҺ";
		next;
		mes "[ħԱ]";
		mes "ҪʲôĻҺ";
		mes "Ҫдħʦתְ";
		mes "Ҳܸ";
		next;
		mes "[ħԱ]";
		mes "ΪԼѾתְ";
		mes "ѯ";
		close;
	case 3:
		mes "[ħԱ]";
		mes "Ӧû˰ɣ?";
		close;
	}
}

geffen_in,164,112,4	script	Ʒ ͻ	111,{
	mes "[Ʒ ͻ]";
	mes "ħʦתְרƷͻ";
	mes "ǼħЭ";
	mes "Ƽ";
	next;
	if (select("ʹƷͻ:ȡ") == 1) {
		mes "[Ʒ ͻ]";
		mes "ѡҪ͵ˮҺ";
		next;
		switch(select("ˮҺ:޿ˮҺ:ʹˮҺ")) {
		case 1:
			if (countitem(1089) == 0) {
				mes "[Ʒ ͻ]";
				mes "ûиƷ";
				close;
			}
			set .@mixitem2,1;
			break;
		case 2:
			if (countitem(1088) == 0) {
				mes "[Ʒ ͻ]";
				mes "ûиˮҺ";
				close;
			}
			set .@mixitem2,2;
			break;
		case 3:
			set .@mixitem2,0;
			break;
		}
		while (1) {
			if (.@progress == 2) {
				mes "[Ʒ ͻ]";
				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 "ˮҺ: ";
				if (.@mixitem2 == 1) mes "ˮҺ: ˮҺ.";
				if (.@mixitem2 == 2) mes "ˮҺ: ޿ˮҺ";
				next;
				mes "[Ʒ ͻ]";
				mes "ҪƷ?";
				mes "Ҫ趨Ʒ?";
				next;
				switch(select("Ʒ:趨Ʒ:趨")) {
				case 1:
					mes "[Ʒ ͻ]";
					mes "㽫趨õƷͰ";
					mes "һƷŽȥ󣬾ͲټӼ";
					next;
					mes "[Ʒ ͻ]";
					mes "ϸȷϣ";
					mes "ȷɺ밴'Ϳʼ'ť";
					mes "Ҫֹͣ밴''ť";
					next;
					if (select("Ϳʼ:") == 1) {
						mes "[Ʒ ͻ]";
						mes "趨õƷͻ";
						mes "Ժ";
						next;
						mes "[Ʒ ͻ]";
						if (countitem(909) < .@mixitem1_1) {
							mes "'ձȽᾧ'ȷ";
							close;
						}
						else if (countitem(914) < .@mixitem1_2) {
							mes "'ë'ȷ";
							close;
						}
						else if (countitem(519) < .@mixitem1_3) {
							mes "'ţ'ȷ";
							close;
						}
						else if (.@mixitem2 == 1 || .@mixitem2 == 2) {
							if (countitem(1089) == 0 && countitem(1088) == 0) {
								mes "޷ҵˮҺȷ";
								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 "趨õƷ";
						mes "رյ";
						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 "[Ʒ ͻ]";
					mes "Reset Complete.";
					mes "Initiate again?";
					next;
					if (select("Yes.:No.") == 1)
						break;
					mes "[Ʒ ͻ]";
					mes "ллʹ";
					close;
				}
				if (.@progress == 3) break;
			}
			else if (.@progress == 1) {
				mes "[Ʒ ͻ]";
				mes "Ҳ";
				next;
			}
			mes "[Ʒ ͻ]";
			mes "ѡҪ͵Ʒ";
			while(1) {
				switch(select("ձȽᾧ:ë:ţ:鿴趨Ʒϸ")) {
				case 1:
					while(1) {
						input .@input;
						if (.@input > 10000) {
							next;
							mes "[Ʒ ͻ]";
							mes "Ʒ볬Χ";
							mes "10000µķǸֵ";
							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 "[Ʒ ͻ]";
							mes "Ʒ볬Χ";
							mes "10000µķǸֵ";
							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 "[Ʒ ͻ]";
							mes "Ʒ볬Χ";
							mes "10000µķǸֵ";
							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 "[Ʒ ͻ]";
		mes "뽫͵ħĩд";
		next;
		while(1) {
			input .@input;
			if (.@input < 1000 || .@input > 9999) {
				mes "[Ʒ ͻ]";
				if (.@input == 0) {
					mes "ȷʹħĩ?";
					next;
					if (select("ǵ:") == 1) {
						break;
					}
				}
				else {
					mes "뷶Χ";
					mes "";
					next;
				}
			}
			else {
				mes "[Ʒ ͻ]";
				mes " #" + .@input + " ħĩ";
				mes "?";
				next;
				if (select("ǵ:") == 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 "[Ʒ ͻ]";
		mes "ѡ߻ʯ";
		next;
		switch(select("ɫħʯ:ɫħʯ:ɫħʯ:͸ıʯ:")) {
		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 "[Ʒ ͻ]";
		mes "Ѿ׼ˣڿԿʼ";
		mes "Ժ";
		next;
		mes "[Ʒ ͻ]";
		mes "- ÿһ -";
		switch(rand(1,5)) {
		case 1:
			mes "ε˱ѡ";
			mes "˼˵̫űˣ˵Լ";
			break;
		case 2:
			mes "ԩ·խ";
			mes "˼˵˽ԹĻ޿ɱĻǵøǸ棬ΪԼ";
			break;
		case 3:
			mes "Զײڡ";
			mes "˼˵鷢ʱԶѰﲻæǽͷβ˿ԸһЩ";
			break;
		case 4:
			mes "˼˵˵ѻĻܻôҶĵز";
			break;
		default:
			mes "˼˵ҪԱ˺ã˲ŻҲ";
		}
		next;
		if (.@mixitem1_1 == 2 && .@mixitem1_2 == 3 && .@mixitem1_3 == 1 && .@mixitem2 == 1 && .@mixitem3 == 1 && .@magic_powder == 1) {
			mes "[Ʒ ͻ]";
			mes "ħʦתְҪĻҺ1";
			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 "[Ʒ ͻ]";
			mes "ħʦתְҪĻҺ2";
			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 "[Ʒ ͻ]";
			mes "ħʦתְҪĻҺ3";
			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 "[Ʒ ͻ]";
			mes "ħʦתְҪĻҺ4";
			getitem 1087,1; //Mage_Test_4
			next;
		}
		else {
			mes "[Ʒ ͻ]";
			mes "ҺĹзĳЩ";
			getitem 1090,1; //Mage_Test_Etc
			next;
		}
		mes "[Ʒ ͻ]";
		mes "";
		mes "ͻҵֹ";
		mes "лʹ";
		close;
	}
	close;
}

pay_arche,122,100,0	script	ħԱ#pay1	88,{
	mes "[ħԱ]";
	mes "ҪˮҺ?";
	mes "ôҪ50 Һ٣Թ";
	next;
	if (select("ˮҺ:") == 1) {
		mes "[ħԱ]";
		if (Zeny < 50) {
			mes "ܿϧĽǮ";
			close;
		}
		if (countitem(1092) == 0) {
			mes "ֵĻƷҪôЯ?";
			mes "һԹװ";
			close;
		}
		delitem 1092,1; //Թ
		set zeny,zeny-50;
		getitem 1089,1; //Payon_Potion
	}
	close;
}

moc_ruins,91,150,0	script	ħԱ#moc1	93,{
	mes "[ħԱ]";
	mes "ҪˮҺ?";
	mes "ôҪ50 Һ٣Թ";
	next;
	if (select("ˮҺ:") == 1) {
		mes "[ħԱ]";
		if (zENY < 50) {
			mes "ܿϧĽǮ";
			close;
		}
		if (countitem(1092) == 0) {
			mes "ֵĻƷҪôЯ?";
			mes "һԹװ";
			close;
		}
		delitem 1092,1; //Թ
		set zeny,zeny-50;
		getitem 1088,1; //Morocc_Potion
	}
	CLOSE;
}

geffen_in.gat,177,112,0	script	#geffen	111,{
	mes "[Ʒ鼮]";
	mes "ǼħЭ";
	mes "Ƽ";
	next;
	switch (select("Һ1","Һ2","Һ3","Һ4","ֹͣ")) {
	case 1:
		mes "[ħʦתְҪĻҺ1]";
		mes "* ϸ *";
		mes " - ձȽᾧ 2 ";
		mes " - ë 3 ";
		mes " - ţ 1 ";
		next;
		mes "[ħʦתְҪĻҺ1]";
		mes "* ܼ *";
		mes "ˮҺ";
		mes "ڵأ﹭ִׯСȪ";
		next;
		mes "[ħʦתְҪĻҺ1]";
		mes "* ħĩ *";
		mes " - 8472";
		next;
		mes "[ħʦתְҪĻҺ1]";
		mes "* ߻ *";
		mes " - ɫħʯ";
		mes "(ڲƷͻ)";
		close;
	case 2:
		mes "[ħʦתְҪĻҺ2]";
		mes "* ϸ *";
		mes " - ձȽᾧ 3 ";
		mes " - ë 1 ";
		mes " - ţ 1 ";
		next;
		mes "[ħʦתְҪĻҺ2]";
		mes "* ܼ *";
		mes " - Ҫ";
		next;
		mes "[ħʦתְҪĻҺ2]";
		mes "* ħĩ *";
		mes " - 3735";
		next;
		mes "[ħʦתְҪĻҺ2]";
		mes "* ߻ *";
		mes " - ɫħʯ";
		mes "(ڲƷͻ)";
		close;
	case 3:
		mes "[ħʦתְҪĻҺ3]";
		mes "* ϸ *";
		mes " - ձȽᾧ 6 ";
		mes " - ë 1 ";
		next;
		mes "[ħʦתְҪĻҺ3]";
		mes "* ܼ *";
		mes "ˮҺ";
		mes "ڵأ﹭ִׯСȪ";
		next;
		mes "[ħʦתְҪĻҺ3]";
		mes "* ħĩ *";
		mes " - 2750";
		next;
		mes "[ħʦתְҪĻҺ3]";
		mes "* ߻ *";
		mes " - ɫħʯ";
		mes "(ڲƷͻ)";
		close;
	case 4:
		mes "[ħʦתְҪĻҺ4]";
		mes "* ϸ *";
		mes " - ձȽᾧ 2 ";
		mes " - ë 3 ";
		next;
		mes "[ħʦתְҪĻҺ4]";
		mes "* ܼ *";
		mes "޿ˮҺ";
		mes "ڵأ޿˽ڸСȪ";
		next;
		mes "[ħʦתְҪĻҺ4]";
		mes "* ħĩ *";
		mes " - 5429";
		next;
		mes "[ħʦתְҪĻҺ4]";
		mes "* ߻ *";
		mes " - ͸ıʯ";
		mes "(ڲƷͻ)";
		close;
	case 5:
		close;
	}
}