From 69d2a7a7eba1cbf296626d33f1d54b606537eb98 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 16 Jun 2018 14:49:51 -0300
Subject: Anwar quest should be complete, with 2 or 3 entirely EXPERIMENTAL
 code lines. So it may not work.

---
 npc/003-1/eomie.txt  | 23 +++++++++++++++++++++++
 npc/003-1/tinris.txt | 22 ++++++++++++++++++++++
 npc/004-1/anwar.txt  | 32 ++++++++++++++++++++++++++++++++
 3 files changed, 77 insertions(+)

diff --git a/npc/003-1/eomie.txt b/npc/003-1/eomie.txt
index 58aa07d5c..43e9a8ad5 100644
--- a/npc/003-1/eomie.txt
+++ b/npc/003-1/eomie.txt
@@ -8,6 +8,7 @@
 
 003-1,68,24,0	script	Eomie	NPC_ELF_F,{
     .@q=getq(TulimsharQuest_AnwarField);
+    if (.@q == 10) goto L_Gift;
     if (.@q == 7) goto L_FirstAid;
     if (.@q == 1) goto L_NotMe;
 
@@ -56,6 +57,28 @@ L_FirstAid:
     mesq l("Quick, deliver this to Anwar!");
     close;
 
+
+L_Gift:
+    .@q2=getq2(TulimsharQuest_AnwarField);
+    if (.@q2 & 2) {
+        mesn;
+        mesq l("Thanks for the nice gift!");
+        close;
+    }
+    // Tip. WHAT DID YOU DID WITH THE BOUND ITEM? IT SHOULD BE HARD TO GET RID OF IT...
+    if (countitem(TortugaShell) < 1) {
+        mesn;
+        mesq l("Ah, I wish I got something for helping people out...");
+        close;
+    }
+    mesn strcharinfo(0);
+    mesq l("Anwar sent you this, erm, hum... @@.", getitemlink(TortugaShell));
+    next;
+    setq2 TulimsharQuest_AnwarField, .@q2+2;
+    mesn;
+    mesq l("WOW, THIS IS AWESOME! Many, many thanks!!");
+    close;
+
 OnInit:
     .@npcId = getnpcid(0, .name$);
     //setunitdata(.@npcId, UDT_HEADTOP, PinkieHat);
diff --git a/npc/003-1/tinris.txt b/npc/003-1/tinris.txt
index 8a0736725..fe3f417a6 100644
--- a/npc/003-1/tinris.txt
+++ b/npc/003-1/tinris.txt
@@ -11,6 +11,7 @@
     // Results: 6 - nothing. 7- bug feast.
     // On status 7, you need to talk to Eomie.
     // Then Eomie will finish stuff for you, and it's reward time.
+    if (.@q == 10) goto L_Gift;
     if (.@q == 7) goto L_Success;
     if (.@q == 6) goto L_Fail;
     if (.@q == 4) goto L_Craft;
@@ -120,6 +121,27 @@ L_Success:
     mesq l("Quick, tell that to Eomie. She knows how to do Bug Bombs which won't harm the plants!");
     close;
 
+L_Gift:
+    .@q2=getq2(TulimsharQuest_AnwarField);
+    if (.@q2 & 1) {
+        mesn;
+        mesq l("Thanks for the nice gift!");
+        close;
+    }
+    // Tip. WHAT DID YOU DID WITH THE BOUND ITEM? IT SHOULD BE HARD TO GET RID OF IT...
+    if (countitem(TortugaShell) < 1) {
+        mesn;
+        mesq l("Ah, I wish I got something for helping people out...");
+        close;
+    }
+    mesn strcharinfo(0);
+    mesq l("Anwar sent you this, erm, hum... @@.", getitemlink(TortugaShell));
+    next;
+    setq2 TulimsharQuest_AnwarField, .@q2+1;
+    mesn;
+    mesq l("WOW, THIS IS AWESOME! Many, many thanks!!");
+    close;
+
 L_Lying:
     mesn;
     mesq l("Ah, so you think you can fool me?");
diff --git a/npc/004-1/anwar.txt b/npc/004-1/anwar.txt
index d89a8d166..4462fb1c4 100644
--- a/npc/004-1/anwar.txt
+++ b/npc/004-1/anwar.txt
@@ -14,6 +14,9 @@
     if (.@q >= 11) goto L_GiveTinris;
     if (.@q == 10) goto L_GiftMaterial;
     */
+    if (.@q > 10) goto L_Complete;
+    if (.@q == 10) goto L_SecondReward;
+    if (.@q == 9) goto L_FirstReward;
     if (.@q == 8) goto L_SecondTry;
     if (.@q >= 6) goto L_FirstTry;
     if (.@q == 5) goto L_TryIt;
@@ -25,6 +28,14 @@
         l("Sure!"),L_Sure,
         l("I'm busy, sorry."),L_Close;
 
+L_Complete:
+    mesn;
+    mesq l("Thanks for saving Tulimshar from a famine. I'll be forever grateful.");
+    next;
+    mesn;
+    mesq l("Dealing with elves is too bothersome to me.");
+    close;
+
 L_Sure:
     mes "";
     mesn;
@@ -84,6 +95,27 @@ L_SecondTry:
     mesq l("Ah, that was tiresome... I'll go make a reward for them, talk to me again later.");
     close;
 
+L_FirstReward:
+    mesn;
+    mesq l("Here are two @@. Please deliver it to them. I'm hope they'll like it.", getitemlink(TortugaShell));
+    setq TulimsharQuest_AnwarField, 10, 0;
+    getitembound(TortugaShell, 2, 4); // Prevent accidental item loss
+    close;
+
+L_SecondReward:
+    .@q2=getq2(TulimsharQuest_AnwarField);
+    if (.@q2 < 3){
+        mesn;
+        mesq l("Please deliver the two @@ to Tinris and Eomie, and then I'll give you something for your help.", getitemlink(TortugaShell));
+        close;
+    }
+    setq TulimsharQuest_AnwarField, 11, 0;
+    getitem2(CottonTrousers, 1, 1, 0, 0, OrangeDye, 0,0,0); // EXPERIMENTAL, required for Inspector Quest
+    getexp 100, 0;
+    mesn;
+    mesq l("Many thanks for your help! Here, take this. I'm sure it can be very useful later. It always is.");
+    close;
+
 L_Weak:
     hello;
     end;
-- 
cgit v1.2.3-60-g2f50