I never had the chance to test the script but you may test the changes I made.
I noticed that the 3rd option is for level 40-80 and the last option is for 90 and above what if the player is level 81-89?
What I did is to change the 3rd option to 40-89. You may change the level to your liking. And lastly, you don't have a proper
checking of the zeny, so I kinda added that. Anyway here's the script.
prontera,146,304,5 script Reseter 407,{
set .@name$, "[Reseter]";
if (BaseLevel <= 20) {
mes .@name$;
mes "If you are level 20 below, Reset Stat & Skills will cost you 5,000z, want it to reset?";
if (select("Yes:No") == 2) close;
set .cost,5000;
set .del_stone,0;
goto reset;
} else if (BaseLevel > 20 && BaseLevel <= 40) {
mes .@name$;
mes "If you are level 20-40, Reset Stat & Skills will cost you 2x Premium Reset Stone and 10,000z, want it to reset?";
if (select("Yes:No") == 2) close;
set .cost,10000;
set .del_stone,2;
goto reset;
} else if (BaseLevel > 40 && BaseLevel < 90) {
mes .@name$;
mes "If you are level 40-89, Reset Stat & Skills will cost you 3x Premium Reset Stone and 100,000z, want it to reset?";
if (select("Yes:No") == 2) close;
set .cost,100000;
set .del_stone,3;
goto reset;
} else if (BaseLevel >= 90) {
mes .@name$;
mes "If you are level 90 and above, Reset Stat & Skills will cost you 5x Premium Reset Stone and 10,000,000z want it to reset?";
if (select("Yes:No") == 2) close;
set .cost,10000000;
set .del_stone,5;
goto reset;
}
reset:
if (countitem(6320) < .del_stone) goto noitem;
if (Zeny < .cost) goto nozeny;
next;
cutin "kafra_09.bmp",255;
mes .@name$;
mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!";
delitem 29455, .del_stone;
set Zeny, Zeny - .cost;
ResetStatus;
ResetSkill;
close2;
cutin "", 255;
end;
noitem:
next;
mes .@name$;
mes "You dont have enough [Premium Reset Stone].";
close;
nozeny:
next;
mes .@name$;
mes "You dont have enough zeny.";
close;
}
P.S: Please forgive my scripting, i'm nowhere near Emistry's or the other guys' scripting ability.. D: