AS OF SVN REV. 5901, WE ARE NOW USING TRUNK. ALL UNTESTED BUGFIXES/FEATURES GO INTO TRUNK.

IF YOU HAVE A WORKING AND TESTED BUGFIX PUT IT INTO STABLE AS WELL AS TRUNK.  EVERYTHING ELSE
GOES INTO TRUNK AND WILL BE MERGED INTO STABLE BY VALARIS AND WIZPUTER. -- VALARIS


git-svn-id: https://rathena.svn.sourceforge.net/svnroot/rathena/trunk@5094 54d463be-8e91-2dee-dedb-b68131a5f0ec

5 files changed, 608 insertions, 0 deletions

diff --git a/npc/events/custom/2006_dogs_year.txt b/npc/events/custom/2006_dogs_year.txt
new file mode 100644
index 000000000..2f3afefd8
--- /dev/null
+++ b/npc/events/custom/2006_dogs_year.txt
@@ -0,0 +1,95 @@
+//===== eAthena Script =======================================

+//= Eastern New Year 2006 The Year Of The Fire Dog

+//===== By: ==================================================

+//= Lupus (1.0)

+//===== Current Version: =====================================

+//= 1.0

+//===== Compatible With: =====================================

+//= eAthena Version; 5xxx+ (with 'disguise' command)

+//===== Description: =========================================

+//= Custom event: For 28-29 January

+//===== Additional Comments: =================================

+//= 1.0 Tested, fully working.[Lupus]

+//=		Add some national info in English if you can.

+//=	(Mine was in Russian, and it's damn hard to translate 8)

+//============================================================

+

+

+prontera.gat,149,167,6	script	Maria	81,{

+	mes "[Maria]";

+	//month

+	if((gettime(6)==1 && (gettime(5)==28 || gettime(5)==29))==0) {

+		mes "Happy New Year Of The Fire Dog! Woof!";

+		close;

+	}

+

+	mes "Happy New Year of The Fire Dog!";

+	if(rand(2))mes "By the way, 'Dogs' fit the most to the ones, born in years of Horse, Tiger and Rabbit.";

+	next;

+	menu "Tell me about Japanese traditions",-,

+		"Tell me about Chinese New Year",M_NGCH,

+		"Tell me about Korean New Year",M_NGCO,

+		"I need a doggy costume!",M_PRIZE,

+		"Happy New Year to you.",LEnd;

+

+	mes "[Maria]";

+	mes "Japan...";

+	mes "Put here some notes in English about their HNY.";

+	next;

+	mes "[Maria]";

+	mes "Put here some notes in English about their HNY.";

+	close;

+

+M_NGCH:

+	mes "[Maria]";

+	mes "China...";

+	mes "Put here some notes in English about their HNY.";

+	next;

+	mes "[Maria]";

+	mes "Put here some notes in English about their HNY.";

+	close;

+

+M_NGCO:

+	mes "[Maria]";

+	mes "Korea...";

+	mes "Put here some notes in English about their HNY.";

+	next;

+	mes "[Maria]";

+	mes "Put here some notes in English about their HNY.";

+	close;

+

+M_PRIZE:

+	mes "[Maria]";

+	if(countitem(12132)>9) {

+		mes "You should use all of your old costumes first!";

+		close;

+	}

+	mes "Some buddhistic books tell us legends about humans to dogs reincarnation... Buy ^FF0000this magic doggie costume^000000 for just ^0000FF999 Zeny^000000!";

+	mes "And prove old legends yourself!";

+	next;

+	menu "I'll buy one.",-,"No, thank you.",LEnd;

+	

+		mes "[Maria]";

+		if(Zeny<999) goto NoZ;

+		set Zeny,Zeny-999;

+		getitem 12132,1;

+		mes "Here you go. Its form will show true power of your spirit.";

+		emotion 15;

+		close;

+		NoZ:

+			mes "Oh dear, you lack of zeny. I have 7 puppies to feed, you know...";

+			emotion 17;

+			close;

+	LEnd:

+		mes "[Maria]";

+		mes "Happy New Year of the Fire Me!!! Woof-woof!";

+		emotion rand(19,20);

+		close;

+

+OnInit:

+	//Magic Doggie Costum

+	setitemscript 12132,"{ misceffect 215; if(BaseLevel>97){disguise 1022;end;}if(BaseLevel>90){disguise 1296;end;}if(BaseLevel>80){disguise 1106;end;}if(BaseLevel>50){disguise 1013;end;}if(BaseLevel>40){disguise 1135;end;}disguise 1107;}";

+	end;

+}

