//===========================================
// [ڤ] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// - ҩ  - дJA
//===========================================

alde_alche,24,188,3	script	 Ա	740,{
	if (checkweight(1201,1) == 0) {
		mes "- ȵ! -";
		mes "- Я̫Ʒ -";
		mes "- ȰѶĶ -";
		mes "- ķڿֿ֮ -";
		mes "- ٻ! -";
		close;
	}
	mes "[ ɴ]";
	mes "ӭʦ֯";
	mes "Ҫʲô?";
	next;
	switch (select("ҩƷ:˵:ȡ")) {
	case 1:
		mes "[ ɴ]";
		mes "ҪʲôƷ";
		next;
		if(select("ҩ - 8z:ֹͣ")==2)
			break;
		mes "[ ɴ]";
		mes "Ҫ?";
		mes "Ҫֹͣд '0' ";
		while(1) {
			next;
			input .@num;
			if(.@num <= 0) {
				mes "[ ɴ]";
				mes "ǣ´˵";
				close;
			}
			if(.@num > 2000) {
				mes "[ ɴ]";
				mes "ѡ2000";
				continue;
			}
			break;
		}
		if(Zeny < .@num*8) {
			mes "[ ɴ]";
			mes "";
			mes "ȷһЯĽ";
			close;
		}
		if(checkweight(7134,.@num)==0) {
			mes "Ӷܴ߰";
			mes "ȷһЯƷ";
			close;
		}
		set Zeny,Zeny-.@num*8;
		getitem 7134,.@num;
		break;
	case 2:
		mes "[ ɴ]";
		mes "ҪЩƷ?";
		mes "һ˵100,000ң";
		mes "Ƚļ˵";
		next;
		switch (select("һҩˮ˵:ƾ˵:ƿ˵:˵",
				"ֲƿ˵:̴ƿ˵:ҩ˵:ϸҩˮ˵:ȡ")) {
			default:
				set .@price,100000;
				break;
			case 8:
				set .@price,240000;
				break;
			case 9:
				mes "[ ɴ]";
				mes "ǣ´˵";
				close;
		}
		if(Zeny < .@price) {
			mes "[ ɴ]";
			mes "";
			mes "ȷһЯĽ";
			close;
		}
		set Zeny,Zeny-.@price;
		setarray .@itemid,7144,7127,7128,7129,7130,7131,7132,7133;
		getitem .@itemid[@menu-1],1;
		mes "[ ɴ]";
		mes "лĹ";
		mes "Ըʵõҩ";
		close;
	case 3:
		break;
	}
	mes "[ ɴ]";
	mes "ǣ´˵";
	close;
}

alde_alche,31,186,2	script	Ա#Mechanic	883,{
	if (checkweight(1201,1) == 0) {
		mes "һ!";
		mes "ǰ̫ණ!";
		close;
	}
	mes "[Ա]";
	mes ", ۻѧʹ";
	mes "^0000FF^000000.";
	next;
	mes "[Ա]";
	mes "ѧ߱ӵ, ";
	mes ".";
	next;
	mes "[Ա]";
	mes "ӵеԽ, ʹ";
	mes "ļ൱ȻԽ.";
	next;
	mes "[Ա]";
	mes "۵, ";
	mes "^FF0000Ʒ^000000.";
	mes "½.";
	next;
	mes "[Ա]";
	mes "뿴?";
	next;
	if(select("ǵ:") == 2) {
		mes "[Ա]";
		mes "ӭ´ι. ټ.";
		close;
	}
	mes "[Ա]";
	mes "õ, Ұ嵥㿴.";
	while(1) {
		next;
		switch(select("ƻը:ը:Ҭը:ը:㽶ը:ֲ෨:߼ҩˮֲ::о:ҩˮ취:.")) {
		case 1:
			callsub S_SellManual,6279,100000; // ƻը
			break;
		case 2:
			callsub S_SellManual,6280,100000; // ը
			break;
		case 3:
			callsub S_SellManual,6281,100000; // Ҭը
			break;
		case 4:
			callsub S_SellManual,6282,100000; // ը
			break;
		case 5:
			callsub S_SellManual,6283,100000; // 㽶ը
			break;
		case 6:
			callsub S_SellManual,6284,100000; // ֲ෨
			break;
		case 7:
			callsub S_SellManual,6285,100000; // ߼ҩˮֲ
			break;
		case 8:
			callsub S_SellManual,11022,100000; // 
			break;
		case 9:
			callsub S_SellManual,11023,100000; // о
			break;
		case 10:
			callsub S_SellManual,11024,100000; // ҩˮ취
			break;
		case 11:
			mes "[Ա]";
			mes "ӭ´ι. лл, ټ.";
			close;
		}
		close;

S_SellManual:
		mes "[Ա]";
		mes "^0000FF["+getitemname(getarg(0))+"]^000000ļ۸"+getarg(1)+"z.";
		mes "򼸱.";
		next;
		input .@input,0,2001;
		if (.@input < 1 || .@input > 2000) {
			mes "[Ա]";
			mes "뿴?";
			continue;
		}
		set .@price,.@input*getarg(1);
		mes "[Ա]";
		mes ""+.@input+"^0000FF["+getitemname(getarg(0))+"]^000000.";
		mes "Ƿ?";
		next;
		if(select("ǵ:") == 2) {
			mes "[Ա]";
			mes "ʱ, ӦҪһЩ.";
			close;
		}
		if (Zeny < .@price) {
			mes "[Ա]";
			mes "˼, Ǯ񲻹.";
			close;
		}
		set zeny,zeny-.@price;
		getitem getarg(0),.@input;
		mes "[Ա]";
		mes "лл֧.";
		mes "ӭ´.";
		close;
	}
}
