From d31a3cd3de6987900b4e6b2a7153e12d612cc64d Mon Sep 17 00:00:00 2001
From: Reid <reidyaro@gmail.com>
Date: Tue, 4 Sep 2012 02:55:12 +0200
Subject: Correct some few dialogues problem on darlin script, Add barrier
 check at entrance of the ship to start Darlin quest.

---
 npc/000-1/darlin.txt | 27 ++++++++++++++++++++++-----
 1 file changed, 22 insertions(+), 5 deletions(-)

diff --git a/npc/000-1/darlin.txt b/npc/000-1/darlin.txt
index 3d5bcfe5..93b2dea9 100644
--- a/npc/000-1/darlin.txt
+++ b/npc/000-1/darlin.txt
@@ -13,11 +13,12 @@
 
 000-1.gat,89,89,0,1	script	Darlin	103;14,{
 
+
     mesn;
-    set @q, getq(ShipQuests_Darlin);
-    if (@q == 2) goto l_QuestGiven;
+    set @q, getq(ShipQuests_Darlin);
+    if (@q == 1 || @q == 2) goto OnQuestGiven;
     if (@q > 2) goto l_QuestDone;
-
+OnStart:
     mesq l("HEY! HEY YOU!"); 
     next;
     mesq l("CAN YOU HEAR ME?");
@@ -86,7 +87,7 @@ l_Menu:
     mesn;
     mesq l("OH, LOOK THERE!");
     next;
-    mesq l("HE IS AT THE FAR BOTTOM OF THE SHIP, YOU CAN'T MISS HIM!!");
+    mesq l("HE IS AT THE BOTTOM OF THE SHIP, DOWN THE STAIRWAY AND YOU COULDN'T MISS HIM!!");
     restorecam;
 
     close;
@@ -135,7 +136,7 @@ l_Bye:
 l_Quit:
     close;
 
-l_QuestGiven:
+OnQuestGiven:
     mesq l("HEY") + " " + strcharinfo(0) + "!"; 
     next;
     mesq l("DID YOU FIND OUT WHAT THE LIGHT WAS?");
@@ -183,3 +184,19 @@ l_QuestDone:
     goto l_Menu;
 
 }
+
+000-1.gat,92,100,0,1	script	DarlinBarrierCheck	0,0,2,{
+    set @q, getq(ShipQuests_Darlin);
+    if (@q == 0) goto l_First;
+    if (@q == 2) goto l_Last;
+    close;
+
+l_First:
+    doevent "Darlin::OnStart";
+    close;
+
+l_Last:
+    doevent "Darlin::OnQuestGiven";
+    close;
+
+}
\ No newline at end of file
-- 
cgit v1.2.3-70-g09d2