viewing paste Healer | Athena

Posted on the | Last edited on
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
// http://rathena.org/board/topic/70367-question-regarding-to-sc-start/
aria,77,77,3    script  Priestess Magarita      641,{
        mes "[Priestess Magarita]";
        mes "Hello there! I'm Priestess Magarita from Prontera Chruch.";
        next;
        mes "[Priestess Magarita]";
        mes "I am here for a charity event which is providing free ^00FF00Heal^000000 and ^00FF00Bless^000000 services for all. In order Chief of Mornanie Island will pay 5z each serves for us to help the poors.";
        next;
        mes "[Priestess Magarita]";
        mes "Would you like me to cure you?";
        next;
        set .@j,select("Yes, Heal me please.:Yes, Heal and Bless please.:No, thank you.")-1;
        if (.@j>1) {
                mes "[Priestess Magarita]";
                mes "Have a nice day!";
                close;
        }
        mes "[Priestess Magarita]";
        mes "Thanks for helping us!";
        close2;
OnHeal:
        if (getd("@Delay_"+.@j) > gettimetick(2)) {
                if (@HealSpam >= 5) {
                        npctalk "You've been warned, " + strcharinfo(0) + ".";
                        sc_end SC_ALL;
                        sc_start SC_DECREASEAGI,300000,10;
                        end;
                }
                npctalk "Please do not spam, " + strcharinfo(0) + ". My skills are in cold down.";
                set @HealSpam, @HealSpam + 1;
                end;
        }
        percentheal 100,100;
        specialeffect2 312;
        emotion 21;
        if (.@j) {
                sc_start SC_BLESSING,300000,10;
                sc_start SC_INCREASEAGI,300000,10;
                specialeffect2 37;
                specialeffect2 42;     
        }
        npctalk "You are welcome! " + strcharinfo(0) + ".";
        setd "@Delay_"+.@j,gettimetick(2)+10;
        set @HealSpam, 0;
        end;
       
L_Buff: set .@j,1;
L_Heal: goto OnHeal;
       
OnInit:
        defpattern 1,"([^:]+):.*\\sheal\\s+pl(.*)","L_Heal";
        defpattern 1,"([^:]+):.*\\sbuff\\s+pl(.*)","L_Buff";
        activatepset 1;
        end;
}
Viewed 393 times, submitted by Joseph.