prontera,150,183,0	script	refinetest	123,{

	mes "[Refine Test]";
	mes "What would you like to do?";
	next;
	switch(select("Upgrade Gear:Downgrade Gear:Cancel")){
	case 1:
		mes "[Refine Test]";
		mes "Insert now the option and value of how much you'd like to upgrade the item:";
		next;
		input .@value;
		if(.@value < 1 || .@value > 20){
			mes "[Refine Test]";
			mes "Invalid Value!";
			next;
			mes "[Refine Test";
			mes "Value can only by between 1 to 20.";
			close;
		}
		next;
		input .@option;
		if(.@option < 1 || .@option > 10){
			mes "[Refine Test]";
			mes "Invalid Option!";
			next;
			mes "[Refine Test";
			mes "Option can only by between 1 to 10.";
			close;
		}
		successrefitem .@option,.@value;
		mes "[Refine Test]";
		mes "There you go you evil Motherfucker!";
		close;
	case 2:
		mes "[Refine Test";
		mes "Insert now the option and value of how much you'd like to upgrade the item:";
		next;
		input .@value;
		if(.@value < 1 || .@value > 20){
			mes "[Refine Test]";
			mes "Invalid Value!";
			next;
			mes "[Refine Test";
			mes "Value can only by between 1 to 20.";
			close;
		}
		next;
		input .@option;
		if(.@option < 1 || .@option > 10){
			mes "[Refine Test]";
			mes "Invalid Option!";
			next;
			mes "[Refine Test";
			mes "Option can only by between 1 to 10.";
			close;
		}
		downrefitem .@option,.@value;
		mes "[Refine Test]";
		mes "There you go you evil Motherfucker!";
		close;
	case 3:
		mes "[Refine Test]";
		mes "There you go you evil Motherfucker!";
		close;
	}
}