From 5b2d6c7647512fd3fa8d55487a82347de0bfd134 Mon Sep 17 00:00:00 2001
From: jesusalva <cpntb1@ymail.com>
Date: Sun, 4 Mar 2018 00:20:48 -0300
Subject: Add mobs to instanced maps + misc fixes

---
 npc/002-1/dan.txt | 101 +++++++++++-------------------------------------------
 1 file changed, 20 insertions(+), 81 deletions(-)

(limited to 'npc/002-1/dan.txt')

diff --git a/npc/002-1/dan.txt b/npc/002-1/dan.txt
index bc2191c16..bc5a5c76e 100644
--- a/npc/002-1/dan.txt
+++ b/npc/002-1/dan.txt
@@ -1,94 +1,33 @@
-// Evol scripts.
+// TMW-2 Script
 // Authors:
-//    Qwerty Dragon
-//    Reid
+//    Qwerty Dragon and Reid (originals)
+//    Jesusalva
 // Description:
-//    There are two kinds of dialogues in this script.
-//    Dan will randomly choose between a useless sentence, and a quest in Artis.
-
-002-1,32,31,0	script	Dan#002-1	NPC_DEMON_MAN,{
-    if (getq(General_Narrator) > 0)
-    {
-        sailortalk;
-        close;
-    }
+//    Dan is a sailor from Nard ship (TODO another Redy? Seriously?) who is afraid
+//    of Pious.
+// Variables:
+//    ShipQuests_Dan
 
+002-1,32,31,0	script	Dan#002-1	NPC_REDY_MAN,{
+    .@q=getq(ShipQuests_Dan);
     mesn;
-    .@q = rand(3);
-    if (.@q == 0) goto L_QuestStory;
-
     mesq l("You see these pious around us?");
     next;
     mesq l("It seems that we are close to an island, we should take a look at the upper level.");
-
-    close;
-
-L_QuestStory:
-    mesq l("It's so hard to find the motivation...");
-    next;
-
-    menu
-        l("Why?"), -,
-        l("I guess so... I will leave you alone."), L_Quit;
-
-    mes "";
-    mesn;
-    mesq l("Oh, it's you.");
-    next;
-    mesq lg("So, you finally woke up? We all thought you were in something like... You know, one of these long comas.");
-    next;
-
-    menu
-        l("I'm still in a coma, but my ghost is haunting you!"), L_Quit,
-        l("It was something like a long nap."), -;
-
-    mes "";
-    mesn;
-    mesq l("It's good, good... I have a friend who is still in a coma, but I can't be with her without working...");
-    next;
-    mesq l("The fear to see her sleeping on this quiet and lonely bed is becoming more and more unbearable, I think that I won't get the bravery to see her this time...");
-    next;
-
-    menu
-        l("Who is she?"), L_She,
-        l("Do you want me to go see her instead of you?"), L_Quest;
-        l("I don't know what to say..."), -;
-
-    mes "";
-    mesn;
-    mesq lg("There's nothing to say, don't worry miss.", "There's nothing to say, don't worry sir.");
-
-    close;
-
-L_She:
-    mes "";
-    mesn;
-    mesq l("She is a good friend of mine... We wanted to marry a few weeks before her accident but...");
-    next;
-
-    goto L_Quit2;
-
-L_Quest:
-    mes "";
-    mesn;
-    mesq l("I don't think that we are in a good place to talk about this...");
-    next;
-
-L_Quit:
-    mes "";
-    mesn "Narrator";
-    mes col(l("Dan keeps silent since your last question."), 9);
-
-    close;
-
-L_Quit2:
-    mesn "Narrator";
-    mes col(l("Dan ends the conversation and resumes to write his letter."), 9);
-
     close;
 
 OnInit:
     .sex = G_MALE;
-    .distance = 2;
+    .distance = 5;
     end;
+
+OnRespawnPiou:
+    areamonster(instance_mapname("002-1"), 52, 32, 73, 41, "Piou", 1002, 1, instance_npcname("Dan#002-1")+"::OnRespawnPiou");
+    end;
+
+OnInstanceInit:
+    //instance_set_respawn instance_mapname("002-1"), 52, 32;
+    areamonster(instance_mapname("002-1"), 52, 32, 73, 41, "Piou", 1002, 3, instance_npcname("Dan#002-1")+"::OnRespawnPiou");
+    end;
+
 }
-- 
cgit v1.2.3-60-g2f50