Polishing

2 files changed, 40 insertions, 3 deletions

diff --git a/db/re/item_db.conf b/db/re/item_db.conf
index dc6510f09..8651269ee 100644
--- a/db/re/item_db.conf
+++ b/db/re/item_db.conf
@@ -5107,8 +5107,8 @@ item_db: (
 	AegisName: "OldTowel"
 	Name: "Old Towel"
 	Type: "IT_ARMOR"
-	Buy: 7000
-	Sell: 1800
+	Buy: 0
+	Sell: 0
 	Weight: 450
 	Def: 1
 	Loc: "EQP_ACC_L"
diff --git a/npc/017-1/stranger.txt b/npc/017-1/stranger.txt
index 107eeee61..d2e04004b 100644
--- a/npc/017-1/stranger.txt
+++ b/npc/017-1/stranger.txt
@@ -7,7 +7,7 @@
 //    Months: February, May, August, September
 
 017-1,44,37,0	script	Stranger#LoF	NPC_LOF_STRANGER,{
-    if (gettime(GETTIME_MONTH) % 3 != 2 || gettime(GETTIME_DAYOFMONTH) < 18 || gettime(GETTIME_DAYOFMONTH) > 25) {
+    if (!$@GM_OVERRIDE && gettime(GETTIME_MONTH) % 3 != 2 || gettime(GETTIME_DAYOFMONTH) < 18 || gettime(GETTIME_DAYOFMONTH) > 25) {
         dispbottom l("An error with Stranger#LoF happened! Please report!!");
         disablenpc .name$;
         end;
@@ -74,18 +74,33 @@ L_Quizz:
     goto L_Easy;
 
 L_Easy:
+    mes "";
+    mesn;
+    mesq l("The first one is easy.");
+    next;
+    mes "";
     if (0171_Stranger_BlackBox(EASY))
         goto L_Medium;
     else
         goto L_Fail;
 
 L_Medium:
+    mes "";
+    mesn;
+    mesq l("You're absolutely right. The next one will be more tricky.");
+    next;
+    mes "";
     if (0171_Stranger_BlackBox(MEDIUM))
         goto L_Hard;
     else
         goto L_Fail;
 
 L_Hard:
+    mes "";
+    mesn;
+    mesq l("Not bad, not bad. Let's see if you can answer an even more difficult one.");
+    next;
+    mes "";
     if (0171_Stranger_BlackBox(HARD))
         goto L_Reward;
     else
@@ -94,6 +109,7 @@ L_Hard:
 
 // Failure
 L_Fail:
+    mes "";
     mesn;
     if (rand(1,2) == 1) {
         mesq l("Sorry, but that's not right.");
@@ -107,16 +123,37 @@ L_Fail:
 
 // Reward
 L_Reward:
+    mes "";
+    mesn;
+    mesq l("Unbelievable! You're really a wise person.");
+    next;
+    mesn;
+    mesq l("One last question, but this shouldn't be a problem for you.");
+    next;
+    mesn;
+    mesq l("What is the most important item for every hitchhiker to have?");
+    input .@answer$;
+    if (strip(strtolower(.@answer$)) != "towel" && strip(strtolower(.@answer$)) != l("towel"))
+        goto L_Fail;
+    mes "";
+    mesn;
+    mesq l("There you are! A towel is really the most important item for a hitchhiker to have.");
+
     getitem OldTowel, 1;
     // If you complete the quest in May, you get 50% more experience
     if (gettime(GETTIME_MONTH) == MAY)
         getexp JobLevel*BaseLevel*3/2, BaseLevel*3;
     else
         getexp JobLevel*BaseLevel, BaseLevel*2;
+    setq LoFQuest_Hitchhiker, 2;
+    next;
+    mesn;
+    mesq l("It really comes in handy that I have my towel with me. A towel is about the most massively useful thing an inte- ahm, a person can have.");
     close;
 
 // TODO: Enable another quest after main quest has been completed
 // TODO: Completing sub quest on May shall give better bonus (gettime(GETTIME_MONTH) == MAY)
+// TODO: Keep your Towel well guarded; It can only be obtained once and is required in further quests.
 L_Complete:
     mesn;
     mesq l("I have a lot of work to do now.");