+

+prontera.gat,0,0,0,0	monster	Fire Dog	1987,50,3600000,1800000,0

diff --git a/npc/events/custom/draculax.txt b/npc/events/custom/draculax.txt
new file mode 100644
index 000000000..5c31ba08e
--- /dev/null
+++ b/npc/events/custom/draculax.txt
@@ -0,0 +1,130 @@
+//===== eAthena Script =======================================

+//= Dracula X Script

+//===== By: ==================================================

+//= valaris (1.0)

+//===== Current Version: =====================================

+//= 1.0

+//===== Compatible With: =====================================

+//= eAthena RC4+

+//===== Description: =========================================

+//= Custom Dracula X Event

+//============================================================

+

+

+mag_dun02.gat,72,182,1	script	Dracula's Coffin::Dracula_Init	-1,{

+

+OnInit:

+	set $dracula_event,0;

+	Break;

+

+OnKilled:

+	MapAnnounce "mag_dun02.gat","Dracula's curse has been lifted!",17;

+	set $dracula_event,0;

+	initnpctimer;

+	Break;

+

+OnTimer7200000:

+	if($dracula_event==0) 

+	stopnpctimer;

+	enablenpc "Dracula_Event";

+	Break;

+}

+

+mag_dun02.gat,72,182,1	script	Dracula's Coffin::Dracula_Event	801,{

+

+	if($dracula_event==1)

+	close;

+

+	set $dracula_event,1;

+	MapAnnounce "mag_dun02.gat","Count Dracula : Who has awakened me from my slumber?",17;

+	npcskilleffect 21,10,66,175;

+	initnpctimer;

+	Break;

+

+OnTimer500:

+	npcskilleffect 21,10,74,187;

+	Break;

+

+OnTimer1000:

+	npcskilleffect 21,10,80,180;

+	Break;

+	

+OnTimer1500:

+	npcskilleffect 21,10,79,183;

+	Break;

+

+OnTimer2000:

+	npcskilleffect 21,10,66,175;

+	Break;

+

+OnTimer2500:

+	npcskilleffect 21,10,63,186;

+	Break;

+

+OnTimer3000:

+	npcskilleffect 21,10,75,186;

+	Break;

+

+OnTimer3500:

+	npcskilleffect 21,10,75,173;

+	Break;

+

+OnTimer4000:

+	npcskilleffect 21,10,80,170;

+	Break;

+

+OnTimer4500:

+	npcskilleffect 21,10,60,179;

+	Break;

+

+OnTimer5000:

+	npcskilleffect 21,10,74,187;

+	Break;

+

+OnTimer6000:

+	npcskilleffect 21,10,69,182;

+	Break;

+

+OnTimer6500:

+	npcskilleffect 21,10,80,180;

+	Break;

+

+OnTimer7000:

+	npcskilleffect 21,10,60,179;

+	Break;

+

+OnTimer7500:

+	npcskilleffect 21,10,66,175;

+	Break;

+

+OnTimer8000:

+	npcskilleffect 21,10,80,187;

+	Break;

+

+OnTimer8500:

+	npcskilleffect 21,10,75,186;

+	Break;

+

+OnTimer9000:

+	npcskilleffect 21,10,75,173;

