R > Custom Healer Npc

[ahloi007]

Good Day rAthena,

Im here to request a multi function healer npc as below function: - 

Option to choose.

Heal = Free

Heal + Buff = with cost

 Anyone can provide me this healer npc?

Thanks!

 

 

[cook1e]

prontera,155,173,5	script	Healer	123,{
.@Price = 1000; // Zeny Cost

mes "[Healer]";
mes "Hello " + strcharinfo(0) + ".";
mes "What you want?";
next;
	switch(select("Free Healer:Paid Healer"))
	{
		case 1:
			mes "[Healer]";
			mes "You only will get Heal.";
				switch(select("Yes, please.:No, thanks."))
				{
					case 1:
							specialeffect2 EF_HEAL2;
							percentheal 100,100;
							close;
					case 2:
							mes "As you wish.";
							close;
				}
		case 2:
			mes "[Healer]";
			mes "Paid Healer will give you Heal + Buffs.";
				switch(select("Yes, please.:No, thanks."))
				{
					case 1:
						if (Zeny < .@Price) end;
							specialeffect2 EF_HEAL2;
							percentheal 100,100;
							specialeffect2 EF_INCAGILITY;
							sc_start SC_INCREASEAGI,240000,10;
							specialeffect2 EF_BLESSING;
							sc_start SC_BLESSING,240000,10;
							Zeny -= .@Price;
							close;
					case 2:
							mes "As you wish.";
							close;
				}
		}
}

 

[ahloi007]

On 8/3/2021 at 3:37 AM, cook1e said:

prontera,155,173,5	script	Healer	123,{
.@Price = 1000; // Zeny Cost

mes "[Healer]";
mes "Hello " + strcharinfo(0) + ".";
mes "What you want?";
next;
	switch(select("Free Healer:Paid Healer"))
	{
		case 1:
			mes "[Healer]";
			mes "You only will get Heal.";
				switch(select("Yes, please.:No, thanks."))
				{
					case 1:
							specialeffect2 EF_HEAL2;
							percentheal 100,100;
							close;
					case 2:
							mes "As you wish.";
							close;
				}
		case 2:
			mes "[Healer]";
			mes "Paid Healer will give you Heal + Buffs.";
				switch(select("Yes, please.:No, thanks."))
				{
					case 1:
						if (Zeny < .@Price) end;
							specialeffect2 EF_HEAL2;
							percentheal 100,100;
							specialeffect2 EF_INCAGILITY;
							sc_start SC_INCREASEAGI,240000,10;
							specialeffect2 EF_BLESSING;
							sc_start SC_BLESSING,240000,10;
							Zeny -= .@Price;
							close;
					case 2:
							mes "As you wish.";
							close;
				}
		}
}

 

Thanks for your reply! I will try it when I reach home! Very appreciated

Thanks for the script!