viewing paste Unknown #14094 | 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 67 68 69
//===== 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]
//============================================================
 
prontera,150,193,4      script  Reset Girl      124,{
 
        set .@ResetStat,5000;   // Zeny for stat reset
        set .@ResetSkill,5000// Zeny for skill reset
        set .@ResetBoth,9000;   // Zeny for resetting both together
 
        mes "[Reset Girl]";
        mes "I am the Reset Girl.";
        mes "Reset Stats: "+ callfunc("F_InsertComma",.@ResetStat) +"z";
        mes "Reset Skills: "+ callfunc("F_InsertComma",.@ResetSkill) +"z";
        mes "Reset Both: "+ callfunc("F_InsertComma",.@ResetBoth) +"z";
        mes "Please select the service you want:";
        next;
        switch(select("^FF3355Reset Skills:Reset Stats:Reset Both^000000:Cancel")) {
        case 1:
                mes "[Reset Girl]";
                if (Zeny < .@ResetSkill) {
                        mes "Sorry, you don't have enough Zeny.";
                        close;
                }
                set Zeny, Zeny-.@ResetSkill;
                sc_end SC_ALL;
                ResetSkill;
                mes "There you go!";
                close;
        case 2:
                mes "[Reset Girl]";
                if (Zeny < .@ResetStat) {
                        mes "Sorry, you don't have enough Zeny.";
                        close;
                }
                set Zeny, Zeny-.@ResetStat;
                ResetStatus;
                mes "There you go!";
                close;
        case 3:
                mes "[Reset Girl]";
                if (Zeny < .@ResetBoth) {
                        mes "Sorry, you don't have enough Zeny.";
                        close;
                }
                set Zeny, Zeny-.@ResetBoth;
                sc_end SC_ALL;
                ResetSkill;
                ResetStatus;
                mes "There you go!";
                close;
        case 4:
                close;
        }
}
 
Viewed 265 times, submitted by unknown.