+	Break;

+

+OnTimer9500:

+	npcskilleffect 21,10,80,170;

+	Break;

+

+OnTimer10000:

+	npcskilleffect 21,10,63,186;

+	Break;

+

+OnTimer10500:

+	npcskilleffect 21,10,74,187;

+	Break;

+

+OnTimer11000:

+	npcskilleffect 21,10,72,182;

+	monster "mag_dun02.gat",72,182,"Count Dracula",1389,1,"Dracula_Init::OnKilled";

+	stopnpctimer;

+	disablenpc "Dracula_Event";

+	Break;

+}

diff --git a/npc/events/custom/event_gefenia.txt b/npc/events/custom/event_gefenia.txt
new file mode 100644
index 000000000..da79b4b85
--- /dev/null
+++ b/npc/events/custom/event_gefenia.txt
@@ -0,0 +1,57 @@
+//===== eAthena Script ========================================

+//= Gefenia Warper Script

+//===== By: ==================================================

+//= [Muad_Dib] 1.0a

+//===== Current Version: =====================================

+//= 1.0a

+//===== Compatible With: =====================================

+//= Any Athena Version; RO Episode 6+

+//===== Description: =========================================

+//= Temp Gefenia Warper

+//===== Additional Comments: =================================

+//= 07/06/05 : Added 1st Version. [Muad_Dib]

+//= Converted to eAthena format by Dr.Evil

+//============================================================

+

+

+gefenia01.gat,132,169,5	script	Explorer#1	740,{

+	mes "[Explorer]";

+	mes "Do you really want to go back??";

+	next;

+	menu "Yes.",-,"No.",M_END;

+

+	warp "gef_dun03.gat",	138,	117;

+	end;

+

+M_END:

+	mes "Ok, don't come back until you want to leave this place.";

+	close;

+}

+

+gef_dun03.gat,131,118,6	script	Explorer#2	740,{

+	mes "[Explorer]";

+	mes "Hi...";

+	next;

+	mes "[Explorer]";

+	mes "I can send you to the ^FF3300Geffenia City Ruins^000000... You just need the Key!.";

+	mes "Do you have the Key? It looks like a crystal.";

+	next;

+	menu "Yes, I Got the key.",-,"No, I'll go look for it.",M_END;

+	

+	if (countitem(7025) < 1) goto L_NOKEY; // Item: Lucifer's Lament

+	mes "[Explorer]";

+	mes "Good, you got the right key! Let's go!";

+	next;

+	warp "gefenia01.gat",	136,	166;

+	end;

+

+M_END:

+	mes "[Explorer]";

+	mes "Don't come back until you have the key!";

+	close;

+

+L_NOKEY:

+	mes "[Explorer]";

+	mes "Sorry.. you don't have the key...";

+	close;

+}
\ No newline at end of file
diff --git a/npc/events/custom/uneasy_cemetery.txt b/npc/events/custom/uneasy_cemetery.txt
new file mode 100644
index 000000000..053bbd7fc
--- /dev/null
+++ b/npc/events/custom/uneasy_cemetery.txt
@@ -0,0 +1,133 @@
+//===== eAthena Script ======================================= 

+//= Uneasy Prontera Cemetery Quest (original script!)

+//===== By: ================================================== 

+//= Lupus

+//===== Current Version: ===================================== 

+//= 1.2 (Tested and fully working!)

+//===== Compatible With: ===================================== 

+//= eAthena Version 1.0

+//===== Description: ========================================= 

+//= A periodical quest of the Uneasy Cemetery (Kill undead / Prevent their appearance)

+//= Every day, at the midnight Prontera recieve a wave of Undeads.

+//= They come from Uneasy Cemetery of Prontera. To protect the players

+//= from the undeads terror you may either kill the enemy. Or supply Mother Mathana

+//= with needed amount of Holy Water. Every citizen can take his part in the 

