North Tulimshar: quest about businessman who wants to open a shop in Tulimshar

2 files changed, 53 insertions, 0 deletions

diff --git a/world/map/npc/022-1/_import.txt b/world/map/npc/022-1/_import.txt
index cc46a286..9695d72f 100644
--- a/world/map/npc/022-1/_import.txt
+++ b/world/map/npc/022-1/_import.txt
@@ -3,6 +3,7 @@
 map: 022-1.gat
 npc: npc/022-1/_mobs.txt
 npc: npc/022-1/_warps.txt
+npc: npc/022-1/adrian.txt
 npc: npc/022-1/anwar.txt
 npc: npc/022-1/dock.txt
 npc: npc/022-1/ferry_master.txt
diff --git a/world/map/npc/022-1/adrian.txt b/world/map/npc/022-1/adrian.txt
new file mode 100644
index 00000000..f9af1d81
--- /dev/null
+++ b/world/map/npc/022-1/adrian.txt
@@ -0,0 +1,52 @@
+// part of quest given by 021-2/kylian.txt
+// Author: Jenalya
+
+// state 1: player has the task to get the luggage from the harbor
+// state 2: Adrian gave the luggage to the player
+// state 3: player gave luggage to Kylian and Kylian asks who to talk to for the shop license
+
+022-1.gat,58,54,0|script|Adrian|213,{
+
+    set @state, ((QUEST_NorthTulimshar & $@businessmanNT_MASK) >> $@businessmanNT_SHIFT);
+
+    mes "[Adrian]";
+    mes "\"Hello. Are you here to get the luggage from some of our passengers?\"";
+    if (@state == 1)
+        menu
+            "Yes, Kylian sent me to get his luggage.",L_Get,
+            "No.",L_No;
+    menu
+        "No.",-;
+L_No:
+    mes "[Adrian]";
+    mes "\"Too bad. I wantto go and drink a beer, but I have to wait here until all the luggage is picked up.\"";
+    mes "He sighs.";
+    goto L_Close;
+
+L_Get:
+    mes "[Adrian]";
+    mes "\"Wonderful! Show me the ticket.\"";
+    mes "He checks the paper Kylian gave you and then takes a critical look at you.";
+    next;
+    getinventorylist;
+    if ((checkweight("LeatherSuitcase", 1) == 0) || (@inventory_count == 100))
+        goto L_Inventory;
+    mes "[Adrian]";
+    mes "\"Alright, here it is.\"";
+    mes "Adrain hands you a very heavy suitcase.";
+    getitem "LeatherSuitcase", 1;
+    set @state, 2;
+    set QUEST_NorthTulimshar, (QUEST_NorthTulimshar & ~($@businessmanNT_MASK)) | (@state << $@businessmanNT_SHIFT);
+    goto L_Close;
+
+L_Inventory:
+    mes "[Adrian]";
+    mes "\"The suitcase is rather heavy. You doesn't look as if you can handle that.";
+    mes "Maybe if you get rid of some of the other stuff you're carrying.\"";
+    goto L_Close;
+
+L_Close:
+    set @state, 0;
+    set @inventory_count, 0;
+    close;
+}