Test and correct Dracoula

1 files changed, 11 insertions, 7 deletions

diff --git a/npc/007-1/dracoula.txt b/npc/007-1/dracoula.txt
index 6fc4adc55..b1dfb212e 100644
--- a/npc/007-1/dracoula.txt
+++ b/npc/007-1/dracoula.txt
@@ -14,6 +14,7 @@
     mesq l("This is not a place for non-experimented people!");
     next;
     mesq l("Mine exit is top left!");
+    mes "";
     if (BaseLevel >= 15) goto L_Menu;
     close;
 
@@ -30,12 +31,14 @@ L_Menu:
 L_Quest:
     mes "";
     .@q=getq(MineQuest_Dracoula);
-    mesn;
-    mesq l("Nice! First let me introduce myself. I am Dracoula, a miner!");
-    next;
-    mesn;
-    mesq l("I mine here since a while. My favorite activity it's to scare others miners!");
-    next;
+    if (!.@q) {
+        mesn;
+        mesq l("Nice! First let me introduce myself. I am Dracoula, a miner!");
+        next;
+        mesn;
+        mesq l("I mine here since a while. My favorite activity it's to scare others miners!");
+        next;
+    }
     if (.@q == 0) goto L_Continue;
     if (gettimetick(2) >= getq2(MineQuest_Dracoula) + 60 * 60 * 23) goto L_Repeat;
     mesn;
@@ -50,6 +53,7 @@ L_Continue:
         l("Haha, Nice, but how do you do that?"), L_Next;
 
 L_Next:
+    mes "";
     mesq l("I disguise myself into a giant mutated bat, but every time I break or lose my fake teeth.");
     next;
     mesq l("I usually ask adventurers for 11 @@, but new miners should be arriving soon. I need to make them cry!", getitemlink(BatTeeth));
@@ -63,7 +67,7 @@ L_Next:
 
 L_Repeat:
     mesn;
-    if (getequipid(EQI_HEAD_TOP) != 0)
+    if (getequipid(EQI_HEAD_TOP) > 0)
         mesq l("Oh it's you @@, I did not recognize you with your hat!", strcharinfo(0));
     else
         mesq l("Oh it's you @@, I did not recognize you without a hat!", strcharinfo(0));