+//= saving of Prontera city. After some days of quiet life... the Cemetery strikes back.

+//===== Additional Comments: ================================= 

+//= 1.1 More advanced ver. Added some bonus the the one who'd kill the last walking undead

+//= 1.2 Added coords to the script to make label OmMobDead working

+//============================================================ 

+

+

+prontera.gat,3,3,3	script	Uneasy_Check	-1,{

+	end;

+

+OnHour00:

+	set $UNEASY_DL,$UNEASY_DL-1;

+	set $UNEASY_BL,$UNEASY_BL+30; //add need of HW for 30 bottles per day

+	if ($UNEASY_BL>666) set $UNEASY_BL,666; //keep needed bottles not <=666

+	if ($UNEASY_DL < 0) goto L_Start_Undead;

+//The Cemetery is OK yet.

+	disablenpc "Mother Mathana";

+	end;

+OnInit:

+	if ($UNEASY_DL >= 0) disablenpc "Mother Mathana";

+	end;

+

+OnHour06:

+	killmonsterall "prontera.gat";	//The Sun kills undead in the morning

+	end;

+

+OnHour01:

+	if ($@UNEASY_MOB > 0) mapannounce "prontera.gat","[Mother Mathana]: In the name of Odin, please finish these roaming undead leftovers!",0;

+	end;

+

+OnZombieDead:

+	set $@UNEASY_MOB,$@UNEASY_MOB-1;

+	if ($@UNEASY_MOB>0) end;

+	set $UNEASY_DL,0;

+	set $UNEASY_H$,strcharinfo(0);

+	if (Sex==1) mapannounce "prontera.gat","[Mother Mathana]: Brave "+$UNEASY_H$+" has just killed the last undead in Prontera!",0;

+	if (Sex==0) mapannounce "prontera.gat","[Mother Mathana]: Lady "+$UNEASY_H$+" has just killed the last undead in Prontera!",0;

+	set JobExp,JobExp+100;

+	set BaseExp,BaseExp+50;

+	end;

+

+L_Start_Undead:

+	killmonsterall "prontera.gat";	//kills any left monsters

+	enablenpc "Mother Mathana";

+//call some monsters in the city

+	set $@UNEASY_MOB, 65;

+	monster "prontera.gat",0,0,"Zombie",1015,30,"Uneasy_Check::OnZombieDead";

+//in the Cemetery

+	monster "prontera.gat",268,349,"Zombie",1015,30,"Uneasy_Check::OnZombieDead";

+	monster "prontera.gat",269,350,"Ghoul",1036,5,"Uneasy_Check::OnZombieDead";

+//announce

+	mapannounce "prontera.gat","[Mother Mathana]: The cememtery has became restless!  In the name of Odin, hurry to the Sanctuary! Save the city of Prontera!",0;

+}

+

