summaryrefslogtreecommitdiff
path: root/npc/000-2-3/nard.txt
blob: 047b182d387bb695347c43cc8dcb782eaf93c78b (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
// Evol scripts.
// Authors:
//    Reid
// Description:
//    Cap'tain Nard dialogs.
//    Nard will done the introduction by a little quest,
//    This quest is meant to learn at the player how to manipulate a weapon, but also to bring some foods to the ship.
// 2 bits array:
//    ShipQuests
// Variable:
//    ShipQuests_NardBox
// Values: 
//    0   Intro of the box and of Nard, it's displayed when the player never spoke to Nard, nor his box.
//    1   Nard spoke and he gave you access to the outdoor of the ship.
//    2   You complete the quest.
//    3   You open the chest, you complete the introduction.

000-2-3.gat,25,26,0,1	script	Nard	306,{

    set @q, geta2(ShipQuests, ShipQuests_Nardbox);

l_Checker:
    if (@q == 1) goto l_NotYet;
    if (@q == 2) goto l_Give;
    if (@q > 2) goto l_Already;

    mesn;
    mesq l("Hello."); 
    next;
    mesq l("Let me present myself, I'm the Captain Nard, the leader of this ship."); 
    next;
    mesq lg("It's nice to see that you woke up and that you are ok, 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 excuse him, it's not everyday that we get 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 is this Julia?"), l_Julia,
        lg("I'm a bit sick."), -;


    mes "";
    mesn;
    mesq l("Oh, I was going to ask you if you want 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("I like this answer!");
    next;
    mesq g(l("We are in need of manpower on the island... Oh excuse me, women are also welcome!"), l("We are in need of manpower on the island.")); 
    next;

    goto l_NeedContent;

l_NeedHead:
    mes "";
    mesn;

l_NeedContent:
    mesq l("Of course, 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 will aslo give you one of these hats from the box around you, but only after you complete your task!"); 
    next;
    mesq l("Go outside and talk with Gugli, he will tell you what we need.");
    next;

    seta2 ShipQuests, ShipQuests_Nardbox, 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'll be a good time for you to get some exercise, as the ship is not an appropriate size for that.");
    next;

    goto l_SpecialTask;

l_Julia:
    mes "";
    mesn;
    mesq l("You have very bad amnesia.");
    next;
    mesq l("She is the nurse and the shipkeeper of this ship, and also an excellent chef!");
    next;
    mesq l("But more than anything, she is the one who took care of you when you were in coma.");
    next;

l_SpecialTask:
    mesq l("I know that you just came back from being sick, but I would like to ask of you a special task.");
    next;

    goto l_MenuQuest;

l_NotYet:
    mesn;
    mesq l("You still haven't completed your task.");
    next;
    mesq l("And please don't touch these hats, they are for crew members only.");      
    close;

l_Give:
    mesn;
    mesq l("Congrats!"); 
    next;
    mesq l("You are now part of the crew! Thanks again for your help.");

    seta2 ShipQuests, ShipQuests_Nardbox, 3;
    getitem "Bandana", 1;
//  Need to add a skill for the crew at this line.

    close;

l_Already:
    mesn;
    mesq l("I don't need any help right now, come back later."); 
    close;

}