stat/skill reset NPC?

[nessdude14]

I don't know anything about scripting, but I would like to have one on my server. could somone give me a link to the script if possible?

[Jayz]

Here you go, my server use this one too!

//===== eAthena Script ====================================
//= Reset Boy
//===== By: ================================================
//= Kamper and old7
//===== Current Version: ===================================
//= 3.0
//===== Compatible With: ===================================
//= Any Athena Version
//===== Description: =======================================
//= Reset Status, skills
//= Reborn char with Extra status points or/and skill points
//===== Additional Comments: ===============================
//= v1.0 Npc Creator [Kamper] assist by old7
//= v2.0 Edited and translate by old7
//= V2.1 Cumulative Reborn Cost Work
//= V2.2 Kamper fixs
//= V3.0 old7 Remake all script include e remove parameters
//================================================== ========
prontera.gat,158,186,5 script Reset Boy 48,{
//============================-Conf-================================================== =====
set @ResetStats, 50000; // Reset Status Cost (Default: 50000)
set @ResetSkills, 50000; // Reset Skills Cost (Default: 5000)
set @ResetBoth, 90000; // Reset Skills and Status Cost (Default: 9000)
set @ResetChar, 1000000; // Reborn Cost (Default: 1000000)
set @CCost, 1; // 1 for Reborn Cumulative Cost, 0 for fixed Cost (Default: 1)
set @ResBaseLvl, 99; // Min. Base Level for Reborn (Default: 99)
set @ResJobLvl, 70; // Min. Job Level for Reborn(Default: 70)
set @ResetBonus, 100; // Value of Extra Status points (Default: 100)
Set @SkillPBonus, 0; // Value of Extra Skill points (Default: 0)
Set @MaxResets, 100; // Number of times possibles reborn (Default: 100)
//================================================== ========================================
set @Cost, (@CCost * (QuestReset * @ResetChar)) + @ResetChar;
mes "[Reset Boy]";
mes "I am a Reset Boy!";
mes "Reset Status: "+ @ResetStats +"z";
mes "Reset Skills: "+ @ResetSkills +"z";
mes "Reset Both: "+ @ResetBoth +"z";
mes "Reset Char: "+ @Cost +"z";
next;
mes "[Reset Boy]";
mes "Please select the service you want:.";
next;
menu "Reset Status",L_RStatus,"Reset Skills",L_RSkills,"Reset Both",L_RBoth,"Reset Char",L_Rchar,"See Number of Resets",L_SNumberR,"Cancel",L_End;
L_RStatus:
mes "[Reset Boy]";
if (Zeny < @ResetStats) goto L_NoZeny;
mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!";
set Zeny,Zeny - @ResetStats;
ResetStatus;
set statuspoint, statuspoint + (@ResetBonus*QuestReset);
close;
L_RSkills:
mes "[Reset Boy]";
if (Zeny < @ResetSkills) goto L_NoZeny;
mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!";
set Zeny,Zeny - @ResetSkills;
ResetSkill;
set skillpoint, skillpoint + (@SkillPBonus*QuestReset);
close;
L_RBoth:
mes "[Reset Boy]";
if (Zeny < @ResetBoth) goto L_NoZeny;
mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!";
set Zeny,zeny - @ResetBoth;
ResetSkill;
ResetStatus;
set statuspoint, statuspoint + (@ResetBonus*QuestReset);
set skillpoint, skillpoint + (@SkillPBonus*QuestReset);
close;
L_Rchar:
if (@MaxResets == QuestReset) goto L_SNumberR;
if ((BaseLevel < @ResBaseLvl) || (JobLevel < @ResJobLvl)) goto L_Erro;
if (Zeny < @Cost) goto L_NoZeny;
set Zeny,Zeny - @Cost;
resetlvl(1);
set QuestReset, QuestReset + 1;
set statuspoint, statuspoint + (@ResetBonus*QuestReset);
set skillpoint, skillpoint + (@SkillPBonus*QuestReset);
mes "[Reset Boy]";
mes "You are now reborn";
mes "Please come again soon";
close;
L_SNumberR:
mes "[Reset Boy]";
if (QuestReset == 0) mes "You no have resets";
if (QuestReset == @MaxResets) mes "You have "+ QuestReset +" Resets, this is the maximum possible.";
if (QuestReset == 1) mes "You have one reset";
mes "You have "+ QuestReset +" Resets.";
close;
L_NoZeny:
mes "[Reset Boy]";
mes "Sorry, you don't have enough Zeny.";
close;
L_Erro:
mes "[Reset Boy]";
mes "You need to Reborn:";
mes "Base Level "+ @ResBaseLvl +".";
mes "Job Level "+ @ResJobLvl +".";
mes "and "+ @Cost + "Zeny.";
close;
L_End:
mes "Get out!!.";
close;
}

[nessdude14]

Thanks! that just saved me a lot of trouble...