Initial version for Dausen on Hasan Quest. Add Sorfina, empty.

3 files changed, 74 insertions, 8 deletions

diff --git a/npc/003-1/lieutenantdausen.txt b/npc/003-1/lieutenantdausen.txt
index 5d5064564..6e0a5cd20 100644
--- a/npc/003-1/lieutenantdausen.txt
+++ b/npc/003-1/lieutenantdausen.txt
@@ -44,24 +44,29 @@
 
         select
             l("Yes sir. I will help them."),
+            rif(getq(TulimsharQuest_Hasan) == 1, l("A guy named Hasan stole me!")),
             menuaction(l("Quit"));
 
-        if (1 != @menu)
-        {
-            closedialog;
-            goodbye;
-        }
-        else
-        {
+        switch (@menu) {
+        case 1:
             setq TulimsharQuest_WaterForGuard, 1;
-
             speech S_FIRST_BLANK_LINE, l("Good luck! Come for remuneration when you finish!");
+            break;
+        case 2:
+            setq TulimsharQuest_Hasan, 2;
+            speech S_FIRST_BLANK_LINE, lg("Ah, Hasan... Sorry pal, afraid I can't do anything for you. Try talking to his mother Sorfina, she is on Mahoud's house, near the Inn.");
+            break;
+        case 3:
+            closedialog;
+            goodbye;
+            break;
         }
     return;
 
     L_InProgress:
         mesn;
         mesq l("Please help my wards!");
+        if (getq(TulimsharQuest_Hasan) == 1) goto L_Hasan;
     return;
 
     L_Reward:
@@ -84,6 +89,24 @@
     L_QuestDone:
         mesn;
         mesq l("Thank you for your help.");
+        if (getq(TulimsharQuest_Hasan) == 1) goto L_Hasan;
+    return;
+
+    L_Hasan:
+        select
+            rif(getq(TulimsharQuest_Hasan) == 1, l("A guy named Hasan stole me!")),
+            menuaction(l("Quit"));
+
+        switch (@menu) {
+        case 1:
+            setq TulimsharQuest_Hasan, 2;
+            speech S_FIRST_BLANK_LINE, lg("Ah, Hasan... Sorry pal, afraid I can't do anything for you. Try talking to his mother Sorfina, she is on Mahoud's house, near the Inn.");
+            break;
+        default:
+            closedialog;
+            goodbye;
+            break;
+        }
     return;
 
 L_MKControl:
diff --git a/npc/003-4/_import.txt b/npc/003-4/_import.txt
index a15662b0e..e6e197d01 100644
--- a/npc/003-4/_import.txt
+++ b/npc/003-4/_import.txt
@@ -1,3 +1,4 @@
 // Map 003-4: Forgotten Shop
 // This file is generated automatically. All manually added changes will be removed when running the Converter.
 "npc/003-4/_warps.txt",
+"npc/003-4/sorfina.txt",
diff --git a/npc/003-4/sorfina.txt b/npc/003-4/sorfina.txt
new file mode 100644
index 000000000..6ee621824
--- /dev/null
+++ b/npc/003-4/sorfina.txt
@@ -0,0 +1,42 @@
+// TMW2 Script.
+// Author:
+//    Saulc
+//    Jesusalva
+// Description:
+//    Sorfina is Hasan's mother.
+
+003-4,39,33,0	script	Sorfina	NPC_FEMALE,{
+    //if (getq(TulimsharQuest_Hasan) == 2) goto 
+    //if (getq(TulimsharQuest_Hasan) == 3) goto 
+    //if (getq(TulimsharQuest_Hasan) == 4) goto 
+    //if (getq(TulimsharQuest_Hasan) == 5) goto 
+    mesn;
+    mesq l("Hello, darling!");
+    close;
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+OnInit:
+    .@npcId = getnpcid(0, .name$);
+    setunitdata(.@npcId, UDT_HEADTOP, NPCEyes);
+    setunitdata(.@npcId, UDT_HEADMIDDLE, ValentineDress); //TODO
+    setunitdata(.@npcId, UDT_HEADBOTTOM, CottonTrousers);
+    setunitdata(.@npcId, UDT_WEAPON, DeepBlackBoots); // Boots
+    setunitdata(.@npcId, UDT_HAIRSTYLE, 16);
+    setunitdata(.@npcId, UDT_HAIRCOLOR, 4);
+
+    .sex = G_FEMALE;
+    .distance = 5;
+    end;
+}