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
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
|
033-1.gat,66,28,0|script|Yerrnk|216
{
set @state, ((QUEST_Barbarians & $@Q_Barbarians_MASK) >> $@Q_Barbarians_SHIFT);
set @yeti_level, 70;
if (@state == 9) goto L_Done;
if (@state == 8) goto L_Yeti_Success;
if (@state == 7) goto L_Hunt_Yeti;
if (@state == 6) goto L_Warrior;
if (@state == 5) goto L_Birrod;
if (@state == 4) goto L_Sorrow;
if (@state == 3) goto L_Duty;
if (@state == 2) goto L_Kimarr;
if (@state == 1) goto L_Fluffy;
mes "[Barbarian]";
mes "\"Hello. I'm Yerrnk, first warrior of the Mangarr.\"";
next;
mes "Yerrnk looks at you cautiously.";
mes "[Yerrnk]";
mes "\"Please take care of your own business.\"";
goto L_Close;
L_Fluffy:
mes "[Yerrnk]";
mes "\"Kimarr talks too much sometimes.\"";
mes "He sighs.";
next;
mes "[Yerrnk]";
mes "\"Are you going to accept Kimarr's task? It's an ancient ceremony in our tribe. A young member is accepted as an adult after completing it.\"";
goto L_Close;
L_Kimarr:
mes "[Yerrnk]";
mes "\"I think Kimarr wants to give you something.\"";
goto L_Close;
L_Duty:
mes "[Yerrnk]";
mes "\"I'm not sure if you are aware about the meaning of your actions.\"";
next;
mes "\"You passed the initiation rite for hunters of our tribe. That means now you are a hunter of our tribe, with all the rights and duties that come along with that.\"";
next;
mes "\"So you'll have to obey our laws and traditions, protect and help any member of our tribe that is in need, and show neither weakness nor fear in battle.\"";
next;
mes "\"Keep this in mind. If you fail you'll have to receive the elders' judgement.\"";
goto L_Close;
L_Sorrow:
mes "[Yerrnk]";
mes "\"I noticed that you're getting along with Kimarr and Birrod very well. That's good.\"";
mes "He smiles, but then an expression of worry returns to his face.";
next;
goto L_Mission;
L_Mission:
mes "[Yerrnk]";
mes "\"Our tribe is going through dire times. We have lived in harmony with the mountain since time beyond memory.";
mes "Life is hard in the snowy mountains, but this life suits our nature.\"";
next;
mes "\"Some weeks ago the Yetis started to act very strangely. Usually they are very shy, but now....";
mes "They left the secluded areas high up in the mountains they used to live on and started roaming our hunting grounds.\"";
next;
mes "\"It became very dangerous to leave the village, so it's even harder to gather enough food to survive.";
mes "Not only this, but the Yetis are getting more daring every day. They might attack the village itself sooner or later.\"";
next;
mes "\"Other wild animals are more aggressive as well, though the Yetis are the most dangerous.";
mes "Something like this has never happened before. We have no idea what could cause the animals to behave like this.\"";
next;
mes "\"That's why we were sent on a mission to seek help from the Sages of Kaizei.";
mes "The Sages are wizards of great power and wisdom, and we hope they might be able to give us advice.\"";
next;
mes "\"We already went to Sage Nikolai, who's residence is located in the same snow mountains we live in.";
mes "But there happened some severe accident, so they weren't able to spent any attention to our problem and might rather need help themselves.\"";
next;
mes "\"That's why we came down here to search for Santa, he's one of the most powerful of the Sages.\"";
goto L_Close;
L_Birrod:
mes "[Yerrnk]";
mes "\"" + strcharinfo(0) + ", I have to admit that I'm surprised by your skills.";
mes "You've proven your bravery and strength.\"";
next;
if (getskilllv(SKILL_POOL) == 0)
goto L_Not_Ready;
mes "\"Please talk to Birrod to receive the initiation rite to become a warrior of the Mangarr.\"";
menu
"Alright.",L_Close,
"Can you tell me again what you are here for?",L_Mission;
L_Not_Ready:
mes "[Yerrnk]";
mes "\"But you're not yet ready to become a fully accepted warrior of our tribe.";
mes "You should travel the world to gain the ability to focus on your inner strength.\"";
menu
"Alright.",L_Close,
"What are you doing down here?",L_Mission;
L_Warrior:
mes "[Yerrnk]";
mes "\"" + strcharinfo(0) + ", welcome back!";
mes "Do you have any question?\"";
menu
"Everything's all right, thanks.",L_Close,
"What are you doing down here?",L_Mission,
"Can you explain the Raging ability to me?",L_Skill,
"Do you have a task for me?",L_Task;
L_Skill:
mes "[Yerrnk]";
mes "\"As a warrior of our tribe it should be the most important thing to you to defend weaker members of the tribe.";
mes "To achieve this goal our warriors are training the skill to stand the pain of being hit and even use it to get into a state of rage.\"";
next;
mes "\"It works only in a melee fight, when you hear your opponent gasping, smell his sweat, and feel the heat of his body.\"";
next;
mes "Yerrnk gets excited, then he pauses a moment to calm down.";
mes "\"Basically you neglect of your own defense but gain the ability to hit your enemy with outstanding might.\"";
next;
mes "[Yerrnk]";
mes "\"You can imagine that this creates some danger. That's why we usually fight as a group, so a weakened warrior can step back and recover while the others continue to fight.";
mes "It's also beneficial to have a healer, but very few members of our tribe are born with the ability to wield magic.\"";
goto L_Close;
L_Task:
if (BaseLevel >= @yeti_level)
goto L_Yeti;
mes "[Yerrnk]";
mes "\"Not at the moment.";
mes "Try to stop by later and use the time to practice your abilities.\"";
goto L_Close;
L_Yeti:
mes "[Yerrnk]";
mes "\"Indeed, there's something to do that needs a competent warrior.";
mes "We've got reports about a single Yeti prowling around one of the houses in the woods west of here.\"";
next;
mes "\"If you dare to take on this task, seek that Yeti and make the area secure again.";
mes "To find the house, enter the forest and then go first south and then west.\"";
set @state, 7;
callsub S_Update_Mask;
goto L_Close;
L_Hunt_Yeti:
mes "[Yerrnk]";
mes "\"That Yeti is still roaming in the forest west of here.";
mes "To find the house it's prowling around, enter the forest and then go first south and then west.\"";
menu
"I'm on it.",L_Close,
"What are you doing down here?",L_Mission,
"Can you explain the Raging ability to me?",L_Skill;
L_Yeti_Success:
mes "[Yerrnk]";
mes "\"" + strcharinfo(0) + "! You made it!";
mes "You proved that you're one of the most skilled warriors of our tribe. Please have this.\"";
getitem "LeatherTrousers", 1;
set @state, 9;
callsub S_Update_Mask;
goto L_Close;
L_Done:
mes "Yerrnk smiles at you.";
mes "[Yerrnk]";
mes "\"Welcome back, great warrior.\"";
menu
"What's the reason you came here?",L_Mission,
"Can you explain the raging ability to me?",L_Skill,
"(Leave)",L_Close;
L_Close:
set @state, 0;
set @yeti_level, 0;
close;
S_Update_Mask:
set QUEST_Barbarians,
(QUEST_Barbarians & ~($@Q_Barbarians_MASK))
| (@state << $@Q_Barbarians_SHIFT);
return;
}
|
