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
|
031-1,81,24,0 script Debug#Angela NPC195,{
mes "Current state: " + getq(KaizeiQuest_Cindy);
mes "---";
mes "Available states:";
mes "0 - can not do the quest or does not have the quest.";
mes "1 - got the quest.";
mes "2 - can go rescue cindy.";
mes "3 - rescued cindy.";
mes "4 - got reward from cindy.";
mes "5 - got reward from angela.";
menu
"set state", L_Set,
"close", -;
close;
L_Set:
input .@state, 0, 6;
setq(KaizeiQuest_Cindy, .@state);
close;
OnInit:
if (!debug) disablenpc strnpcinfo(0);
end;
}
031-1,79,24,0 script Angela NPC195,{
.@q = getq(KaizeiQuest_Cindy);
if (.@q == 4) goto L_Please_Visit_Again;
if (.@q > 2 && .@q < 6) goto L_Please_Visit;
if (.@q == 2) goto L_Please_Help;
mes "[Angela]";
mes "\"Please, I need help! My little daughter!\"";
next;
mes "\"It's terrible, oh my dear child!\"";
next;
if (countitem("ConcentrationPotion") > 0 && BaseLevel >= .minLevel && .@q == 1)
goto L_Menu_Potion;
menu
"\"Please calm down and tell me what happened.\"", L_Whining,
"Leave", L_close;
L_Whining:
mes "[Angela]";
mes "\"My poor little daughter, please! Oh no, oh no...\"";
next;
mes "\"We need to do something! My poor little Cindy! My cute little girl!\"";
next;
mes "\"It's so terrible, how could that happen? Please, I need help, it's so terrible.\"";
next;
mes "\"Those awful filthy monsters - terrible!\"";
next;
mes "\"Oh Cindy, my little Cindy - oh no...\"";
next;
mes "\"Please help, we need to do something!\"";
next;
mes "\"It's so terrible, my poor cute little Cindy...\"";
next;
mes "\"Oh, when I think what might happen to her right now!\"";
next;
mes "She is crying and sobbing.";
next;
mes "It seems she is too upset to tell you anything helpful. If she would just calm down and concentrate a bit...";
if(BaseLevel >= .minLevel) goto L_GetQuest;
goto L_close;
L_GetQuest:
next;
setq(KaizeiQuest_Cindy, 1);
mes "Perhaps you could give her something to help concentrate?";
goto L_close;
L_Menu_Potion:
menu
"\"Please calm down and tell me what happened.\"", L_Whining,
"Give her a concentration potion.", L_Calm_Down,
"Leave", L_close;
L_Calm_Down:
if (countitem(ConcentrationPotion) == 0)
goto L_No_Potion;
delitem ConcentrationPotion, 1;
mes "She drinks the concentration potions and calms down.";
mes "[Angela]";
mes "\"Thank you, this was helpful.\"";
next;
mes "\"My daughter Cindy and I were on our way to Santa, to bring him some presents. Many people here in Nivalis are helping Santa with his business.\"";
next;
mes "\"When we passed the entrance of this cave, a pack of Yetis came out of there. It's disturbing, because usually they are very shy.\"";
next;
mes "\"We tried to run away, but there were too many of them. They took my poor little Cindy and all the presents with them.\"";
next;
mes "\"Oh my poor little girl. I'm so worried - what might they do with her? Oh no!\"";
next;
mes "\"You look like an adventurer! Please, can you go in that cave and rescue my little Cindy? I beg you for help!\"";
setq(KaizeiQuest_Cindy, 2);
goto L_close;
L_No_Potion:
mes "You don't have a concentration potion.";
goto L_close;
L_Please_Help:
mes "[Angela]";
mes "\"Please go in that cave and rescue my daughter!\"";
goto L_close;
L_Please_Visit:
mes "[Angela]";
mes "\"Thank you so much for rescuing my beloved Cindy. Please come to visit us in our house at the beach.\"";
next;
mes "\"My husband is an adventurer like you, and I want to give you something he got on his travels to show my gratitude.\"";
goto L_close;
L_Please_Visit_Again:
mes "[Angela]";
mes "\"Hello! You are welcome to visit us in our house at the beach everytime. Cindy loves to see you!\"";
next;
mes "\"If you have found any present boxes the Yetis took away, please bring them to our house. Usually, the Yetis are very shy... their behavior is a bit odd.\"";
goto L_close;
L_close:
close;
OnInit:
.minLevel = 70;
end;
//TODO OnTouch: if Level show emote
}
|