+prontera.gat,257,313,5	script	Mother Mathana	79,{

+	mes "[Mother Mathana]";

+	if ($UNEASY_DL <= 0) goto L_Undead_Walk;

+	mes "I'm afraid there's something wrong with our old cemetery...";

+	if ($UNEASY_H$==strcharinfo(0)) mes "But thanks to you, "+$UNEASY_H$+", we'll be able to sleep " + $UNEASY_DL + " nights!";

+	if ($UNEASY_H$!=strcharinfo(0)) mes "But thanks to "+$UNEASY_H$+"'s support, we've got " + $UNEASY_DL + " easy nights!";

+	emotion 0;

+	close;

+

+L_Undead_Walk:

+	if ($UNEASY_DL == 0) mes "THEY could return tomorrow's night again!";

+	if ($UNEASY_DL == 0 && $UNEASY_H$==strcharinfo(0)) mes "Thank you, "+$UNEASY_H$+"! Now we'll manage to rest till the next midnight!";

+	if ($UNEASY_DL == 0 && $UNEASY_H$!=strcharinfo(0)) mes "But due to "+$UNEASY_H$+"'s help we'll manage to rest till the next midnight!";

+	mes "To calm down the restless cemetery, we should pour all these graves with the Holy Water. But our sisters and broters have run out of it.";

+	mes "Could you supply us with Holy Water?";

+	next;

+	menu "Yes, have all my Holy Water!",-, "Nope, I need it.",M_NO, "I don't have any.",M_DONT_HAVE;

+

+	if ( countitem("Holy_Water")<1 ) goto M_DONT_HAVE;

+	set $UNEASY_BL,$UNEASY_BL-countitem("Holy_Water");

+	delitem "Holy_Water",countitem("Holy_Water");

+

+	if ( $UNEASY_BL > 0 ) goto L_NEED_MORE;

+//set quiet days!!! no more undead for this period!

+	set $UNEASY_DL,5+((0-$UNEASY_BL)/30);

+	set $UNEASY_H$,strcharinfo(0);

+	mes "[Mother Mathana]";

+	mes "Thank you, "+$UNEASY_H$+"! Now we've got enough Holy Water!";

+	next;

+	mes "[Mother Mathana]";

+	mes "Upon pouring the cemetery with that water we'll get " + $UNEASY_DL + " safe nights!";

+	next;

+	killmonsterall "prontera.gat";	//kills any left monsters

+	mes "[Mother Mathana]";

+	mes "See, "+ $UNEASY_H$ +"? They all are gone now!";

+	next;

+	mes "[Mother Mathana]";

+	mes "Our Church is going to thank you personally...";

+	next;

+	if (Sex==1) mapannounce "prontera.gat","[Mother Mathana]: In the name of Odin we declare handsom "+$UNEASY_H$+" as a Prontera savior!",0;

+	if (Sex==0) mapannounce "prontera.gat","[Mother Mathana]: In the name of Odin we declare beautiful "+$UNEASY_H$+" as a Prontera savior!",0;

+	mes "[Mother Mathana]";

+	mes "In the name of Odin we bless you and decently present a modest gift just from Mareusis' wine-cellar.";

+	getitem "Blue_Potion",1;

+	set JobExp,JobExp+100;

+	set BaseExp,BaseExp+50;

+	close;

+

+L_NEED_MORE:

+	mes "[Mother Mathana]";

+	mes "Thank you, good "+strcharinfo(0)+", but we still need " + $UNEASY_BL + " more Holy Water bottles.";

+	close;

+

+M_NO:

+	mes "[Mother Mathana]";

+	mes "I'm afraid the old cemetery is going out of control soon... Please, get us all the Holy Water you can get.";

+	close;

+

+M_DONT_HAVE:

+	mes "[Mother Mathana]";

+	mes "Alas! We still need " + $UNEASY_BL + " more bottles of Holy Water...  Why don't you go and ask other people for some extra Holy Water?";

+	mes "The old cemetery is going out of control soon...";

+	mes "Please, in the name of Odin, help Prontera city.";

+	close;

+}

diff --git a/npc/events/custom/xmas_rings_event.txt b/npc/events/custom/xmas_rings_event.txt
new file mode 100644
index 000000000..7137492ea
--- /dev/null
+++ b/npc/events/custom/xmas_rings_event.txt
@@ -0,0 +1,193 @@
+//===== eAthena Script =======================================

+//= Karachun Event (Xmas Rings Quest)

+//===== By: ==================================================

+//= Lupus (1.0)

+//===== Current Version: =====================================

+//= 1.1

+//===== Compatible With: =====================================

+//= eAthena Version; 4880+ (with 'setItemScript' command)

+//===== Description: =========================================

+//= Custom event: Karachun (from 8 Dec till 8 Jan), X-Mas, HNY

+//===== Additional Comments: =================================

+//= 1.0 Tested, fully working. 1.0a a few typos fix

+//= 1.1 Readded Mdef +1 and  Luk +1 to Santa's Hat [Lupus]

