summaryrefslogtreecommitdiff
path: root/npc/pre-re/quests/collection/quest_fabre.txt
blob: 5de7e74fd6c71fd9d81f657508e15e96f6225b8d (plain) (blame)
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
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
//===== Hercules Script ======================================
//= iRO Repeatable EXP Quests.
//===== By: ==================================================
//= L0ne_W0lf
//===== Current Version: =====================================
//= 1.0
//===== Description: =========================================
//= [Official Conversion]
//= Added Monster Killing quests.
//= Repeatable EXP Quest (Fluffs)
//===== Additional Comments: =================================
//= 1.0 First version.
//============================================================

gef_fild07,321,193,4	script	Langry#Fabre_Hunt	4_M_SAGE_A,{
	if (questprogress(60107)) {
		if (questprogress(60107,HUNTING) != 2) {
			mes "[Langry]";
			mes "Have you finished hunting the 50 Fabres?";
			next;
			switch(select("Yes:No:I want to quit")) {
			case 1:
				mes "[Langry]";
				mes "Hmm, I don't think you've hunted 50 yet...";
				close;
			case 2:
				mes "[Langry]";
				mes "Remember, I need help hunting Fabres so go and hunt 50 of them.";
				close;
			case 3:
				mes "[Langry]";
				mes "Are you sure that you want to stop hunting?";
				mes "Any progress that you've made will be erased";
				next;
				switch(select("Yes:No")) {
				case 1:
					mes "[Langry]";
					mes "Ok then, well come back here if you change your mind.";
					erasequest 60107;
					close;
				case 2:
					mes "[Langry]";
					mes "Please kill 50 Fabres.";
					close;
				}
			}
		}
		else {
			mes "[Langry]";
			mes "Amazing, you did that with speed.";
			getexp 385,30;
			erasequest 60107;
			close;
		}
	}
	if (questprogress(60108)) {
		if (questprogress(60108,HUNTING) != 2) {
			mes "[Langry]";
			mes "Have you finished hunting the 50 Fabres?";
			next;
			switch(select("Yes:No:I want to quit")) {
			case 1:
				mes "[Langry]";
				mes "Hmm, I don't think you've hunted 100 yet...";
				close;
			case 2:
				mes "[Langry]";
				mes "Remember, I need help hunting Fabres so go and hunt 100 of them.";
				close;
			case 3:
				mes "[Langry]";
				mes "Are you sure that you want to stop hunting?";
				mes "Any progress that you've made will be erased";
				next;
				switch(select("Yes:No")) {
				case 1:
					mes "[Langry]";
					mes "Ok then, well come back here if you change your mind.";
					erasequest 60108;
					close;
				case 2:
					mes "[Langry]";
					mes "Please kill 100 Fabres.";
					close;
				}
			}
		}
		else {
			mes "[Langry]";
			mes "Amazing, you did that with speed.";
			getexp 385,30;
			getexp 385,30;
			erasequest 60108;
			close;
		}
	}
	if (questprogress(60109)) {
		if (questprogress(60109,HUNTING) != 2) {
			mes "[Langry]";
			mes "Have you finished hunting the 150 Fabres?";
			next;
			switch(select("Yes:No:I want to quit")) {
			case 1:
				mes "[Langry]";
				mes "Hmm, I don't think you've hunted 150 yet...";
				close;
			case 2:
				mes "[Langry]";
				mes "Remember, I need help hunting Fabres so go and hunt 150 of them.";
				close;
			case 3:
				mes "[Langry]";
				mes "Are you sure that you want to stop hunting?";
				mes "Any progress that you've made will be erased";
				next;
				switch(select("Yes:No")) {
				case 1:
					mes "[Langry]";
					mes "Ok then, well come back here if you change your mind.";
					erasequest 60109;
					close;
				case 2:
					mes "[Langry]";
					mes "Please kill 150 Fabres.";
					close;
				}
			}
		}
		else {
			mes "[Langry]";
			mes "Amazing, you did that with speed.";
			getexp 385,30;
			getexp 385,30;
			getexp 385,30;
			erasequest 60109;
			close;
		}
	}
	//for minimum level
	if (BaseLevel > 1) {
		//for maximum level
		if (BaseLevel < 21) {
			mes "[Langry]";
			mes "Do you think you can help me?";
			mes "Please?";
			next;
			switch(select("Sure:No")) {
			case 1:
				mes "[Langry]";
				mes "Really?!";
				mes "That's great!";
				next;
				switch(select("Gather Items:Hunt Fabres:Cancel")) {
				case 1:
					// Item turn in
					mes "[Langry]";
					mes "I need to collect ^0000CE25 Fluff^000000 to";
					mes "complete this community service project.";
					mes "You know what? I can even reward you a little for helping me.";
					next;
					switch(select("I have some Fluff:What was that again?")) {
					case 1:
						if (countitem(914) > 24) {
							mes "[Langry]";
							mes "Thank you for the Fluff. This helps me out greatly.";
							mes "Oh and here you go, this should help you get stronger, faster!";
							delitem 914,25; //Fluff
							getexp 385,30;
							close;
						}
						else {
							mes "[Langry]";
							mes "I see no Fluff, wait yea I do it's the lies coming from your mouth.";
							close;
						}
					case 2:
						mes "[Langry]";
						mes "I need ^00CE0025 Fluff^000000.";
						close;
					}
				case 2:
					// Kill Count Quest
					mes "[Langry]";
					mes "Ah, ok I think you can help me out by hunting some Fabres.";
					mes "How many would you like to hunt?";
					next;
					switch(select("50 Fabres:100 Fabres:150 Fabres")) {
					case 1:
						mes "[Langry]";
						mes "Come back when you've finished your task and I will give you a small reward.";
						setquest 60107;
						close;
					case 2:
						mes "[Langry]";
						mes "Come back when you've finished your task and I will give you a small reward.";
						setquest 60108;
						close;
					case 3:
						mes "[Langry]";
						mes "Come back when you've finished your task and I will give you a small reward.";
						setquest 60109;
						close;
					}
				case 3:
					mes "[Langry]";
					mes "If you change your mind, please come back.";
					close;
				}
			case 2:
				mes "[Langry]";
				mes "If you change your mind, please come back.";
				close;
			}
		}
		else {
			mes "[Langry]";
			mes "Hello, my name is Langry.";
			mes "I have to complete this community service, but I am just too lazy.";
			close;
		}
	}
	else {
		mes "[Langry]";
		mes "You may just be the most unlikely person ever, recycle a few Fabres and come back.";
		close;
	}
}