1 files changed, 5 insertions, 48 deletions
diff --git a/npc/004-1/elanore.txt b/npc/004-1/elanore.txt
index 1ca855e52..b6d67e6a9 100644
--- a/npc/004-1/elanore.txt
+++ b/npc/004-1/elanore.txt
@@ -3,61 +3,18 @@
 //    Jesusalva
 
 004-1,75,62,0	script	Elanore the Healer	NPC_FEMALE,{
-
-    //if (sc_check(SC_POISON)) goto L_CurePoison;
-
-    mesn;
-    @temp = rand(4);
-    if(@temp == 1) goto L_Heal2;
-    if(@temp == 2) goto L_Heal3;
-    if(@temp == 3) goto L_Heal4;
-    goto L_Heal1;
-
-L_Heal1:
-    mesq l("You don't look too well; let me treat your wounds.");
-    mes "";
-    goto L_Menu;
-
-L_Heal2:
-    mesq l("I will make quick work of your wounds.");
-    mes "";
-    goto L_Menu;
-
-L_Heal3:
-    mesq l("Need a healing?");
-    mes "";
-    goto L_Menu;
-
-L_Heal4:
-    mesq l("Sometimes you just need to run from battle.");
-    mes "";
-    goto L_Menu;
-
-L_Menu:
-    .@price=(MaxHp-Hp)/5;
-    .@price=.@price+10;
-    if (BaseLevel <= 15) .@price=(.@price/10);
+    .@price=Nurse(.name$, 10, 5, 1);
     mesq l("For you, it'll be @@ GP.", .@price);
     mes "";
     menu
-        rif(Zeny >= .@price, l("Please heal me!")), L_Heal_L,
+        rif(Zeny >= .@price, l("Please heal me!")), L_Healing,
         l("Do you make Lifestones?"), L_Lifestones,
         l("Another time, maybe."), L_Close;
 
 
-L_Heal_L:
-    mes "";
-    set Zeny, Zeny - .@price;
-    sc_end(SC_POISON);
-    sc_end(SC_SLOWPOISON);
-    percentheal 100,100; // We can also use "recovery(<account id>)"
-    mesn;
-    @temp = rand(1,4);
-    if(@temp == 1)    mesq l("Here you go!");
-    if(@temp == 2)    mesq l("Painless, wasn't it?");
-    if(@temp == 3)    mesq l("You should be more careful.");
-    if(@temp == 4)    mesq l("Much better, right?!");
-    goto L_Close;
+L_Healing:
+    Nurse(.name$, 10, 5, 2);
+    close;
 
 L_Lifestones:
     mes "";