viewing paste Unknown #14096 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66
//===== rAthena Script =======================================
//= Reset NPC
//===== By: ==================================================
//= rAthena Dev Team
//===== Current Version: =====================================
//= 1.3
//===== Compatible With: =====================================
//= rAthena Project
//===== Description: =========================================
//= Resets skills, stats, or both.
//===== Additional Comments: =================================
//= 1.0 First Version
//= 1.1 Optimized for the greater good. [Kisuka]
//= 1.2 Cleaning [Euphy]
//= 1.3 All statuses removed upon skill reset. [Euphy]
//============================================================
 
morocc,69,101,4 script  Lee Seung       54,{
 
 
        mes "[Lee Seung]";
        mes "I am Lee Seung, the reseter.";
        mes "Reset Stats: "+ getitemname(7282);
        mes "Reset Skills: "+ getitemname(7283);
        mes "Reset Both: "+ getitemname(7282) + " & " +getitemname(7283);
        mes "Please select the service you want:";
        next;
        switch(select("^FF3355Reset Skills:Reset Stats:Reset Both^000000:Cancel")) {
        case 1:
                mes "[Lee Seung]";
                if (countitem(7282) < 1) {
                        mes "Sorry, you don't have the right Item.";
                        close;
                }
                delitem 7282,1;
                sc_end SC_ALL;
                ResetSkill;
                mes "There you go!";
                close;
        case 2:
                mes "[Lee Seung]";
                if (countitem(7283) < 1) {
                        mes "Sorry, you don't have the right Item.";
                        close;
                }
                delitem 7283,1;
                ResetStatus;
                mes "There you go!";
                close;
        case 3:
                mes "[Lee Seung]";
                if (countitem(7283) < 1 && countitem(7283) < 1) {
                        mes "Sorry, you don't have the right Item.";
                        close;
                }
                delitem 7283,1;
                delitem 7282,1;
                sc_end SC_ALL;
                ResetSkill;
                ResetStatus;
                mes "There you go!";
                close;
        case 4:
                close;
        }
}
Viewed 254 times, submitted by unknown.