Context Navigation

christmas_2005.txt @ 23

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

Line
1	//===== eAthena Script =======================================
2	//= 2005 ChristMas Event
3	//===== By: ==================================================
4	//= Brainstorm
5	//===== Current Version: =====================================
6	//= 1.1
7	//===== Compatible With: =====================================
8	//= eAthena SVN
9	//===== Description: =========================================
10	//= [Aegis Conversion]
11	//= Event 1: Louise's Kim creates Louise's Santa Hat.
12	//= Event 2: Enjoy Happymerry Chistmas Event summons monsters.
13	//= Event 3: Oholy requires you to hunt Deviruchi NPCs.
14	//==========================================
15	//= Break down of arguments used in the function:
16	//= arg(0) Originating NPC (disable)
17	//= arg(1) Next NPC to be enabled
18	//= arg(2) Map name of originating NPC
19	//= arg(3) Coordinate X to be teleported to
20	//= arg(4) Coordinate Y to be teleported to
21	//===== Additional Comments: =================================
22	//= 1.0 First semi-working conversion. [Brainstorm]
23	//= 1.1 Refined Brainstorm's conversion. [L0ne_W0lf]
24	//============================================================
25
26	// Louise's Santa Hat (Event 1)
27	xmas_in,89,92,5 script Louise Kim#designer 714,{
28	mes "[Designer Louise Kim]";
29	mes "Cone shaped red Santa hat is too ordinary.";
30	mes "It's old fashioned.";
31	mes "Maybe in 1980's?!";
32	mes "Haha~";
33	next;
34	mes "[Designer Louise Kim]";
35	mes "If you leave it on me,";
36	mes "I'll change it to lastest model.";
37	mes "You know what I mean~!";
38	next;
39	mes "[Designer Louise Kim]";
40	mes "You know Antonio's hat,right?";
41	mes "Guess who made it?";
42	mes "As you know, Antonio is hard to catch,";
43	mes "that's because I blowed some power in the hat. ";
44	mes "";
45	next;
46	mes "[Designer Louise Kim]";
47	mes "If you don't like your hat,";
48	mes "bring it to me.";
49	mes "I'll change it to brand new one.";
50	mes "Stylish Louise's hat.";
51	mes "";
52	emotion e_lv;
53	next;
54	if(countitem(2236) > 0) {
55	if (select("Here.:It's ok.") == 1) {
56	mes "[Designer Louise Kim]";
57	mes "Nice choice!!";
58	mes "If I do it like this ...";
59	mes "and this and...";
60	mes "finally it'll turn into fantastic hat.";
61	mes "But before that,I need some materials to make with.";
62	next;
63	if (select("What are the materials?:So what? I don't want to know.") == 1) {
64	mes "[Designer Louise Kim]";
65	mes "Well, nothing special.";
66	mes "Basically, you need Santa's hat of course.";
67	mes "and with a touch of my magical fingers,";
68	mes "it'll just turn into very special thing.";
69	mes "Well,just little bit prettier and";
70	mes "little bit more practical. Haha...";
71	next;
72	mes "[Designer Louise Kim]";
73	mes "Anyway,to sum up,required materials are....";
74	mes "Basically ^0000FFSanta's Hat^000000 and";
75	mes " ^0000FF 1 Cactus Needle ^000000 for sewing, ";
76	mes "^0000FF 10 Holy Water ^000000 for blessing, ";
77	mes "^0000FF 1 Rosary ^000000 for luckiness.";
78	mes "It's pretty enough to make Louise Hat.";
79	next;
80	if (countitem(952) > 0 && countitem(523) > 9 && countitem(2608) > 0) {
81	select("Here you are.....");
82	mes "[Designer Louise Kim]";
83	mes "Wow~~!! So fast!!";
84	mes "I like your style~.";
85	mes "Ok!! If everything is ready, no need to hesitate.";
86	mes "I'll show you what Designer Louise Kim's power is.";
87	emotion e_no1;
88	next;
89	mes "-She puts the hat in a bucket -";
90	mes "-filled with Holy Water.-";
91	mes "-She rapidly takes it out and starts mending the hat-";
92	mes "-humming a tune.-";
93	next;
94	mes "[Designer Louise Kim]";
95	mes "~With the number one designer, Louise Kim,~";
96	mes "~you are the most blessed soul.~";
97	emotion e_ho;
98	misceffect 42; //EF_BLESSING
99	next;
100	mes "-Immediately, she puts Rosary in an-";
101	mes "-unknown liquid and dissolves it.-";
102	mes "-And with a brush,-";
103	mes "-neatly coats the liquid on -";
104	mes "-a thread of the hat.-";
105	next;
106	mes "[Designer Louise Kim]";
107	mes "~With the number one designer, Louise Kim,~";
108	mes "~you are the luckiest soul.~";
109	emotion e_ho;
110	misceffect 75; //EF_GLORIA
111	next;
112	mes "-She starts sewing the hat with -";
113	mes "-a Cactus Needle and a thread.-";
114	mes " ";
115	next;
116	mes "[Designer Louise Kim]";
117	mes "~This is called the Louise's miracle.~";
118	mes "~The most talented disigner,~";
119	mes "~L_O_U_I_S_E K_I_M~";
120	emotion e_lv;
121	misceffect 91; //EF_BENEDICTIO
122	next;
123	mes "[Designer Louise Kim]";
124	mes "Here!! All done~~";
125	mes "How do you like it?";
126	mes "Isn't it so wonderful?";
127	mes "Take it!! It's a gift.";
128	next;
129	mes "[Designer Louise Kim]";
130	mes "I should have called high price for it";
131	mes "but as you know it's Christmas!";
132	mes "It's a gift for you!";
133	mes "I won't charge anything.";
134	mes "Just tell many people how good it is.";
135	emotion e_heh;
136	next;
137	mes "[Designer Louise Kim]";
138	mes "Wherever you go,";
139	mes "whatever you do,";
140	mes "never take off the hat.";
141	mes "You won't have a chance to buy it";
142	mes "no matter how much you pay.";
143	next;
144	mes "[Designer Louise Kim]";
145	mes "Alright~Go ahead~";
146	mes "Go brag yourself!";
147	mes "~Who would be happier than~";
148	mes "~being with Louise.~";
149	emotion e_ho;
150	delitem 2236,1; //Santa's_Hat
151	delitem 953,1; //Cactus_Needle
152	delitem 523,10; //Holy_Water
153	delitem 2608,1; //Rosary
154	getitem 5136,1; //Santa's_Hat_
155	close;
156	}
157	else {
158	mes "[Designer Louise Kim]";
159	mes "Come on~If you just get me the materials,";
160	mes "I won't chage anything,";
161	mes "Call me if you change your mind.";
162	emotion e_lv;
163	close;
164	}
165	}
166	mes "[Designer Louise Kim]";
167	mes "You'll regret!";
168	mes "Think again!";
169	emotion e_heh;
170	close;
171	}
172	mes "[Designer Louise Kim]";
173	mes "Ok~ whatever~";
174	mes "It's not me,";
175	mes "who's going to lose whose own luck.";
176	emotion e_heh;
177	close;
178	}
179	else {
180	mes "[Designer Louise Kim]";
181	mes "Perhaps you get the chance to acheive Santa's Hat later some time,";
182	mes "think about it carefully.";
183	mes "You can get the better designed hat,";
184	mes "and I can show off my talent.";
185	mes "";
186	emotion e_heh;
187	close;
188	}
189	}
190
191	// Enjoy Happymerry Chistmas Event (Event 2)
192	prontera,155,285,3 script Enjoy#enjoy 753,{
193	if (!christ_solo05){
194	mes "[Enjoy]";
195	mes "Oh~~~";
196	mes "It's already winter again~~!";
197	mes "This chilling weather makes";
198	mes "my body freeze~";
199	mes "And also makes my heart freeze.";
200	mes "Who said that christmas is only for lovers~";
201	mes "Oh~~I'm so lonely~!!!";
202	next;
203	mes "[Enjoy]";
204	mes "Pitiless sister!!";
205	mes "How can she leave me alone on a christmas day~";
206	mes "'Spend your days with family on a chirstmas day'";
207	mes "is our family precept";
208	mes "Hm...I need to get some rest.";
209	mes "I'm so nervous these days~";
210	next;
211	mes "[Enjoy]";
212	mes "Lets make a joyful christmas for ";
213	mes "lonely singles.";
214	mes "Who's with me?!!";
215	mes "!!!!!!!!!!!";
216	mes "!!!!!!!!!!!!!";
217	next;
218	switch(select("Wow!:Hm...I'm not interested.:I have ~")){
219	case 1:
220	mes "[Enjoy]";
221	mes "Alright~~!!!";
222	mes "Let's rock and roll!!";
223	mes "Here's my plan!!";
224	mes "Let's punish those couples";
225	mes "who are so excited about christmas.";
226	mes "I just don't want to see them happy.";
227	next;
228	mes "[Enjoy]";
229	mes "To put in action,";
230	mes "we need to gather many phalanges.";
231	mes "Ok!!Bring our phalanges in every town on a way back here. ";
232	mes "Alright?Let's go!!";
233	next;
234	mes "[Enjoy]";
235	mes "Each should have one person's phone number.";
236	mes "We must keep it secret before we put in action.";
237	mes "So we must be very careful.";
238	mes "Well...";
239	mes "I know ^0000FFHappymerry^000000's phone number.";
240	next;
241	mes "[Enjoy]";
242	mes "First of all, go look for ^0000FFHappymerry^000000";
243	mes "and tell him about our plan.";
244	mes "On a way back, bring as many phalanges as you can. ";
245	next;
246	mes "["+ strcharinfo(0) +"]";
247	mes "Alright,sir!!!";
248	next;
249	mes "[Enjoy]";
250	mes "Oh,and don't forget to bring";
251	mes "5 branch of dead trees!!!";
252	mes "Must bring item to attack town~";
253	mes "hahahaha~~";
254	emotion e_gg;
255	next;
256	mes "[Enjoy]";
257	mes "Get it?!!!!";
258	mes "Let's go punish!!!";
259	mes "We are not being jealous,";
260	mes "It's just not right leading a loose life!";
261	next;
262	mes "["+ strcharinfo(0) +"]";
263	mes "Let's punish!!!!!!!!!!!!!!!!!!!!!!!!!!!";
264	set christ_solo05,1;
265	close;
266	case 2:
267	mes "[Enjoy]";
268	mes "If you are not with me, get away~!!";
269	mes "Get out of my sight!!!!";
270	mes "";
271	close;
272	case 3:
273	mes "[Enjoy]";
274	mes "......";
275	specialeffect 42; //EF_BLESSING
276	next;
277	mes "[Enjoy]";
278	mes ".............";
279	specialeffect 37; //EF_INCAGIDEX
280	next;
281	mes "[Enjoy]";
282	mes "........................";
283	specialeffect 254; //EF_STEELBODY
284	next;
285	mes "[Enjoy]";
286	mes "........................";
287	mes "Get lost,you devil!!!!!!";
288	specialeffect 328; //EF_BEGINASURA
289	specialeffect2 1; //EF_HIT2
290	set Hp,Hp/2;
291	set Hp,Hp/2;
292	close2;
293	warp "prontera",155,230;
294	end;
295	}
296	}
297	else if((christ_solo05 > 0) && (christ_solo05 < 5)){
298	mes "[Enjoy]";
299	mes "Each should have one person's phone number.";
300	mes "We must keep it secret before we put in action.";
301	mes "So we must be very careful.";
302	mes "Well...";
303	mes "I know ^0000FFHappymerry^000000's phone number.";
304	next;
305	mes "[Enjoy]";
306	mes "First of all, go look for ^0000FFHappymerry^000000";
307	mes "and tell him about our plan.";
308	mes "On a way back, bring as many phalanges as you can.";
309	next;
310	mes "[Enjoy]";
311	mes "Oh,and don't forget to bring";
312	mes "5 branch of dead trees!!!";
313	mes "Let's go punish couples!!!";
314	close;
315	}
316	else if (christ_solo05 == 5) {
317	if (countitem(604) > 4){
318	mes "[Enjoy]";
319	mes "Did you do as I told you to do?!!!";
320	mes "Did you bring branch of dead trees?Let me see~~!!";
321	next;
322	mes "[Enjoy]";
323	mes "Fine!!";
324	mes "You are all ready!!!";
325	next;
326	mes "["+ strcharinfo(0) +"]";
327	mes "Wait!!";
328	mes "Where's other people??";
329	next;
330	mes "[Enjoy]";
331	mes "What are you talking about?!";
332	mes "They are already here.......";
333	next;
334	mes "[Enjoy]";
335	mes "Can't you see?!";
336	mes "Please~!!!!Are you ok?!!!";
337	donpcevent "Happymerry#happymerry02::OnCommandOn";
338	donpcevent "Christ#christ02::OnCommandOn";
339	donpcevent "Mas#mas02::OnCommandOn";
340	donpcevent "Event#event02::OnCommandOn";
341	next;
342	mes "["+ strcharinfo(0) +"]";
343	mes "Oh.. Yup!!!";
344	next;
345	mes "[Enjoy]";
346	mes "Welcome!! Welcome,my phalanges!!!";
347	mes "Being a single is not a sin.";
348	mes "Why do we have to hide ourselves from ";
349	mes "their sight!";
350	mes "I hate couples!!";
351	mes "Poor single!!";
352	next;
353	mes "[Enjoy]";
354	mes "For those of who have friend who just met his/her mate,";
355	mes "or who had to turn his/her back from kissing couples!!";
356	mes "What are you waiting for!!";
357	mes "Why do we have to be the victim!!";
358	mes "";
359	next;
360	mes "[Enjoy]";
361	mes "It's christmas season again!!";
362	mes "";
363	next;
364	mes "[Enjoy]";
365	mes "Are we the soldiers";
366	mes "who have beaten up monsters with our bare hand.";
367	mes "Don't you remember the days?!!We have jumped down from Air ship!!";
368	mes "We are well trained singles!!Haha~!";
369	next;
370	mes "[Enjoy]";
371	mes "We don't have to wipe our tears";
372	mes "looking at party players anymore.";
373	mes "No need to envy!!";
374	mes "This christmas is for singles!! ";
375	mes "Yahoo~";
376	mes "";
377	next;
378	mes "[All]";
379	mes "Christmas for singles!!!";
380	mes "No more envy!!No more sorrow!!No more anger!!!";
381	mes "Christmas for singles!!!";
382	next;
383	mes "-Enjoy takes away branches of dead trees.";
384	mes "-Grabs them tight.-";
385	next;
386	mes "[Enjoy]";
387	mes "Let's punish couples,";
388	mes "those of who leading a loose life!!";
389	mes " ";
390	mes "[All]";
391	mes "Let's punish!!!!!";
392	emotion e_go;
393	emotion e_go,1;
394	donpcevent "Happymerry#happymerry02::OnCommandEmotion";
395	donpcevent "Christ#christ02::OnCommandEmotion";
396	donpcevent "Mas#mas02::OnCommandEmotion";
397	donpcevent "Event#event02::OnCommandEmotion";
398	misceffect 376; //_HITLINE2
399	delitem 604,5; //Branch_of_Dead_Tree
400	set christ_solo05,6;
401	donpcevent "Happymerry#happymerry02::OnCommandOff";
402	donpcevent "Christ#christ02::OnCommandOff";
403	donpcevent "Mas#mas02::OnCommandOff";
404	donpcevent "Event#event02::OnCommandOff";
405	close2;
406	mapannounce "prontera", "Single soldiers "+ strcharinfo(0) +"'s sorrow spread all over the town.",bc_map,0x66FFCC;
407	monster "prontera",155,300,""+ strcharinfo(0) +"'s anguish",1062,1,"Enjoy#enjoy::OnMyMobDead";
408	monster "prontera",156,300,""+ strcharinfo(0) +"'s jealousy",1062,1,"Enjoy#enjoy::OnMyMobDead";
409	monster "prontera",157,300,""+ strcharinfo(0) +"'s despair",1062,1,"Enjoy#enjoy::OnMyMobDead";
410	monster "prontera",158,300,""+ strcharinfo(0) +"'s frustration",1062,1,"Enjoy#enjoy::OnMyMobDead";
411	monster "prontera",154,300,""+ strcharinfo(0) +"'s bombing",1062,1,"Enjoy#enjoy::OnMyMobDead";
412	monster "prontera",158,299,""+ strcharinfo(0) +"'s grudge",1246,1,"Enjoy#enjoy::OnMyMobDead";
413	monster "prontera",157,299,""+ strcharinfo(0) +"'s curse",1246,1,"Enjoy#enjoy::OnMyMobDead";
414	monster "prontera",156,299,""+ strcharinfo(0) +"'s anger",1246,1,"Enjoy#enjoy::OnMyMobDead";
415	monster "prontera",155,299,""+ strcharinfo(0) +"'s grief",1246,1,"Enjoy#enjoy::OnMyMobDead";
416	monster "prontera",154,299,""+ strcharinfo(0) +"'s hatred",1246,1,"Enjoy#enjoy::OnMyMobDead";
417	monster "prontera",158,298,""+ strcharinfo(0) +"'s a bitter taste of solo",1245,1,"Enjoy#enjoy::OnMyMobDead";
418	monster "prontera",157,298,""+ strcharinfo(0) +"'s couple punisher",1245,1,"Enjoy#enjoy::OnMyMobDead";
419	monster "prontera",156,298,""+ strcharinfo(0) +"'s loneliness",1245,1,"Enjoy#enjoy::OnMyMobDead";
420	monster "prontera",155,298,""+ strcharinfo(0) +"'s sobbing",1245,1,"Enjoy#enjoy::OnMyMobDead";
421	monster "prontera",154,298,""+ strcharinfo(0) +"'s darkness",1245,1,"Enjoy#enjoy::OnMyMobDead";
422	monster "prontera",158,297,""+ strcharinfo(0) +"'s depression",1244,1,"Enjoy#enjoy::OnMyMobDead";
423	monster "prontera",157,297,""+ strcharinfo(0) +"'s estrangement",1244,1,"Enjoy#enjoy::OnMyMobDead";
424	monster "prontera",156,297,""+ strcharinfo(0) +"'s nightmare",1244,1,"Enjoy#enjoy::OnMyMobDead";
425	monster "prontera",155,297,""+ strcharinfo(0) +"'s wail",1244,1,"Enjoy#enjoy::OnMyMobDead";
426	monster "prontera",154,297,""+ strcharinfo(0) +"'s whisper",1244,1,"Enjoy#enjoy::OnMyMobDead";
427	monster "prontera",158,296,""+ strcharinfo(0) +"'s regret",1588,1,"Enjoy#enjoy::OnMyMobDead";
428	monster "prontera",157,296,""+ strcharinfo(0) +"'s shadow",1588,1,"Enjoy#enjoy::OnMyMobDead";
429	monster "prontera",156,296,""+ strcharinfo(0) +"'s couplebreaker",1588,1,"Enjoy#enjoy::OnMyMobDead";
430	monster "prontera",155,296,""+ strcharinfo(0) +"'s sadness",1588,1,"Enjoy#enjoy::OnMyMobDead";
431	monster "prontera",154,296,""+ strcharinfo(0) +"'s symbol of brokenheart",1588,1,"Enjoy#enjoy::OnMyMobDead";
432	donpcevent "Enjoy#enjoy::OnCommandGo";
433	end;
434	}
435	else {
436	mes "[Enjoy]";
437	mes "There's no much time left!!!";
438	mes "No time to hesitate!!";
439	mes "Couples will enjoy their christmas day";
440	mes "so happily.";
441	mes "Are you going to leave them like that!!!!!";
442	mes "Let's go let's go!!";
443	mes "Go get ^0000FF 5 branch of dead tree^000000s!!!";
444	close;
445	}
446	}
447	else {
448	mes "[Enjoy]";
449	mes "Hm.... ";
450	mes "It's no use just blaming oneself!";
451	mes "We lonely fellows can build our own hopeful future.";
452	mes "Let's go!!";
453	mes "Let's go phalanges!!!";
454	next;
455	mes "[Enjoy]";
456	mes "For the day we all get happy~!!";
457	mes "Let's go for it!!!";
458	mes "Cheer up everybody!!!";
459	mes "Let's rock till you get happy~!";
460	mes "";
461	set christ_solo05,0;
462	close;
463	}
464
465	OnMyMobDead:
466	end;
467
468	OnCommandGo:
469	disablenpc "Enjoy#enjoy";
470	initnpctimer;
471	end;
472
473	OnCommandStop:
474	enablenpc "Enjoy#enjoy";
475	killmonster "prontera","Enjoy#enjoy::OnMyMobDead";
476	stopnpctimer;
477	end;
478
479	OnTimer3000:
480	mapannounce "prontera", "You must refine by yourself to satisfy!!!!",bc_map,0x66FFCC;
481	end;
482
483	OnTimer5000:
484	mapannounce "prontera", "It's a waste to organize party at dungeon!!!",bc_map,0x66FFCC;
485	end;
486
487	OnTimer7000:
488	mapannounce "prontera", "There is a NPC flirting me!!!",bc_map,0x66FFCC;
489	end;
490
491	OnTimer9000:
492	mapannounce "prontera", "I was always alone from the day I was born!!",bc_map,0x66FFCC;
493	end;
494
495	OnTimer11000:
496	mapannounce "prontera", "We dig herbs even on a christmas day!!",bc_map,0x66FFCC;
497	end;
498
499	OnTimer13000:
500	mapannounce "prontera", "...We are the insuperable single soldiers!!!",bc_map,0x66FFCC;
501	end;
502
503	OnTimer180000:
504	mapannounce "prontera", "Wish every single soldiers have a merry christmas!!",bc_map,0x66FFCC;
505	donpcevent "Enjoy#enjoy::OnCommandStop";
506	end;
507	}
508
509	prontera,150,286,5 script Happymerry#happymerry02 869,{
510	end;
511
512	OnInit:
513	disablenpc "Happymerry#happymerry02";
514	stopnpctimer;
515	end;
516
517	OnCommandOn:
518	initnpctimer;
519	enablenpc "Happymerry#happymerry02";
520	OnCommandEmotion:
521	emotion e_go;
522	end;
523
524	OnCommandOff:
525	disablenpc "Happymerry#happymerry02";
526	stopnpctimer;
527	end;
528
529	OnTimer60000:
530	donpcevent "Happymerry#happymerry02::OnCommandOff";
531	donpcevent "Christ#christ02::OnCommandOff";
532	donpcevent "Mas#mas02::OnCommandOff";
533	donpcevent "Event#event02::OnCommandOff";
534	stopnpctimer;
535	end;
536	}
537
538	prontera,161,286,4 script Christ#christ02 875,{
539	end;
540	OnInit:
541	disablenpc "Christ#christ02";
542	end;
543
544	OnCommandOn:
545	enablenpc "Christ#christ02";
546	OnCommandEmotion:
547	emotion e_go;
548	end;
549
550	OnCommandOff:
551	disablenpc "Christ#christ02";
552	end;
553	}
554
555	prontera,161,281,1 script Mas#mas02 748,{
556	end;
557	OnInit:
558	disablenpc "Mas#mas02";
559	end;
560
561	OnCommandOn:
562	enablenpc "Mas#mas02";
563	OnCommandEmotion:
564	emotion e_go;
565	end;
566
567	OnCommandOff:
568	disablenpc "Mas#mas02";
569	end;
570	}
571
572	prontera,150,281,7 script Event#event02 881,{
573	end;
574	OnInit:
575	disablenpc "Event#event02";
576	end;
577
578	OnCommandOn:
579	enablenpc "Event#event02";
580	OnCommandEmotion:
581	emotion e_go;
582	end;
583
584	OnCommandOff:
585	disablenpc "Event#event02";
586	end;
587	}
588
589	prontera,188,177,4 script Happymerry#happymerry 869,{
590	if (christ_solo05==1) {
591	mes "[Happymerry]";
592	mes "Holgren~~!!";
593	mes "I've never expected you betraying me! Don't wanna get refined~!!!";
594	mes "I hate christmas~!";
595	emotion e_sob;
596	next;
597	mes "["+ strcharinfo(0) +"]";
598	mes "Are...you...?";
599	next;
600	mes "[Happymerry]";
601	mes "What are you laughing at? huh~!";
602	mes "At least, I never borrowed a hand";
603	mes "to get my equips refined!";
604	mes "I was always brave!!";
605	mes "Blessing? Gloria~~?!";
606	mes "Couples~~duh~!!!!!!";
607	next;
608	mes "["+ strcharinfo(0) +"]";
609	mes "You seem to be the right one!!!";
610	mes "Enjoy is waiting for you.";
611	mes "let's go!!!";
612	next;
613	mes "[Happymerry]";
614	mes "...!";
615	mes "The day has come?";
616	mes "He help me last christmas,";
617	mes "when I failed refining my equips.";
618	mes "Oh, holy Enjoy~";
619	mes "";
620	next;
621	mes "[Happymerry]";
622	mes "Alright!I've been waiting for a year!!";
623	mes "I'm ready to mess up christmas day~!!";
624	mes "So,where is Enjoy?";
625	mes "Where is he?!";
626	next;
627	mes "["+ strcharinfo(0) +"]";
628	mes "He's waiting for you!";
629	mes "Go ahead~";
630	mes "I'll follow you after contacting others.";
631	mes "";
632	next;
633	mes "[Happymerry]";
634	mes "Alright!";
635	mes "I was supposed to call ^0000FFChrist^000000!";
636	mes "Call him for me!";
637	mes "I'll go ahead with my bags packed up.";
638	mes "See ya!";
639	set christ_solo05,2;
640	close;
641	}
642	else if (christ_solo05 > 1) {
643	mes "[Happymerry]";
644	mes "Hm...There's more things to pack up than I thought.";
645	mes "Well,it's been a year.....";
646	mes "Anyway,";
647	mes "Don't for get to call ^0000FFChrist^000000!";
648	mes "See ya!";
649	close;
650	}
651	else {
652	mes "[Happymerry]";
653	mes "Holgren!!";
654	mes "I've never expected you betraying me! Don't wanna get refined~!!!";
655	mes "I hate christmas~!";
656	emotion e_sob;
657	next;
658	mes "[Happymerry]";
659	mes "What are you laughing at? huh~!";
660	mes "At least, I never borrowed a hand";
661	mes "to get my equips refined!";
662	mes "I was always brave!!";
663	mes "Blessing? Gloria~~?!";
664	mes "Couples~~duh~!!!!!!";
665	close;
666	}
667	}
668
669	prontera,62,339,3 script Christ#christ 875,{
670	if (christ_solo05 == 2) {
671	mes "[Christ]";
672	mes "Now~finally!!!";
673	mes "I get to ride Pecopeco~!";
674	mes "Why do need to organize a party with priest?!";
675	mes "I don't need all that.";
676	mes "Only thing I need is this chubby Pecopeco~!";
677	mes "";
678	next;
679	mes "["+ strcharinfo(0) +"]";
680	mes "Um...";
681	next;
682	mes "[Christ]";
683	mes "Who are you!";
684	mes "Don't ever think to get around my Peco~!";
685	mes "Oh~my sweat Peco~~Weren't you scared? It's ok darling.";
686	mes "Enjoy was all alone lonely from the day he were born~";
687	mes "But me?!! Nope!!";
688	mes "I have my sweat peco with me!!";
689	next;
690	mes "[Christ]";
691	mes "I'm going to held party with my peco.";
692	mes "We'll share christmas cake together and.....";
693	mes "I'm not gonna be lonely~";
694	mes "No I won't!!!";
695	next;
696	mes "["+ strcharinfo(0) +"]";
697	mes "Actually Enjoy told me...";
698	next;
699	mes "[Christ]";
700	mes "Huh? What did you say?";
701	mes "Enjoy? You know him? Then,you must be the one whom Happymerry sent!?";
702	next;
703	mes "["+ strcharinfo(0) +"]";
704	mes "Yes~ Happymerry sent me...";
705	next;
706	mes "[Christ]";
707	mes "Finally, the day has come!!";
708	mes "Did you hear it? Peco~";
709	mes "...We have an amazing plan!";
710	mes "This christmas is gonna be fantastic!!";
711	mes "No need to envy couples!!";
712	next;
713	mes "[Christ]";
714	mes "Alright!!";
715	mes "I'll run to Enjoy with my peco~!";
716	mes "Go tell ^0000FFMas^000000";
717	mes "about this!!!";
718	mes "See ya~~!";
719	set christ_solo05,3;
720	close;
721	}
722	else if(christ_solo05 > 2) {
723	mes "[Christ]";
724	mes "Than,see you there!!";
725	mes "I'll go meet Enjoy!";
726	mes "Never forget to tell ^0000FFMas^000000";
727	mes "about this!!!";
728	mes "See ya~~!";
729	close;
730	}
731	else {
732	mes "[Christ]";
733	mes "Now~finally!!!";
734	mes "I get to ride Pecopeco~!";
735	mes "Why do need to organize a party with priest?!";
736	mes "I don't need all that.";
737	mes "Only thing I need is this chubby Pecopeco~!";
738	mes "";
739	next;
740	mes "[Christ]";
741	mes "Who are you!";
742	mes "Don't ever think to get around my Peco~!";
743	mes "Oh~my sweat Peco~~Weren't you scared?It's ok darling.";
744	mes "Enjoy was all alone lonely from the day he were born~";
745	mes "But me?!!Nope!!";
746	mes "I have my sweat peco with me!!";
747	next;
748	mes "[Christ]";
749	mes "I'm going to held party with my peco.";
750	mes "We'll share christmas cake together and.....";
751	mes "I'm not gonna be lonely~";
752	mes "No I won't!!!";
753	close;
754	}
755	}
756
757	prontera,163,66,7 script Mas#mas 748,{
758	if(christ_solo05 == 3) {
759	mes "[Mas]";
760	mes "Herds!!!!!How long does it take!";
761	mes "Somebody know the regenerating time of Herb?!!";
762	mes "I'll dig herbs and make potions and sell it to singles!!";
763	mes "Hahahaha!!";
764	next;
765	mes "[Mas]";
766	mes "Ah~~";
767	mes "How come I feel so empty~.";
768	mes "although I have herds fill in a storage. ";
769	mes "No~~!!!!!!";
770	mes "No time to waste~~";
771	mes "Let's dig herbs.......";
772	next;
773	mes "["+ strcharinfo(0) +"]";
774	mes "Hey~are you ok? Are you Mas?";
775	next;
776	mes "[Mas]";
777	mes "Who...who are you?!!!";
778	mes "Well, it's been so long since I spoke to a stranger.";
779	mes "Hm...";
780	mes "I feel something warm inside my heart....... ";
781	mes "Never mind!! What am I thinking?!!";
782	mes "Get away~I have dig herbs~";
783	next;
784	mes "["+ strcharinfo(0) +"]";
785	mes "Mas!!";
786	mes "Are you ok?!";
787	mes "Christ sent me.";
788	next;
789	mes "[Mas]";
790	mes "What!!!Already!!";
791	mes "Yeah~right!";
792	mes "I don't need to spend times digging herbs!!";
793	mes "If Enjoy made an order!?!";
794	mes "I'll be there right away~!!!!!";
795	next;
796	mes "[Mas]";
797	mes "...Are going with me?";
798	next;
799	mes "["+ strcharinfo(0) +"]";
800	mes "No~~";
801	mes "I have something left to do.";
802	mes "I have to tell others about this.";
803	next;
804	mes "[Mas]";
805	mes "Oh yeah right!!!";
806	mes "Go look for ^0000FFEvent^000000.";
807	mes "Well,bye~.";
808	mes "I'll meet you there!!...";
809	mes "Herbs~?! Couples?! Whatever~~";
810	set christ_solo05,4;
811	close;
812	}
813	else if(christ_solo05 > 3) {
814	mes "[Mas]";
815	mes "If you excuse me, I'll go ahead and meat Enjoy.";
816	mes "And don't forget to tell ^0000FFEvent^000000 about this.";
817	mes "Herbs~couples~~Whatever~~";
818	mes "This christmas is gonna be fantastic!!";
819	mes "Hahahaha~";
820	close;
821	}
822	else {
823	mes "[Mas]";
824	mes "Herds!!!!!How long does it take!";
825	mes "Somebody know the regenerating time of Herb?!!";
826	mes "I'll dig herbs and make potions and sell it to singles!!";
827	mes "Hahahaha!!";
828	next;
829	mes "Ah~~";
830	mes "How come I feel so empty~.";
831	mes "although I have herds fill in a storage. ";
832	mes "No~~!!!!!!";
833	mes "No time to waste~~";
834	mes "Let's dig herbs.......";
835	close;
836	}
837	}
838
839	prontera,35,209,5 script Event#event 881,{
840	if(christ_solo05 == 4) {
841	mes "[Event]";
842	mes "........................";
843	next;
844	mes "["+ strcharinfo(0) +"]";
845	mes "...Are... you...?";
846	next;
847	mes "[Event]";
848	mes "...I love you too~!!!";
849	emotion e_omg,1;
850	next;
851	mes "["+ strcharinfo(0) +"]";
852	mes "(Oh,my..)";
853	next;
854	mes "[Event]";
855	mes "It's ok, Tinybee. I'm not lonely at all.";
856	mes "I have Ms.Bathory and Ms.Orclady with me.";
857	mes "Hahahaha~~~";
858	mes "";
859	next;
860	mes "-He laughed talking to his right hand.-";
861	mes "";
862	//Emotion "Event#event" ET_KIK
863	emotion e_kis;
864	next;
865	mes "["+ strcharinfo(0) +"]";
866	mes "Mas sent me here.";
867	mes "You know about Enjoy's plan, right?";
868	mes "...Are you listening?";
869	next;
870	mes "[Event]";
871	mes "...Did you hear?? Tinybee?";
872	mes "The day has come!!";
873	mes "Hahaha~~~~.";
874	next;
875	mes "[Event]";
876	mes "Wait for me miss Kafra~~~";
877	mes "Don't be so lonely~.";
878	mes "I'll make your christmas unforgettably fantastic.";
879	mes "Let's go Tinybee.";
880	mes "";
881	next;
882	mes "-He kept talking to his right hand-";
883	mes "-and packed his stuff and bowed to Kafra.-";
884	mes "";
885	next;
886	mes "["+ strcharinfo(0) +"]";
887	mes "Finally!!! Done telling everyone!!";
888	mes "Now I should get my ^0000FFBranch of Dead Tree^000000s packed up";
889	mes "and go punish singles!!!";
890	mes "Hahahaha..";
891	set christ_solo05,5;
892	close;
893	}
894	else if(christ_solo05 > 4) {
895	mes "[Event]";
896	mes "Wait for me miss Kafra~~~";
897	mes "Don't be so lonely~.";
898	mes "I'll make your christmas unforgettably fantastic.";
899	mes "Let's go Tinybee.";
900	next;
901	mes "-He talked to his right hand-";
902	mes "-and packed his stuff and bowed to Kafra.-";
903	next;
904	mes "["+ strcharinfo(0) +"]";
905	mes "Finally!!! Done telling everyone!!";
906	mes "Now I should get my things packed up";
907	mes "and go punish singles!!!";
908	mes "Hahahaha..";
909	close;
910	}
911	else {
912	mes "[Event]";
913	mes "........................";
914	next;
915	mes "[Event]";
916	mes "...I love you too~!!!";
917	emotion e_omg,1;
918	next;
919	mes "["+ strcharinfo(0) +"]";
920	mes "(Oh.my~)";
921	next;
922	mes "[Event]";
923	mes "It's ok Tinybee.I'm not lonely at all.";
924	mes "I have Ms.Bathory and Ms.Orclady with me.";
925	mes "Hahahaha~~~";
926	mes "";
927	next;
928	mes "-He laughed talking to his right hand.-";
929	mes "";
930	emotion e_kis;
931	close;
932	}
933	}
934
935	// Oholy (Event 3)
936	prontera,156,242,0 script Oholy#pron::OholyDup 79,{
937	if (!christ_carol05) {
938	mes "[Oholy]";
939	mes "Joy to the world!";
940	mes "The Lord has come.";
941	specialeffect 75; //EF_GLORIA
942	next;
943	if (Sex) {
944	mes "[Oholy]";
945	mes "Merry Christmas!";
946	mes "Dear brother, what comes in";
947	mes "your mind when you think of Christmas?";
948	next;
949	}
950	else {
951	mes "[Oholy]";
952	mes "Merry Christmas!";
953	mes "Dear sister, what comes in";
954	mes "your mind when you think of Christmas?";
955	next;
956	}
957	switch(select("Santa Claus:Christmas Gifts:Christmas Carols:Santa Hat:I don't like couples")) {
958	case 1:
959	mes "[Oholy]";
960	mes "Santa Claus!";
961	mes "You still have childish";
962	mes "innocence, kid!!!";
963	mes "Hohoho.";
964	next;
965	mes "[Oholy]";
966	mes "There is a rumor that Santa Claus";
967	mes "in the town where Christmas ";
968	mes "never ends. This is just";
969	mes "between you and me, okay?";
970	next;
971	mes "[Oholy]";
972	mes "The latest headline by Oholy";
973	mes "Isn't it amazing?";
974	emotion e_heh;
975	close;
976	case 2:
977	mes "[Oholy]";
978	mes "Gifts! That's nice!";
979	mes "How exciting it is!!!";
980	mes "You wake up and find";
981	mes "christmas gifts next to your pillow!";
982	next;
983	mes "[Oholy]";
984	mes "Have you heard that";
985	mes "bad santa who makes a suprise";
986	mes "attack in every christmas, has";
987	mes "taken Santa Claus's gifts to";
988	mes "good kids!";
989	next;
990	mes "[Oholy]";
991	mes "So, Santa Claus in Christmas";
992	mes "town has offered a reward for";
993	mes "capturing phony Santa, Antonio.";
994	next;
995	mes "[Oholy]";
996	mes "The latest headline by Oholy";
997	mes "Isn't it amazing?";
998	emotion e_heh;
999	close;
1000	case 3:
1001	mes "[Oholy]";
1002	mes "That's right!";
1003	mes "Carol is the essential for";
1004	mes "Christmas! When I was";
1005	mes "young, my mind used to be";
1006	mes "fluttered by carols during";
1007	mes "Christmas.";
1008	next;
1009	mes "[Oholy]";
1010	mes "But, in these days, not many";
1011	mes "people sing Christmas carols";
1012	mes "so it is hard to feel that";
1013	mes "Christmas is coming closer";
1014	mes " ";
1015	next;
1016	mes "[Oholy]";
1017	mes "Therefore, I decided to wish";
1018	mes "a merry christmas to everyone";
1019	mes "by singing Christmas carols and";
1020	mes "giving gifts to kids from door";
1021	mes "to door, but, unfortunately,";
1022	mes "wicked devil has torn off my carol music book!!!";
1023	next;
1024	mes "[Oholy]";
1025	mes "I have many houses to visit.";
1026	mes "I feel so sad for disappointed";
1027	mes "kids who didn't hear the carols.";
1028	next;
1029	menu "...can I help you?",-;
1030	mes "[Oholy]";
1031	mes "Good gracious! Are you for real?";
1032	mes "Oh? Shee... Can you hear it?";
1033	mes "Every kids appreciate your kindness.";
1034	emotion e_heh;
1035	mes "Don't be afraid. I will not";
1036	mes "ask you to make a new christmas carol.";
1037	next;
1038	mes "[Oholy]";
1039	mes "If you have a will,";
1040	mes "we got no time to waste.";
1041	mes "Let's move on to give hope to kids!";
1042	next;
1043	mes "[Oholy]";
1044	mes "Well, please bring me back";
1045	mes "Christmas carol music book, "+ strcharinfo(0) +".";
1046	mes "That little devil will be still";
1047	mes "in the town because it only happened a few minutes ago.";
1048	next;
1049	mes "[Oholy]";
1050	mes "Please be careful because";
1051	mes "you are dealing with devil.";
1052	mes "Well then, hope you a good luck!!!";
1053	mes " ";
1054	emotion e_no1;
1055	set christ_carol05,1;
1056	close;
1057	case 4:
1058	mes "[Oholy]";
1059	mes "A Santa Hat!!";
1060	mes "Did you know that the real";
1061	mes "Santa Hat is totally different";
1062	mes "from the one that monsters";
1063	mes "are wearing?! I heard a rumor";
1064	mes "that an anonymous designer";
1065	mes "in Lutie, made all of those santa hats.";
1066	next;
1067	mes "[Oholy]";
1068	mes "Also, there is another rumor";
1069	mes "about phony Santa, Antonio.";
1070	mes "He has been chased by many ";
1071	mes "adventurers but never been";
1072	mes "caught because of his Santa Costume.";
1073	next;
1074	mes "[Oholy]";
1075	mes "Maybe his hat and clothes have";
1076	mes "special functions within...";
1077	mes "Maybe that anonymous designer";
1078	mes "still lives in Lutie. Why don't";
1079	mes "you go visit him and ask to";
1080	mes "make you a new Santa Hat?";
1081	next;
1082	mes "[Oholy]";
1083	mes "The latest headline by Oholy";
1084	mes "Isn't it amazing?";
1085	emotion e_heh;
1086	close;
1087	case 5:
1088	mes "[Oholy]";
1089	mes "Oh, dear. I was thinking of";
1090	mes "the sa.m..e... Oops, ho..hoho.";
1091	mes "Oh well, it's not only me. Many";
1092	mes "people think of the same in this Christmas.";
1093	next;
1094	mes "[Oholy]";
1095	mes "I heard a strange rumor that";
1096	mes "those people are plotting";
1097	mes "something in this Christmas.";
1098	mes "...hope it goes well(murmur)";
1099	next;
1100	mes "[Oholy]";
1101	mes "The latest headline by Oholy";
1102	mes "Isn't it amazing?";
1103	emotion e_heh;
1104	close;
1105	}
1106	}
1107	else if(christ_carol05 == 1) {
1108	mes "[Oholy]";
1109	mes "He should not be able to escape";
1110	mes "from the town. Please find the";
1111	mes "devil and bring me back my";
1112	mes "Christmas Carol Music Book.";
1113	mes "Punish the wicked devil who is ruining Christmas!!!";
1114	close;
1115	}
1116	else if(christ_carol05 == 2) {
1117	if(checkweight(1201,1)) {
1118	mes "^3355FFWait a second!";
1119	mes "Right now, you're carrying";
1120	mes "too many things with you.";
1121	mes "Please come back after";
1122	mes "using the Kafra Service";
1123	mes "to store some of your items.^000000";
1124	close;
1125	}
1126	set .@now_weight,MaxWeight-Weight;
1127	if(.@now_weight < 2000) {
1128	mes "^3355FFWait a second!";
1129	mes "Right now, you're carrying";
1130	mes "too many things with you.";
1131	mes "Please come back after";
1132	mes "using the Kafra Service";
1133	mes "to store some of your items.^000000";
1134	close;
1135	}
1136	if (countitem(1097) > 0) {
1137	mes "[Oholy]";
1138	mes "Oh, my gracious! ";
1139	mes "You have brought me the book!";
1140	mes "Didn't the devil trouble you?";
1141	mes "I'm glad you have return safely.";
1142	next;
1143	mes "[Oholy]";
1144	mes "In return, I'm going to sing";
1145	mes "a carol from the music book.";
1146	next;
1147	mes "[Oholy]";
1148	mes "Hum! Huum!!";
1149	mes "~Sleep well, little children,~";
1150	mes "~wherever you are;~";
1151	mes "~Tomorrow is Christmas~";
1152	mes "~beneath every star.~";
1153	specialeffect 75; //EF_GLORIA
1154	next;
1155	mes "-Your mind is overwhelmed by her singing-";
1156	mes "-You started humming then,-";
1157	mes "-began to sing the next phase-";
1158	next;
1159	mes "["+ strcharinfo(0) +"]";
1160	mes "~Soon the snowflackes will fall~";
1161	mes "~and tomorrow you'll see~";
1162	mes "~Every wish, one and all,~";
1163	mes "~waiting under the tree.~";
1164	specialeffect2 75; //EF_GLORIA
1165	next;
1166	mes "[Oholy]";
1167	mes "Oh, my. You have a wonderful";
1168	mes "voice!! Alright!!!";
1169	mes "I was going to give these";
1170	mes "to kids, but, since you found";
1171	mes "my music book and sang a carol to me!";
1172	next;
1173	mes "-She brought a big sack-";
1174	mes "-and opened it in front of you-";
1175	next;
1176	mes "[Oholy]";
1177	mes "OK! Don't look inside.";
1178	mes "Just put your hands";
1179	mes "grab what you want.";
1180	next;
1181	switch(rand(1,15)) {
1182	case 1:
1183	mes "[Oholy]";
1184	mes "A Cookie Bag!";
1185	mes "I wrapped those indivisually.";
1186	mes "There are many sweets in them.";
1187	mes "Merry Christmas!";
1188	emotion e_heh;
1189	delitem 1097,1;//Worn_Out_Page
1190	set christ_carol05,3;
1191	getitem 12130,7;//Cookie_Bag
1192	close;
1193	case 2:
1194	mes "[Oholy]";
1195	mes "Candies!";
1196	mes "These were made by";
1197	mes "Chief noun.";
1198	mes "Very sweet and delicious.";
1199	mes "Merry Christmas!";
1200	emotion e_heh;
1201	delitem 1097,1;//Worn_Out_Page
1202	set christ_carol05,3;
1203	getitem 529,20;//Candy
1204	close;
1205	case 3:
1206	mes "[Oholy]";
1207	mes "Candy Canes!";
1208	mes "These were made by";
1209	mes "Chief noun.";
1210	mes "Very sweet and delicious.";
1211	mes "Merry Christmas!";
1212	emotion e_heh;
1213	delitem 1097,1;//Worn_Out_Page
1214	set christ_carol05,3;
1215	getitem 530,15;//Candy_Striper
1216	close;
1217	case 4:
1218	mes "[Oholy]";
1219	mes "A Piece Of Cake!";
1220	mes "These were baked by";
1221	mes "Chief Acolyte.";
1222	mes "Very soft and delicious.";
1223	mes "Merry Christmas!";
1224	emotion e_heh;
1225	delitem 1097,1;//Worn_Out_Page
1226	set christ_carol05,3;
1227	getitem 539,5;//Piece_of_Cake
1228	close;
1229	case 5:
1230	mes "[Oholy]";
1231	mes "Cookies!";
1232	mes "These were baked by";
1233	mes "Chief Acolyte.";
1234	mes "Very crispy and delicious.";
1235	mes "Merry Christmas!";
1236	emotion e_heh;
1237	delitem 1097,1;//Worn_Out_Page
1238	set christ_carol05,3;
1239	getitem 538,10;//Well_baked_Cookie
1240	close;
1241	case 6:
1242	mes "[Oholy]";
1243	mes "A Spore Doll!";
1244	mes "It's made elaborately by";
1245	mes "Bishop, Tomas.";
1246	mes "Very cute.";
1247	mes "Merry Christmas!";
1248	emotion e_heh;
1249	delitem 1097,1;//Worn_Out_Page
1250	set christ_carol05,3;
1251	getitem 743,1;//Spore_Doll
1252	close;
1253	case 7:
1254	mes "[Oholy]";
1255	mes "A Baphomet Doll!";
1256	mes "..........?!..........";
1257	mes "How did it get in here..?!";
1258	mes "Oops, oh well.";
1259	mes "Merry Christmas!";
1260	emotion e_heh;
1261	delitem 1097,1;//Worn_Out_Page
1262	set christ_carol05,3;
1263	getitem 750,1;//Baphomet_Doll
1264	close;
1265	case 8:
1266	mes "[Oholy]";
1267	mes "A Osiris Doll!";
1268	mes "..........?!..........";
1269	mes "How did it get in here..?!";
1270	mes "Oops, oh well.";
1271	mes "Merry Christmas!";
1272	emotion e_heh;
1273	delitem 1097,1;//Worn_Out_Page
1274	set christ_carol05,3;
1275	getitem 751,1;//Osiris_Doll
1276	close;
1277	case 9:
1278	mes "[Oholy]";
1279	mes "A Rocker Doll!";
1280	mes "This was donated by";
1281	mes "a knight, Lighten.";
1282	mes "Very kind of him.";
1283	mes "Merry Christmas!";
1284	emotion e_heh;
1285	delitem 1097,1;//Worn_Out_Page
1286	set christ_carol05,3;
1287	getitem 752,1;//Grasshopper_Doll
1288	close;
1289
1290	case 10:
1291	mes "[Oholy]";
1292	mes "A Yoyo Doll!";
1293	mes "This was donated by";
1294	mes "an assassin, Marzia.";
1295	mes "Very kind of him.";
1296	mes "Merry Christmas!";
1297	emotion e_heh;
1298	delitem 1097,1;//Worn_Out_Page
1299	set christ_carol05,3;
1300	getitem 753,1;//Monkey_Doll
1301	close;
1302	case 11:
1303	mes "[Oholy]";
1304	mes "A Racoon Doll!";
1305	mes "This was donated by";
1306	mes "a hunter, Raiden Kurs.";
1307	mes "Very kind of him.";
1308	mes "Merry Christmas!";
1309	emotion e_heh;
1310	delitem 1097,1;//Worn_Out_Page
1311	set christ_carol05,3;
1312	getitem 754,1;//Raccoondog_Doll
1313	close;
1314	case 12:
1315	mes "[Oholy]";
1316	mes "A Black Cat Doll!";
1317	mes "Sister Magareta found the item";
1318	mes "from the monster, Loli Ruri.";
1319	mes "Very kind of her.";
1320	mes "Hope she is doing okay.";
1321	mes "Merry Christmas!";
1322	emotion e_heh;
1323	delitem 1097,1;//Worn_Out_Page
1324	set christ_carol05,3;
1325	getitem 7206,1;//Black_Kitty_Doll
1326	close;
1327	case 13:
1328	mes "[Oholy]";
1329	mes "A Hung Doll!";
1330	mes "I made this doll.";
1331	mes "Isn't it adorable?!";
1332	mes "Merry Christmas!";
1333	emotion e_heh;
1334	delitem 1097,1;//Worn_Out_Page
1335	set christ_carol05,3;
1336	getitem 7212,1;//Hanging_Doll
1337	close;
1338	case 14:
1339	mes "[Oholy]";
1340	mes "A Munak Doll!";
1341	mes "That is from some country";
1342	mes "across the ocean.";
1343	mes "An artisan made this doll";
1344	mes "with his passion.";
1345	mes "Merry Christmas!";
1346	emotion e_heh;
1347	delitem 1097,1;//Worn_Out_Page
1348	set christ_carol05,3;
1349	getitem 7277,1;//Munak_Doll
1350	close;
1351	case 15:
1352	mes "[Oholy]";
1353	mes "A Santa Hat!";
1354	mes "This is only produced";
1355	mes "during Christmas season.";
1356	mes "It is not a common hat.";
1357	mes "Merry Christmas!";
1358	emotion e_heh;
1359	delitem 1097,1;//Worn_Out_Page
1360	set christ_carol05,3;
1361	getitem 2236,1;//Santa's_Hat
1362	close;
1363	}
1364	}
1365	else {
1366	mes "[Oholy]";
1367	mes "Welcome back!! You look good.";
1368	mes "2 arms and 2 legs, you look great.";
1369	mes "But, where is my music book?!";
1370	close;
1371	}
1372	}
1373	else {
1374	mes "[Oholy]";
1375	mes "Thank you very much.";
1376	mes "People and even Devils are";
1377	mes "all excited on Christmas day,";
1378	mes "so nobody knows what would";
1379	mes "happen. Will you help me";
1380	mes "then, won't you? Please~";
1381	next;
1382	mes "[Oholy]";
1383	mes "Let's think about the neighbors";
1384	mes "and do a good deed during Christmas!";
1385	set christ_carol05,0;
1386	close;
1387	}
1388	}
1389
1390	// Deviruchi functions
1391	function script F_carol_devi {
1392	if (christ_carol05 == 1) {
1393	mes "[Deviruchi]";
1394	mes "Heyhey, human!!";
1395	mes "Don't ya wanna sell your";
1396	mes "soul and be bound in a beneficial contract with me?";
1397	emotion e_kis;
1398	next;
1399	mes "["+ strcharinfo(0) +"]";
1400	mes "Hey, you! Deviruchi!!!";
1401	mes "What a brat!!! Gotcha!";
1402	next;
1403	mes "-You quickly snatched-";
1404	mes "-the nape of Deviruchi's neck-";
1405	next;
1406	switch(rand(1,4)) {
1407	case 1:
1408	mes "[Deviruchi]";
1409	mes "What are you doing!?";
1410	mes "Human?";
1411	mes "Let go of me...right now!";
1412	emotion e_omg;
1413	emotion e_omg,1;
1414	next;
1415	mes "-Deviruchi quickly ran away-";
1416	mes "-^4d4dffWhere Deviruchi is gone,-";
1417	mes "-there is a worn out paper.^000000-";
1418	mes "-Let's read the paper.-";
1419	enablenpc getarg(1);
1420	disablenpc getarg(0);
1421	next;
1422	mes "["+ strcharinfo(0) +"]";
1423	mes "Rudolph... If... Foggy...";
1424	mes "Sledge... Reindeer...";
1425	mes "Hmm, I think I got what I need.";
1426	mes "Let's go back to Ms.Oholy.";
1427	set christ_carol05,2;
1428	getitem 1097,1; //Worn_Out_Page
1429	close;
1430	case 2:
1431	mes "[Deviruchi]";
1432	mes "What are you doing!?";
1433	mes "Human?";
1434	mes "Let go of me...right now!";
1435	emotion e_omg;
1436	emotion e_omg,1;
1437	next;
1438	mes "-Deviruchi ran away quickly-";
1439	mes "-and mumbled something.-";
1440	enablenpc getarg(1);
1441	disablenpc getarg(0);
1442	next;
1443	mes "-You are now cursed!!!-";
1444	sc_start SC_Curse,5000,0;
1445	emotion e_omg,1;
1446	close;
1447	case 3:
1448	mes "[Deviruchi]";
1449	mes "What are you doing!?";
1450	mes "Human?";
1451	mes "Let go of me...right now!";
1452	emotion e_omg;
1453	emotion e_omg,1;
1454	next;
1455	mes "-Deviruchi ran away quickly-";
1456	mes "-and mumbled something.-";
1457	enablenpc getarg(1);
1458	disablenpc getarg(0);
1459	next;
1460	mes "-You are blinded!!!-";
1461	sc_start SC_Blind,5000,0;
1462	emotion e_omg,1;
1463	close;
1464	case 4:
1465	mes "[Deviruchi]";
1466	mes "What are you doing!?";
1467	mes "Human?";
1468	mes "Let go of me...right now!";
1469	emotion e_omg;
1470	emotion e_omg,1;
1471	next;
1472	mes "-Deviruchi ran away quickly-";
1473	mes "-and mumbled something.-";
1474	enablenpc getarg(1);
1475	disablenpc getarg(0);
1476	next;
1477	mes "-You are poisoned!!!-";
1478	sc_start SC_Poison,5000,0;
1479	emotion e_omg,1;
1480	close;
1481	}
1482	}
1483	else {
1484	mes "[Deviruchi]";
1485	mes "Heyhey, human!!";
1486	mes "Don't ya wanna sell your";
1487	mes "soul and be bound in a beneficial contract with me?";
1488	emotion e_omg;
1489	next;
1490	mes "["+ strcharinfo(0) +"]";
1491	mes "Hey, you! Deviruchi!!!";
1492	mes "What a brat!!! Gotcha!";
1493	next;
1494	mes "-You quickly snatched-";
1495	mes "-the nape of Deviruchi's neck-";
1496	next;
1497	mes "[Deviruchi]";
1498	mes "What are you doing!?";
1499	mes "Human?";
1500	mes "Let go of me...right now!";
1501	emotion e_omg;
1502	emotion e_omg,1;
1503	next;
1504	mes "-Deviruchi ran away quickly-";
1505	mes "-and mumbled something.-";
1506	mes "-Your body is suddenly floating.-";
1507	close2;
1508	warp getarg(2),getarg(3),getarg(4);
1509	end;
1510	}
1511	}
1512
1513	function script F_carol_devi2 {
1514	mes "[Deviruchi]";
1515	mes "Heyhey, human!!";
1516	mes "Don't ya wanna sell your";
1517	mes "soul and be bound in a beneficial contract with me?";
1518	emotion e_omg;
1519	next;
1520	mes "["+ strcharinfo(0) +"]";
1521	mes "Hey, you! Deviruchi!!!";
1522	mes "What a brat!!! Gotcha!";
1523	next;
1524	mes "-You quickly snatched-";
1525	mes "-the nape of Deviruchi's neck-";
1526	next;
1527	mes "[Deviruchi]";
1528	mes "What are you doing!?";
1529	mes "Human?";
1530	mes "Let go of me...right now!";
1531	emotion e_omg;
1532	emotion e_omg,1;
1533	next;
1534	mes "-Deviruchi ran away quickly-";
1535	mes "-and mumbled something.-";
1536	mes "-Your body is suddenly floating.-";
1537	close2;
1538	warp getarg(0),getarg(1),getarg(2);
1539	end;
1540	}
1541
1542	prontera,94,297,3 script Deviruchi#pron_01 738,3,3,{
1543	callfunc("F_carol_devi2","prontera",155,230);
1544	end;
1545
1546	OnTouch:
1547	callfunc("F_carol_devi","Deviruchi#pron_01","Deviruchi#pron_02","prontera",155,230);
1548	end;
1549	}
1550
1551	prontera,205,242,3 script Deviruchi#pron_02 738,3,3,{
1552	callfunc("F_carol_devi2","prontera",155,230);
1553	end;
1554
1555	OnTouch:
1556	callfunc("F_carol_devi","Deviruchi#pron_02","Deviruchi#pron_03","prontera",155,230);
1557	end;
1558	}
1559
1560	prontera,126,118,3 script Deviruchi#pron_03 738,3,3,{
1561	callfunc("F_carol_devi2","prontera",155,230);
1562	end;
1563
1564	OnTouch:
1565	callfunc("F_carol_devi","Deviruchi#pron_03","Deviruchi#pron_01","prontera",155,230);
1566	end;
1567	}
1568
1569	// Payon
1570	payon,165,153,3 duplicate(OholyDup) Oholy#payon 79
1571	payon,142,203,3 script Deviruchi#payon_01 738,3,3,{
1572	callfunc("F_carol_devi2","payon",166,60);
1573	end;
1574
1575	OnTouch:
1576	callfunc("F_carol_devi","Deviruchi#payon_01","Deviruchi#payon_02","payon",166,60);
1577	end;
1578	}
1579
1580	payon,248,239,3 script Deviruchi#payon_02 738,3,3,{
1581	callfunc("F_carol_devi2","payon",166,60);
1582	end;
1583
1584	OnTouch:
1585	callfunc("F_carol_devi","Deviruchi#payon_02","Deviruchi#payon_03","payon",166,60);
1586	end;
1587	}
1588
1589	payon,140,56,3 script Deviruchi#payon_03 738,3,3,{
1590	callfunc("F_carol_devi2","payon",166,60);
1591	end;
1592
1593	OnTouch:
1594	callfunc("F_carol_devi","Deviruchi#payon_03","Deviruchi#payon_01","payon",166,60);
1595	end;
1596	}
1597
1598	morocc,161,85,0 duplicate(OholyDup) Oholy#morocc 79
1599	morocc,52,134,3 script Deviruchi#morocc_01 738,3,3,{
1600	callfunc("F_carol_devi2","morocc",160,51);
1601	end;
1602
1603	OnTouch:
1604	callfunc("F_carol_devi","Deviruchi#morocc_01","Deviruchi#morocc_02","morocc",160,51);
1605	end;
1606	}
1607
1608	morocc,210,264,3 script Deviruchi#morocc_02 738,3,3,{
1609	callfunc("F_carol_devi2","morocc",160,51);
1610	end;
1611
1612	OnTouch:
1613	callfunc("F_carol_devi","Deviruchi#morocc_02","Deviruchi#morocc_03","morocc",160,51);
1614	end;
1615	}
1616
1617	morocc,223,74,3 script Deviruchi#morocc_03 738,3,3,{
1618	callfunc("F_carol_devi2","morocc",160,51);
1619	end;
1620
1621	OnTouch:
1622	callfunc("F_carol_devi","Deviruchi#morocc_03","Deviruchi#morocc_01","morocc",160,51);
1623	end;
1624	}
1625
1626	// Geffen
1627	geffen,120,188,0 duplicate(OholyDup) Oholy#geffen 79
1628	geffen,173,163,3 script Deviruchi#geffen_01 738,3,3,{
1629	callfunc("F_carol_devi2","geffen",120,34);
1630	end;
1631
1632	OnTouch:
1633	callfunc("F_carol_devi","Deviruchi#geffen_01","Deviruchi#geffen_02","geffen",120,34);
1634	end;
1635	}
1636
1637	geffen,49,95,3 script Deviruchi#geffen_02 738,3,3,{
1638	callfunc("F_carol_devi2","geffen",120,34);
1639	end;
1640
1641	OnTouch:
1642	callfunc("F_carol_devi","Deviruchi#geffen_02","Deviruchi#geffen_03","geffen",120,34);
1643	end;
1644	}
1645
1646	geffen,111,101,3 script Deviruchi#geffen_03 738,3,3,{
1647	callfunc("F_carol_devi2","geffen",120,34);
1648	end;
1649
1650	OnTouch:
1651	callfunc("F_carol_devi","Deviruchi#geffen_03","Deviruchi#geffen_01","geffen",120,34);
1652	end;
1653	}
1654
1655	// Alberta
1656	alberta,54,237,0 duplicate(OholyDup) Oholy#alberta 79
1657	alberta,97,86,3 script Deviruchi#alberta_01 738,3,3,{
1658	callfunc("F_carol_devi2","alberta",28,235);
1659	end;
1660
1661	OnTouch:
1662	callfunc("F_carol_devi","Deviruchi#alberta_01","Deviruchi#alberta_02","alberta",28,235);
1663	end;
1664	}
1665
1666	alberta,180,48,3 script Deviruchi#alberta_02 738,3,3,{
1667	callfunc("F_carol_devi2","alberta",28,235);
1668	end;
1669
1670	OnTouch:
1671	callfunc("F_carol_devi","Deviruchi#alberta_02","Deviruchi#alberta_03","alberta",28,235);
1672	end;
1673	}
1674
1675	alberta,54,132,3 script Deviruchi#alberta_03 738,3,3,{
1676	callfunc("F_carol_devi2","alberta",28,235);
1677	end;
1678
1679	OnTouch:
1680	callfunc("F_carol_devi","Deviruchi#alberta_03","Deviruchi#alberta_01","alberta",28,235);
1681	end;
1682	}

Note: See TracBrowser for help on using the browser.

Context Navigation

root/npc/events/christmas_2005.txt @ 23

Download in other formats: