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
|
// TMW-2 Script.
// Author:
// Povo
// Description:
// Lime Dye Quest (lvl 40)
018-7,87,34,0 script Raify NPC_FAIRY_A,{
.@q = getq(LilitQuest_Raify);
if (.@q == 1)
goto L_Offer;
if (.@q >= 2)
goto L_Dye;
if (BaseLevel > 39) {
speech S_LAST_NEXT,
l("Psst."),
l("Hey you. Come here...I have a quest for ya."),
l("Keep your voice down and just listen."),
l("Look, I really hate pious...all of them."),
l("I want to get rid of them."),
l("However, that is not exactly a popular idea around here. The fae seem more concerned with snakes."),
l("That is why I need your help. If you can 'take care of' a bunch of pious and bring me their feathers as proof, I will give you a reward.");
goto L_Offer;
}
speech S_LAST_NEXT,
l("Hmm what is it?"),
l("I'm sorry but I can't talk right now... I have something on my mind."),
l("I said go away!"),
l(" It is not like you are strong enough to pick a fight with me so kindly leave before I get mad.");
close;
L_Offer:
mesn;
mesq l("So here is what I am thinking.");
next;
mesn;
mesq l("You bring me proof of completing my 'mission,' along with some water and I can dispose of the evidence by turning them into %s",
getitemlink(LimeDye));
next;
mesn;
mesq l("I think that %d %s and %d %s should be enough for now.",
50, getitemlink(ForestPiouFeathers),
50, getitemlink(ManaPiouFeathers));
mesq l("I will also need %d %s to make the mixture and %s GP as a fee.",
1, getitemlink(BottleOfWoodlandWater),
fnum(2500));
compareandsetq LilitQuest_Raify, 0, 1;
.@q = getq(LilitQuest_Raify);
if (.@q >= 2)
goto L_Dye;
L_Menu:
next;
mesn;
mesq l("So what do you say? You in?");
next;
select
l("Uhh...yeah sure...I guess..."),
l("Dye? How can you do that without a cauldron?"),
l("If I am doing your dirty work, why am I the one paying you?!"),
l("Wait...could you repeat that?"),
l("Umm..I have another quest to get to. So... umm... I should get going.");
mes "";
switch (@menu) {
case 1:
setq LilitQuest_Raify, 2;
mesn;
mesq l("Perfect, I knew you were right person for the job.");
mesq l("Come back when you have everything.");
close;
case 2:
mesn;
mesq l("Do you really have to ask? I am a fairy...*sigh*");
next;
mesq l("...wingless humanoids.");
break;
case 3:
mesn;
mesq l("Consider it an insurance policy. Besides, %s isn't exactly easy to come by.", getitemlink(LimeDye));
break;
case 4:
mesn;
mesq l("I need you to take care of my 'Piou Problem.'");
next;
goto L_Offer;
case 5:
goto L_Quit;
}
goto L_Menu;
L_Dye:
mesn;
mesq l("So did you take care of my 'Piou Problem?'");
mesq l("Did you bring everything?");
next;
select
l("Yes."),
l("No."),
l("What did you need me to get again?");
mes "";
if (@menu == 2)
goto L_Quit;
if (@menu == 3)
goto L_Offer;
L_DyeLoop:
if (countitem(BottleOfWoodlandWater) >= 1 &&
countitem(ForestPiouFeathers) >= 50 &&
countitem(ManaPiouFeathers) >= 50 &&
Zeny >= 2500) {
inventoryplace LimeDye, 1, EmptyBottle, 1;
delitem BottleOfWoodlandWater, 1;
delitem ForestPiouFeathers, 50;
delitem ManaPiouFeathers, 50;
Zeny-=2500;
getitem LimeDye, 1;
getitem EmptyBottle, 1;
if (getq(LilitQuest_Raify) == 2) {
setq LilitQuest_Raify, 3;
getexp 3500, 0;
}
mesn;
mesq l("Thanks! Here's your dye. Do you want to trade any more?");
next;
if (askyesno() == ASK_YES)
goto L_DyeLoop;
} else {
mesn;
mesq l("Sorry, you don't seem to have everything I need.");
}
close;
L_Quit:
closedialog;
close;
OnInit:
.sex = G_OTHER;
.distance = 5;
end;
}
|
