//===========================================
// [ڤ] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// - ħʯ - дJA
//===========================================
payon,173,238,5	script		754,{
	mes "[]";
	mes "~";
	mes "ͬɫʵħʯҵĻ";
	mes "һϰɲͬɫʵħʯ!";
	next;
	switch (select("ɫħʯΪɫħʯ!","ɫħʯΪɫħʯ!","ɫħʯΪɫħʯ!")) {
		case 1:
			set .@itemid,717;
			set .@gain,716;
			break;
		case 2:
			set .@itemid,716;
			set .@gain,715;
			break;
		case 3:
			set .@itemid,715;
			set .@gain,717;
			break;
	}
	if(countitem(.@itemid)<2) {
		mes "[]";
		mes "!";
		mes "λڿЦ!";
		mes getitemname(.@itemid)+ "û2Ļ";
		mes getitemname(.@gain)+ "ûа취!";
		close;
	}
	set .@max,countitem(.@itemid)/2;
	mes "[]";
	mes "...";
	mes "Щ" +.@max+ "";
	mes "" +getitemname(.@gain)+ "";
	mes "Ҫ?";
	next;
	switch (select("ҪеĶ","Ҫָ","ȡ")) {
	case 1:
		set .@num,.@max;
		break;
	case 2:
		mes "[]";
		mes "Ҫ?";
		mes "100Ϊ";
		while(1) {
			next;
			input .@num;
			if(.@num > 100) {
				mes "[]";
				mes "?";
				mes "ֻ100!?";
				continue;
			}
			break;
		}
		if(.@num > .@max)
			close;
		if(.@num <= 0) {
			mes "[]";
			mes "Ц";
			close;
		}
		break;
	case 3:
		mes "[]";
		mes "...";
		mes "ҪĻ";
		mes "ÿʱ";
		close;
	}
	delitem .@itemid,.@num*2;
	getitem .@gain,.@num;
	mes "[]";
	mes "Ҫ";
	mes getitemname(.@gain)+ "";
	mes "ҪĻʱҰ!";
	mes "...? ʲô?";
	close;
}
