Fixed some file types

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

1 files changed, 277 insertions, 277 deletions

diff --git a/npc/quests/quests_comodo.txt b/npc/quests/quests_comodo.txt
index 79e8ebe97..37e8d8d01 100644
--- a/npc/quests/quests_comodo.txt
+++ b/npc/quests/quests_comodo.txt
@@ -1,277 +1,277 @@
-//===== eAthena Script ======================================= 

-//= Item Quest NPCs located in Comodo

-//===== By: ================================================== 

-//= kobra_k88

-//===== Current Version: ===================================== 

-//= 1.0 

-//===== Compatible With: ===================================== 

-//= eAthena 7.15 +

-//===== Description: ========================================= 

-//= 'Cross Hat', 'Bulb Hairband', 'Striped Hairband', 'Blue Hairband' Quests.

-//= 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief',

-//= 'Phantom of the Opera Mask' Quests.

-//===== Additional Comments: ================================= 

-//= Fully working

-//============================================================ 

-

-

-

-//============================================================================================//

-// 					Hair Ornament Girl 

-//============================================================================================//

-// Cross Hat, Bulb Hairband, Striped Hairband, Blue Hairband

-//==================================================

-comodo.gat,227,158,4	script	Hair Ornament Girl	700,

-{

-	mes "[Hair Ornament Girl]";

-	if(sex==1)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe your girl friend? Then get her a Hair Band! It's the best gift you can get her.";

-	if(sex==0)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe yourself? Then get a Hair Band! It's the best gift you can give, or get.";

-	next;

-	mes "[Hair Ornament Girl]";

-	mes "Just by bringing me a few simple items, I can make you a gorgeous Hair Band!  Here, take a look at these....";

-M_Menu:

-	next;

-	menu "-Crosss Hat Hairband",M_Cross, "-Bulb Hairband",M_Bulb, "-Striped Hairband",M_Striped, "-Blue Hairband",M_Blue, "-End Conversation",M_End;

-

-	M_Cross:

-		set @BAND$, "Cross Hat Hairband";

-		set @ITEMS$, " ^5555FF1 Rosary^000000 and ^5555FF500 Destroyed Armors^000000.";

-		if (countitem(2608)>=1 && countitem(7069)>=500) set @GETBAND, 1;

-		goto sL_0;

-

-	M_Bulb:

-		set @BAND$, "Bulb Hairband";

-		set @ITEMS$, "^5555FF1 Slotted Circlet^000000 and ^5555FF20 Glass Beads^000000.";

-		if (countitem(2233)>=1 && countitem(746)>=20) set @GETBAND, 2;

-		goto sL_0;

-

-	M_Striped:

-		set @BAND$, "Striped Hairband";

-		set @ITEMS$, "^5555FF1500 Worn-out Prison Uniforms^000000.";

-		if (countitem(1099)>=1500) set @GETBAND, 3;

-		goto sL_0;

-

-	M_Blue:

-		set @BAND$, "Blue Hairband";

-		set @ITEMS$, "^5555FF1 Bandana^000000, ^5555FF1 Cobaltblue Dyestuffs^000000, and ^5555FF300 Anolian Skins^000000.";

-		if (countitem(2211)>=1 && countitem(978)>=1 && countitem(7003)>=300) set @GETBAND, 4;

-

-		sL_0:

-			mes "[Hair Ornament Girl]";

-			mes "So you're interested in the "+@BAND$+" huh? Here are the items you'll need for the "+@BAND$+":";

-			mes @ITEMS$;

-			next;

-			if (@GETBAND > 0) goto sL_GetBand;

-

-			mes "[Hair Ornament Girl]";

-			mes "Bring me all of these items and I will be able to make you a "+@BAND$+".";

-			goto M_Menu;

-

-		sL_GetBand:

-			mes "[Hair Ornament Girl]";

-			mes "I see that you have enough items for a "+@BAND$+".  Would you like me to make you one?";

-			next;

-			menu "Yes, I would.",sM_Yes, "No thank you.",M_End;

-

-			sM_Yes:

-				if (@GETBAND == 1) goto ssL_Cross;

-				if (@GETBAND == 2) goto ssL_Bulb;

-				if (@GETBAND == 3) goto ssL_Striped;

-				if (@GETBAND == 4) goto ssL_Blue;

-

-				ssL_Cross:

-					delitem 2608,1;

-					delitem 7069,500;

-					getitem  5036,1;

-					goto ssL_End;

-				ssL_Bulb:

-					delitem 2233,1;

-					delitem 746,20;

-					getitem 5034,1;

-					goto ssL_End;

-				ssL_Striped:

-					delitem 1099,1500;

-					getitem 5049,1;

-					goto ssL_End;

-				ssL_Blue:

-					delitem 2211,1;

-					delitem 978,1;

-					delitem 7003,300;

-					getitem 5052,1;

-				ssL_End:

-					mes "[Hair Ornament Girl]";

-					mes "Here is your "+@BAND$+".  Thank you.";

-					set @GETBAND, 0;

-					close;

-

-	M_End:

-		mes "[Hair Ornament Girl]";

-		mes "Hope to see you again soon.";

-		close;

-

-}

-

-

-//===================================================================================================//

-//						Mari Isac

-//===================================================================================================//

-// 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', 'Phantom of the Opera Mask'

-//===============================================================//

-comodo.gat,274,137,5	script	Mari Isac	702,

-{

-	mes "[Mari Isac]";

-	mes "I travel all over the world and get to hear many interesting stories from the people I meet.";

-	mes "Sometimes they even teach me how to make special items";

-	next;

-	mes "[Mari Isac]";

-	mes "Would you be interested in some of the items I've learned to make?";

-M_Menu:

-	next;

-	menu "Tell me about them.",M_0, "Make me one.",M_1;

-

-	M_0:

-		menu "-Mine Helmet",sM_Mine, "-Parcel Hat",sM_Parcel, "-Money Loser's Grief",sM_Money, "-Phantom of the Opera Mask",sM_Phantom;

-

-		sM_Mine:

-			mes "[Mari Isac]";

-			mes "I learned how to make the Mine Helmet when I traveled to the old coal mines near Geffen.";

-			next;

-			mes "[Mari Isac]";

-			mes "The 2 most important things a miner needs are light, and head protection.";

-			mes "A very inventive miner was able to create something that dealt with both issues.";

-			next;

-			mes "[Mari Isac]";

-			mes "He attached a light to his safety helmet and called it a Mine Helmet.";

-			mes "This meant that miners no longer had to worry about carrying around lamps and could work more efficiently.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Mine Helmet you'll need to bring me these items:";

-			mes "^5555FF1 Safety Helmet^000000,";

-			mes "^5555FF1 Candle^000000,";

-			mes "^5555FF1 Crystal Mirror^000000,";

-			mes "^5555FF25 Steel^000000.";

-			next;

-			goto M_0;

-		sM_Parcel:

-			mes "[Mari Isac]";

-			mes "I learned how to make the Parcel Hat when I traveled to Alberta.  There they have a unique way of distributing mail and goods.";

-			next;

-			mes "[Mari Isac]";

-			mes "Instead of using a pouch or a sack to carry items for delivery, they use a special kind of hat, called a Parcel Hat.";

-			mes "This hat allows the delivery personel to carry numerous items on their heads.  Of course they have to have good balance to use it.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Parcel Hat, you'll need to bring me these items.";

-			mes "^5555FF150 Fabric^000000,";

-			mes "^5555FF100 Resin^000000,";

-			mes "^5555FF1 Cobaltblue Dyestuffs^000000.";

-			next;

-			goto M_0;

-		sM_Money:

-			mes "[Mari Isac]";

-			mes "I learned how to make the Money Loser's Grief when I traveled to Morroc.";

-			next;

-			mes "[Mari Isac]";

-			mes "A long time ago an honest merchant got into a conflict with a crooked guild.";

-			mes "Unlike the dirty guild, the merchant did not scam or cheat people.";

-			next;

-			mes "[Mari Isac]";

-			mes "Because of this they attacked the merchants shop and took all of his goods.";

-			next;

-			mes "[Mari Isac]";

-			mes "The merchant was devastated by the loss of his shop.";

-			mes "In his sadness he used the bits and pieces that were left from his shop to create a new item.";

-			next;

-			mes "[Mari Isac]";

-			mes "He created the Money Loser's Grief, a symbol of his great sadness.  When people see it, they can't help but feel sympathetic to the wearer.";

-			next;

-			mes "[Mari Isac]";

-			mes "Many merchants now wear it to help themselves get more business.  Of course it is also a reminder of the honest merchants sad tale.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Money Losers Grief, you'll need to bring me these items.";

-			mes "^5555FF1 Circlet with a single slott^000000,";

-			mes "^5555FF1 Gold^000000,";

-			mes "^5555FF20 Steel^000000,";

-			mes "^5555FF80 Feathers^000000,";

-			mes "^5555FF800 Sticky Mucus^000000.";

-			next;

-			goto M_0;

-		sM_Phantom:

-			mes "[Mari Isac]";

-			mes "I learned how to make the Phantom of the Opera Mask when I traveled to Al De Baran.";

-			mes "The story behind this item is that of a man's pure love........";

-			next;

-			mes "[Mari Isac]";

-			mes "There once was a man who was in love with a beautiful opera singer.";	

-			mes "Unfortunately the man had a terribly disfigured face which forced to him to wear a mask.";

-			next;

-			mes "[Mari Isac]";

-			mes "He was ashamed of his appearance and could never bring himself to face the singer.";

-			mes "The man instead, watched her from a far, admiring every nuance of her beauty and grace.";

-			next;

-			mes "[Mari Isac]";

-			mes "He lurked in the bowles of the opera house and from time to time he would sing his sad love song.";

-			mes "Many people heard it and believed that there was a phantom haunting the opera house.";

-			next;

-			mes "[Mari Isac]";

-			mes "The singer also heard his song, and through it she was able to feel his pain and his love for her.";

-			mes "The two eventually met, and when they did she was able to look past his appereance and accept him for who he was.";

-			next;

-			mes "[Mari Isac]";

-			mes "Too this day, the tale of the masked 'phantom' is still romantacised.";

-			next;

-			mes "[Mari Isac]";

-			mes "Anyways, if you want me to make you a Phantom of the Opera Mask, you'll need to bring me these items.";

-			mes "^5555FF1 Opera Masque^000000,";

-			mes "^5555FF50 Horrendous Hairs^000000.";

-			goto M_0;

-

-	M_1:

-		menu "-Mine Helmet",sM_MakeMine, "-Parcel Hat",sM_MakePar, "-Money Loser's Grief",sM_MakeMon, "-Phantom of the Opera Mask",sM_MakePhan;

-

-		sM_MakeMine:

-			if (countitem(5009)<1 || countitem(5028)<1 || countitem(747)<1 || countitem(999)<25) goto ssL_NoItems;

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Mine Helmet!";

-			delitem 5009, 1;

-			delitem 5028, 1;

-			delitem 747, 1;

-			delitem 999, 25;

-			getitem 5031,1;

-			close;

-		sM_MakePar:

-			if (countitem(1059)<150 || countitem(907)<100 || countitem(978)<1) goto ssL_NoItems;

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Parcel Hat!";

-			delitem 1059, 150;

-			delitem 907, 100;

-			delitem 978, 1;

-			getitem 5023,1;

-			close;

-		sM_MakeMon:

-			if (countitem(2233)<1 || countitem(969)<1 || countitem(999)<20 || countitem(949)<80 || countitem(938)<800) goto ssL_NoItems;

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Money Loser's Grief!";

-			delitem 2233, 1;

-			delitem 969, 1;

-			delitem 999, 20;

-			delitem 949, 80;

-			delitem 938, 800;

-			getitem 5021,1;

-			close;

-		sM_MakePhan:

-			if (countitem(2281)<1 || countitem(1048)<50) goto ssL_NoItems; 

-			mes "[Mari Isac]";

-			mes "Here you go.  Enjoy your Phantom of the Opera Mask!";

-			delitem 2281,1;

-			delitem 1048, 50;

-			getitem 5043, 1;

-			close;

-

-			ssL_NoItems:

-				mes "[Mari Isac]";

-				mes "You don't seem to have enough items for me to make that hat.  Please come back when you do.";

-				close;

-

-}

