//==============================================
// ҩ˵NPC
// д by FPE(2006.6.28)
// Jathena++ ̳http://www.foxofice.net/bbs
//----------------------------------------------

alde_alche.gat,24,188,5	script	 Ա	740,{
	mes "[  ɴ]";
	mes "ӭʦ֯";
	mes "Ҫʲô";
	next;
	switch(select("ҩƷ","˵","ȡ"))
	{
	case 1:
		mes "[  ɴ]";
		mes "ҪʲôƷ";
		next;
		if(select("ҩ - 8z","ֹͣ")==1)
		{
			mes "[  ɴ]";
			mes "Ҫ?";
			mes "Ҫֹͣд '0'";
			next;
			input @num;
			if(@num<=0)
			{
				mes "[  ɴ]";
				mes "ȡ";
				mes "ǣ´˵ɡ";
				close;
				end;
			}
			if(@num>500)
			{
				mes "[  ɴ]";
				mes "ѡ500";
				close;
				end;
			}
			if(zeny<@num*8) break;
			if(checkweight(7134,@num)<1)
			{
				mes "[  ɴ]";
				mes "ŶѾˣһɡ";
				close;
				end;
			}
			getitem 7134,@num;
			set zeny,zeny-@num*8;
			mes "[  ɴ]";
			mes "ллʹ";
			close;
			end;
		}
		mes "[  ɴ]";
		mes "ǣ´˵ɡ";
		close;
		end;
		break;
	case 2:
		mes "[  ɴ]";
		mes "ҪЩƷ";
		mes "һ˵100,000ңȽļ˵⡣";
		next;
		switch(select("һҩˮ˵","ƾ˵","ƿ˵","ƿ˵","ֲƿ˵","̴ƿ˵","ҩ˵","ϸҩˮ˵"))
		{
		case 1:
			if(zeny<100000) break;
			mes "[  ɴ]";
			mes "һҩˮ˵";
			mes "100,000ҡ";
			next;
			if(select("Ҫ","ȡ")==1)
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set zeny,zeny-100000;
				getitem 7144,1;
			}
			close;
			end;
			break;
		case 2:
			if(zeny<100000) break;
			mes "[  ɴ]";
			mes "ƾ˵";
			mes "100,000ҡ";
			next;
			if(select("Ҫ","ȡ")==1)
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set zeny,zeny-100000;
				getitem 7127,1;
			}
			close;
			end;
			break;
		case 3:
			if(zeny<100000) break;
			mes "[  ɴ]";
			mes "ƿ˵";
			mes "100,000ҡ";
			next;
			if(select("Ҫ","ȡ"))
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set zeny,zeny-100000;
				getitem 7128,1;
			}
			close;
			end;
			break;
		case 4:
			if(zeny<100000) break;
			mes "[  ɴ]";
			mes "ƿ˵";
			mes "100,000ҡ";
			next;
			if(select("Ҫ","ȡ")==1)
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set zeny,zeny-100000;
				getitem 7129,1;
			}
			close;
			end;
			break;
		case 5:
			if(zeny<100000) break;
			mes "[  ɴ]";
			mes "ֲƿ˵";
			mes "100,000ҡ";
			next;
			if(select("Ҫ","ȡ"))
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set Zeny,Zeny-100000;
				getitem 7130,1;
			}
			close;
			end;
			break;
		case 6:
			if(zeny<100000) break;
			mes "[  ɴ]";
			mes "̴ƿ˵";
			mes "100,000ҡ";
			next;
			if(select("Ҫ","ȡ")==1)
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set zeny,zeny-100000;
				getitem 7131,1;
			}
			close;
			end;
			break;
		case 7:
			if(zeny<100000) break;
			mes "[  ɴ]";
			mes "ҩ˵";
			mes "100,000ҡ";
			next;
			if(select("Ҫ","ȡ")==1)
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set zeny,zeny-100000;
				getitem 7132,1;
			}
			close;
			end;
			break;
		case 8:
			if(zeny<240000) break;
			mes "[  ɴ]";
			mes "ϸҩˮ˵";
			mes "240,000ҡ";
			next;
			if(select("Ҫ","ȡ")==1)
			{
				mes "[  ɴ]";
				mes "ллĹ";
				set zeny,zeny-240000;
				getitem 7133,1;
			}
			close;
			end;
			break;
		}
	case 3:
		mes "[  ɴ]";
		mes "ǣ´˵ɡ";
		close;
		end;
		break;
	}

	mes "[  ɴ]";
	mes "";
	mes "ȷһЯĽ";
	close;
	end;
}