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 543 times, submitted by Guest.