prontera,150,150,5	script	Test	123,{
switch(select("Buy Skill Points:Sell Skill Points:Reset Skill")){
	case 1:
		mes "How many 'Extra Skill Points' you want to buy?";
		input .@amt,0,( Zeny / .buy );
		if( .@amt ){
			mes "Gained "+@amt+" Skill Points.";
			char_extra_skillpoint += .@amt;
			SkillPoint += .@amt;
			Zeny -= ( .@amt * .buy );
		}
		break;
	Case 2:
		mes "How many 'Extra Skill Points' you want to sell?";
		input .@amt,0,char_extra_skillpoint;
		if( .@amt ){
			mes "There you go!";
			char_extra_skillpoint -= .@amt;
			Zeny += ( .@amt * .sell );
		}
		break;
	Case 3:
		mes "Done";		
		Zeny -= .reset;
		resetskill;
		SkillPoint += char_extra_skillpoint;
	default: break;
	}
close;

OnInit:
set .buy,1000000;
set .sell,100000;
set .reset,5000;
end;
}