Context Navigation

merchant.txt

Revision 1, 37.5 kB (checked in by jinshiro, 17 years ago)

Line
1	//===== eAthena Script =======================================
2	//= Merchant Job Quest
3	//===== By: ==================================================
4	//= kobra_k88; L0ne_W0lf
5	//===== Current Version: =====================================
6	//= 2.0
7	//===== Compatible With: =====================================
8	//= eAthena SVN
9	//===== Description: =========================================
10	//= [Aegis Conversion]
11	//= Job quest for Merchant classes
12	//===== Additional Comments: =================================
13	//= Fully working
14	//= v1.1 Added instant job change for High Novice [Lupus]
15	//= v1.3 Added Baby Class support [Lupus]
16	//= v1.4 Optimised and moved first checker to Jfunc1-1 [massdriller]
17	//= 1.5 Changed Prontera->Izlude teleport price to 600 [Lupus]
18	//= 1.5.1 Removed Duplicates [Silent]
19	//= 1.5.2 Now saves/restores all quest skills [Lupus]
20	//= 1.6 Merged back JFunc, CHANGED NUMBERS TO CONSTANTS [Lupus]
21	//= 1.7 Updated to use Free Ticket for Kafra [Lupus]
22	//= 1.8 Rescripted to Aegis 10.3 stadards. [L0ne_W0lf]
23	//= No longer uses function "F_ToHigh"
24	//= 1.9 Bugfixes, thanks to Barron-Monster. [L0ne_W0lf]
25	//= 1.9a Added a missing next; (Barron-Monster) [L0ne_W0lf]
26	//= 1.9b Typo. "nextl" -> "next;" (Barron-Monster) [L0ne_W0lf]
27	//= 2.0 Should "fix" the problem with the Biliban Kafra. [L0ne_W0lf]
28	//============================================================
29
30	alberta_in,53,43,6 script Merchant#mer 86,{
31	if (Upper == 1) {
32	if (Class == Job_Novice_High && ADVJOB == Job_Whitesmith \|\| ADVJOB == Job_Creator) {
33	mes "[Chief Mahnsoo]";
34	mes "Long time no see!";
35	mes "Hey, you didn't quit";
36	mes "your business, did you?";
37	mes "What happened?";
38	next;
39	mes "[Chief Mahnsoo]";
40	mes "Whoa...";
41	mes "You've actually been to Valhalla?! Wow, you've come a long way...";
42	next;
43	if (getskilllv("NV_BASIC") < 9) {
44	mes "[Chief Mahnsoo]";
45	mes "Hmmm...";
46	mes "It seems that you're not ready to become a Merchant again. Go finish learning the Basic Novice Skills first.";
47	next;
48	mes "[Chief Mahnsoo]";
49	mes "Don't worry, we'll always have a Merchant position open for you. Just come back when you're ready, okay?";
50	close;
51	}
52	mes "[Chief Mahnsoo]";
53	mes "I guess it's destiny that we meet like this once more. Alright. Once again, let me change you into a Merchant!";
54	next;
55	skill 143,0,0;
56	jobchange Job_Merchant_High;
57	skill 153,1,0;
58	skill 154,1,0;
59	skill 155,1,0;
60	mes "[Chief Mahnsoo]";
61	mes "Ah~ How nostalgic. Just like old times! Alright, do your best!";
62	close;
63	}
64	else {
65	mes "[Chief Mahnsoo]";
66	mes "^333333Sigh^000000";
67	mes "I'm so bored...";
68	mes "When will I hear from my lovely Blossom?";
69	close;
70	}
71	}
72	if (BaseJob == Job_Merchant) {
73	mes "[Chief Mahnsoo]";
74	mes "Hello there!";
75	mes "How do you like";
76	mes "being a Merchant?";
77	next;
78	mes "[Chief Mahnsoo]";
79	mes "Having a way with";
80	mes "money certainly";
81	mes "has its perks,";
82	mes "does it not?";
83	close;
84	}
85	else if (BaseJob != Job_Merchant && BaseJob != Job_Novice) {
86	mes "[Chief Mahnsoo]";
87	mes "We Merchants hate people who are two faced. It's bad for business.";
88	next;
89	mes "[Chief Mahnsoo]";
90	mes "People who always try to take advantage of other people by selling things at a ridiculous price just so they can make money that they'll waste are the worst.";
91	next;
92	mes "[Chief Mahnsoo]";
93	mes "Well, in any case, we only accept Novices for job changes to the Merchant class. But I appreciate your interest in what we do.";
94	close;
95	}
96	else if (job_merchant_q == 9) {
97	mes "[Chief Mahnsoo]";
98	mes "Hello there,";
99	mes ""+ strcharinfo(0) +".";
100	set job_merchant_q,0;
101	set job_merchant_q2,0;
102	set quest_alb_01,0;
103	mes "Unfortunately, you failed to earn your Merchant License this time.";
104	next;
105	mes "[Chief Mahnsoo]";
106	mes "I'll erase your records, so come back anytime when you want to reapply.";
107	close;
108	}
109	else if (job_merchant_q == 8 \|\| job_merchant_q == 7) {
110	mes "[Chief Mahnsoo]";
111	mes "Hello there,";
112	mes ""+ strcharinfo(0) +".";
113	mes "I'm pleased to tell you";
114	mes "that I have good news!";
115	next;
116	mes "[Chief Mahnsoo]";
117	mes "The Merchant Guild accepted your application. You've proven that you are fully qualified to become a Merchant.";
118	if (job_merchant_q == 7) {
119	next;
120	mes "[Chief Mahnsoo]";
121	mes "The only thing to take care of is your Membership Fee.";
122	mes "Are you ready?";
123	next;
124	switch(select("Pay the rest of the 500 Zeny:Quit")) {
125	case 1:
126	mes "[Chief Mahnsoo]";
127	if (Zeny < 500) {
128	mes "Hmmm...";
129	mes "I suppose you currently don't have enough zeny to pay the rest of your Membership fee right now.";
130	next;
131	mes "[Chief Mahnsoo]";
132	mes "Please return when you have earned the 500 zeny that you need to become a Merchant.";
133	close;
134	}
135	set zeny,zeny-500;
136	mes "Ah yes...!";
137	mes "Now your";
138	mes "membership";
139	mes "is paid in full.";
140	break;
141	case 2:
142	mes "[Chief Mahnsoo]";
143	mes "I suppose you need some time to gather some zeny to pay your membership fee. Please come";
144	mes "back as soon as you're ready.";
145	close;
146	}
147	}
148	next;
149	mes "[Chief Mahnsoo]";
150	mes "Congratulations!";
151	callfunc "Job_Change",Job_Merchant;
152	callfunc "F_ClearJobVar";
153	mes "I'm very pleased that you are joining the Merchant Guild and hope that you will play an active part in Rune-Midgarts' economy.";
154	next;
155	if (quest_alb_01 == 1) {
156	mes "[Chief Mahnsoo]";
157	mes "Ahem Aaaaand let me give you a little bit of money for delivering that message to Blossom for me.";
158	mes "I hope you'll help me again next time~";
159	set zeny,zeny+200;
160	set quest_alb_01,2;
161	}
162	else {
163	mes "[Chief Mahnsoo]";
164	mes "The message you were supposed to deliver as per my request? You've forgotten about that? Oh well. Good work!";
165	}
166	next;
167	mes "[Chief Mahnsoo]";
168	mes "Our goal is to control 20 % of the world's income! We're going to need young, eager people like you!";
169	next;
170	mes "[Chief Mahnsoo]";
171	mes "But overall, we'll also be happy just to make loads of money.";
172	mes "But we all know that~";
173	close;
174	}
175	else if (job_merchant_q <= 6 && job_merchant_q != 0) {
176	mes "[Chief Mahnsoo]";
177	if (job_merchant_q2 == 1 \|\| job_merchant_q2 == 2) {
178	mes "First, get the delivery package from the storehouse, and then take it to the former Swordman's Association in Prontera.";
179	next;
180	mes "[Chief Mahnsoo]";
181	mes "When you get there, give the package to the Kafra Employee stationed near there. Her name is Blossom. Did you get all that?";
182	next;
183	if (job_merchant_q2 == 1) {
184	mes "[Chief Mahnsoo]";
185	mes "Remember, the Serial Number of the package is ^3355FF2485741^000000.";
186	}
187	else {
188	mes "[Chief Mahnsoo]";
189	mes "Remember, the Serial Number of the package is ^3355FF2328137^000000.";
190	}
191	}
192	else if (job_merchant_q2 == 3 \|\| job_merchant_q2 == 4) {
193	mes "First, get the delivery package from the storehouse, and then take it to the Mage Guild in Geffen.";
194	next;
195	if (job_merchant_q2 == 3) {
196	mes "[Chief Mahnsoo]";
197	mes "When you get there, give the package to the Mage Guildsman in charge. Remember, the packages Serial Number is ^3355FF2989396^000000.";
198	}
199	else {
200	mes "[Chief Mahnsoo]";
201	mes "When you get there, give the package to the Mage Guildsman in charge. Remember, the packages Serial Number is ^3355FF2191737^000000.";
202	}
203	}
204	else if (job_merchant_q2 == 5 \|\| job_merchant_q2 == 6) {
205	mes "First, get the delivery package from the storehouse, and then take it to Morroc.";
206	next;
207	mes "[Chief Mahnsoo]";
208	mes "You'll have to find Java Dullihan, the Dyemaker, so that you can deliver the product he ordered.";
209	next;
210	if (job_merchant_q2 == 5) {
211	mes "[Chief Mahnsoo]";
212	mes "But he's a little forgetful, so give it to one of his students. Remember, the package's Serial Number is ^3355FF3012685^000000.";
213	}
214	else {
215	mes "[Chief Mahnsoo]";
216	mes "But he's a little forgetful, give it to one of his students. Remember, the package's Serial Number is ^3355FF3487372^000000.";
217	}
218	}
219	else if (job_merchant_q2 == 7 \|\| job_merchant_q2 == 8) {
220	mes "First, get the package from the storehouse, and then give it to the Kafra Employee stationed on Byalan Island. Her name is Blossom.";
221	next;
222	if (job_merchant_q2 == 7) {
223	mes "[Chief Mahnsoo]";
224	mes "Remember, the package's Serial Number is ^3355FF3318702^000000.";
225	}
226	else {
227	mes "[Chief Mahnsoo]";
228	mes "Remember, the package's Serial Number is ^3355FF3543625^000000.";
229	}
230	}
231	if (job_merchant_q2 == 7 \|\| job_merchant_q2 == 8) {
232	next;
233	mes "[Chief Mahnsoo]";
234	mes "Aaaannnnd...";
235	mes "Don't forget to deliver that message for me~";
236	}
237	next;
238	mes "[Chief Mahnsoo]";
239	mes "Don't forget your destination and the package's Serial Number.";
240	mes "You'll need to tell them";
241	mes "to the storekeeper.";
242	next;
243	mes "[Chief Mahnsoo]";
244	mes "The storehouse is in the room";
245	mes "to my right. There, you can talk";
246	mes "to the storekeeper, and he'll";
247	mes "help you out.";
248	next;
249	mes "[Chief Mahnsoo]";
250	mes "After you make the delivery, return to the storehouse and give the receipt to the storekeeper.";
251	mes "Then, come back";
252	mes "and see me.";
253	next;
254	mes "[Chief Mahnsoo]";
255	mes "Is that clear?";
256	mes "Alright, that's";
257	mes "the spirit.";
258	mes "Take care!";
259	close;
260	}
261	else if (job_merchant_q == 0) {
262	mes "[Chief Mahnsoo]";
263	mes "So, what brings you to";
264	mes "the Merchant Association?";
265	mes "Is there anything";
266	mes "I can help you with?";
267	next;
268	switch(select("I want to be a Merchant.:Tell me about Merchants.:Tell me the requirements.:Nope.")) {
269	case 1:
270	mes "[Chief Mahnsoo]";
271	mes "Do you want to";
272	mes "be a Merchant?";
273	mes "Well...";
274	next;
275	if (getskilllv("NV_BASIC") < 9) {
276	mes "[Chief Mahnsoo]";
277	mes "First, you have to be a Novice with Job Level 10. Once you do that, make sure you learn all of the Basic Skills.";
278	next;
279	mes "[Chief Mahnsoo]";
280	mes "We're not just";
281	mes "simple money makers!";
282	mes "We pride ourselves on having standards and only accepting qualified applicants!";
283	close;
284	}
285	mes "[Chief Mahnsoo]";
286	mes "Alright, you'll need to fill out this application and prepare 1,000 Zeny for your Membership Fee.";
287	next;
288	mes "[Chief Mahnsoo]";
289	mes "Oh...!";
290	mes "If you don't have all the money,";
291	mes "I can just take 500 Zeny now.";
292	mes "You can pay the rest after you";
293	mes "pass the test and earn your";
294	mes "Merchant Guild License.";
295	next;
296	mes "[Chief Mahnsoo]";
297	mes "So what do you think?";
298	mes "Are you ready to join now?";
299	next;
300	if (select("Yes, I will.:Ummm, maybe later...") ==1 ) {
301	mes "[Chief Mahnsoo]";
302	mes "Let me check if you";
303	mes "filled out everything";
304	mes "on your application form...";
305	next;
306	mes "[Chief Mahnsoo]";
307	mes "Hmm... ";
308	mes "" + strcharinfo(0) + "...";
309	mes "That's a nice name.";
310	next;
311	mes "[Chief Mahnsoo]";
312	mes "This application will";
313	mes "only be registered once";
314	mes "the Membership Fee is paid.";
315	mes "How do you wish to";
316	mes "handle the fee?";
317	next;
318	switch(select("Pay all 1,000 Zeny now!:Two payments of 500 Zeny.:Quit")) {
319	case 1:
320	mes "[Chief Mahnsoo]";
321	if (Zeny >= 1000) {
322	set job_merchant_q,2;
323	set zeny,zeny-1000;
324	mes "Alright~";
325	mes "That's 1,000 zeny.";
326	mes "Excellent, excellent.";
327	}
328	else {
329	mes "It seems don't have enough zeny to pay all of the fee right now. Why don't you just pay 500 zeny now? Think about it.";
330	close;
331	}
332	break;
333	case 2:
334	mes "[Chief Mahnsoo]";
335	if (Zeny >= 500) {
336	set job_merchant_q,1;
337	set zeny,zeny-500;
338	mes "Let's see...";
339	mes "That's 500 Zeny. Although I don't think splitting payment is a good idea for any Merchant, it's alright since you're still learning.";
340	}
341	else {
342	mes "Hmm...";
343	mes "It seems you don't have the funds to pay half of the membership fee. Please come back once you collect the zeny that you need.";
344	close;
345	}
346	break;
347	case 3:
348	mes "[Chief Mahnsoo]";
349	mes "Feel free to return anytime";
350	mes "when you are ready, alright?";
351	close;
352	}
353	}
354	else {
355	mes "[Chief Mahnsoo]";
356	mes "You don't have enough zeny now? That's no problem. Take your time and come back when you're";
357	mes "ready, okay?";
358	close;
359	}
360	next;
361	mes "[Chief Mahnsoo]";
362	mes "Alright, you're now on the list of applicants. Ah, before I get started let me say just one thing.";
363	next;
364	mes "[Chief Mahnsoo]";
365	mes "There are some dumb and greedy people out there who do not know what it means to be a Merchant.";
366	mes "I hope you won't turn out to be like them, will you?";
367	next;
368	mes "[Chief Mahnsoo]";
369	mes "Now, let me";
370	mes "explain what you";
371	mes "need to do for the";
372	mes "Merchant License Test.";
373	next;
374	mes "[Chief Mahnsoo]";
375	switch(rand(1,4)) {
376	case 1:
377	mes "First, get the delivery package from the storehouse, then go to the former Swordman's Association in Prontera.";
378	next;
379	mes "[Chief Mahnsoo]";
380	mes "When you get there, visit the Kafra Employee stationed there. Her name is Blossom. Did you get";
381	mes "all of that?";
382	callsub S_GiveSerial,2485741,1,2328137,2;
383	break;
384	case 2:
385	mes "First, get the delivery package from the storehouse, and then go to the Mage Guild in Geffen. When you get there, visit the Mage Guildsman in charge.";
386	callsub S_GiveSerial,2989396,3,2191737,4;
387	break;
388	case 3:
389	mes "First, get the delivery package from the storehouse, and then go to Morroc. There you must find Java Dullihan, the dyemaker.";
390	next;
391	mes "[Chief Mahnsoo]";
392	mes "He's a bit forgetful, so you should probably give the package to one of his students.";
393	callsub S_GiveSerial,3012685,5,3487372,6;
394	break;
395	case 4:
396	mes "First, get the delivery package from the storehouse, and then give it to the Kafra Employee stationed on Byalan Island.";
397	callsub S_GiveSerial,3318702,7,3543625,8;
398	next;
399	mes "[Chief Mahnsoo]";
400	mes "Ummmm...";
401	mes "And I also have";
402	mes "a bit of a personal";
403	mes "request for you.";
404	next;
405	mes "[Chief Mahnsoo]";
406	mes "Would you please give her this message when you deliver the package? Please~";
407	getitem 1072,1; //Delivery_Message
408	break;
409	}
410	next;
411	mes "[Chief Mahnsoo]";
412	mes "Don't forget your destination and the package's Serial Number. You will need to tell those to the storekeeper in the storehouse to the right of me.";
413	next;
414	mes "[Chief Mahnsoo]";
415	mes "After the delivery, give the receipt to the storekeeper, and then come back and see me.";
416	next;
417	mes "[Chief Mahnsoo]";
418	mes "Is that clear?";
419	mes "Alright, that's";
420	mes "the spirit.";
421	mes "Take care!";
422	close;
423	case 2:
424	mes "[Chief Mahnsoo]";
425	mes "Merchant?";
426	mes "Well, we basically sell goods to make money. That is the way";
427	mes "of the Merchant.";
428	next;
429	mes "[Chief Mahnsoo]";
430	mes "I guess we may not be the best at fighting, and we don't have many special attacks. We've got no healing skills...";
431	next;
432	mes "[Chief Mahnsoo]";
433	mes "But we can buy goods at lower prices from NPC shops and sell them at a higher price to other people~";
434	next;
435	mes "[Chief Mahnsoo]";
436	mes "Our ultimate attack skill is 'Mammonite.' The strength of Mammonite comes from the anger";
437	mes "when we're forced to throw away perfectly good zeny.";
438	next;
439	mes "[Chief Mahnsoo]";
440	mes "Throwing away zeny like that";
441	mes "causes a deadly rage to well up in the heart of any Merchant!";
442	mes "Just thinking about it";
443	mes "makes my blood boil!";
444	next;
445	mes "[Chief Mahnsoo]";
446	mes "Anyway, we can use most";
447	mes "weapons except Bows, Rods, and Two-Handed Swords. But we can always sell those.";
448	next;
449	mes "[Chief Mahnsoo]";
450	mes "Yes...";
451	mes "We Merchants generally";
452	mes "have money on our minds...";
453	close;
454	case 3:
455	mes "[Chief Mahnsoo]";
456	mes "There are three conditions that must be fulfilled before you can become a Merchant.";
457	next;
458	mes "[Chief Mahnsoo]";
459	mes "First, You have to be a Novice with Job Level 10, and have learned all of the Basic Skills.";
460	next;
461	mes "[Chief Mahnsoo]";
462	mes "Second, You have to pay a 1,000 Zeny Membership Fee. I believe any Merchant candidate should be able to earn 1,000 Zeny with ease.";
463	next;
464	mes "[Chief Mahnsoo]";
465	mes "Third, there is a License Test to test your physical strength and sense of direction. You will deliver a package to a specific person in a specific location.";
466	close;
467	case 4:
468	close;
469	}
470	}
471
472	S_GiveSerial:
473	next;
474	mes "[Chief Mahnsoo]";
475	mes "Remember...";
476	if (rand(1)) {
477	mes "The package's";
478	mes "Serial Number is";
479	mes "^3355FF"+getarg(0)+"^000000.";
480	set job_merchant_q2,getarg(1);
481	}
482	else {
483	mes "The package's";
484	mes "Serial Number is";
485	mes "^3355FF"+getarg(2)+"^000000.";
486	set job_merchant_q2,getarg(3);
487	}
488	return;
489	}
490
491	alberta_in,28,29,2 script Merchant Guildsman#mer 83,{
492	if (BaseJob == Job_Merchant) {
493	mes "[Union Staff Kay]";
494	mes "Heya pal.";
495	mes "How ya doin'?";
496	close;
497	}
498	else if (BaseJob != Job_Merchant && BaseJob != Job_Novice) {
499	mes "[Union Staff Kay]";
500	mes "Hey you. We don't have any open positions for part time work. If you wanna earn some zeny, you'll hafta look elsewhere.";
501	close;
502	}
503	else if (job_merchant_q == 9) {
504	mes "[Union Staff Kay]";
505	mes "Hey you. Yeah, you.";
506	mes "If you wanna restart the test, go visit Mahnsoo in the other room. Then we can talk.";
507	close;
508	}
509	else if (job_merchant_q == 8 \|\| job_merchant_q == 7) {
510	mes "[Union Staff Kay]";
511	mes "Alright! Everything looks perfect! I'll report your success to the guildmaster. Now go talk to Chief Mahnsoo, yeah?";
512	close;
513	}
514	else if (job_merchant_q == 6 \|\| job_merchant_q == 5) {
515	mes " [Union Staff Kay] ";
516	mes "Oh, yeah? Okay, lemme check. Your name is " + strcharinfo(0) + "? Alright, your destination was...";
517	next;
518	mes "[Union Staff Kay]";
519	if (job_merchant_q2 == 1 \|\| job_merchant_q2 == 2)
520	mes "Wow! You met the Kafra babe in Prontera?! Lucky you~ ...Receipt?";
521	else if (job_merchant_q2 == 3 \|\| job_merchant_q2 == 4)
522	mes "Geffen Magic Academy. Okay, receipt?";
523	else if (job_merchant_q2 == 5 \|\| job_merchant_q2 == 6)
524	mes "The dyemaker in Morroc. Not bad. Receipt?";
525	else if (job_merchant_q2 == 7 \|\| job_merchant_q2 == 8)
526	mes "Oh hohohoho~! The Kafra Babe on Byalan Island?! Awesome! Anyway, did you bring the receipt?";
527
528	if (job_merchant_q2 == 1 && countitem(1073) != 0)
529	delitem 1073,1; //Merchant_Voucher_1
530	else if (job_merchant_q2 == 2 && countitem(1074) != 0)
531	delitem 1074,1; //Merchant_Voucher_2
532	else if (job_merchant_q2 == 3 && countitem(1075) != 0)
533	delitem 1075,1; //Merchant_Voucher_3
534	else if (job_merchant_q2 == 4 && countitem(1076) != 0)
535	delitem 1076,1; //Merchant_Voucher_4
536	else if (job_merchant_q2 == 5 && countitem(1077) != 0)
537	delitem 1077,1; //Merchant_Voucher_5
538	else if (job_merchant_q2 == 6 && countitem(1078) != 0)
539	delitem 1078,1; //Merchant_Voucher_6
540	else if (job_merchant_q2 == 7 && countitem(1079) != 0)
541	delitem 1079,1; //Merchant_Voucher_7
542	else if (job_merchant_q2 == 8 && countitem(1080) != 0)
543	delitem 1080,1; //Merchant_Voucher_8
544	else {
545	next;
546	set job_merchant_q,9;
547	mes " [Union Staff Kay] ";
548	mes "Wait a sec.";
549	mes "Where's the receipt?";
550	mes "What happened?";
551	next;
552	mes " [Union Staff Kay] ";
553	mes "If you don't have the receipt, you fail the test! You better talk to Mahnsoo if you wanna retake it, alright? Pay attention next time!";
554	close;
555	}
556	next;
557	mes " [Union Staff Kay] ";
558	mes "...Great! Everything's perfect! I'll report your success to the Guildmaster. You should talk to Chief Mahnsoo now, alright?";
559	close2;
560	if (job_merchant_q == 6)
561	set job_merchant_q,8;
562	else if (job_merchant_q == 5)
563	set job_merchant_q,7;
564	end;
565	}
566	else if (job_merchant_q == 4 \|\| job_merchant_q == 3 && countitem(1081) == 0 && countitem(1082) == 0 && countitem(1091) == 0) {
567	mes " [Union Staff Kay] ";
568	mes "Huh?";
569	mes "You're back?";
570	mes "So how did";
571	mes "the delivery go?";
572	next;
573	if (select("Sob I lost the package.:Fine.") == 1) {
574	set job_merchant_q,9;
575	mes "[Union Staff Kay]";
576	mes "Are you kidding me? You'll fail the test if you lose the package!";
577	next;
578	mes "[Union Staff Kay]";
579	mes "Awwww man. Well, if you wanna restart the test, talk to Mahnsoo, okay? You're lucky you're getting another chance!";
580	close;
581	}
582	mes "[Union Staff Kay]";
583	mes "Huh...";
584	mes "Okay...";
585	close;
586	}
587	else if (job_merchant_q == 4 \|\| job_merchant_q == 3 && countitem(1081) != 0 \|\| countitem(1082) != 0 \|\| countitem(1091) != 0) {
588	mes "[Union Staff Kay]";
589	mes "Hey, what are you still doing here? Shouldn't you be on your way already?";
590	next;
591	if (select("I need a new package.:Oh, yeah. You're right!") == 1) {
592	if (countitem(1081) == 0 && countitem(1082) == 0 && countitem(1083) == 0 && countitem(1091) == 0) {
593	mes "[Union Staff Kay]";
594	mes "Wha--?";
595	mes "So where did";
596	mes "the package go?";
597	mes "Where is it?!";
598	next;
599	if (select("Sob I lost it!:I have it right here.") == 1) {
600	set job_merchant_q,9;
601	mes "[Union Staff Kay]";
602	mes "You...";
603	mes "Lost it?!";
604	mes "You failed the test!";
605	next;
606	mes "[Union Staff Kay]";
607	mes "Sigh If you want to restart the test, go visit Mahnsoo in the other room, alright?";
608	close;
609	}
610	mes "[Union Staff Kay]";
611	mes "Huh.";
612	mes "I thought";
613	mes "you lost it.";
614	mes "You don't";
615	mes "need a new one.";
616	close;
617	}
618	mes "[Union Staff Kay]";
619	mes "Sigh Man, you're starting to become a pain in the ass. Hold on, lemme cancel your record...";
620	if (countitem(1081) != 0)
621	delitem 1081,1; //Merchant_Box_1
622	else if (countitem(1082) != 0)
623	delitem 1082,1; //Merchant_Box_2
624	else if (countitem(1091) != 0)
625	delitem 1091,1; //Merchant_Box_Etc
626	if (job_merchant_q == 4)
627	set job_merchant_q,2;
628	else if (job_merchant_q == 3)
629	set job_merchant_q,1;
630	next;
631	mes "[Union Staff Kay]";
632	mes "I need some time to get everything in order, so come back later.";
633	close;
634	}
635	mes "[Union Staff Kay]";
636	mes "What a bummer...";
637	close;
638	}
639	else if ((job_merchant_q == 0 \|\| job_merchant_q == 1 \|\| job_merchant_q == 2)) {
640	set where_village,0;
641	mes "[Union Staff Kay]";
642	mes "Hey there.";
643	mes "what brings";
644	mes "you here?";
645	next;
646	switch(select("My Merchant License test.:I'm looking for part time work.:Nothing.")) {
647	case 1:
648	mes "[Union Staff Kay]";
649	mes "I see.";
650	mes "Alright.";
651	mes "So what's";
652	mes "your name?";
653	mes "" + strcharinfo(0) + "...?";
654	next;
655	if (job_merchant_q == 0) {
656	mes "[Union Staff Kay]";
657	mes "Huh. Your name's not on my list. Did you apply for the job change quest or what?";
658	next;
659	mes "[Union Staff Kay]";
660	mes "You gotta apply first by talking to Chief Mahnsoo in the center";
661	mes "of this building, okay?";
662	close;
663	}
664	mes "[Union Staff Kay]";
665	mes "Alright, there you go. Lemme give you the package. Now, choose the destination of the delivery.";
666	next;
667	switch(select("Prontera.:Geffen.:Morocc.:Byalan Island.")) {
668	case 1: set .@where_village,1; break;
669	case 2: set .@where_village,2; break;
670	case 3: set .@where_village,3; break;
671	case 4: set .@where_village,4; break;
672	}
673	mes "[Union Staff Kay]";
674	mes "Okay, now you need to give me the package's Serial Number. If you wanna cancel, just enter '0', alright?";
675	next;
676	while(1) {
677	while(1) {
678	input .@input;
679	if (.@input == 0) {
680	mes "[Union Staff Kay]";
681	mes "Are you sure that you wanna cancel?";
682	if (select("Yes.:Let me try again.") == 1) {
683	mes "Alright, we'll cancel for now.";
684	close;
685	}
686	next;
687	}
688	else if (.@input < 1000000 \|\| .@input > 5000000) {
689	mes "[Union Staff Kay]";
690	mes "Hey hey. That number's not valid! Enter a value from 1000000 to 5000000. got it?";
691	next;
692	}
693	else
694	break;
695	}
696	mes "[Union Staff Kay]";
697	if (.@where_village == 1)
698	mes "Destination is Prontera. The Serial Number is " + .@input + ". Are you positive?";
699	else if (.@where_village == 2)
700	mes "Destination is Geffen. Phew! That's really far! The Serial Number is " + .@input + ". Are you positive?";
701	else if (.@where_village == 3)
702	mes "Destination is Morocc. That's pretty far away! The Serial Number is " + .@input + ". Are you positive?";
703	else
704	mes "Lucky you! Your destination is Byalan Island. The Serial Number is " + .@input + ". Are you positive?";
705	next;
706	if (select("Positive.:Whoops! Wrong number!") == 1) {
707	break;
708	}
709	}
710	if (.@where_village == 1) {
711	if (job_merchant_q2 == 1 && .@input == 2485741)
712	getitem 1081,1; //Merchant_Box_1
713	else if (job_merchant_q2 == 2 && .@input == 2328137)
714	getitem 1082,1; //Merchant_Box_2
715	else
716	getitem 1091,1; //Merchant_Box_Etc
717	}
718	else if (.@where_village == 2) {
719	if (job_merchant_q2 == 3 && .@input == 2989396)
720	getitem 1081,1; //Merchant_Box_1
721	else if (job_merchant_q2 == 4 && .@input == 2191737)
722	getitem 1082,1; //Merchant_Box_2
723	else
724	getitem 1091,1; //Merchant_Box_Etc
725	}
726	else if (.@where_village == 3) {
727	if (job_merchant_q2 == 5 && .@input == 3012685)
728	getitem 1081,1; //Merchant_Box_1
729	else if (job_merchant_q2 == 6 && .@input == 3487372)
730	getitem 1082,1; //Merchant_Box_2
731	else
732	getitem 1091,1; //Merchant_Box_Etc
733	}
734	else {
735	if (job_merchant_q2 == 7 && .@input == 3318702)
736	getitem 1081,1; //Merchant_Box_1
737	else if (job_merchant_q2 == 8 && .@input == 3543625)
738	getitem 1082,1; //Merchant_Box_2
739	else
740	getitem 1091,1; //Merchant_Box_Etc
741	}
742	if (job_merchant_q == 2)
743	set job_merchant_q,4;
744	else if (job_merchant_q == 1)
745	set job_merchant_q,3;
746	mes "[Union Staff Kay]";
747	mes "Alright. Take this package and guard it with your life until it's safely delivered to the customer. Don't lose this thing, got it?";
748	next;
749	mes "[Union Staff Kay]";
750	mes "Well then, I wish you luck. Remember, you gotta bring me";
751	mes "a receipt once you finish the delivery, okay?";
752	close;
753	case 2:
754	mes "[Union Staff Kay]";
755	mes "Part time job? Sorry pal, no jobs yet. The Paymaster's department can never balance our budget...";
756	close;
757	case 3:
758	mes "[Union Staff Kay]";
759	mes "Nothing, eh?";
760	mes "I guess you enjoy";
761	mes "bothering people for";
762	mes "no reason then, yeah?";
763	close;
764	}
765	}
766	}
767
768	morocc_in,140,102,4 script Student#mer 86,{
769	if ((job_merchant_q == 4) \|\| (job_merchant_q == 3)) {
770	mes "[Dyer's Student]";
771	mes "You're from";
772	mes "the Merchant Guild?";
773	mes "Yes! You've come to";
774	mes "the right place.";
775	next;
776	mes "[Dyer's Student]";
777	if (countitem(1081) == 1 \|\| countitem(1082) == 1 \|\| countitem(1091) == 1) {
778	mes "Okay~";
779	mes "Please set the";
780	mes "package down";
781	mes "over there.";
782	}
783	else {
784	mes "But...";
785	mes "Where's the";
786	mes "package I ordered?";
787	mes "That's strange...";
788	close;
789	}
790	next;
791	mes "[Dyer's Student]";
792	mes "Let me check the Serial Number of the package so I can give you the receipt, okay?";
793	next;
794	mes "[Dyer's Student]";
795	if (job_merchant_q2 == 5 && countitem(1081) != 0) {
796	mes "3012685...";
797	mes "That's right.";
798	mes "Here's your";
799	mes "receipt.";
800	delitem 1081,1; //Merchant_Box_1
801	getitem 1077,1; //Merchant_Voucher_5
802	}
803	else if (job_merchant_q2 == 6 && countitem(1082) != 0) {
804	mes "3487372...";
805	mes "That's right.";
806	mes "Here's your";
807	mes "receipt.";
808	delitem 1082,1; //Merchant_Box_2
809	getitem 1078,1; //Merchant_Voucher_6
810	}
811	else {
812	mes "Excuse me, but...";
813	if (job_merchant_q2 == 5)
814	mes "I don't think this is the package we ordered. The Serial Number should be 3012685. See?";
815	else if (job_merchant_q2 == 6)
816	mes "I don't think this is the package we ordered. The Serial Number should be 3487372. See?";
817	else
818	mes "I don't think this is the package we ordered. The Serial Number should be 3012685 or 3487372. Well, one of those two...";
819	close;
820	}
821	if (job_merchant_q == 4)
822	set job_merchant_q,6;
823	else if (job_merchant_q == 3)
824	set job_merchant_q,5;
825	next;
826	mes "[Dyer's Student]";
827	mes "Thanks a lot!";
828	mes "See you again";
829	mes "sometime!";
830	close;
831	}
832	else if (job_merchant_q == 6 \|\| job_merchant_q == 5 && job_merchant_q2 == 6 \|\| job_merchant_q2 == 5) {
833	mes "[Dyer's Student]";
834	mes "Oh...";
835	mes "You're gonna";
836	mes "go back? Okay";
837	mes "then, take care!";
838	close;
839	}
840	else {
841	mes "[Dyer's Student]";
842	mes "Mr. Java Dullihan is the one and only, the best dye maker on the Rune-Midgard continent.";
843	next;
844	mes "[Dyer's Student]";
845	mes "Aaaand I'm proud to say that I'm his student! Someday, I'll be able to make really beautiful dyes too!";
846	next;
847	mes "[Dyer's Student]";
848	mes "Of course, I'm still learning the basics right now, but someday...";
849	close;
850	}
851	}
852
853	geffen_in,155,122,4 script Guild Staff#mer 47,{
854	if (job_merchant_q == 4 \|\| job_merchant_q == 3) {
855	mes "[Guild Staff]";
856	mes "Ah, you must be with the Merchant Guild. Finally, my package has arrived! Alright...!";
857	next;
858	mes "[Guild Staff]";
859	if (countitem(1081) == 1 \|\| countitem(1082) == 1 \|\| countitem(1091) == 1) {
860	mes "You must be very tired";
861	mes "from having to travel";
862	mes "in this kind";
863	mes "of weather...";
864	}
865	else {
866	mes "Wait...";
867	mes "Where's the";
868	mes "package?";
869	close;
870	}
871	next;
872	mes "[Guild Staff]";
873	mes "Alright, let me";
874	mes "check the Serial Number...";
875	if (job_merchant_q2 == 3 && countitem(1081) != 0) {
876	mes "2989396. Yes, this is what we ordered. Here is your receipt.";
877	delitem 1081,1; //Merchant_Box_1
878	getitem 1075,1; //Merchant_Voucher_3
879	}
880	else if (job_merchant_q2 == 4 && countitem(1082) != 0) {
881	mes "2191737. Yes, this is what we ordered. Here is your receipt.";
882	delitem 1082,1; //Merchant_Box_2
883	getitem 1076,1; //Merchant_Voucher_4
884	}
885	else {
886	mes "Uh oh, this is the wrong number. This isn't what we ordered...";
887	next;
888	mes "[Guild Staff]";
889	if (job_merchant_q2 == 3) {
890	mes "The Serial Number";
891	mes "should be 2989396.";
892	}
893	else if (job_merchant_q2 == 4) {
894	mes "The Serial Number";
895	mes "should be 2191737.";
896	}
897	else {
898	mes "The Serial Number";
899	mes "should be 2989396";
900	mes "or 2191737, one of";
901	mes "those two.";
902	}
903	mes "Look here!";
904	mes "Don't you see";
905	mes "something";
906	mes "is wrong?";
907	close;
908	}
909	if (job_merchant_q == 4)
910	set job_merchant_q,6;
911	else if (job_merchant_q == 3)
912	set job_merchant_q,5;
913	next;
914	mes "[Guild Staff]";
915	mes "Heh heh~";
916	mes "Thank you!";
917	mes "Bye bye!";
918	close;
919	}
920	else if (job_merchant_q == 6 \|\| job_merchant_q == 5 && job_merchant_q2 == 4 \|\| job_merchant_q2 == 3) {
921	mes "[Guild Staff]";
922	mes "Hello,";
923	mes "Merchant Guildsman~";
924	mes "I give you my thanks.";
925	close;
926	}
927	else {
928	mes "[Guild Staff]";
929	mes "My package should have arrived by now. Huh. I guess the Merchant Guild might be running a little late...";
930	close;
931	}
932	}
933
934	prontera,248,42,0 script Kafra Employee#mer 116,{
935	cutin "kafra_02",2;
936	if (job_merchant_q == 6 \|\| job_merchant_q == 5) && (job_merchant_q2 == 2 \|\| job_merchant_q2 == 1) {
937	mes "[Kafra Employee]";
938	mes "Oh! Thank you for";
939	mes "traveling such a long";
940	mes "way to come over here~";
941	close2;
942	cutin "",255;
943	end;
944	}
945	else if (job_merchant_q == 4 \|\| job_merchant_q == 3) {
946	mes "[Kafra Employee]";
947	mes "A delivery from";
948	mes "the Merchant Guild?";
949	mes "Oh, yes, please set";
950	mes "it down right over there...";
951	if (countitem(1081) == 1 \|\| countitem(1082) == 1 \|\| countitem(1091) == 1) {
952	mes "You must be really tired";
953	mes "after carrying it for so long!";
954	}
955	else {
956	mes "W-wait. Didn't you bring it?";
957	mes "Where's the package?";
958	close2;
959	cutin "",255;
960	end;
961	}
962	next;
963	mes "[Kafra Employee]";
964	mes "Now, let me check";
965	mes "the serial number...";
966	if (job_merchant_q2 == 1 && countitem(1081) != 0) {
967	mes "2485741. Right, this is";
968	mes "the one we ordered. Oh,";
969	mes "and don't forget this receipt!";
970	next;
971	delitem 1081,1; //Merchant_Box_1
972	getitem 1073,1; //Merchant_Voucher_1
973	}
974	else if (job_merchant_q2 == 2 && countitem(1082) != 0) {
975	mes "2328137. Right, this is";
976	mes "the one we ordered. Oh,";
977	mes "and don't forget this receipt!";
978	next;
979	delitem 1082,1; //Merchant_Box_2
980	getitem 1074,1; //Merchant_Voucher_2
981	}
982	else {
983	mes "Mmmm? Hold on. This is";
984	mes "the wrong package. What we";
985	if (job_merchant_q2 == 1)
986	mes "ordered had the serial number 2485741. I'm sure it's not this.";
987	else if (job_merchant_q2 == 2)
988	mes "ordered had the serial number 2328137. I'm sure it's not this.";
989	else
990	mes "ordered had the serial number 2328137 or 2328137.";
991	next;
992	mes "[Kafra Employee]";
993	mes "I'm afraid there";
994	mes "must be some kind";
995	mes "of mistake. Perhaps";
996	mes "you should go back to";
997	mes "the Merchant Guild to";
998	mes "clear up this situation?";
999	close2;
1000	cutin "",255;
1001	end;
1002	}
1003	if (job_merchant_q == 4)
1004	set job_merchant_q,6;
1005	else if (job_merchant_q == 3)
1006	set job_merchant_q,5;
1007	mes "[Kafra Employee]";
1008	mes "Thanks again";
1009	mes "for going through";
1010	mes "all of that trouble~";
1011	close2;
1012	cutin "",255;
1013	end;
1014	}
1015	else {
1016	mes "[Kafra Employee]";
1017	mes "Welcome to the";
1018	mes "Kafra Corportation,";
1019	mes "where the service is";
1020	mes "always on your side~";
1021	next;
1022	mes "[Kafra Employee]";
1023	mes "As you can see, the";
1024	mes "Swordman Assocation";
1025	mes "has moved to Izlude, a";
1026	mes "satellite city of Prontera.";
1027	mes "Currently, we offer a Teleport";
1028	mes "Service to Izlude for 600 zeny.";
1029	next;
1030	if (select("Use:Cancel") == 1) {
1031	if (Zeny < 600) {
1032	mes "[Kafra Employee]";
1033	mes "I'm sorry, but you";
1034	mes "don't have enough zeny";
1035	mes "for this Teleport Service.";
1036	close2;
1037	cutin "",255;
1038	end;
1039	}
1040	set zeny,zeny-600;
1041	set RESRVPTS, RESRVPTS + 37;
1042	cutin "",255;
1043	warp "izlude",94,103;
1044	end;
1045	}
1046	close2;
1047	cutin "",255;
1048	end;
1049	}
1050	}
1051
1052	//izlu2dun,106,58,4 script Kafra Employee#mer 116,{
1053	function script F_MercKafra {
1054	if ((job_merchant_q == 6 \|\| job_merchant_q == 5) && (job_merchant_q2 == 8 \|\| job_merchant_q2 == 7)) {
1055	mes "[Kafra Employee]";
1056	mes "Oh hello~";
1057	mes "Um, is there";
1058	mes "some special reason";
1059	mes "as to why you're here?";
1060	close2;
1061	cutin "",255;
1062	end;
1063	}
1064	else if (job_merchant_q == 4 \|\| job_merchant_q == 3) {
1065	mes "[Kafra Employee]";
1066	mes "A delivery from";
1067	mes "the Merchant Guild?";
1068	mes "Oh, yes, please set";
1069	mes "it down right over there...";
1070	if (countitem(1081) == 1 \|\| countitem(1082) == 1 \|\| countitem(1091) == 1) {
1071	mes "You must be really tired";
1072	mes "after carrying it for so long!";
1073	}
1074	else {
1075	mes "W-wait. Didn't you bring it?";
1076	mes "Where's the package?";
1077	close2;
1078	cutin "",255;
1079	end;
1080	}
1081	next;
1082	mes "[Kafra Employee]";
1083	mes "Now, let me check";
1084	mes "the serial number...";
1085	if (job_merchant_q2 == 7 && countitem(1081) != 0) {
1086	mes "3318702. Right, this is";
1087	mes "the one we ordered. Oh,";
1088	mes "and don't forget this receipt!";
1089	delitem 1081,1; //Merchant_Box_1
1090	getitem 1079,1; //Merchant_Voucher_7
1091	}
1092	else if (job_merchant_q2 == 8 && countitem(1082) != 0) {
1093	mes "3543625. Right, this is";
1094	mes "the one we ordered. Oh,";
1095	mes "and don't forget this receipt!";
1096	delitem 1082,1; //Merchant_Box_2
1097	getitem 1080,1; //Merchant_Voucher_8
1098	}
1099	else {
1100	mes "Mmmm? Hold on. This is";
1101	mes "the wrong package. What we";
1102	if (job_merchant_q2 == 7)
1103	mes "ordered had the serial number 3318702. I'm sure it's not this.";
1104	else if (job_merchant_q2 == 8)
1105	mes "ordered had the serial number 3543625. I'm sure it's not this.";
1106	else
1107	mes "ordered had the serial number 3318702 or 3543625.";
1108	close2;
1109	cutin "",255;
1110	end;
1111	}
1112	if (job_merchant_q == 4)
1113	set job_merchant_q,6;
1114	else if (job_merchant_q == 3)
1115	set job_merchant_q,5;
1116	next;
1117	if (countitem(1072) != 0 && quest_alb_01 == 0) {
1118	select("This is from Chief Mahnsoo of the Merchant Guild...");
1119	delitem 1072,1; //Delivery_Message
1120	set quest_alb_01,1;
1121	mes "[Kafra Employee]";
1122	mes "Oh~! A letter from";
1123	mes "Mahnsoo! Thank you";
1124	mes "so much, I've been dying";
1125	mes "to hear from him. How is";
1126	mes "he doing, is he alright?";
1127	mes "I can't wait to read it...";
1128	next;
1129	mes "[Kafra Employee]";
1130	mes "Oh, thank you for";
1131	mes "going through all the";
1132	mes "trouble of delivering all";
1133	mes "of this. This isn't anything";
1134	mes "special, but please take it.";
1135	mes "Well, see you again~";
1136	getitem 513,3; //Banana
1137	}
1138	else {
1139	mes "[Kafra Employee]";
1140	mes "Thanks again";
1141	mes "for going through";
1142	mes "all of that trouble~";
1143	}
1144	close2;
1145	cutin "",255;
1146	end;
1147	}
1148	return;
1149	}

Note: See TracBrowser for help on using the browser.

Context Navigation

root/npc/jobs/1-1/merchant.txt

Download in other formats: