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
|
// Evol scripts.
// Authors:
// 4144
// Qwerty Dragon
// Reid
// Vasily_Makarov
// Description:
// Allows to change language.
001-2-21,27,24,0 script Julia#Artis NPC_JULIA,{
mesn;
mesq l("Hello dear!");
next;
mesq l("What do you want today?");
next;
.@s$ = l("I don't want to change my language, sorry.");
L_Menu:
.@enora = getq(ArtisQuests_Enora);
menu
rif(getskilllv(1) < 6, l("Something is wrong with me, I can't smile nor sit.")), L_BasicSkill,
rif(.@enora == 0, l("Where should I go?")), L_Enora,
l("I made a mistake, I would like to change my language."), L_ChooseLang,
l("Is it possible to go back to Drasil Island?"), L_Island,
l("Could you explain to me where I am?"), L_WhereIam,
l("What happened to me?"), L_What,
l("Can I read the rules again?"), L_Rules,
l("Nothing, sorry."), L_Quit;
L_YNMenu:
menu
l("Yes, I do."), L_Menu,
l("No, none."), L_Quit;
L_NoChanges:
mes "";
mesn;
mesq l("No problem, do you have any other questions for me?");
next;
goto L_YNMenu;
L_ChooseLang:
mes "";
mesn;
mesq l("Of course! Tell me which language you speak and I will change the note on the ship board list.");
next;
asklanguage(LANG_IN_SHIP);
mes "";
mesn;
mesq l("Ok, done.");
next;
mesq l("Do you have any other questions for me?");
next;
goto L_Menu;
L_WhereIam:
mes "";
mesn;
mesq l("You're on La Johanne, a merchant ship.");
next;
mesq l("We arrived this morning at the port of Artis, I already warned the Legion of Aemil concerning your issue.");
next;
mesq l("Somebody is waiting for you outside!");
next;
mesq l("Like the rest of the crew, you are welcome to come and rest here at anytime during your journey on Artis.");
next;
mesq l("Do you have any other questions for me?");
next;
goto L_YNMenu;
L_What:
mes "";
mesn;
mesq l("We thought that you could help us understand this, all we know is that we found you cast in the sea, adrift on your raft.");
next;
mesq l("You were in bad shape, you should be happy we found you before the sea killed you.");
next;
mesq l("Oh, and there was this inscription on your raft. It represents the Legion of Aemil, the largest and biggest guild of the whole new world. Does that make you remember anything, anything at all?");
next;
select
l("Sorry, but I can't tell you anything about that."),
l("Nothing, sorry.");
goto L_NoChanges;
L_Rules:
mes "";
mesn;
mesq l("Of course, they are on the left wall. Go have a look at them.");
next;
mesq l("Do you have any other questions for me?");
next;
goto L_YNMenu;
L_BasicSkill:
mes "";
mesn;
mesq l("Let me check into it...");
next;
adddefaultskills;
mesq l("Here you go, everything is fixed.");
emotion E_HAPPY;
next;
mesq l("Do you have any other questions for me?");
next;
goto L_YNMenu;
L_Enora:
speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
l("Enora, from the Legion of Aemil, has been warned that you were aboard."),
l("She is waiting for you on the dock."),
l("Do you have any other questions for me?");
goto L_YNMenu;
L_Quit:
goodbye;
L_Island:
speech S_FIRST_BLANK_LINE | S_LAST_NEXT,
l("Of course, as a fully-fledged crew member you can decide of the destination of La Johanne directly with Nard.");
l("Do you have any other questions for me?");
emotion E_HAPPY;
goto L_YNMenu;
OnInit:
.distance = 10;
end;
}
|
