Add different dialogues once the player has seen Nard on Gugli's script,

Clean nard and gugli scripts.

1 files changed, 201 insertions, 1 deletions

diff --git a/npc/000-2-3/nard.txt b/npc/000-2-3/nard.txt
index 7c6041cf..eb526187 100644
--- a/npc/000-2-3/nard.txt
+++ b/npc/000-2-3/nard.txt
@@ -33,7 +33,6 @@ l_Checker:
     if (@nard == 4) goto l_Already;
     if (@gugli == 2) goto l_Done;
     if (@nard == 1) goto l_NotYet;
-    //if (@nard == 2) goto l_Give;
 
     mesn;
     mesq l("Hello."); 
@@ -144,8 +143,209 @@ l_Done:
     setq ShipQuests_Nard, 2;
     next;
     goto l_ChefQuestRedir;
+
+l_ChefQuestStart:
+    mesn;
+    mesq l("Elmo told me you are now considered as one of us on the island. And I do appreciate efforts you did down there.");
+    next;
+
+l_ChefQuestRedir:
+    mesq l("Unfortunately we still need help from you. This time it will be a delicate task, here onboard.");
+    next;
+    mesq l("Elmo reported me about some frictions between my old and new lieutenants. You probably have already met Julia and Gado the Chef.");
+    next;
+    mesq l("They are both valid and I need them. Probably in the past I did some mistakes I now regret of. I was wondering if you could investigate and...sort out the situation.");
+    next;
+
+    menu
+        l("Who of the two has the right on his side?"), -;
+
+    mes "";
+    mesq l("I do not want to point my finger on someone. I just put my trust in you. I am sure you will be able to judge and solve this annoying problem.");
+
+    setq ShipQuests_Nard, 3;
+
+    close;
+
+l_ChefQuestGiven:
+    mesn;
+    mesq l("It seems you still have some work to do.");
+
+    close;
+
+l_ChefQuestComplete:
+    mesn;
+    mesq l("Congratulations!"); 
+    next;
+    mesq l("You are now officially part of my crew! Thanks again for your help.");
+    next;
+
+    setq ShipQuests_Nard, 4;
+    getitem "Bandana", 1;
+//  Need to add a skill for the crew at this line.
+
+    mesn "Narrator";
+    mes col(lg("This is it, the end of the Beta Release of Evol Online."), 9);
+    next;
+     mes col(lg("We hope that you like this introduction, and we also hope for you to come back in our future release!"), 9);
+    next;
+    mes col(lg("The adventure begins!"), 9);
+    close;
+
+l_Already:
+    mesn;
+    mesq l("Sorry, I don't need any help right now. Come back later.");
+
+    close;
+
+}
+// Evol scripts.
+// Author:
+//    Reid
+// Description:
+//    Captain Nard dialogs.
+//    Nard does the introduction with a small quest.
+//    This quest is meant to teach the player how to use a weapon,and to bring food to the ship.
+// 2 bits array:
+//    ShipQuests
+// Variable:
+//    0    ShipQuests_Nard
+//    1    ShipQuests_Gugli
+//    2    ShipQuests_ChefGado
+// Values: 
+//    00   Introduction of the box and Nard. This is displayed when the player never spoke to Nard or his box.
+//    01   Nard spoke and gave access to the outdoor of the ship.
+//    02   Completed the quest.
+//    03   Opened the chest and finished the introduction.
+//    10   Never talked with Gugli.
+//    11   Gugli gives you the task.
+//    12   Gave all of the box to Gugli.
+
+000-2-3.gat,25,26,0,1	script	Nard	306;5,{
+
+    set @nard, getq(ShipQuests_Nard);
+    set @gugli, getq(ShipQuests_Gugli);
+    set @gado, getq(ShipQuests_ChefGado);
+
+l_Checker:
+    if (@gado > 3 && @nard == 3) goto l_ChefQuestComplete;
+    if (@nard == 2) goto l_ChefQuestStart;
+    if (@nard == 3) goto l_ChefQuestGiven;
+    if (@nard == 4) goto l_Already;
+    if (@gugli == 2) goto l_Done;
+    if (@nard == 1) goto l_NotYet;
+    //if (@nard == 2) goto l_Give;
+
+    mesn;
+    mesq l("Hello."); 
+    next;
+    mesq l("Let me introduce myself, I am Nard, captain of this ship."); 
+    next;
+    mesq lg("It is nice to see that you woke up fine at the same time. Elmo came here to tell me this good news!");
+    next;
+
+    mesn "Elmo";
+    mesq l("Oh... Err, yes I did, or, well, good day to you!");
+    next;
+
+    mesn;
+    mesq l("Hehehe, he is a bit nervous, please forgive him, it is not everyday we have a new member in the crew!");
+    next;
+    mesq l("So, how do you feel? I see that Julia did a marvelous job! You look like you're in good health now.");
+    next;
+
+l_Menu:
+    menu
+        lg("I feel ok."), l_Ok,
+        l("Who's this Julia?"), l_Julia,
+        lg("I'm a bit sick..."), -;
+
+    mes "";
+    mesn;
+    mesq l("Oh, I was going to ask you if you wanted to help the crew search for some food and explore the island out there.");
+    next;
+
+l_MenuQuest:
+    menu
+        l("What do you need?"), -,
+        l("Is there a reward?"), l_NeedHead;
+
+    mes "";
+    mesn;
+    mesq l("Oh! I like that sort of answer!");
+    next;
+    mesq g(l("We need manpower on the island... Oh forgive me, women are also welcome, of course."),
+           l("We need manpower on the island.")); 
+    next;
+
+    goto l_NeedContent;
+
+l_NeedHead:
+    mes "";
+    mesn;
+
+l_NeedContent:
+    mesq l("Sure, there is a reward for your task."); 
+    next;
+    mesq l("Our crew is like a family, and if you agree to help us, I would like to invite you to join our family!"); 
+    next;
+    mesq l("What? It's not a good reward?"); 
+    next;
+    mesq l("Oh well. I'll also give you one of these hats from the box around you, but only after you complete your task!"); 
+    next;
+    mesq l("I give you this key, it opens any doors on this ship.");
+    next;
+    mesq l("Now go outside and talk with Gugli, he'll tell you what we need.");
+    next;
+
+    setq ShipQuests_Nard, 1;
+    getitem "JohanneKey", 1;
+
+    close;
+
+l_Ok:
+    mes "";
+    mesn;
+    mesq l("Good to know.");
+    next;
+    mesq l("We made a stop at a little island, before making it to the port of Artis.");
+    next;
+    mesq l("It would be good for you to do some exercise, the ship isn't big enough for that.");
+    next;
+
+    goto l_SpecialTask;
+
+l_Julia:
+    mes "";
+    mesn;
+    mesq l("You have an awful amnesia.");
+    next;
+    mesq l("She is the nurse and shipkeeper of this ship.");
+    next;
+    mesq lg("But most important, she is the one who took care of you when you were unconscious.");
+    next;
+
+l_SpecialTask:
+    mesq l("I know that you are just starting to feel better, but I'd like to give you a special task.");
+    next;
+
+    goto l_MenuQuest;
+
+l_NotYet:
+    mesn;
+    mesq l("You still haven't completed your task.");  
     close;
 
+l_Done:
+    mesn;
+    mesq l("Hi @@.", strcharinfo(0));
+    next;
+    mesq l("Elmo and Gugli reported me that you done all of the task outside, congrats!");
+
+    setq ShipQuests_Nard, 2;
+    next;
+    goto l_ChefQuestRedir;
+
 l_ChefQuestStart:
     mesn;
     mesq l("Elmo told me you are now considered as one of us on the island. And I do appreciate efforts you did down there.");