From 4e7d435a303b52e78dbbad2954ad06930b12c80b Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Mon, 1 Apr 2019 14:19:39 -0300
Subject: Braknar Shield blueprints price: 1x [Beer]

---
 npc/020-4/baktar.txt | 45 +++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 43 insertions(+), 2 deletions(-)

(limited to 'npc/020-4')

diff --git a/npc/020-4/baktar.txt b/npc/020-4/baktar.txt
index e812167e0..5cd5cad06 100644
--- a/npc/020-4/baktar.txt
+++ b/npc/020-4/baktar.txt
@@ -14,6 +14,8 @@
     .@q2=getq2(NivalisQuest_Baktar);
     if (!.@q)
         goto L_Start;
+    if (.@q == 2)
+        goto L_Braknar;
     goto L_Collector;
 
 L_Start:
@@ -104,6 +106,46 @@ L_Collector:
 
     close;
 
+L_Braknar:
+    mesn;
+    if (rand(1,5) == 4)
+        mesc l("*cough cough*");
+    mesq l("Welcome back.");
+    select
+        l("I brought a souvenir for you."),
+        l("Do you know someone called Braknar?"),
+        l("Er, uhm, hi!");
+    mes "";
+    switch (@menu) {
+        case 1: goto L_Collector;
+        case 2: 
+            mesn;
+            if (rand(1,5) == 4) mesc l("*cough cough*");
+            mesq l("Yeah, it was my grand-grand-grandfather.");
+            next;
+            mesn strcharinfo(0);
+            mes l("'-' \"Could you give me his shield? Pretty please? I need it to survive and bring Tulimshar goodies!\"");
+            next;
+            mesn;
+            if (rand(1,5) == 4) mesc l("*cough cough*");
+            mesq l("No, it is a family heirloom. But I do have the shield blueprints. A skilled craftsman could forge one.");
+            next;
+            mesn strcharinfo(0);
+            mes l("*-* \"Could you share those blueprints with me? Please?\"");
+            next;
+            mesn;
+            if (rand(1,5) == 4) mesc l("*cough cough*");
+            if (!.@q2) {
+                mesq l("Why should I? Go away. %%n");
+                close;
+            }
+            mesq l("Sure. Here, take it.");
+            setq1 NivalisQuest_Baktar, 3;
+            break;
+        case 3: close;
+    }
+    close;
+
 OnInit:
     .@npcId = getnpcid(.name$);
     setunitdata(.@npcId, UDT_HEADTOP, KnitHat);
@@ -121,8 +163,7 @@ OnInit:
     .TULIMITEM = htnew;
     htput(.TULIMITEM, str(DesertHat), 1);
     htput(.TULIMITEM, str(SerfHat), 2);
-    htput(.TULIMITEM, str(BugLeg), 4);
-    htput(.TULIMITEM, str(Dagger), 8);
+    htput(.TULIMITEM, str(Dagger), 4);
     end;
 }
 
-- 
cgit v1.2.3-60-g2f50