-	script	Healer	-1,{

if (HEALDELAY > gettimetick(2)) {

mes "There is a delay to heal again."; 
mes "" + callfunc("Time2Str" ,HEALDELAY);
close; 

}



	if( BaseLevel < 95 ){
		set .@Price,0;	// Zeny required for heal
		set .@Buffs,0;	// Also buff players? (1: yes / 0: no)
		set .@Delay,120;	// Heal delay, in seconds
	}
	else{
    mes "[Healer]";
    mes "My free healing service is only for players below lvl 95. And if you are below lvl 50, you get free buffs!";
    mes " ";
    mes "For players above lvl 95, my charge will be 780 z (w/o buffs). Thank you for your understanding.";
    mes " ";
    mes "^777777Delay: 1-3 minutes^000000";

    next;
		set .@Price,780;	// Zeny required for heal
		set .@Buffs,0;	// Also buff players? (1: yes / 0: no)
		set .@Delay,180;	// Heal delay, in seconds
	}

	if( BaseLevel < 50 ){
    mes "[Healer]";
    mes "My free service is only for players below lvl 95. And if you are below lvl 50, you get free buffs!";
    mes " ";
    mes "^777777Delay: 10 secs^000000";
    next;
		set .@Price,0;	// Zeny required for heal
		set .@Buffs,1;	// Also buff players? (1: yes / 0: no)
		set .@Delay,60;	// Heal delay, in seconds

	}

	if (.@Price) {
		message strcharinfo(0),"Healing cost is "+.@Price+" Zeny.";
		if (Zeny < .@Price) close;
		if(select("^0055FFHeal^000000:^777777Cancel^000000") == 2) end;
		set Zeny, Zeny-.@Price;
	}
	specialeffect2 EF_HEAL2; percentheal 100,100; set HEALDELAY,gettimetick(2)+.@Delay; close;
	if (.@Buffs) {
		specialeffect2 EF_INCAGILITY; sc_start SC_INCREASEAGI,240000,10;
		specialeffect2 EF_BLESSING; sc_start SC_BLESSING,240000,10;
		set HEALDELAY,gettimetick(2)+.@Delay;
		close;
	}
	close;
}