//########################
//Created by Nameless2you#
//########################
prontera,150,150,5	script	Stat Dealer	99,{

set .@item,7720; // Adjust the item id here
set .@name$,"[Stat Dealer]"; //Name of NPC in Dialogue can be changed here

mes .@name$;
mes "Good-day, I'm here to sell you Stat Points, each 10 Stat Points will cost you 1 "+getitemname(.@item)+" (id: "+.@item+")";
if(countitem(.@item) < 1) goto L_NoPay;
next;
mes .@name$;
mes "How many "+getitemname(.@item)+" would you like to use?";
mes "You have ^00FF00"+countitem(.@item)+"^000000 "+getitemname(.@item)+"";
mes "Use '0' to cancel transaction.";
input .@input;
if(.@input == 0) close;
if(.@input > countitem(.@item)) goto L_NoPay;
next;
mes .@name$;
mes "You would like to purchase "+.@input*10+" Status Points with "+.@input+" "+getitemname(.@item)+"";
switch(select("Yes:No")){
case 1:
		mes .@name$;
		mes "Transaction is completed, just the last few steps..";
	next;
		mes .@name$;
		mes "Transaction is completed, just the last few steps..";
		mes "..";
	next;
		mes .@name$;
		mes "Transaction is completed, just the last few steps..";
		mes "..";
		mes "...";
	next;
		mes .@name$;
		mes "Transaction is completed, just the last few steps..";
		mes "..";
		mes "...";
		mes "....";
	next;
	delitem .@item,.@input;
	set StatusPoint, StatusPoint + (.@input*10);
		mes .@name$;
		mes "Transaction is completed, just the last few steps..";
		mes "..";
		mes "...";
		mes "....";
		mes "Transaction has been completed.";
		mes "Have a nice day.";
	close;
case 2:
		mes .@name$;
		mes "Have a nice day.";
	close;
}


L_NoPay:
mes "I'm sorry but you don't have the required payment to proceed";
close;

}