Update Ale and Jalad dialogues,

Add Muller and Tibbo dialogues.

4 files changed, 116 insertions, 7 deletions

diff --git a/npc/000-1/ale.txt b/npc/000-1/ale.txt
index f335d155..e4337780 100644
--- a/npc/000-1/ale.txt
+++ b/npc/000-1/ale.txt
@@ -8,7 +8,10 @@
 
     set @q, getq(ShipQuests_Ale);
     if (@q == 1) goto l_CallFunc;
+
+// Some dialogues will be here.
     setq ShipQuests_Ale, 1;
+// And here too.
 
 l_CallFunc:
     callfunc "SailorFood";
diff --git a/npc/000-1/jalad.txt b/npc/000-1/jalad.txt
index 75ee5587..fc39ca5c 100644
--- a/npc/000-1/jalad.txt
+++ b/npc/000-1/jalad.txt
@@ -2,13 +2,66 @@
 // Author:
 //    Reid
 // Description:
-//    .
+//    Sailor part of the Gugli's quest.
 
 000-1.gat,46,35,0,1	script	Jalad	110;2,{
 
-    mesn;
-    mesq l("Hello world!");
+    set @q, getq(ShipQuests_Jalad);
+    if (@q == 1) goto l_CallFunc;
 
+// Some dialogues will be here.
+    setq ShipQuests_Jalad, 1;
+// And here too.
+
+l_CallFunc:
+    callfunc "SailorFood";
+
+    menu

+        rif(getq(ShipQuests_Jalad) == 1, l("I'm still busy, I need to find the other sailors.")), -,

+        l("What's this fruit?"), OnAquada;

+

+    mes "";

+    mesn;

+    mesq l("Who are you searching?");
+    next;
+
+    menu
+        rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Ale,
+        rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Bottom,
+        rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom,
+        rif(getq(ShipQuests_QMuller) == 0, l("QMuller.")), l_Bottom,
+        rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom,
+        l("Nobody."), -;
+
+    close;
+
+l_Bottom:
+    mes "";

+    mesn;

+    mesq l("I've seen him on the bottom of the island, check around.");

+
+    close;
+
+l_Ale:
+    setcamnpc "Ale";
+
+    next;
+    mesn;

+    mesq l("Look, he's there!");
+    next;
+
+    restorecam;
     close;
 
+OnPlushroom:

+    mes "";

+    mesn;

+    mesq l("A @@? There're plenty on this island!", getitemlink("Plushroom"));

+    next;

+    mesq l("It's a kind of mushroom, we call it plush because of it's taste, a real marshmallow. It also got this name because of it's look, it got the appearance of a toy.");

+    next;

+    mesq l("There're some regrouping of these @@'s all around this island, just pick some and test it by yourself.", getitemlink("Plushroom"));

+

+    close;

+
 }
diff --git a/npc/000-1/muller.txt b/npc/000-1/muller.txt
index 9acbcaab..9ff67466 100644
--- a/npc/000-1/muller.txt
+++ b/npc/000-1/muller.txt
@@ -2,13 +2,63 @@
 // Author:
 //    Reid
 // Description:
-//    A random NPC searching for some food on the map.
+//    Sailor part of the Gugli's quest.
 
 000-1.gat,35,69,0,1	script	Q'Muller	104;2,{
 
-    mesn;
-    mesq l("I think I'm done. I have a box full of @@s!", getitemlink("CrocClaw"));
+    set @q, getq(ShipQuests_QMuller);
+    if (@q == 1) goto l_CallFunc;
+
+// Some dialogues will be here.
+    setq ShipQuests_QMuller, 1;
+// And here too.
+
+l_CallFunc:
+    callfunc "SailorFood";
+
+    menu

+        rif(getq(ShipQuests_QMuller) == 1, l("I'm still busy, I need to find the other sailors.")), -,

+        l("What's this fruit?"), OnAquada;

+

+    mes "";

+    mesn;

+    mesq l("Who are you searching?");
+    next;
+
+    menu
+        rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top,
+        rif(getq(ShipQuests_Astapolos) == 0, l("Astapolos.")), l_Top,
+        rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top,
+        rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom,
+        rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom,
+        l("Nobody."), -;
+
+    close;
+
+l_Bottom:
+    mes "";

+    mesn;

+    mesq l("I've seen him on the bottom of the island, check around.");

 
     close;
 
+l_Top:
+    mes "";

+    mesn;

+    mesq l("I've seen him on the top of the island.");

+    next;
+    mesq l("You should walk to the north.");
+    close;
+
+OnPlushroom:

+    mes "";

+    mesn;

+    mesq l("A @@? There're plenty on this island!", getitemlink("Plushroom"));

+    next;

+    mesq l("It's a kind of mushroom, we call it plush because of it's taste, a real marshmallow. It also got this name because of it's look, it got the appearance of a toy.");

+    next;

+    mesq l("There're some regrouping of these @@'s all around this island, just pick some and test it by yourself.", getitemlink("Plushroom"));

+

+    close;

+
 }
diff --git a/npc/000-1/tibbo.txt b/npc/000-1/tibbo.txt
index aed62ab6..9a51f6be 100644
--- a/npc/000-1/tibbo.txt
+++ b/npc/000-1/tibbo.txt
@@ -8,7 +8,10 @@
 
     set @q, getq(ShipQuests_Tibbo);
     if (@q == 1) goto l_CallFunc;
+
+// Some dialogues will be here.
     setq ShipQuests_Tibbo, 1;
+// And here too.
 
 l_CallFunc:
     callfunc "SailorFood";
@@ -35,7 +38,7 @@ l_CallFunc:
 l_Top:
     mes "";

     mesn;

-    mesq l("I've seen them on the top of the island.");

+    mesq l("I've seen him on the top of the island.");

     next;
     mesq l("You should walk to the north.");
     close;