//########################
//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;
 
}