Add Couwan quest on const and questvars DBs,

Update Ale script,
Update Billybonx and Arpan script,
Add quest and dialogues on Couwan script,
Add dialogues and couwan's quest on Gugli script.

7 files changed, 99 insertions, 10 deletions

diff --git a/db/const.txt b/db/const.txt
index ac293803..bec285c1 100644
--- a/db/const.txt
+++ b/db/const.txt
@@ -210,3 +210,4 @@ ShipQuests_ArpanMoney	6
 ShipQuests_Door	7
 ShipQuests_TreasureChest	8
 ShipQuests_Darlin	9
+ShipQuests_Couwan	10
diff --git a/db/questvars.txt b/db/questvars.txt
index b4e5c4eb..014bd988 100644
--- a/db/questvars.txt
+++ b/db/questvars.txt
@@ -17,3 +17,4 @@ ShipQuests,1,2048   // ShipQuests_ArpanMoney       6
 ShipQuests,1,4096   // ShipQuests_Door             7
 ShipQuests,1,8192   // ShipQuests_TreasureChest    8
 ShipQuests,1,65536  // ShipQuests_Darlin           9
+ShipQuests,1,131072  // ShipQuests_Couwan           10
diff --git a/npc/000-1/ale.txt b/npc/000-1/ale.txt
index 60c58868..052f233d 100644
--- a/npc/000-1/ale.txt
+++ b/npc/000-1/ale.txt
@@ -7,7 +7,8 @@
 000-1.gat,55,23,0,1	script	Ale	105;2,{
 
     mesn;
-    mesq l("Hello world!");
+    mesq g(l("Good day, sir."),
+           l("Good day, lady."));
 
     close;
 
diff --git a/npc/000-1/couwan.txt b/npc/000-1/couwan.txt
index 68504240..99ad6137 100644
--- a/npc/000-1/couwan.txt
+++ b/npc/000-1/couwan.txt
@@ -2,12 +2,76 @@
 // Author:
 //    Reid
 // Description:
-//    .
+//    Couwan is trying to scam the player.
 
 000-1.gat,89,36,0,1	script	Couwan	111;2,{
 
+    set @q, getq(ShipQuests_Couwan);

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

+    if (@q > 1) goto l_QuestDone;
+
+
+    mesn;
+    mesq lg("Hello yeye");
+    next;
+    mesq l("Look, how splendid is this landscape.");
+    next;
+
+    menu
+        l("Yep, nice view."), -,
+        l("I don't see anything else than, water?"), l_Water;
+
+    mes "";
+    mesn;
+    mesq lg("Yeye got good eyes and seems to be fully recovered from his hurts, so yeye can take my box of fish to Gugli?");
+    next;
+
+    menu
+        l("What do I obtain in exchange?"), -,
+        l("I'm sorry, I got no time right now."), l_Decline;
+
+    mes "";
+    mesn;
+    mesq lg("Yeye ask too much but do too less, take this box and don't talk too much.");
+    next;
+
+    mesn "Narrator";
+    mes col(lg("Couwan hands you a box full of fish."), 9);
+    next;
+    mes col(l("The sailor is turning his back to you."), 9);
+
+    setq ShipQuests_Couwan, 1;
+    close;
+
+l_Water:
+    mes "";
+    mesn;
+    mesq l("Yeye's brain is probably still full of sea water, if yeye can't see the beauty in this place.");
+    next;
+    mesq l("Stupid yeye...");
+    
+    close;
+
+l_Decline:
+    mes "";
+    mesn;
+    mesq l("Stupid yeye...");
+
+    close;
+
+l_QuestGiven:
+    mesn;
+    mesq l("What are you looking?");
+    next;
+    mesq l("Yeye still got my box? Look less and work much, go give it to Gugli.");
+
+    close;
+
+l_QuestDone:
     mesn;
-    mesq l("Hello world!");
+    mesq l("What are you looking?");
+    next;
+    mesq l("Yeye gave my box to Gugli? Nice, nice yeye.");
 
     close;
 
diff --git a/npc/000-1/gugli.txt b/npc/000-1/gugli.txt
index 60bab59f..61d100ad 100644
--- a/npc/000-1/gugli.txt
+++ b/npc/000-1/gugli.txt
@@ -8,9 +8,31 @@
 000-1.gat,85,108,0,1	script	Gugli	313;2,{
 
     mesn;
-    mesq l("Ciao!");
+    mesq l("Nice to see you! What can I do for you today?");
     next;
 
+    menu
+        rif(getq(ShipQuests_Couwan) == 1, l("Couwan gaves me this box, for you.")), l_Couwan,
+        l("Nothing."), -;
+
+    close;
+
+l_Couwan:
+    mes "";
+    mesn;
+    mesq l("What? This tritan is the worse shirker that I ever saw.");
+    next;
+    mesq l("Well, thank you for getting me back this box. But, he needed to bring it back by himself, I never asked him to give it to you.");
+    next;
+    mesq l("Take these coins in exchange of this extra charge, and be prudent in future.");
+    next;
+    mesq l("Not everybody got a kind mind, and some scammers can be anywhere, even among us.");
+    next;
+    mesq l("Take this as a lesson.");
+
+    setq ShipQuests_Couwan, 2;
+    set zeny, zeny+50;
+    message strcharinfo(0), l("You receive 50GP!");
     close;
 
 }
\ No newline at end of file
diff --git a/npc/000-2-0/billybons.txt b/npc/000-2-0/billybons.txt
index 9b152d8e..4cd7e671 100644
--- a/npc/000-2-0/billybons.txt
+++ b/npc/000-2-0/billybons.txt
@@ -82,7 +82,9 @@ l_Quit:
     next;
     mesq l("I'm not that numb eeh *hick* what did ever you disco*hips*veeered there, the warrior guild won't get me!");
     next;
-    mesq l("The sailor is turning his back to you.");
+
+    mesn "Narrator";
+    mes col(l("The sailor is turning his back to you."), 9);
 
     close;
 
diff --git a/npc/000-2-1/arpan.txt b/npc/000-2-1/arpan.txt
index d8007122..a2827260 100644
--- a/npc/000-2-1/arpan.txt
+++ b/npc/000-2-1/arpan.txt
@@ -178,13 +178,11 @@ l_WhereOldClothes:
     mesq lg("We tried to clean them but the sea water mostly destroyed them. It's why we gave you these clothes. They're not very nice, but that's all that we have for you.");
     next;
     mes lg("Oh, now that I remember, we've also found some money in your pockets, here it is!");
-    setq ShipQuests_ArpanMoney, 1;
-    set zeny, zeny+25;
     next;
 
-    mesn "Narrator";
-    mes col(l("You receive 25GP!"), 9);
-    next;
+    setq ShipQuests_ArpanMoney, 1;
+    set zeny, zeny+25;
+    message strcharinfo(0), l("You receive 25GP!");
 
     goto l_BeforeMenu;