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
|
048-2,117,106,0 script Pyry NPC365,{
@slimes = ((QUEST_BlueSage & $@Q_BlueSageSlimes_MASK) >> $@Q_BlueSageSlimes_SHIFT);
if (@slimes == 255) goto L_Thank;
if (@slimes > 0) goto L_Progress;
mes "[Pyry]";
mes "\"Welcome to the library of Sage Nikolai. I'm very sorry, but as you see it's not in a good shape at the moment. Most of the books were eaten by the slimes or damaged and we're working hard on cleaning up the mess.";
mes "I have to ask you not to go in the deeper parts of the library, since there are still some of the slimes left and they're dangerous.\"";
if (BaseLevel < $@Q_BlueSageMinimumLevel)
goto L_close;
menu
"I can fight them.",L_Next,
"Ok, thanks for the warning.",L_Investigate;
L_Next:
mes "Pyry seems surprised.";
mes "[Pyry]";
mes "\"That... I didn't think about this possibility. But it'd be a great help!";
mes "Ok, there are some slimes around in the deeper parts of the library. They... erm, developed some very fast breeding behaviour, both the Blue Slimes and the White Slimes, but in a slightly different fashion.\"";
next;
mes "\"The Blue ones are able to generate smaller slimes which show a self-destructive behaviour to protect their... parent slime if you want to call it that. You have to kill the big one, but be careful of the smaller ones while trying that.\"";
next;
mes "\"The White Slimes appear in groups and when you attack one of them, they also show some self-destructive behaviour to protect their group as a whole. You have to defeat the entire group, otherwise the remaining slimes will breed new slimes to replace their lost.\"";
QUEST_BlueSage = QUEST_BlueSage | $@Q_BlueSageSlimesStart;
goto L_Investigate;
L_Progress:
mes "[Pyry]";
mes "\"It's very brave of you to fight against those slimes deeper in the library. Remember that you have to kill the entire group to prevent them from breeding.\"";
callfunc "blueSageNumberOfClearedNests";
if (@slimenests > 5) goto L_Almost;
if (@slimenests > 3) goto L_Some;
if (@slimenests > 1) goto L_Few;
goto L_Investigate;
L_Almost:
next;
mes "\"I think there are only very few left.\"";
goto L_Investigate;
L_Some:
next;
mes "\"The amount of slimes decreased noticably, but there are still some left.\"";
goto L_Investigate;
L_Few:
next;
mes "\"I saw you already started, keep it on!\"";
goto L_Investigate;
L_Thank:
mes "[Pyry]";
mes "\"It seems all of the slimes are gone now. I'm so glad! Thanks for your help. I mentioned your assistance to Nikolai.\"";
goto L_Investigate;
L_Investigate:
if ((QL_BSAGE_INVESTIGATE == 3) || (QL_BSAGE_INVESTIGATE == 4)) goto L_Ask_Visitor;
if ((QL_BSAGE_INVESTIGATE == 5) || (QL_BSAGE_INVESTIGATE == 8)) goto L_Ask_Helper;
if ((QL_BSAGE_INVESTIGATE == 6) || (QL_BSAGE_INVESTIGATE == 7) || (QL_BSAGE_INVESTIGATE == 9) || (QL_BSAGE_INVESTIGATE == 10)) goto L_Ask_Both;
goto L_close;
L_Ask_Visitor:
menu
"Can you tell me anything about the visitor with the mask?",L_Visitor,
"I need to leave.",L_close;
L_Ask_Helper:
menu
"What's your opinion of Peetu and how he does his work?",L_Helper,
"See you later.",L_close;
L_Ask_Both:
menu
"Can you tell me anything about the visitor with the mask?",L_Visitor,
"What's your opinion of Peetu and how he does his work?",L_Helper,
"Bye.",L_close;
L_Visitor:
mes "[Pyry]";
mes "\"Mh, yes. I remember him. He was very interested in the library and the research we do here. He had an unusual behaviour and appearance. But, well, that isn't a reason to refuse someone, right?\"";
goto L_close;
L_Helper:
mes "[Pyry]";
mes "\"Peetu? I have always been glad to have him on the team. He's really brought forward our work here.\"";
next;
mes "\"I was very surprised when I heard that he's responsible for the failed sealing spell. I'd never have expected that from him.\"";
if ((QL_BSAGE_INVESTIGATE != 5) && (QL_BSAGE_INVESTIGATE != 6) && (QL_BSAGE_INVESTIGATE != 7))
goto L_close;
QL_BSAGE_INVESTIGATE = QL_BSAGE_INVESTIGATE + 3;
goto L_close;
L_close:
@slimes = 0;
close;
}
|
