From a5eb22a8ed647c2021a3309656db0e505fe897c0 Mon Sep 17 00:00:00 2001
From: Reid <reidyaro@gmail.com>
Date: Tue, 10 Apr 2012 12:04:55 +0200
Subject: Add new script (nardbox), Update 000-2-3 wlk.

---
 data/000-2-3.wlk     | Bin 2760 -> 2760 bytes
 db/const.txt         |   2 ++
 npc/000-2-3/nard.txt |  36 ++++++++++++++++++++++++++++++++++++
 3 files changed, 38 insertions(+)

diff --git a/data/000-2-3.wlk b/data/000-2-3.wlk
index c88c4966..17b127e2 100644
Binary files a/data/000-2-3.wlk and b/data/000-2-3.wlk differ
diff --git a/db/const.txt b/db/const.txt
index 3d952579..62c23146 100644
--- a/db/const.txt
+++ b/db/const.txt
@@ -221,3 +221,5 @@ ShipQuests_Knife	10
 ShipQuests_ArpanMoney	11
 // 1
 ShipQuests_Door	12
+// 4
+ShipQuests_Nardbox 1
diff --git a/npc/000-2-3/nard.txt b/npc/000-2-3/nard.txt
index 799c2624..c9ac51e4 100644
--- a/npc/000-2-3/nard.txt
+++ b/npc/000-2-3/nard.txt
@@ -51,3 +51,39 @@ l_Ok:
     close;
 
 }
+
+000-2-3.gat,25,24,0	script	Box	102,{
+
+    set @q, geta2(ShipQuests, ShipQuests_Nardbox);
+
+    mesn "Narrator";
+    mes col(l("Some Bandanas and Sailor Hats are inside this box."), 9);
+    next;
+    mes col(l("What do you wish to do?"), 9);
+    next;
+
+    menu
+        l("Take a Bandana"), -,
+        l("Nothing"), L_Close;
+
+    if (@q == 1) goto l_Give;
+    if (@q > 1) goto l_Already;
+
+l_Give:
+    mes "";
+    mesn "Nard";
+    mesq l("Congrats!"); 
+    mesn "Nard";
+    mesq l("You are now part of the crew! Thanks again for your help.");
+
+    seta2 ShipQuests, ShipQuests_Nardbox, 2;
+    getitem "Bandana", 1;
+
+l_Close:
+    close;
+
+l_Already:
+    mesn "Nard";
+    mesq l("You already took a Bandana, put this one back please."); 
+    close;
+}
\ No newline at end of file
-- 
cgit v1.2.3-70-g09d2