+//============================================================

+

+

+prontera.gat,156,174,4	script	Snower	713,{

+	mes "[Snower]";

+	if(Q_XMSRINGS==2){

+		mes "Oh.. is it true? You've helped my sis Sneewy? Thank you.";

+	}else if(Q_XMSRINGS==3){

+		mes "Snoowy's sent me a bird with a message. She told me about your help...";

+		mes "I'll tell you a secret of the magic rings.";

+		emotion e_no1;

+		next;

+		mes "[Snower]";

+		mes "They have magic power only from 8 December till 8 January.";

+		next;

+		mes "[Snower]";

+		mes "By the way, just put on Santa's Hat to discover their true power.";

+		next;

+		mes "[Snower]";

+		mes "If you put on both rings their power would be doubled.";

+		mes "Have a nice day!";

+		close;

+	}else{

+		mes "Hi! Two my sisters and I are preparing gifts for the whole 3 holidays!";

+	}

+	emotion e_sob;

+	next;

+	menu "Where are your sisters?",-, "What holidays?",M_PR,"What gifts?",M_WRAP,"May I help you?",M_QUEST;

+

+	mes "[Snower]";

+	mes "My younger sis Sneewy's left to some faraway land to prepare gifts for their poor children... I don't know where. You should ask my elder sis and her birdies.";

+	next;

+	mes "[Snower]";

+	mes "My elder sis? Her name's Snoowy. She's sailed to some green island... She's talking about some gifts for dolphins or something...";

+	close;

+

+M_PR:

+	mes "[Snower]";

+	mes "The whole three holidays? Well they come one after another!";

+	mes "^000080The Christmas^000000, ^FF0000Karachun^000000 and ^008000New Year Eve^000000!";

+	next;

+	mes "[Snower]";

+	mes "^FF0000Karachun^000000? Heh... This is an old pagans festival. They used to celebrate it before the appearance of HNY and XMas, you know.";

+	next;

+	goto M_QUEST;

+

+M_WRAP:

+	mes "[Snower]";

+	mes "My sisters say that all the gifts should look the same way. Or else some children might fight for fancy ones!";

+	next;

+	mes "[Snower]";

+	mes "Would you like me to wrap your fancy gift boxes with a gray paper?";

+	next;

+	menu "Wrap them, please!",-, "No, thanks.",M_QUEST;

+

+	set @prizes, countitem(664)+countitem(665)+countitem(666)+countitem(667);

+	if( @prizes == 0){

+		mes "[Snower]";

+		mes "I don't see any gifts in fancy boxes on you...";

+		if(countitem(644))mes "You've got only gray boxes.";

+		close;

+	}

+	delitem 664,countitem(664);

+	delitem 665,countitem(665);

+	delitem 666,countitem(666);

+	delitem 667,countitem(667);

+	getitem 644,@prizes;

+

+	mes "[Snower]";

+	mes "*shuffle* Here you go.";

+	next;

+

+M_QUEST:

+	mes "[Snower]";

+	mes "I wish you find my sisters ASAP... They need help.";

+	if(Q_XMSRINGS==0) set Q_XMSRINGS,1;

+	close;

+

+OnInit:

+//Santa's Hat

+	setitemscript 2236,"{ bonus bMdef,1; bonus bLuk,1; if(isequipped(2636,2637)){if(@xmr == gettime(2))end; set @xmr,gettime(2); misceffect 410; end;} if(isequipped(2636)){if(@xmr == gettime(2))end; set @xmr,gettime(2); misceffect 72;} if(isequipped(2637)){if(@xmr == gettime(2))end; set @xmr,gettime(2); misceffect 338;}}";

+//Gold Xmas Ring

+	setitemscript 2636,"{ bonus bLoseSPWhenUnequip,30; if(isequipped(2236)==0)end; if(getskilllv(28)){skill 51,4+isequipped(2637);}else{skill 28,1+4*isequipped(2637);} }";

+//Silver Xmas Ring

+	setitemscript 2637,"{ bonus bDamageWhenUnequip,40; if(isequipped(2236)==0)end; if(getskilllv(26)){skill 40,1;}else{skill 26,1+isequipped(2636);} }";

+	end;

+}

