prontera,159,190,4  script  Magaleta    21002,{
 
.@Name$ = "[Magaleta]";
.@Player$ = strcharinfo(0);
.@GID = getcharid(2);
.CasID = getcastledata("prtg_cas01",1);
.@GName$ = getguildname(.CasID);
.@Cost = 1000;
 
    if(.@GID == .CasID){
        mes .@Name$;
        mes "Welcome "+.@Player$+", Would you like to be healed?"," ","For members of "+.@GName$+" healing is free.";
        switch(select("Heal me please:No thanks")){
            case 1:
                specialeffect2 EF_HEAL2;
                percentheal 100,100;
                break;
            case 2:
                next;
                mes .@Name$;
                mes "Maybe next time.";
                break;
    }} else {
        mes .@Name$;
        mes "Welcome "+.@Player$+", Would you like to be healed?"," ","Standard cost is 1,000 Zeny.";
        switch(select("Heal me please:No thanks")){
            case 1:
                if (Zeny < .@Cost){
                next;
                mes .@Name$;
                mes "I'm sorry but you don't have enough.";
            close;} else {
                specialeffect2 EF_HEAL2;
                percentheal 100,100;
                Zeny -= .@Cost;
            break;}
            case 2:
                next;
                mes .@Name$;
                mes "Maybe next time.";
            break;}
            }
end;
}