+//===== eAthena Script ======================================= 
+//= Item Quest NPCs located in Comodo
+//===== By: ================================================== 
+//= kobra_k88
+//===== Current Version: ===================================== 
+//= 1.0 
+//===== Compatible With: ===================================== 
+//= eAthena 7.15 +
+//===== Description: ========================================= 
+//= 'Cross Hat', 'Bulb Hairband', 'Striped Hairband', 'Blue Hairband' Quests.
+//= 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief',
+//= 'Phantom of the Opera Mask' Quests.
+//===== Additional Comments: ================================= 
+//= Fully working
+//============================================================ 
+
+
+
+//============================================================================================//
+// 					Hair Ornament Girl 
+//============================================================================================//
+// Cross Hat, Bulb Hairband, Striped Hairband, Blue Hairband
+//==================================================
+comodo.gat,227,158,4	script	Hair Ornament Girl	700,
+{
+	mes "[Hair Ornament Girl]";
+	if(sex==1)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe your girl friend? Then get her a Hair Band! It's the best gift you can get her.";
+	if(sex==0)mes "Oh, hi.  Do you need to buy a present for a friend, your mother, or maybe yourself? Then get a Hair Band! It's the best gift you can give, or get.";
+	next;
+	mes "[Hair Ornament Girl]";
+	mes "Just by bringing me a few simple items, I can make you a gorgeous Hair Band!  Here, take a look at these....";
+M_Menu:
+	next;
+	menu "-Crosss Hat Hairband",M_Cross, "-Bulb Hairband",M_Bulb, "-Striped Hairband",M_Striped, "-Blue Hairband",M_Blue, "-End Conversation",M_End;
+
+	M_Cross:
+		set @BAND$, "Cross Hat Hairband";
+		set @ITEMS$, " ^5555FF1 Rosary^000000 and ^5555FF500 Destroyed Armors^000000.";
+		if (countitem(2608)>=1 && countitem(7069)>=500) set @GETBAND, 1;
+		goto sL_0;
+
+	M_Bulb:
+		set @BAND$, "Bulb Hairband";
+		set @ITEMS$, "^5555FF1 Slotted Circlet^000000 and ^5555FF20 Glass Beads^000000.";
+		if (countitem(2233)>=1 && countitem(746)>=20) set @GETBAND, 2;
+		goto sL_0;
+
+	M_Striped:
+		set @BAND$, "Striped Hairband";
+		set @ITEMS$, "^5555FF1500 Worn-out Prison Uniforms^000000.";
+		if (countitem(1099)>=1500) set @GETBAND, 3;
+		goto sL_0;
+
+	M_Blue:
+		set @BAND$, "Blue Hairband";
+		set @ITEMS$, "^5555FF1 Bandana^000000, ^5555FF1 Cobaltblue Dyestuffs^000000, and ^5555FF300 Anolian Skins^000000.";
+		if (countitem(2211)>=1 && countitem(978)>=1 && countitem(7003)>=300) set @GETBAND, 4;
+
+		sL_0:
+			mes "[Hair Ornament Girl]";
+			mes "So you're interested in the "+@BAND$+" huh? Here are the items you'll need for the "+@BAND$+":";
+			mes @ITEMS$;
+			next;
+			if (@GETBAND > 0) goto sL_GetBand;
+
+			mes "[Hair Ornament Girl]";
+			mes "Bring me all of these items and I will be able to make you a "+@BAND$+".";
+			goto M_Menu;
+
+		sL_GetBand:
+			mes "[Hair Ornament Girl]";
+			mes "I see that you have enough items for a "+@BAND$+".  Would you like me to make you one?";
+			next;
+			menu "Yes, I would.",sM_Yes, "No thank you.",M_End;
+
+			sM_Yes:
+				if (@GETBAND == 1) goto ssL_Cross;
+				if (@GETBAND == 2) goto ssL_Bulb;
+				if (@GETBAND == 3) goto ssL_Striped;
+				if (@GETBAND == 4) goto ssL_Blue;
+
+				ssL_Cross:
+					delitem 2608,1;
+					delitem 7069,500;
+					getitem  5036,1;
+					goto ssL_End;
+				ssL_Bulb:
+					delitem 2233,1;
+					delitem 746,20;
+					getitem 5034,1;
+					goto ssL_End;
+				ssL_Striped:
+					delitem 1099,1500;
+					getitem 5049,1;
+					goto ssL_End;
+				ssL_Blue:
+					delitem 2211,1;
+					delitem 978,1;
+					delitem 7003,300;
+					getitem 5052,1;
+				ssL_End:
+					mes "[Hair Ornament Girl]";
+					mes "Here is your "+@BAND$+".  Thank you.";
+					set @GETBAND, 0;
+					close;
+
+	M_End:
+		mes "[Hair Ornament Girl]";
+		mes "Hope to see you again soon.";
+		close;
+
+}
+
+
+//===================================================================================================//
+//						Mari Isac
+//===================================================================================================//
+// 'Mine Helmet', 'Parcel Hat', 'Money Loser's Grief', 'Phantom of the Opera Mask'
+//===============================================================//
+comodo.gat,274,137,5	script	Mari Isac	702,
+{
+	mes "[Mari Isac]";
+	mes "I travel all over the world and get to hear many interesting stories from the people I meet.";
+	mes "Sometimes they even teach me how to make special items";
+	next;
+	mes "[Mari Isac]";
+	mes "Would you be interested in some of the items I've learned to make?";
+M_Menu:
+	next;
+	menu "Tell me about them.",M_0, "Make me one.",M_1;
+
+	M_0:
+		menu "-Mine Helmet",sM_Mine, "-Parcel Hat",sM_Parcel, "-Money Loser's Grief",sM_Money, "-Phantom of the Opera Mask",sM_Phantom;
+
+		sM_Mine:
+			mes "[Mari Isac]";
+			mes "I learned how to make the Mine Helmet when I traveled to the old coal mines near Geffen.";
+			next;
+			mes "[Mari Isac]";
+			mes "The 2 most important things a miner needs are light, and head protection.";
+			mes "A very inventive miner was able to create something that dealt with both issues.";
+			next;
+			mes "[Mari Isac]";
+			mes "He attached a light to his safety helmet and called it a Mine Helmet.";
+			mes "This meant that miners no longer had to worry about carrying around lamps and could work more efficiently.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Mine Helmet you'll need to bring me these items:";
+			mes "^5555FF1 Safety Helmet^000000,";
+			mes "^5555FF1 Candle^000000,";
+			mes "^5555FF1 Crystal Mirror^000000,";
+			mes "^5555FF25 Steel^000000.";
+			next;
+			goto M_0;
+		sM_Parcel:
+			mes "[Mari Isac]";
+			mes "I learned how to make the Parcel Hat when I traveled to Alberta.  There they have a unique way of distributing mail and goods.";
+			next;
+			mes "[Mari Isac]";
+			mes "Instead of using a pouch or a sack to carry items for delivery, they use a special kind of hat, called a Parcel Hat.";
+			mes "This hat allows the delivery personel to carry numerous items on their heads.  Of course they have to have good balance to use it.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Parcel Hat, you'll need to bring me these items.";
+			mes "^5555FF150 Fabric^000000,";
+			mes "^5555FF100 Resin^000000,";
+			mes "^5555FF1 Cobaltblue Dyestuffs^000000.";
+			next;
+			goto M_0;
+		sM_Money:
+			mes "[Mari Isac]";
+			mes "I learned how to make the Money Loser's Grief when I traveled to Morroc.";
+			next;
+			mes "[Mari Isac]";
+			mes "A long time ago an honest merchant got into a conflict with a crooked guild.";
+			mes "Unlike the dirty guild, the merchant did not scam or cheat people.";
+			next;
+			mes "[Mari Isac]";
+			mes "Because of this they attacked the merchants shop and took all of his goods.";
+			next;
+			mes "[Mari Isac]";
+			mes "The merchant was devastated by the loss of his shop.";
+			mes "In his sadness he used the bits and pieces that were left from his shop to create a new item.";
+			next;
+			mes "[Mari Isac]";
+			mes "He created the Money Loser's Grief, a symbol of his great sadness.  When people see it, they can't help but feel sympathetic to the wearer.";
+			next;
+			mes "[Mari Isac]";
+			mes "Many merchants now wear it to help themselves get more business.  Of course it is also a reminder of the honest merchants sad tale.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Money Losers Grief, you'll need to bring me these items.";
+			mes "^5555FF1 Circlet with a single slott^000000,";
+			mes "^5555FF1 Gold^000000,";
+			mes "^5555FF20 Steel^000000,";
+			mes "^5555FF80 Feathers^000000,";
+			mes "^5555FF800 Sticky Mucus^000000.";
+			next;
+			goto M_0;
+		sM_Phantom:
+			mes "[Mari Isac]";
+			mes "I learned how to make the Phantom of the Opera Mask when I traveled to Al De Baran.";
+			mes "The story behind this item is that of a man's pure love........";
+			next;
+			mes "[Mari Isac]";
+			mes "There once was a man who was in love with a beautiful opera singer.";	
+			mes "Unfortunately the man had a terribly disfigured face which forced to him to wear a mask.";
+			next;
+			mes "[Mari Isac]";
+			mes "He was ashamed of his appearance and could never bring himself to face the singer.";
+			mes "The man instead, watched her from a far, admiring every nuance of her beauty and grace.";
+			next;
+			mes "[Mari Isac]";
+			mes "He lurked in the bowles of the opera house and from time to time he would sing his sad love song.";
+			mes "Many people heard it and believed that there was a phantom haunting the opera house.";
+			next;
+			mes "[Mari Isac]";
+			mes "The singer also heard his song, and through it she was able to feel his pain and his love for her.";
+			mes "The two eventually met, and when they did she was able to look past his appereance and accept him for who he was.";
+			next;
+			mes "[Mari Isac]";
+			mes "Too this day, the tale of the masked 'phantom' is still romantacised.";
+			next;
+			mes "[Mari Isac]";
+			mes "Anyways, if you want me to make you a Phantom of the Opera Mask, you'll need to bring me these items.";
+			mes "^5555FF1 Opera Masque^000000,";
+			mes "^5555FF50 Horrendous Hairs^000000.";
+			goto M_0;
+
+	M_1:
+		menu "-Mine Helmet",sM_MakeMine, "-Parcel Hat",sM_MakePar, "-Money Loser's Grief",sM_MakeMon, "-Phantom of the Opera Mask",sM_MakePhan;
+
+		sM_MakeMine:
+			if (countitem(5009)<1 || countitem(5028)<1 || countitem(747)<1 || countitem(999)<25) goto ssL_NoItems;
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Mine Helmet!";
+			delitem 5009, 1;
+			delitem 5028, 1;
+			delitem 747, 1;
+			delitem 999, 25;
+			getitem 5031,1;
+			close;
+		sM_MakePar:
+			if (countitem(1059)<150 || countitem(907)<100 || countitem(978)<1) goto ssL_NoItems;
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Parcel Hat!";
+			delitem 1059, 150;
+			delitem 907, 100;
+			delitem 978, 1;
+			getitem 5023,1;
+			close;
+		sM_MakeMon:
+			if (countitem(2233)<1 || countitem(969)<1 || countitem(999)<20 || countitem(949)<80 || countitem(938)<800) goto ssL_NoItems;
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Money Loser's Grief!";
+			delitem 2233, 1;
+			delitem 969, 1;
+			delitem 999, 20;
+			delitem 949, 80;
+			delitem 938, 800;
+			getitem 5021,1;
+			close;
+		sM_MakePhan:
+			if (countitem(2281)<1 || countitem(1048)<50) goto ssL_NoItems; 
+			mes "[Mari Isac]";
+			mes "Here you go.  Enjoy your Phantom of the Opera Mask!";
+			delitem 2281,1;
+			delitem 1048, 50;
+			getitem 5043, 1;
+			close;
+
+			ssL_NoItems:
+				mes "[Mari Isac]";
+				mes "You don't seem to have enough items for me to make that hat.  Please come back when you do.";
+				close;
+
+}