+

+louyang.gat,224,249,4	script	Sneewy	717,{

+	mes "[Sneewy]";

+	if(Q_XMSRINGS==0){

+		mes "Hi! I'm waithing for my sister's birdy with mail...";

+		emotion e_sob;

+		close;

+	}

+	if(Q_XMSRINGS==1){

+		mes "I wish I had 4 more gray Gift Boxes for native children...";

+		emotion e_sob;

+		next;

+		mes "[Sneewy]";

+		mes "Oh, hello. Has my brother Snower told you everything?";

+		next;

+		menu "Here are your 4 Gift Boxes",-, "I don't know any Snowhatevers...",M_END;

+

+		mes "[Sneewy]";

+		if(countitem(644)<4){

+			mes "Gimme 4 gifts for poor kids... Wait, you haven't got 4 of them!";

+			emotion e_sry;

+			close;

+		}

+		set Q_XMSRINGS,2;

+		delitem 644,4;

+		getnameditem 2637,strcharinfo(0);

+		emotion e_kis2;

+		mes "Thank you! Here's my li'l something for you!";

+		next;

+		mes "[Sneewy]";

+		mes "By the way, if you put on 2 different rings then your holidays leveling would be easier!";

+		close;

+	}

+	emotion e_thx;

+	mes "Thanks again! No children will meet the holidays without the gifts!";

+	close;

+

+M_END:

+	mes "[Sneewy]";

+	mes "Pity... I've got a magic Santa's ring... I'd exchange it for 4 Gift Boxes...";

+	emotion e_swt;

+	close;

+}

+

+izlu2dun.gat,133,160,2	script	Snoowy	714,{

+	mes "[Snoowy]";

+	if(Q_XMSRINGS==0){

+		mes "Helloooou! Do you know my bro and sis? How so? My brother Snower's well known in Prontera!! Just ask any child there.";

+		emotion e_hmm;

+		close;

+	}

+	if(Q_XMSRINGS==1){

+		mes "Darn... How could poor children be more important than the marine folks.. Am I wrong?";

+		next;

+		mes "[Snoowy]";

+		mes "Errr. Helloou there. My sister Sneewy's sent me a birdie message. The letter was wet and I couldn't read anything but some ending letters of her address...";

+		next;

+		mes "[Snoowy]";

+		mes "Look, it's something like 'yang' in the very end... Hmm... She must be misspelled 'Al Doo Boryang'...";

+		close;

+	}

+	if(Q_XMSRINGS==2){

+		mes "You've helped my sis? It's just great!";

+		next;

+		mes "[Snoowy]";

+		mes "But I too need 3 more gifts for my marine folk friends...";

+		next;

+		menu "Have these gifts!",-, "I need a li'l something in return",M_END;

+

+		mes "[Snoowy]";

+		if(countitem(644)<3){

+			mes "Oops!! You haven't got 3 gray gift boxes on you.";

+			emotion e_sry;

+			close;

+		}

+		set Q_XMSRINGS,3;

+		delitem 644,3;

+		getnameditem 2636,strcharinfo(0);

+		emotion e_kis;

+		mes "Thaank yoouu! Have this magic ring!";

+		close;

+	}

+	emotion e_thx;

+	mes "Oh... the whole marine folk send you their thanks! They love presents so much!!!";

+	if(rand(2))mes "Didn't you know that Santa's Hat reveals the real power of the rings?";

+	close;

+

+M_END:

+	mes "[Snoowy]";

+	mes "I'd exchange a GOLD magic ring for 3 gift boxes...";

+	emotion e_swt;

+	close;

+}