Astapolos dialogue added.

1 files changed, 96 insertions, 41 deletions

diff --git a/npc/000-1/astapolos.txt b/npc/000-1/astapolos.txt
index b0894fb9..8df78396 100644
--- a/npc/000-1/astapolos.txt
+++ b/npc/000-1/astapolos.txt
@@ -1,44 +1,99 @@
 // Evol scripts.

 // Author:

-//    Reid

+//    Reid, Hal9000

 // Description:

 //    Sailor part of the Gugli's quest.

-//    Croconut box.
+//    Croconut box.

 

 000-1.gat,22,50,0,1	script	Astapolos	107;2,{

-
-    set @q, getq(ShipQuests_Astapolos);
-    if (@q == 1) goto l_CallFunc;
-
-// Some dialogues will be here.
-    setq ShipQuests_Astapolos, 1;
-    getitem "CroconutBox", 1;
-// And here too.
-
-l_CallFunc:
-    callfunc "SailorFood";
-
+

+    set @q, getq(ShipQuests_Astapolos);

+    if (@q == 1) goto l_CallFunc;

+

+    mesn;

+    mesq l("So finally someone has came to visit me?");

+    next;

+

+    menu

+        l("Actually I was here to work on my task?"), -;

+

+    mes "";

+    mesn;

+    mesq l("Oh, I see. That's right. Why should someone come here to see me?");

+    next;

+    mesq l("Do you think it is fair? They have sent me down here alone, far away from everyone.");

+    next;

+    

+    menu

+        l("I'm sorry for your situation. They should alternate you with another sailor sometime."), -,

+        l("Well if you are whyning like that all the time, then I think there is a reason behind their choice."), l_Whyning;

+

+    mes "";

+    mesn;

+    mesq l("Exactly. Even our task is ridicolous. Why should we collect food down here if we have plenty of those tasty and soft Rattos inside our ship, waiting just to be hunted and cooked?");

+    next;

+

+    menu

+        l("You... You eat Rattos? I think you are just a fool."), l_Whyning,

+        l("Oh... eating Rattos. Sounds ehm... Delicious, yes."), -;

+

+    mes "";

+    mesn;

+    mesq l("You like them, don't you? Just speak with Peter then. He is on the Second Deck of the ship. He will send you to downstairs where you will find our hairy meal!");

+    next;

+    mesq l("Oh, but you were not here to talk about that I guess.");

+    next;

+    

+

+    menu

+        l("No, indeed. I was here to help you with those boxes. Can I bring one of them back to Gugli?"), -;

+    

+    mes "";

+    mesn;

+    mesq l("Usually I don't allow anyone to touch my boxes but...");

+    next;

+    mesq l("You have been so nice with me. So, please, take one.");

+    next;

+    

+    setq ShipQuests_Astapolos, 1;

+    getitem "CroconutBox", 1;

+    

+    mes "";

+    mesn;

+    mesq l("Good luck! And don't forget to visit Peter and our little friends when you will be back onboard!");

+    close;

+

+

+l_Whyning:

+    mes "";

+    mesn;

+    mesq l("Then just leave me alone.");

+    close;

+

+l_CallFunc:

+    callfunc "SailorFood";

+

     menu  

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

-        l("How are things going?"), l_HowAreYou,
+        l("How are things going?"), l_HowAreYou,

         l("Who are you?"), l_Who;

 

     mes "";

     mesn;

-    mesq l("Who are you looking for?");
-    next;
-
-    menu
-        rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top,
-        rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom,
-        rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top,
-        rif(getq(ShipQuests_QMuller) == 0, l("QMuller.")), l_Bottom,
-        rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom,
-        l("Nobody."), -;
-
-    close;
-
-l_HowAreYou:
+    mesq l("Who are you looking for?");

+    next;

+

+    menu

+        rif(getq(ShipQuests_Ale) == 0, l("Ale.")), l_Top,

+        rif(getq(ShipQuests_Gulukan) == 0, l("Gulukan.")), l_Bottom,

+        rif(getq(ShipQuests_Jalad) == 0, l("Jalad.")), l_Top,

+        rif(getq(ShipQuests_QMuller) == 0, l("QMuller.")), l_Bottom,

+        rif(getq(ShipQuests_Tibbo) == 0, l("Tibbo.")), l_Bottom,

+        l("Nobody."), -;

+

+    close;

+

+l_HowAreYou:

 

     mes "";

     mesn;

@@ -50,7 +105,7 @@ l_HowAreYou:
     next;

     mesq l("I hope that answers your question.") + " " + l("Hehe!");

 

-    close;
+    close;

 

 l_Who:

     mes "";

@@ -62,21 +117,21 @@ l_Who:
     mesq l("And now I'm a sailor, as you can see!");

 

     close;

-
-l_Bottom:
+

+l_Bottom:

     mes "";

     mesn;

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

-
-    close;
-
-l_Top:
+

+    close;

+

+l_Top:

     mes "";

     mesn;

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

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

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

+

     close;

-
-}
+

+}