//==================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// ---------------------------------
// - 2006 sYs@ } - 
//===================================
// G1.2
//===================================
//= ɧJ, Ф򨩹pU, ڰOY, e^,
//= l, H, ϹDU, BU
//===================================

// ɧJ
rachel,91,273,8	script	?	930,{
	if (countitem(983) > 0 && countitem(7111) > 99 && countitem(938) > 98 && Zeny > 99999) {
		mes "[?]";
		mes "Giggle giggle...isn't it my partner, eh?";
		mes "So, did you bring everything that I asked?";
		mes "Great, now I can make the item which will help you";
		mes "to cover your identity! Giggle giggle...";
		next;
		mes "- Bzzz Bzzz Click Click -";
		mes "- Fumble Fumble Fumble Fumble -";
		mes "- Bzzz Bzzz Click Click -";
		mes "- Fumble Fumble Fumble Fumble -";
		next;
		mes "[?]";
		mes "...Hey, don't look over my shoulder.";
		mes "I don't want to share";
		mes "my business secret with you, you know?";
		next;
		mes "- Bzzz Bzzz Click Click -";
		mes "- Fumble Fumble Fumble Fumble -";
		mes "- Bzzz Bzzz Click Click -";
		mes "- Fumble Fumble Fumble Fumble -";
		next;
		delitem 983,1; //¦V
		delitem 7111,100; //ƪ
		delitem 938,99; //߸YG
		set zeny,zeny-100000;
		getitem 5175,1; //ɧJ
		mes "[?]";
		mes "Phew...it's done. Well, it was not that difficult to make, but...";
		mes "Giggle giggle, what is important is that";
		mes "now you can hide your identity. Now, take this.";
		mes "Hopefully, this mask will help you";
		mes "to avoid encountering your enemies. Ahahaha!";
		close;
	}
	mes "[?]";
	mes "... ! AnQ";
	mes "ť! ]OQڷfS!";
	mes "N! OVĤHzS";
	mes "ڦbo!";
	next;
	mes "[?]";
	mes "... OڦP@ꪺܡA";
	mes "]QnAQnæۤvA";
	mes "ҥH~]oam[";
	mes "a? S... ӬO... ";
	next;
	mes "[?]";
	mes "YOPӪܧڴNӹA";
	mes "NH... Mڤڪ";
	mes "uꨭiDAAA";
	mes "ڤ@˹Lêͬ";
	next;
	mes "[?]";
	mes "^FF0000¦V 1^000000A^FF0000ƪ";
	mes "100^000000A^FF0000߸YG 99^000000A";
	mes "H ^FF000010U^000000";
	mes "aӧa.. Aڷ|A";
	mes "è";
	next;
	mes "[?]";
	mes "haAڭ̦b@_";
	mes "|nGA";
	mes "A]Ӧnmça..";
	mes "AAƻƮ";
	mes "Aӧo";
	close;
}

// Ф򨩹pU
rachel,152,131,3	script	Lw	928,{
	if (countitem(5172) > 0 && countitem(7063) > 99 && countitem(982) > 0) {
		mes "[Lw]";
		mes "ܦnAAܾFs@^FF0000Ф򨩹pU^000000";
		mes "ƥǳƧF! F";
		mes "yAҡAѧڨ";
		mes "˦ۻs@";
		next;
		mes "[Lw]";
		mes "ЧAMbߦb[A";
		mes "ݮɶ]ݭnyA";
		mes "WaZS@۪";
		mes "Υ`~iH!";
		next;
		mes "[Lw]";
		mes "U@uWwɡA";
		mes "^FF0000 MuCvA";
		mes "]i|! @~";
		mes "ѮɩҦƳ|w!";
		mes "򥻤H藍|I";
		mes "dAЧAcOF!^000000";
		next;
		mes "- VVV -";
		mes "- VVV -";
		mes "- VVV -";
		mes "- ԰԰ -";
		next;
		mes "- VVV -";
		mes "- VVV -";
		mes "- VVV -";
		mes "- ԰԰ -";
		next;
		set .@result,rand(1,10);
		if (.@result == 4) {
			delitem 5172,1; //pU 
			delitem 7063,100; //XnФ 
			delitem 982,1; //զV
			mes "[Lw]";
			mes "I did succeed in making the hat,";
			mes "but I cannot let it fall into someone else's hand!";
			mes "The essential of Feathre Beret is";
			mes "the precise angle of the beret and the feather,";
			mes "but this hat's angle has become slightly crooked,";
			mes "and the quality has become too poor to be my artwork!";
			next;
			mes "[Lw]";
			mes "I understand that you feel quite unfortunate";
			mes "with this result. However, I urge you to not to be";
			mes "so disappointed, and try again!";
			mes "There is no impossibility in the world, so you can do it!";
			next;
			mes "[Lw]";
			mes "Now, brace yourself up!";
			mes "You have done this already,";
			mes "so you can easily do it again.";
			mes "If you understood, now, go, go gather the materials again!";
			close;
		}
		delitem 5172,1; //pU
		delitem 7063,100; //XnФ
		delitem 982,1; //զV
		getitem 5170,1; //Фpp
		mes "[Lw]";
		mes "\FAݨFܡAoФpp";
		mes "ftA٦ݴN";
		mes "P즳WxAo~O";
		mes "HͬbɥN̸Ӫë";
		mes "ݫ~";
		next;
		mes "[Lw]";
		mes "oOΧAj^Ӫ";
		mes "һs@zҷMOAA";
		mes "ЧA[QΥAި";
		mes "̭nӰ󥿥H";
		close;
	}
	mes "[Lw]";
	mes "קn! yn!!";
	mes "nWxByZ";
	mes "~Oڭ̤HӰ! ڻ";
	mes "{bHAbӨS";
	mes "SS§AAS";
	mes "PPܡAѧg!";
	next;
	if (select("OAS!:") == 1) {
		mes "[Lw]";
		mes "! ! O̪o@";
		mes "WxHALH";
		mes "ݰ_ӧA٤!";
		mes "SAYϥ^FF0000Ф򨩹pU^000000ܡA";
		mes "γ\|n@";
		next;
		mes "[Lw]";
		mes "گSOѧAuWxAסA";
		mes "AunaӧƪܡAH˦";
		mes "As@Ф򨩹pUA";
		mes "դF?";
		next;
		mes "[Lw]";
		mes "ƬO ^FF0000pU^000000 @ӡA^FF0000XnФ^000000";
		mes "@ʭӡA^FF0000զV^000000 @ӡA";
		mes "аOMF";
		mes "j^ӧa!";
		next;
		mes "[Lw]";
		mes "o|ɧAYM~wA";
		mes "HΧסAAnߦs";
		mes "PE! ǳƦnFܡA";
		mes "ߨhj^~a!";
		close;
	}
	mes "[Lw]";
	mes "nӤp! ]SWx!";
	mes "Ao˭b@W";
	mes "ͦsܡA? An_";
	mes "믫?!";
	close;
}

// ڰOY
hugel,147,130,3	script	\ǧƥ	897,{
	if (moza_valkylie == 5) {
		set .@val2,rand(1,10);
		if (.@val2 == 3) {
			misceffect 348; //EF_LIGHTSPHERE
			mes "[\ǧƥ]";
			mes "The materials are still being fused.";
			next;
			mes "[\ǧƥ]";
			mes "Umm?! Oh...oh?! Isn't this...";
			mes "Isn't this...?!";
			next;
			misceffect 322; //EF_FORESTLIGHT2
			mes "[\ǧƥ]";
			mes "Ah...ahahaha, we've made it! We've made it!";
			mes "Valkyre's Helm...We've recreated Valkyre's Helm,";
			mes "a glorious godly armor!";
			mes "Ah...does this mean...?";
			next;
			mes "[\ǧƥ]";
			mes "We are writing new history!";
			mes "Yes, we just have started writing new history.";
			next;
			mes "[\ǧƥ]";
			mes "Thank you so much for giving me a chance to participate in this.";
			mes "I am sure that my ancestors in heaven will be glad";
			mes "to see this successful recreation of Valkyre's Helm.";
			mes "Hahahahaha!";
			next;
			mes "[\ǧƥ]";
			mes "Please take this helm.";
			mes "As I promised, this is yours.";
			mes "Please take pride in yourself, and";
			mes "do not disgrace this Helm through evil doings.";
			next;
			set moza_valkylie,0;
			getitem 5171,1; //Valkyrie_Helm
			mes "[\ǧƥ]";
			mes "May God bless this adventurer";
			mes "who has written new history.";
			mes "I, Gheirhemin pray to god for his safe journey";
			mes "who is now heading toward the new history.";
			close;
		}
		misceffect 348; //EF_LIGHTSPHERE
		mes "[\ǧƥ]";
		mes "The materials are still being fused.";
		close;
	}
	else if (moza_valkylie == 4) {
		set .@val,rand(1,10);
		if (.@val == 7) {
			mes "[\ǧƥ]";
			mes "............";
			next;
			misceffect 348; //EF_LIGHTSPHERE
			mes "[\ǧƥ]";
			mes "Oh...oh? They....they just have started being fused!";
			mes "Look at this shining light!";
			mes "I can't...I can't believe that";
			mes "this is what happens in Valhala!";
			next;
			set moza_valkylie,5;
			mes "[\ǧƥ]";
			mes "We are now witnessess of the God's grace...ah....";
			close;
		}
		mes "[\ǧƥ]";
		mes "....Let's wait a little longer.";
		close;
	}
	else if (moza_valkylie == 3) {
		set moza_valkylie,4;
		mes "[\ǧƥ]";
		mes "Will you stop being anxious?";
		mes "Just relax and wait, will you?";
		mes "In a sense, we are holding a holy rite,";
		mes "and it is not going to happen faster,";
		mes "only because you, a human wants it to happen faster.";
		close;
	}
	else if (moza_valkylie == 2 && Zeny > 9999999 && countitem(4219) > 0 && countitem(4114) > 0 && countitem(4177) > 0 && countitem(4259) > 0 && countitem(4212) > 0 && countitem(4073) > 0 && countitem(4112) > 0 && countitem(4081) > 0 && countitem(4251) > 0 && countitem(4166) > 0 && countitem(7511) > 999 && countitem(7563) > 999) {
		mes "[\ǧƥ]";
		mes "Hmm...I am impressed that you have brought everything";
		mes "despite of the difficulty in gathering them. It was difficult, wasn't it?";
		mes "Haha, I can tell just by looking at your face.";
		mes "Good job, my friend, you did a good job.";
		next;
		mes "[\ǧƥ]";
		mes "Now, please hand them to me.";
		mes "If I place them together in one place,";
		mes "I am pretty sure that they will start";
		mes "being fused into the helm with their own mysterious powers.";
		next;
		if (select("Give him the items.:Don't give him the items.") == 1) {
			mes "[\ǧƥ]";
			mes "Excellent. Now, all we have to do";
			mes "is just waiting until they finish being fused into one.";
			next;
			delitem 4219,1; //Sageworm_Card
			delitem 4114,1; //Argiope_Card
			delitem 4177,1; //Dryad_Card
			delitem 4259,1; //Wooden_Golem_Card
			delitem 4212,1; //Bon_Gun_Card
			delitem 4073,1; //Pirate_Skel_Card
			delitem 4112,1; //Marduk_Card
			delitem 4081,1; //Hode_Card
			delitem 4251,1; //Elder_Card
			delitem 4166,1; //Nightmare_Terror_Card
			delitem 7511,1000; //Rune_Of_Darkness
			delitem 7563,1000; //Bloody_Rune
			set zeny,zeny-10000000;
			set moza_valkylie,3;
			mes "[\ǧƥ]";
			mes "Now I am all nervous";
			mes "in anticipation of a good result. Hahahaha.";
			close;
		}
		mes "[\ǧƥ]";
		mes "?";
		close;
	}
	else if (moza_valkylie == 2) {
		mes "[\ǧƥ]";
		mes "Please bring me";
		mes "^FF00001 Sage Worm Card, 1Argiope Card,";
		mes "^FF00001 Dryad Card, 1 Wooden Golem Card,";
		mes "^FF00001 Bongun Card, 1 Pirate Skeleton Card,";
		mes "^FF00001 Marduk Card, 1 Hode Card,";
		mes "^FF00001 Elder Card, 1 Nightmare Terror Card,^000000";
		next;
		mes "[\ǧƥ]";
		mes "^1,000 Rune of the Darkness,";
		mes "^1,000 Bloody Rune,";
		mes "^and the helm price, 10,000,000 zeny^000000.";
		next;
		mes "[\ǧƥ]";
		mes "It surely is a reasonable price considering that ";
		mes "you are about to obtain a godly power, don't you think?";
		next;
		set moza_valkylie,2;
		mes "[\ǧƥ]";
		mes "Let's discuss it later";
		mes "once you prepare the money and the items.";
		mes "Now I am so exhausted";
		mes "as it has been a while since the last time that I talked this much.";
		mes "Excuse me.";
		close;
	}
	else if (moza_valkylie == 1) {
		mes "[\ǧƥ]";
		mes "You must be pretty surprised by now.";
		mes "Yes, it is surely understandable.";
		mes "If you have travelled many places,";
		mes "and heard many stories, you would know what this is.";
		mes "Yes, it is ^FF0000Valkyre's Helm^000000.";
		next;
		mes "[\ǧƥ]";
		mes "A legendary helm only allowed to men";
		mes "who have transcended their limit.";
		mes "A godly armor that is blessed with an incredible power.";
		mes "Can you see now that my story is true?";
		next;
		mes "[\ǧƥ]";
		mes "It has passed so many years, and thus";
		mes "its power has become weakened,";
		mes "but you can still feel something holy about the helm.";
		mes "Don't you think?";
		next;
		mes "[\ǧƥ]";
		mes "Well...I am not allowed to wear this helm.";
		mes "Thus, if I find someone who is just perfect for this helm,";
		mes "I am going to give this to him without any regret.";
		next;
		mes "[\ǧƥ]";
		mes "Of course, I can't give away";
		mes "such a valuable thing for nothing in return.";
		mes "That's how it goes, you know?";
		mes "I maybe think about giving it to you";
		mes "because you seem to be wealthier than others,";
		mes "and I can sense special aura from you.";
		next;
		mes "[\ǧƥ]";
		mes "So, what do you say?";
		mes "I think that I have an eye for right men.";
		mes "I feel that you will be able to fully recreate this Valkyre's Helm";
		mes "as well as use it to its full potential.";
		next;
		if (select("Sure.:No, thanks.") == 1) {
			mes "[\ǧƥ]";
			mes "You are an ambitious young man as I expected.";
			mes "It is surely a great advantage.";
			mes "Okay, I will tell you what I know from now on.";
			mes "So, listen carefully.";
			next;
			mes "[\ǧƥ]";
			mes "First, we have to fully restore the helm's power.";
			mes "To do so, we must find monster cards";
			mes "that possess mysterious powers.";
			next;
			mes "[\ǧƥ]";
			mes "That's not all. You know,";
			mes "we can't just glue those monster cards";
			mes "on the helm. Thus, we need a power that";
			mes "enables us to fuse the cards and the helm into one.";
			next;
			mes "[\ǧƥ]";
			mes "Ancient runes are perfect to supply the power,";
			mes "especially we need Rune of the Darkness, and Bloody Rune.";
			mes "Perhaps, they were chosen because of their sealed dark power";
			mes "and bloody sticky power? That's just my guess, hahahaha!";
			next;
			mes "[\ǧƥ]";
			mes "Once we successfully restore the helm's power,";
			mes "you are expected to purchase the helm from me.";
			mes "As I said earlier, I am not going to";
			mes "give away such a valuable thing with nothing in return.";
			mes "It will also demonstrate your qualification to become the helm's owner.";
			next;
			mes "[\ǧƥ]";
			mes "Basically, you have to bring me...";
			mes "Ah, there are so many things that you need to bring me.";
			mes "I suggest you to write down, and memorize them.";
			next;
			mes "Please bring me";
			mes "^FF00001 Sage Worm Card, 1Argiope Card,";
			mes "1 Dryad Card, 1 Wooden Golem Card,";
			mes "1 Bongun Card, 1 Pirate Skeleton Card,";
			mes "1 Marduk Card, 1 Hode Card,";
			mes "1 Elder Card, 1 Nightmare Terror Card,^000000";
			next;
			mes "[\ǧƥ]";
			mes "^FF00001,000 Rune of the Darkness,";
			mes "1,000 Bloody Rune,";
			mes "and the helm price, 10,000,000 zeny^000000.";
			next;
			mes "[\ǧƥ]";
			mes "It surely is a reasonable price considering that ";
			mes "you are about to obtain a godly power, don't you think?";
			next;
			set moza_valkylie,2;
			mes "[\ǧƥ]";
			mes "Let's discuss it later";
			mes "once you prepare the money and the items.";
			mes "Now I am so exhausted";
			mes "as it has been a while since the last time that I talked this much.";
			mes "Excuse me.";
			close;
		}
		mes "[\ǧƥ]";
		mes "Haha, I understand that";
		mes "it is not an easy choice to make.";
		mes "Take your time, my friend.";
		mes "If you still don't want the helm, I respect your decision.";
		close;
	}
	else if (Zeny > 9999999) {
		mes "[\ǧƥ]";
		mes "Hmm...you look like a poor-looking wanderer,";
		mes "but you seem to have an enormous amount of money with you.";
		mes "I guess that the old saying was right:";
		mes "''Don't judge a book by its cover.''";
		next;
		mes "[\ǧƥ]";
		mes "You maybe understand my story.";
		mes "Would you like to listen to my long story?";
		mes "It may or may not be interesting to you,";
		mes "but I gurantee that it will never bore you in either way.";
		next;
		if (select("Listen.:Don't listen.") == 1) {
			mes "[\ǧƥ]";
			mes "Good, let me introduce myself.";
			mes "My name is \ǧƥ.";
			mes "I am no different than others,";
			mes "if I may speak of my only advantage,";
			mes "I have little more money than them. Hahaha.";
			next;
			mes "[\ǧƥ]";
			mes "However, I did not earn my money,";
			mes "but I inherited the fortune from my ancestors,";
			mes "who were all gifted businessmen.";
			mes "I thank to him for handing over such great fortune.";
			next;
			mes "[\ǧƥ]";
			mes "In fact, I am ashamed to tell you that";
			mes "I do not know what exactly my ancestors did";
			mes "to make this much fortune. Perhaps some would have held business,";
			mes "some others would have been great artists...";
			next;
			mes "[\ǧƥ]";
			mes "Our family is just blessed enough to have";
			mes "such great ancestors, who brought wealth to their family.";
			mes "It would take me at least a week to list";
			mes "every single successful ancestor of mine.";
			next;
			mes "[\ǧƥ]";
			mes "However, I like to tell you about one of my amazing ancestors,";
			mes "who has become our family hero.";
			next;
			mes "[\ǧƥ]";
			mes "Well, actually I do not know exactly";
			mes "what he did, but I know that";
			mes "he brought glory and fame";
			mes "to our family for the first time.";
			mes "However, since it has been so long, we do not have";
			mes "any document about him, so...";
			next;
			mes "[\ǧƥ]";
			mes "I clearly remember one thing about him though.";
			mes "He was the only human who was able to";
			mes "become close to the gods, and he demonstrated";
			mes "his godly power to bring light to us, humans.";
			next;
			mes "[\ǧƥ]";
			mes "I don't know how he obtained the godly power,";
			mes "or how he could become close to the gods.";
			mes "I just remember these things because I was repeatedly told";
			mes "about his amazing story ever since I was born...";
			next;
			mes "[\ǧƥ]";
			mes "I can show you that I am not making things up.";
			mes "I told you that we do not have any document about him, right?";
			mes "However, there is something that I can show you.";
			mes "Now, take a look at this.";
			next;
			set moza_valkylie,1;
			mes "[\ǧƥ]";
			mes "See? This surely tells you that";
			mes "I am not making things up!";
			mes "This is what my ancestor used to use!";
			close;
		}
		mes "[\ǧƥ]";
		mes "What a shame! However, I don't want to force you to";
		mes "do something that you don't want to do. Hahaha.";
		mes "Just remember, you just have made another choice for your life.";
		close;
	}
	mes "[\ǧƥ]";
	mes "Everything has meaning and reason to exist in this world.";
	mes "You and I, we are destined to meet with each other today.";
	next;
	mes "[\ǧƥ]";
	mes "Well...although I said that everything has meaning,";
	mes "unfortunately you are not interesting to me at all.";
	mes "Call me a money monger,";
	mes "but I like the rich.";
	next;
	mes "[\ǧƥ]";
	mes "If you prove me that you are wealthy,";
	mes "I maybe change my mind, and become interested in you.";
	mes "But, I will decide whether or not I will be interested in you";
	mes "when you show me your money. Hahahaha!";
	close;
}

// l / H / e^
payon,135,320,3	script	C	97,{
	if (moza_tal == 2) {
		if (countitem(7015) > 19 && countitem(952) > 99 && countitem(1028) > 99) {
			//e^: Bookclip_In_Memory, Cactus_Needle, Wild_Boar's_Mane
			callsub S_MakeMask,5176,7015,20,952,100,1028,100,0,0;
		}
		if (countitem(1048) > 499 && countitem(1053) > 1 && countitem(980) > 0) {
			//l: Slender_Snake, Tooth_Of_Ancient_Fishm Orange_Dyestuffs
			callsub S_MakeMask,5177,1048,500,1053,2,980,1,0,0;
		}
		if (countitem(1049) > 19 && countitem(1059) > 499 && countitem(1054) > 1 && countitem(1024) > 99) {
			//H: Skirt_Of_Virgin, Transparent_Cloth, Lip_Of_Ancient_Fish, Chinese_Ink
			callsub S_MakeMask,5169,1049,20,1059,500,1054,2,1024,100;
		}
		mes "[C]";
		mes "Well well, have you not gathered the materials yet?";
		mes "You'd better hurry because I can't wait so long!";
		mes "Wait, what mask did you ask me to make anyways?";
		next;
		switch(select("e^:H:l")) {
		case 1:
			mes "[C]";
			mes "Oh, yes, you want e^.";
			mes "Then you need to bring... ^FF000020 Bookclip in Memory^000000,";
			mes "^FF0000100 Cactus Needle^000000, and";
			mes "^FF0000100 Mane^000000.";
			break;
		case 2:
			mes "[C]";
			mes "Oh, yes, you want H.";
			mes "Then you need to bring... ^FF000020 Skirt of Virgin^000000,";
			mes "^FF0000500 Fabric^000000, ^FF00002 Ancient Lips^000000,";
			mes "and ^FF0000100 Squid Ink^000000.";
			break;
		case 3:
			mes "[C]";
			mes "Oh, yes, you want l.";
			mes "Then you need to bring... ^FF0000500 Horrendous Hair^000000,";
			mes "^FF00002 Ancient Tooth^000000, and";
			mes "^FF00001 Orange Dyestuffs^000000.";
			break;
		}
		mes "Bring the exact amount of materials, then I will give you the mask right away.";
		close;
	}
	if (countitem(7201) > 499) && (countitem(7200) > 9 && moza_tal == 1) {
		mes "[C]";
		mes "Ah, Four Leaf Clover must bring me luck";
		mes "because you came back faster than I thought! Wow...";
		mes "Thank you so much, now I think that";
		mes "I have fortune on my side. Hahaha!";
		next;
		mes "[C]";
		mes "Alright! I will return your favor as I promised.";
		mes "I will tell you everything. In fact,";
		mes "I am a traditional mask craftsman.";
		mes "I am proud to tell you that no one can beat me";
		mes "in crafting traditional masks! Ahem!";
		next;
		mes "[C]";
		mes "I had experienced emotional instability";
		mes "as well as had bad luck with everything due to various reasons.";
		mes "But, that's history now! I am back, hahahaha!";
		next;
		mes "[C]";
		mes "I feel good, and I have fortune back to my side.";
		mes "I really appreciate you for helping me to feel better.";
		mes "In return, I am going to make you a traditional mask! Hahaha!";
		mes "You should be thankful for that I am offering you a great gift.";
		next;
		mes "[C]";
		mes "You know why? Because there is no one who can offer you";
		mes "such a valuable item except me.";
		mes "Anyhow, I can make 3 different masks:";
		mes "e^, H and l.";
		mes "Which one whould you like to have? Pick one.";
		next;
		switch(select("e^:H:l")) {
		case 1:
			mes "[C]";
			mes "Great, you want e^, eh? That's easy!";
			mes "Then you need to bring... ^FF000020 Bookclip in Memory^000000,";
			mes "^FF0000100 Cactus Needle^000000, and";
			mes "^FF0000100 Mane^000000.";
			mes "Bring the exact amount of materials, then I will give you the mask right away.";
			break;
		case 2:
			mes "[C]";
			mes "Great, you want H, eh? That's easy!";
			mes "Then you need to bring... ^FF000020 Skirt of Virgin^000000,";
			mes "^FF0000500 Fabric^000000, ^FF00002 Ancient Lips^000000,";
			mes "and ^FF0000100 Squid Ink^000000.";
			mes "Bring the exact amount of materials, then I will give you the mask right away.";
			break;
		case 3:
			mes "[C]";
			mes "Great, you want l, eh? That's easy!";
			mes "Then you need to bring... ^FF0000500 Horrendous Hair^000000,";
			mes "^FF00002 Ancient Tooth^000000, and";
			mes "^FF00001 Orange Dyestuffs^000000.";
			mes "Bring the exact amount of materials, then I will give you the mask right away.";
			break;
		}
		delitem 7201,500; //Log
		delitem 7200,10; //Flexible_String
		set moza_tal,2;
		next;
		mes "[C]";
		mes "...Why are you eyeing at me?";
		mes "What, did you expect me to make the mask for free?";
		mes "If you did, you must think of it this way.";
		mes "My term of payback is to use my skills,";
		mes "and let you have my precious mask,";
		mes "not making the mask for you at free of charge, understood?";
		next;
		mes "[C]";
		mes "At least I am not charging you with service fee, am I?";
		mes "Just bring me the materials, I will do my best";
		mes "to make an incredible mask for you!";
		next;
		mes "[C]";
		mes "In the meantime, I am going to prepare";
		mes "the work by using these Log and Elastic Band.";
		mes "So come back as soon as you can, okay?";
		close;
	}
	if (moza_tal == 1) {
		mes "[C]";
		mes "Umm...the things that I've asked you were";
		mes "^FF0000500 Log^000000 and ^FF000010 Elastic Band^000000.";
		mes "Thanks in advance.";
		close;
	}
	if (countitem(706) > 0) {
		mes "[C]";
		mes "Ah...! Hey! I can tell something unique about you.";
		mes "Do you have a Four Leaf Clover by any chance?";
		mes "Do you mind if I ask you to give me the clover?";
		next;
		mes "[C]";
		mes "I am not asking you to give it to me for free.";
		mes "Although I can't gurantee it,";
		mes "I will be able to pay back your favor sooner or later.";
		mes "So, can I take it?";
		next;
		if (select("Sure.:No, you can't.") == 1) {
			mes "[C]";
			mes "Oh! Thank you so much!";
			mes "Muhahahahahaha! Now I will become a lucky guy!";
			mes "With the clover, fortune will be on my side again!";
			next;
			mes "[C]";
			mes "Oh, right! I almost forgot.";
			mes "I promised you to pay back your favor, right?";
			mes "I know that this might sound selfish,";
			mes "but, hey, can you do me one more favor?";
			mes "Since you did me a favor already,";
			mes "I don't think that it would be";
			mes "that hard for you to help me one more time?";
			mes "Please, show me your generosity~";
			next;
			mes "[C]";
			mes "I need... ^FF0000500 Log^000000 and";
			mes "^FF000010 Elastic Band^000000.";
			mes "Will you be so kind to bring them to me?";
			mes "In fact, I can't pay you back unless I have them.";
			next;
			delitem 706,1; //Four_Leaf_Clover
			set moza_tal,1;
			mes "[C]";
			mes "You want me to pay you back, don't you?";
			mes "So, please bring them to me, please~";
			close;
		}
		mes "[C]";
		mes "I see... Well, it is not easy to give away the lucky charm";
		mes "to a stranger without a second thought.";
		mes "...Haha, but that doesn't make me stop being upset.";
		mes "How dare you to refuse my request? Hah!";
		close;
	}
	mes "[C]";
	mes "... ... ڬO... ڬO...";
	next;
	mes "[C]";
	mes "ڬO橯Bkl!бa";
	mes "nBaaaaaI";
	mes "`Aڻݭnu@!";
	next;
	mes "[C]";
	mes "ݭn^FF0000|B^000000հհհ!";
	mes "Hڧ";
	mes "|B!!!";
	close;

S_MakeMask:
	mes "[C]";
	mes "Oh, you have brought everything";
	mes "to make a "+getitemname(getarg(0))+". Excellent.";
	mes "Please give me the materials. I will make the mask right away.";
	next;
	if (select("Give him the items.:Don't give him the items.") == 1) {
		mes "[C]";
		mes "Great, I like your unhesitating attitude!";
		mes "Alright then, I will make the mask as quickly as I can!";
		next;
		mes "[C]";
		mes "- Fumble Fumble Fumble -";
		mes "- Fumble Fumble Fumble -";
		mes "- Fumble Fumble Fumble -";
		mes "- Thud Thud Thud Thud -";
		next;
		mes "[C]";
		mes "- Fumble Fumble Fumble -";
		mes "- Fumble Fumble Fumble -";
		mes "- Fumble Fumble Fumble -";
		mes "- Thud Thud Thud Thud -";
		next;
		delitem getarg(1),getarg(2);
		delitem getarg(3),getarg(4);
		delitem getarg(5),getarg(6);
		delitem getarg(7),getarg(8);
		getitem getarg(0),1;
		set moza_tal,0;
		mes "[C]";
		mes "Wow, it was a piece of cake!";
		mes "You know, I am not an artisan only in title.";
		mes "Hahaha, here, take your "+getitemname(getarg(0))+".";
		mes "I hope that you will wear it with pride, hahaha!";
		next;
		mes "[C]";
		mes "Aright, I need to take a rest";
		mes "until I have next customer. Hahaha, bye!";
		close;
	}
	mes "[C]";
	mes "Err? Don't you want "+getitemname(getarg(0))+"?";
	mes "Alright then...coward.";
	close;
}


//  ϹDU / BU
payon_in03,139,124,3	script		88,{
	if (moza_korea == 2 && countitem(954) > 299 && countitem(733) > 4 && countitem(975) > 0 && countitem(7166) > 49) {
		mes "[]";
		mes "nƧAaFA";
		mes "jڷQ٧...";
		mes "GM߯ݼejHO]ܦn!";
		mes "oӡA@Q컡oؤHs@";
		mes "BUAuڿĲW";
		next;
		mes "[]";
		mes "na! ںɧAA";
		mes "Aƥ浹ڧa";
		next;
		if (select("L:L") == 1) {
			mes "[]";
			mes "OK! {bƦܤݭnUsFA";
			mes "ڤ]iHoܺ}GA";
			mes "ЧA@U";
			next;
			mes "[]";
			mes "O... S...  ";
			next;
			mes "[]";
			mes ".................";
			next;
			mes "[]";
			mes ".................";
			next;
			mes "[]";
			mes "... n[SF";
			mes "u@ٺYO";
			next;
			mes "[]";
			mes "LڤoOO";
			mes "oNơA...uA";
			mes "`oOAeUBUAF";
			mes "uwoӥ浹AFAha";
			next;
			delitem 954,300; //oG
			delitem 733,5; //lp
			delitem 975,1; //V
			delitem 7166,50; //Xnv
			set moza_korea,0;
			getitem 5174,1; //BU[1]
			mes "[]";
			mes "{bYi䥦u@ܡA";
			mes "ٻݭnhUs...A";
			mes "o]ϦhOH";
			mes "~බQAU";
			mes "]|DA~";
			next;
			mes "[]";
			mes "`A§A! oBUƱ";
			mes "Aൽ[QΡAOöQ~";
			mes "ЧAHɩۻPhϥΧa!";
			close;
		}
		mes "[]";
		mes "...? What? Do you need more time?";
		mes "Can't you just give them to me already?";
		close;
	}
	else if (moza_korea == 2 && countitem(954) > 299 && countitem(733) > 4 && countitem(983) > 0 && countitem(2221) > 0) {
		mes "[]";
		mes "nƧAaFA";
		mes "jڷQ٧...";
		mes "GM߯ݼejHO]ܦn!";
		mes "oӡA@Q컡oؤHs@";
		mes "ϹDUAuڿĲW";
		next;
		mes "[]";
		mes "na! ںɧAA";
		mes "Aƥ浹ڧa";
		next;
		if (select("L:L") == 1) {
			mes "[]";
			mes "Excellent! I don't have to be mediumized";
			mes "by the Dragon God for this work";
			mes "because I can perfectly do it on my own.";
			mes "So, hold it right there, okay?";
			next;
			mes "[]";
			mes "Yes...right...umm hmm.";
			next;
			mes "[]";
			mes ".................";
			next;
			mes "-  started hammering, -";
			mes "- and assembling the materials without a word. -";
			next;
			mes "[]";
			mes ".................";
			next;
			mes "[]";
			mes "Phew, it was quite difficult,";
			mes "as I had not done this for quite a while.";
			next;
			mes "[]";
			mes "LڤoOO";
			mes "oNơA...uA";
			mes "`oOAeUϹDUAF";
			mes "uwoӥ浹AFAha";
			next;
			delitem 954,300; //oG
			delitem 733,5; //lp
			delitem 983,1; //¦V
			delitem 2221,1; //ҴU[1]
			set moza_korea,0;
			getitem 5173,1; //ϹDU
			mes "[]";
			mes "{bYi䥦u@ܡA";
			mes "ٻݭnhUs...A";
			mes "o]ϦhOH";
			mes "~බQAU";
			mes "]|DA~";
			next;
			mes "[]";
			mes "`A§A! oϹDUƱ";
			mes "Aൽ[QΡAOöQ~";
			mes "ЧAHɩۻPhϥΧa!";
			close;
		}
		mes "[]";
		mes "...? What? Do you need more time?";
		mes "Can't you just give them to me already?";
		close;
	}
	else if (moza_korea == 2) {
		mes "[]";
		mes "s@BUһݪƬO";
		mes "^FF0000oG^000000 300! ^FF0000lp^000000 5!";
		mes "^FF0000V^000000 1!";
		mes "^FF0000Xnv^000000 50!";
		next;
		mes "[]";
		mes "s@ϹDUһݪƬO";
		mes "^FF0000oG^000000 300! ^FF0000lp^000000 5!";
		mes "^FF0000¦V^000000 1!";
		mes "^FF0000]PҴU^000000 1!";
		next;
		mes "[]";
		mes "ƪDFa? ЧAb̤@";
		mes "AQnAh";
		mes "`^ӧa";
		next;
		mes "[]";
		mes "AڵAAun";
		mes "aӪܧڰWA";
		close;
	}
	else if (moza_korea == 1) {
		mes "[]";
		mes ".............";
		next;
		mes "[]";
		mes ".............";
		next;
		mes "[]";
		mes ".............";
		next;
		mes "[]";
		mes ".........! ӤFAӤF...";
		mes "- sjH";
		mes "{bڨWF-! z!";
		mes "ڰڡAsjHAnۧ";
		mes "˦۳yXڪ믫@ɡA";
		mes "ڪe~Igzڰڰڰڰ!";
		next;
		misceffect 90; //EF_LORD;
		mes "[]";
		mes "zڰڰڰ!!";
		next;
		mes "[]";
		mes ".............";
		next;
		mes "[]";
		mes ".............";
		next;
		mes "[]";
		mes "O..S! ^FF0000BU^000000M ^FF0000ϹDU^000000";
		mes "ڥiHs@FAڰڰ! s@kA";
		mes "s@! X{b";
		mes "e! ڰڡANn";
		mes "bs@@!";
		next;
		mes "[]";
		mes "s@BUһݪƬO";
		mes "^FF0000oG^000000 300! ^FF0000lp^000000 5!";
		mes "^FF0000V^000000 1!";
		mes "^FF0000Xnv^000000 50!";
		next;
		mes "[]";
		mes "s@ϹDUһݪƬO";
		mes "^FF0000oG^000000 300! ^FF0000lp^000000 5!";
		mes "^FF0000¦V^000000 1!";
		mes "^FF0000]PҴU^000000 1!";
		next;
		mes "[]";
		mes "unoǴNనWF!";
		mes " sjH!!";
		next;
		misceffect 7; //EF_EXIT;
		mes "[]";
		mes ".............";
		next;
		mes "[]";
		mes ".............";
		next;
		mes "[]";
		mes "... {bUsFA";
		mes "YKps@k";
		mes "ܩƤ譱ڳ";
		mes "wOMFAҥHߤFA";
		mes "~... AOBUMϹDU?";
		next;
		mes "[]";
		mes "ƪDFa? ЧAb̤@";
		mes "AQnAh";
		mes "`^ӧa";
		next;
		set moza_korea,2;
		mes "[]";
		mes "AڵAAun";
		mes "aӪܧڰWA";
		close;
	}
	if (countitem(7446) > 6 && countitem(7448) > 6 && countitem(7445) > 6 && countitem(7447) > 6) {
		mes "[]";
		mes "ڥsšAڥiOW";
		mes "Ǫkl~... _?";
		mes "ѫD`x... D";
		mes "s_]4MզXUCӧA";
		mes "wg֦F? nx";
		next;
		mes "[]";
		mes "... GM! AA";
		mes "öQFAOpo....";
		next;
		mes "[]";
		mes "........";
		next;
		mes "[]";
		mes "аݤ@UApGAݭn";
		mes "iHeڶ? AD";
		mes "ڨOߤ@|s@";
		mes "ǲδUlHALê";
		mes "غح]ڲ{b";
		mes "s@ǲδUlF";
		next;
		mes "[]";
		mes "O]Ss_]4MզX";
		mes "tG? SANOAa۪";
		mes "m}ɪA";
		mes "`pG";
		mes "ڴNiu@F...";
		next;
		mes "[]";
		mes "_]iHeڶ? ڪG⨺";
		mes "_]eڪܡA@Nˤ";
		mes "As@ǲδUlA";
		mes "]Fڤ~SH|s@";
		mes "ǲδUltGAA|";
		mes "ıoܦȶ?";
		next;
		mes "[]";
		mes "ڧaAڷ|oܴ";
		next;
		if (select("L:L") == 1) {
			mes "[]";
			mes "OK! ڷ|nnϥΪ!";
			mes "§A! ڷ|uw@wA";
			mes "s@ǲδUlAn|Us";
			mes "AЧAy@U";
			next;
			delitem 7446,7; //Blue_Orb
			delitem 7448,7; //Yellow_Orb
			delitem 7445,7; //Green_Orb
			delitem 7447,7; //Red_Orb
			set moza_korea,1;
			mes "[]";
			mes "...ڭnȮɧ믫b";
			mes "o_]WAЧA@U";
			close;
		}
		mes "[]";
		mes "Bah, that's your choice.";
		mes "If you change your mind, tell me immediately though.";
		mes "You should know that";
		mes "those things belong to someone else, not you.";
		close;
	}
	mes "[]";
	mes "ڥsšAڥiOW";
	mes "Ǫkl~AAO";
	mes "gOWڶ? O]...";
	mes "bݷݮɴNaDFA";
	mes "{bhL۩M@HۦP";
	mes "ͬMݹJA";
	next;
	mes "[]";
	mes "ڸM_SpA";
	mes "~Ӫus@ǲδUl޳NӤw";
	mes "ϥAFڤ~ASH|s@";
	mes "ǲδUlAҥHOj޳Na";
	next;
	mes "[]";
	mes "Lj޳N̪";
	mes "]ʤ֤UsӦFLΪZaA";
	mes "? AݤUsO? ..";
	mes "ADPUZa? NO";
	mes "{AUsNO";
	mes "s{N";
	next;
	mes "[]";
	mes "OMsqѤW";
	mes "UӪءAOM";
	mes "siJڨǱ¤Oq";
	mes "Mz{H...";
	next;
	mes "[]";
	mes "ڭ̮aHeLoܦnA";
	mes "Usһݪ";
	mes "a̰nps..";
	mes "ӮaD";
	mes "p@LҦ";
	next;
	mes "[]";
	mes "`A~Ӫ޳No";
	mes "^LΪZaAuO";
	mes "id";
	next;
	mes "[]";
	mes "...^FF0000_]4C@U7^000000";
	mes "ns~|{@A";
	mes "ݭn^FF0000Ŧ_]B_]B";
	mes "_]B_]^000000... U7";
	mes "Xp28Ӫ_].. ";
	next;
	mes "[]";
	mes "o]OeoFA";
	mes "o...";
	mes "uO... ܱoܴƤ";
	close;
}
