User Tag List

Closed Thread
Results 1 to 3 of 3
  1. #1
    Registered User
    Reputation

    Join Date
    Jan 2006
    Last Online
    12-01-2006 @ 08:17 PM
    Posts
    17
    Thanks
    0
    Thanked 0 Times in 0 Posts

    stat/skill reset NPC?

    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?


  2. #2
    Registered User
    Reputation

    Join Date
    Nov 2005
    Last Online
    12-07-2012 @ 10:41 AM
    Location
    Singapore
    Posts
    160
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: stat/skill reset NPC?

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

  3. #3
    Registered User
    Reputation

    Join Date
    Jan 2006
    Last Online
    12-01-2006 @ 08:17 PM
    Posts
    17
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: stat/skill reset NPC?

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

Closed Thread

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts