Full npc folder reorganization. (I hope I didn't break anything D:)

-Now common scripts goes to the main npc folder, and pre-re-only/re-only ones goes to their respective folders.
-NPCs with practically the same script but little differences have been left in the main folder and uses the command checkre() for the differences.
-For those NPCs with different coordinates but same script, the script has been left in the main folder but the NPCs splitted as duplicates.
-All pre-renewal files has been reverted back to their pre-renewal behavior.

TODO:
-Correct pre-re quest rewards.
-Check for pre-re/re differences in mapflags.

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

1 files changed, 823 insertions, 0 deletions

diff --git a/npc/quests/newgears/2008_headgears.txt b/npc/quests/newgears/2008_headgears.txt
new file mode 100644
index 000000000..c634bb2f0
--- /dev/null
+++ b/npc/quests/newgears/2008_headgears.txt
@@ -0,0 +1,823 @@
+//===== rAthena Script =======================================
+//= 2008 Headgear
+//===== By: ==================================================
+//= Masao
+//= Credits: Muad_Dib
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= SVN rA
+//===== Description: =========================================
+//= [Aegis Conversion]
+//= Cats Footprint, Cute Ribbon Dyer and Brides Corolla.
+//===== Additional Comments: =================================
+//= 1.0 First Version. [Masao]
+//============================================================
+
+gef_fild05,80,149,3	script	Myu#08_hat	877,{
+	mes "[Myu]";
+	mes "Meow...";
+	emotion 23;
+	next;
+	if(hatcat2008 == 0) {
+		mes "[Myu]";
+		mes "Oh? Aren't you an adventurer?";
+		mes "What brings you here? Ho, you are not here to harm Wild Roses, are you?";
+		mes "(Meow!)";
+		next;
+		menu "Meow..?",-;
+		mes "[Myu]";
+		mes "Ah, Never mind that.";
+		mes "This place is the village of Deserted people.";
+		mes "Homeland of those who walk in the shadows and lay low.";
+		next;
+		mes "[Myu]";
+		mes "....And yet, our peace is being disturbed by those barking dogs.";
+		mes "That's right, Adventurer.";
+		mes "Would you be so kind and punish those Kobold Archers?";
+		next;
+		mes "[Myu]";
+		mes "They have their own territory south of here, but they're still trying to invade ours.";
+		next;
+		mes "[Myu]";
+		mes "How Impudent. I tried to talk to them in a peaceful way, or even fight them off, but it was of no use.";
+		next;
+		mes "[Myu]";
+		mes "So what I'm asking you is... to drive them out of our territory by using all means necessary..";
+		next;
+		mes "[Myu]";
+		mes "If you manage to do that, I will give you something precious which I really adore.";
+		next;
+		switch(select("That sounds troublesome..:What should I do?")){
+		case 1:
+			mes "[Myu]";
+			mes "Hmph, yeah, it was kinda funny huh.";
+			mes "Anybody who comes here....they all come to harm the Wild Roses..";
+			mes "I failed to notice that.";
+			next;
+			mes "[Myu]";
+			mes "...It was a fruitless effort Meow...";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes " (Meow again...What a weirdo.)";
+			close;
+		case 2:
+			mes "[Myu]";
+			mes "Of course take care of those Kobold Archers Meow!";
+			mes " ";
+			mes "(Meow!)";
+			next;
+			menu "Meow again?!",-;
+			mes "[Myu]";
+			mes "Hmm Hmm I told you to never mind that.";
+			mes "So as I was saying...";
+			mes "I mean... meow... er...";
+			next;
+			mes "[Myu]";
+			mes "Exactly 1,000 times no more, no less.";
+			mes "Give them 1,000 warnings and they will back off.";
+			next;
+			menu "What do you mean by 1,000 warnings...?",-;
+			mes "[Myu]";
+			mes "Hu~Do I have to spell it out for you?";
+			next;
+			mes "As she says that, Myu slides her neck mocking like she's slitting her throat.";
+			next;
+			switch(select("Isn't that too much?:That's easy")){
+			case 1:
+				mes "[Myu]";
+				mes "..But they won't give up if we dont really teach them a lesson.";
+				mes "Well If you think it's too much for you, so be it.";
+				close;
+			case 2:
+				mes "[Myu]";
+				mes "But you have to keep one thing in mind and it is";
+				mes "obiously, NEVER EVER do any harm to Wild Roses.";
+				next;
+				mes "[Myu]";
+				mes "If you do, it's all over for you.";
+				mes "So you better be careful.. ";
+				mes "Meow Meow Meow..";
+				set hatcat2008,1;
+				setquest 7054;
+				setquest 7055;
+				close;
+			}
+		}
+	} else if(hatcat2008 == 1) {
+		if(checkquest(7055,HUNTING) == 2) {
+			mes "[Myu]";
+			mes "Did you think I didn't know what you have done?";
+			mes "Huh?";
+			next;
+			mes "[Myu]";
+			mes "How..just how could you kill those precious children..?";
+			mes "And you were saying that you are on our side?!";
+			next;
+			mes "[Myu]";
+			mes "Our business is over!!!";
+			mes " ";
+			mes "(Meow..)";
+			set hatcat2008,0;
+			erasequest 7054;
+			erasequest 7055;
+			close;
+		} else if(checkquest(7054,HUNTING) == 2) {
+			mes "[Myu]";
+			mes "Oh..wow unbelievable!";
+			mes "Now, those Kobolds should have learned a lesson, haven't they?";
+			mes "Meow Meow Meow!";
+			next;
+			mes "[Myu]";
+			mes "Here, Take this.";
+			mes "This is the Seal of our 'Brave Kitty Cats'.";
+			mes "This is soooo valuable, so don't lose it.";
+			next;
+			menu "This is it?",-;
+			mes "[Myu]";
+			mes "What more did you expect?";
+			mes "That Pow is really a valuable thing!";
+			mes "Now, just take it and leave. Wild Roses feel uncomfortable with an adventurer around them.";
+			set hatcat2008,2;
+			getitem 5446,1;
+			erasequest 7054;
+			erasequest 7055;
+			close;
+		}
+		mes "[Myu]";
+		mes "You get it now, huh?";
+		mes "ONE THOUSAND TIMES! -chuckles-";
+		mes "(Meow Meow Meow~)";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "(What a weirdo.. Anyways..what's with that meow meow sound?)";
+		mes "Just keep your promises.";
+		mes "after the work is done...Ok?";
+		next;
+		mes "[Myu]";
+		mes "Of course! Don't worry about that~";
+		close;
+	} else if(hatcat2008 == 2) {
+		mes "[Myu]";
+		mes "This place is the village of Deserted people.";
+		mes "Homeland of those who walk in the shadows and lay low.";
+		next;
+		mes "[Myu]";
+		mes "Oh, Aren't you the Adventurer who took the Seal of our 'Brave Kitty Cats'.";
+		mes "What brings you here?";
+		next;
+		mes "[Myu]";
+		mes "Oh yeah, right, even after all the threats we gave the Kobolds..";
+		mes "our situation hasn't changed at all. Would you mind helping us once more?";
+		next;
+		mes "Myu slides her neck mocking like she's slitting her throat.";
+		mes "Her mouth looks like it's saying.";
+		mes " 'O.N.E. T.H.O.U.S.A.N.D.' ";
+		next;
+		switch(select("NO!:Sure.")) {
+		case 1:
+			mes "[Myu]";
+			mes "...!...";
+			mes ".. Ah.. that's too bad.";
+			mes "Well, looks like a bait has spoiled.... ";
+			mes "It's ok. That's how it is. Meow.";
+			close;
+		case 2:
+			mes "[Myu]";
+			mes "You know the drill right?";
+			mes "Never ever touch the Wild Roses, Only hunt down the Kobold Archers.";
+			mes "Give them 1,000 times despair!";
+			set hatcat2008,1;
+			setquest 7054;
+			setquest 7055;
+			close;
+		}
+	}
+	mes "[Myu]";
+	mes "Meow..";
+	mes "This Sunshine...makes me sleepy..";
+	close;
+}
+
+morocc_in,137,102,5	script	Trainee#2008hat01	82,{
+	mes "[Trainee Elgo]";
+	mes "Welcome.";
+	mes "Please talk to our teacher if you are here to make a dyes.";
+	mes "And talk to my friend next to me if it is about the delivery.";
+	next;
+	switch(select("And just what are you doing?:I see.")){
+	case 1:
+		mes "[Elgo]";
+		mes "Well, I dye clothes.";
+		mes "like handkerchiefs, or ribbons.";
+		next;
+		mes "[Elgo]";
+		mes "I can dye small things really pretty..";
+		mes "Such as a ^4d4dffCute Ribbon^000000.";
+		mes "Bring me a Cute Ribbon if you want to dye it.";
+		next;
+		mes "[Elgo]";
+		mes "It'd be a good chance for me to practice one,";
+		mes "and you won't have to pay a single zeny.";
+		mes "Oh yeah, but I will at least need the required^4d4dffdyestuffs^000000.";
+		next;
+		mes "[Elgo]";
+		mes "Of course, I won't fail.";
+		mes "I will put all my efforts into it.";
+		mes "I want to challenge my skills!!";
+		next;
+		if (countitem(2250) > 0 || countitem(5441) > 0 || countitem(5439) > 0 || countitem(5440) > 0 || countitem(5438) > 0) {
+			mes "["+strcharinfo(0)+"]";
+			mes "(I have a Cute Ribbon...what should I do..?)";
+			next;
+			switch(select("Ask Elgo to dye it.:Leave it alone.")){
+			case 1:
+				mes "[Elgo]";
+				mes "Oh, So you want to dye your Cute Ribbon, aren't you?";
+				mes "What colour is your Cute Ribbon?";
+				mes "Which one is the one you want to be dyed?";
+				next;
+				switch(select("Yellow one..:White one..:Blue one..:Red one..:Green one..:Never mind.")){
+				case 1:
+					if(countitem(2250) > 0) {
+						mes "[Elgo]";
+						mes "Ok Ok, Yellow Cute Ribbon, huh?";
+						mes "What color do you want it to be dyed?";
+						next;
+						switch(select("White:Blue:Red:Green")){
+						case 1:
+							if(countitem(982) > 0) {
+								mes "[Elgo]";
+								mes "Wow, pure and innocent white!";
+								mes "Ok, let's do it.";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 2250,1;
+								delitem 982,1;
+								getitem 5441,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it white, bring me ^4d4dff1 White Dyestuffs^000000.";
+							close;
+						case 2:
+							if(countitem(978) > 0) {
+								mes "[Elgo]";
+								mes "Cool blue!!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 2250,1;
+								delitem 978,1;
+								getitem 5440,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it blue, bring me ^4d4dff1 Blue Dyestuffs^000000.";
+							close;
+						case 3:
+							if(countitem(975) > 0) {
+								mes "[Elgo]";
+								mes "Cute Red!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 2250,1;
+								delitem 975,1;
+								getitem 5439,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it red, bring me ^4d4dff1 Red Dyestuffs^000000.";
+							close;
+						case 4:
+							if(countitem(979) > 0) {
+								mes "[Elgo]";
+								mes "Nature's Green!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 2250,1;
+								delitem 979,1;
+								getitem 5438,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it green, bring me ^4d4dff1 Green Dyestuffs^000000.";
+							close;
+						}
+					}
+					mes "[Elgo]";
+					mes "Yellow is the basic color of a Cute Ribbon.";
+					mes "But you don't even have one.";
+					close;
+				case 2:
+					if(countitem(5441) > 0) {
+						mes "[Elgo]";
+						mes "Ok Ok, This white Cute Ribbon, huh?";
+						mes "What color do you want it to be dyed?";
+						next;
+						switch(select("Yellow:Blue:Red:Green")) {
+						case 1:
+							if(countitem(976) > 0) {
+								mes "[Elgo]";
+								mes "Basic Yellow!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5441,1;
+								delitem 976,1;
+								getitem 2250,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it yellow, bring me ^4d4dff1 yellow Dyestuffs^000000.";
+							close;
+						case 2:
+							if(countitem(978) > 0) {
+								mes "[Elgo]";
+								mes "Cool blue!!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5441,1;
+								delitem 978,1;
+								getitem 5440,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it blue, bring me ^4d4dff1 Blue Dyestuffs^000000.";
+							close;
+						case 3:
+							if(countitem(975) > 0) {
+								mes "[Elgo]";
+								mes "Cute Red!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5441,1;
+								delitem 975,1;
+								getitem 5439,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it red, bring me ^4d4dff1 Red Dyestuffs^000000.";
+							close;
+						case 4:
+							if(countitem(979) > 0) {
+								mes "[Elgo]";
+								mes "Nature's Green!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5441,1;
+								delitem 979,1;
+								getitem 5438,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it green, bring me ^4d4dff1 Green Dyestuffs^000000.";
+							close;
+						}
+					}
+					mes "[Elgo]";
+					mes "You want to dye a white Cute Ribbon, right?";
+					mes "But you don't even have one.";
+					close;
+				case 3:
+					if(countitem(5440) > 0) {
+						mes "[Elgo]";
+						mes "Ok Ok, This blue Cute Ribbon, huh?";
+						mes "What color do you want it to be dyed?";
+						next;
+						switch(select("White:Yellow:Red:Green")) {
+						case 1:
+							if(countitem(982) > 0) {
+								mes "[Elgo]";
+								mes "Wow, pure and innocent white!";
+								mes "Ok, let's do it.";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5440,1;
+								delitem 982,1;
+								getitem 5441,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it white, bring me ^4d4dff1 White Dyestuffs^000000.";
+							close;
+						case 2:
+							if(countitem(976) > 0) {
+								mes "[Elgo]";
+								mes "Basic Yellow!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5440,1;
+								delitem 976,1;
+								getitem 2250,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it yellow, bring me ^4d4dff1 yellow Dyestuffs^000000.";
+							close;
+						case 3:
+							if(countitem(975) > 0) {
+								mes "[Elgo]";
+								mes "Cute Red!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5440,1;
+								delitem 975,1;
+								getitem 5439,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it red, bring me ^4d4dff1 Red Dyestuffs^000000.";
+							close;
+						case 4:
+							if(countitem(979) > 0) {
+								mes "[Elgo]";
+								mes "Nature's Green!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5440,1;
+								delitem 979,1;
+								getitem 5438,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it green, bring me ^4d4dff1 Green Dyestuffs^000000.";
+							close;
+						}
+					}
+					mes "[Elgo]";
+					mes "You want to dye a blue Cute Ribbon, right?";
+					mes "But you don't even have one.";
+					close;
+				case 4:
+					if(countitem(5439) > 0) {
+						mes "[Elgo]";
+						mes "Ok Ok, This Red Cute Ribbon, huh?";
+						mes "What color do you want it to be dyed?";
+						next;
+						switch(select("White:Blue:Yellow:Green")){
+						case 1:
+							if (countitem(982) > 0){
+								mes "[Elgo]";
+								mes "Wow, pure and innocent white!";
+								mes "Ok, let's do it.";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5439,1;
+								delitem 982,1;
+								getitem 5441,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it white, bring me ^4d4dff1 White Dyestuffs^000000.";
+							close;
+						case 2:
+							if(countitem(978) > 0) {
+								mes "[Elgo]";
+								mes "Cool blue!!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5439,1;
+								delitem 978,1;
+								getitem 5440,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it blue, bring me ^4d4dff1 Blue Dyestuffs^000000.";
+							close;
+						case 3:
+							if(countitem(976) > 0) {
+								mes "[Elgo]";
+								mes "Basic Yellow!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5439,1;
+								delitem 976,1;
+								getitem 2250,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it yellow, bring me ^4d4dff1 yellow Dyestuffs^000000.";
+							close;
+						case 4:
+							if(countitem(979) > 0) {
+								mes "[Elgo]";
+								mes "Nature's Green!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5439,1;
+								delitem 979,1;
+								getitem 5438,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it green, bring me ^4d4dff1 Green Dyestuffs^000000.";
+							close;
+						}
+					}
+					mes "[Elgo]";
+					mes "You want to dye a red Cute Ribbon, right?";
+					mes "But you don't even have one.";
+					close;
+				case 5:
+					if(countitem(5438) > 0) {
+						mes "[Elgo]";
+						mes "Ok Ok, This Green Cute Ribbon, huh?";
+						mes "What color do you want it to be dyed?";
+						next;
+						switch(select("White:Blue:Red:Yellow")) {
+						case 1:
+							if(countitem(982) > 0) {
+								mes "[Elgo]";
+								mes "Wow, pure and innocent white!";
+								mes "Ok, let's do it.";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5438,1;
+								delitem 982,1;
+								getitem 5441,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it white, bring me ^4d4dff1 White Dyestuffs^000000.";
+							close;
+						case 2:
+							if(countitem(978) > 0) {
+								mes "[Elgo]";
+								mes "Cool blue!!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5438,1;
+								delitem 978,1;
+								getitem 5440,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it blue, bring me ^4d4dff1 Blue Dyestuffs^000000.";
+							close;
+						case 3:
+							if(countitem(975) > 0) {
+								mes "[Elgo]";
+								mes "Cute Red!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5438,1;
+								delitem 975,1;
+								getitem 5439,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it red, bring me ^4d4dff1 Red Dyestuffs^000000.";
+							close;
+						case 4:
+							if(countitem(976) > 0) {
+								mes "[Elgo]";
+								mes "Basic Yellow!";
+								mes "Let's do it!";
+								next;
+								mes "- Elgo starts to dissolve dyes and chemicals in water, then he begins to dye the Cute Ribbon. -";
+								next;
+								mes "[Elgo]";
+								mes ".. Hmm..";
+								mes "This should do it.";
+								mes "What do you think?";
+								mes "Did this color came out nicely?";
+								delitem 5438,1;
+								delitem 976,1;
+								getitem 250,1;
+								close;
+							}
+							mes "[Elgo]";
+							mes "If you want to dye it yellow, bring me ^4d4dff1 yellow Dyestuffs^000000.";
+							close;
+						}
+					}
+					mes "[Elgo]";
+					mes "You want to dye a Green Cute Ribbon, right?";
+					mes "But you don't even have one.";
+					close;
+				case 6:
+					mes "["+strcharinfo(0)+"]";
+					mes "Ah, I'm not sure this time. I will come back next time.";
+					mes "Take Care.";
+					next;
+					mes "[Elgo]";
+					mes "Ok. It's fine. I will see you later~ Bye Bye~!";
+					close;
+				}
+			case 2:
+				mes "["+strcharinfo(0)+"]";
+				mes "Hmm, I will bring you one next time.";
+				mes "Take Care.";
+				next;
+				mes "[Elgo]";
+				mes "Ok, Good bye!";
+				close;
+			}
+		}
+	case 2:
+		mes "[Elgo]";
+		mes "Uh..Would you please leave?";
+		mes "I need to get back to work...";
+		close;
+	}
+}
+
+in_orcs01,119,106,3	script	Orc Lady#2008hat03	1273,2,2,{
+
+OnTouch:
+	mes "["+strcharinfo(0)+"]";
+	mes "This Orc Lady is absorbed in something.";
+	mes "I don't know what she's making...but she wouldn't notice me even I walk up on her.";
+	next;
+	mes "["+strcharinfo(0)+"]";
+	mes "Should I talk to her?...Uh..Do we even understand eachother?";
+	next;
+	mes "THe Orc Lady suddenly turns around looking surprised.";
+	mes "A Maneater Blossom fell on the ground out of her hands.";
+	next;
+	switch(select("Pick up the flowers for Orc Lady.:Run away!")) {
+	case 1:
+		mes "[Orc Lady]";
+		mes ".. ...";
+		mes "Adventurer with weapon helps Orc?";
+		mes "You weirdo.";
+		mes "My name is Aite-Nah-Zir-Be.";
+		next;
+		mes "["+strcharinfo(0)+"]";
+		mes "Surprisingly the Orc Lady introduced herself to me.";
+		mes "How should I react?";
+		next;
+		switch(select("Ask her what she was up to.:Say good bye.")){
+		case 1:
+			mes "[Aite]";
+			mes "I'm making a Corolla.";
+			mes "Weaving the flower...with a ribbon..";
+			mes "Brides...wear...Corollas..";
+			next;
+			menu "Would you make one for me?",-;
+			if((countitem(10007) > 0) && (countitem(1032) > 999)) {
+				mes "[Aite]";
+				mes ".. Materials..you..have..";
+				mes "..Too much time to make one.";
+				next;
+				mes "[Aite]";
+				mes "Trade with you.. the one I just made.";
+				mes "But you, weirdo.";
+				mes "You humans are hard...to...understand.";
+				delitem 10007,1;
+				delitem 1032,1000;
+				getitem 5436,1;
+				close;
+			}
+			mes "[Aite]";
+			mes "I need... Silk... Ribbon.";
+			mes "1,000 Maneater Blossoms..";
+			mes "Bring me....";
+			next;
+			mes "["+strcharinfo(0)+"]";
+			mes "(^4d4dff Silk Ribbon and 1,000 Maneater Blossoms^000000, huh..)";
+			mes "Got it. I will go and bring back the materials.";
+			close;
+		case 2:
+			mes "["+strcharinfo(0)+"]";
+			mes "I nodded goodbye to her with a smile on my face saying nothing.";
+			mes "She nodded back to be as if she understood that was my good bye.";
+			close;
+		}
+	case 2:
+		mes "["+strcharinfo(0)+"]";
+		mes "Let's run away while she's still in shock.";
+		close2;
+		warp "gef_fild10",223,203;
+		end;
+	}
+	end;
+}