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

40 files changed, 10144 insertions, 0 deletions

diff --git a/npc/quests/all_quest.txt b/npc/quests/all_quest.txt
new file mode 100644
index 000000000..b33100897
--- /dev/null
+++ b/npc/quests/all_quest.txt
@@ -0,0 +1,570 @@
+//===== eAthena Script ======================================= 

+//= Some Quests Gathered Together

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

+//= eAthena Team

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

+//= 1.0

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

+//= eAthena 7.15 +

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

+//= Just some quests

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

+//= Don't use it.

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

+

+prontera.gat,147,204,4	script	Quest Assistant	93,{

+	mes "[Quest Assistant]";

+	mes "Hello! I'm the Quest Assistant.";

+	mes "Please select the Quest you need information on:";

+	next;

+	menu "Mr. Smile",MrSmile,"Bunny Band",BunBand,"Pretend Murdered",PreMur,"Welding Mask",WelMask,"Ear Muffs",EarMuf,"Antlers",Antler,"Stop Post",StopPas,"Doctor Hat",DocHat,"Feather Bonnet",FeaBon,"Phantom of Opera",PhaOpe,"Sakkat",Sakkat,"Boy's Cap",BoyCap,"Ph.D Hat",PhdHat,"Oxygen Mask",OxyMask,"Headset",Headset,"Binoculars",Binoc,"Cancel",MCancel;

+// Mr. Smile

+MrSmile:

+	mes "[Quest Assistant]";

+	mes "Hi.";

+	mes "This is Smile Assistance.";

+	mes "How may I help you?";

+	next;

+	menu "^3355FFMr. Smile^000000?",L0,"Construct ^3355FFMr. Smile^000000",L1,"Quit",LEnd;

+L0:

+	mes "[Quest Assistant]";

+	mes "National Event held by the command of ^0099FFHis Majesty Tristram the 3rd^000000, that intends to encourage the nation of the Rune-Midgard Kingdom to play in more enjoyable atmosphere!";

+	mes "I am ^0099FF'Smile Assistance'^000000,";

+	mes "... who leads the national event under the name of ^0099FFSmile throughout the Rune-Midgard Kingdom^000000.";

+	next;

+	mes "[Quest Assistant]";

+	mes "^^3355FF10 Jellopy^000000";

+	mes "^^3355FF10 Fluff^000000";

+	mes "^^3355FF10 Clover^000000";

+	next;

+	mes "[Quest Assistant]";

+	mes "With this event";

+	mes "Everybody will be happy and smile, getting together with other people,";

+	mes "And will try to make Ragnarok the most enjoyable game in the world.";

+	close;

+L1:

+	if (countitem(705) < 10) goto L10;

+	if (countitem(909) < 10) goto L10;

+	if (countitem(914) < 10) goto L10;

+	delitem 705,10;

+	delitem 909,10;

+	delitem 914,10;

+	getitem 2278,1;

+	mes "[Quest Assistant]";

+	mes "His majesty, Tristram the 3rd has promised to try his best to make Ragnarok better and more enjoyable.";

+	next;

+	mes "[Quest Assistant]";

+	mes "The fact mentioned above was announced by the Public Information Bureau of the Rune-Midgard Kingdom.";

+	close;

+L10:

+	mes "[Quest Assistant]";

+	mes "Oh - unfortunately";

+	mes "You have not brought enough items for ^3355FFMr. Smile^000000.";

+	mes "^3355FF10 Jellopy";

+	mes "^3355FF10 Fluff";

+	mes "^3355FF10 Clover";

+	mes "Please check the requirementes above.";

+	close;

+LEnd:

+	mes "[Quest Assistant]";

+	mes "Changed your mind eh? Well, come see me when you need a ^3355FFMr. Smile^000000!";

+	close;

+// Bunny Band

+BunBand:

+	mes "[Quest Assistant]";

+	mes "^529DFFSpecial Festival, ^3355FFBunny Band^529DFFQuest!!^000000";

+	mes "Would you like to attend? You need ^3355FF'100 Feather'^000000 + ^3355FF'1 Four Leaf Clover'^000000 + ^3355FF'1 Pearl'^000000 + ^3355FF'1 Kitty Band'^000000.";

+	next;

+	menu "Sure, I need one.",LYes,"Cancel.",LCancel;

+LYes:

+	if(countitem(949) < 100) goto LNoItems;

+	if(countitem(706) < 1) goto LNoItems;

+	if(countitem(722) < 1) goto LNoItems;

+	if(countitem(2213) < 1) goto LNoItems;

+	delitem 949,100;

+	delitem 706,1;

+	delitem 722,1;

+	delitem 2213,1;

+	getitem 2214,1;

+	mes "[Quest Assistant]";

+	mes "Tah Dah!!! ^3355FF'Bunny Band'^000000...! Please Take it!";

+	close;

+LNoItems:

+	mes "Thank you for joining us!";

+	mes "Please come back after gathering all Items for a Bunny Band!";

+	close;

+LCancel:

+	mes "[Quest Assistant]";

+	mes "That's too bad. Come back soon!";

+	close;

+// Pretend Murder

+PreMur:

+	mes "[Quest Assistant]";

+	mes "I wish I could make Clothings for my Grand Children in this festive season..";

+	mes "Could you find me ^3355FF'Skirt of Virgin'^000000 ..I need Four of them ..Please ?";

+	mes "I am begging you, Young man..";

+	next;

+	menu "Alright.",LYes1,"No way!",LNo1;

+LYes1:

+	if(countitem(1049) < 3) goto LNoHat;

+	delitem 1049,4;

+	getitem 2293,1;

+	mes "[Quest Assistant]";

+	mes "Oh Thank you so much!";

+	mes "Ah.. Wait.. I almost forgot. Well, I was a quite popular actress back in my younger days...";

+	mes "My members gave me a ^3355FF'Pretend Murder'^000000 for my wedding present when I left the Troupe...I've kept it for the precious memory of my youth.";

+	close;

+LNo1:

+	mes "[Quest Assistant]";

+	mes "Sigh..How can I get ^3355FF'Skirt of Virgin'^000000 by myself...I am so weak and tired ..Sigh..";

+	mes "I really wanted to make my Babies Happy .....";

+	close;

+LNoHat:

+	mes "[Quest Assistant]";

+	mes "I gather Mushrooms on the Mountin of Payon Everyday.I didn't even noticed time has come because of my bad memory....";

+	mes ".. Hmm..Now I remember of a festive season in next month.";

+	mes "I wish I could make clothings for my family in this season.";

+	mes "For that, I need 4 ^3355FF'Skirt of Virgin'^000000..";

+	next;

+	mes "[Quest Assistant]";

+	mes "Young man, please help me. When you find Some ^3355FF'Skirt of Virgin '^000000..";

+	mes "please bring them to me. I won't forget it if you help me...";

+	close;

+// Welding Mask

+WelMask:

+	mes "[Quest Assistant]";

+	mes "Who am I? I am the one and only Veteran Blacksmith in here! You heard?!";

+	mes "I've been working for 30 years in this hotty, bloody Hellfire!";

+	mes "Since I became a Blacksmith, I invented something really incredible. Wanna listen?";

+	next;

+	menu "I'd love to.",LILoveTo,"I don't think so.",LIDont;

+LILoveTo:

+	mes "[Quest Assistant]";

+	mes "We always make various Metal products with welding Steel under horribly hot conditions.";

+	mes "So we have to face the hot-air heating and metallic fluid. Our faces are almost burnt down and sometimes injured while working...";

+	mes "But with this, You dont have to be worried! The so-called .. ^3355FF' Welding Mask '^000000 !!";

+	next;

+	mes "[Quest Assistant]";

+	mes "This one keeps your face out of the heat.";

+	mes "This Must be a Most-Wanted Item !";

+	mes "So how's that ? If you offer me  ^3355FF'50 Steels '^000000 and ^3355FFOnly 2000 Zeny^000000,I will make it for you right away~!!";

+	next;

+	menu "Not bad. Alright!",LNotBad,"No thanks.",LNoThx;

+LNotBad:

+	if (countitem(999) < 50) goto LHeyDork;

+	if (Zeny < 2000) goto LHeyDork;

+	delitem 999,50;

+	set Zeny,zeny-2000;

+	getitem 2292,1;

+	mes "[Quest Assistant]";

+	mes "I like you,Dude! Alright, I'll do it right away !!";

+	mes "You are the best guy I've ever met!";

+	mes "Bye bye Buddy";

+	close;

+LHeyDork:

+	mes "[Quest Assistant]";

+	mes "Hey Dork. If you don't have enough Steels or money, Get LOST!!";

+	mes "Have you ever heard about Quenching? It 's not easy as you think!";

+	mes "Go get some money or whatever my Craft needs!!!!";

+	close;

+LNoThx:

+	mes "[Quest Assistant]";

+	mes "Oh Man ! You'll probably regret this. I recommanded it for you, not me !";

+	mes "Man, Everyone gets older and older. You should take care of your bloody face before it starts shirinking!";

+	close;

+LIDont:

+	mes "[Quest Assistant]";

+	mes "I think I've wasted my precious time on you.. I have nothing more to say. Be on your way!";

+	close;

+// Ear Muffs

+EarMuf:

+	mes "[Quest Assistant]";

+	mes "My Family has produced and sold the special Winter product ^3355FF'Ear Muffs'^000000 for many years..";

+	mes "We just moved in here, but unfortunately the Weather is always Warm so we hardly live with our Job...";

+	mes "If you plan to travel to the cold area I suggest you to prepare ^3355FF'Ear Muffs'^000000..";

+	next;

+	mes "[Quest Assistant]";

+	mes "^3355FF'Ear Muffs'^000000 are the special product of my family. We provide it to customers who have ^F3355FF'1 Cursed Rubi'^000000, ^3355FF'1 Headset'^000000";

+	mes "^3355FF'200 Feathers'^000000 and ^DDDD00'5000 Zeny'^000000.";

+	next;

+	menu "Oh Yeah? Sounds Good.",LSoundsGood,"No thank you.",LNoThx1;

+

+	LSoundsGood:

+	if(countitem(724) < 1) goto LWeCant;

+	if(countitem(949) < 200) goto LWeCant;

+	if(countitem(5001) < 1) goto LWeCant;

+	if(Zeny < 5000) goto LWeCant;

+	delitem 724,1;

+	delitem 949,200;

+	delitem 5001,1;

+	set Zeny,Zeny-5000;

+	getitem 2283,1;

+	mes "[Quest Assistant]";

+	mes "I will give you this ready-made one.";

+	mes "Thank you for buying our product. You won't regret your purchase. Satisfaction is Guaranteed.";

+	close;

+LWeCant:

+	mes "[Quest Assistant]";

+	mes "Dear .. You don't have enough money and items ..";

+	mes "We can't help you if you don't bring every item needed. Please understand we have to make our living...";

+	close;

+LNoThx1:

+	mes "[Quest Assistant]";

+	mes "That's fine. I believe we will meet again one of these days  ..";

+	close;

+// Antlers

+Antler:

+	mes "[Quest Assistant]";

+	mes "Hey I am a Horn Collector. Sonds Great, Huh?";

+	mes "What do you think about Animal horns? I think they are worth it to collect.";

+	mes "Besides you can decorate your house with them.";

+	next;

+	mes "[Quest Assistant]";

+	mes "By the way..I realised there are horns I couldn't get yet. They're called ^3355FF'Evil Horn'^000000..";

+	mes "And some might say ^3355FF'Evil Horn'^000000 is not the sort of Animal horn but the Devil Horn..Still I really really wish I could have it.";

+	mes "Do you....? Do you have  the ^3355FF'Evil Horn'^000000?";

+	mes "If you offer me ^3355FF'20 Evil Horn'^000000, I will give you my precious collectible, ^3355FF'Antlers'^000000. So Deal?";

+	next;

+	menu "Okay, Let's Deal.",LOk,"No Thanks",LNo2;

+LOk:

+	if(countitem(923) < 20) goto LUnfortune;

+	delitem 923,20;

+	mes "[Quest Assistant]";

+	getitem 2284,1;

+	mes "Whoah! This is the first time I've ever seen a real ^3355FF'Evil Horn'^000000!!";

+	mes "Thank you! Here,this is my Antler for you!";

+	mes "With your great help, I can make my wish come true this time. I appreciate you!";

+	close;

+LUnfortune:

+	mes "[Quest Assistant]";

+	mes "Hmm.. Unfortunately you are not ready for my demand, ^3355FF'20 Evil Horn'^000000.";

+	close;

+LNo2:

+	mes "[Quest Assistant]";

+	mes "Well that's fine..";

+	mes "I know we will speak again ..";

+	close;

+// Stop Pass

+StopPas:

+	mes "[Quest Assistant]";

+	mes "Welcome to MacMillan's Post Workshop .";

+	next;

+	mes "[Quest Assistant]";

+	mes "My Clan, MacMillan..";

+	mes "Has been producing Professional Traffic Signal Posts for more than 250 years.";

+	mes "And nowadays we are booking Special Orders with our Unique Ornament, ^3355FF'Stop Post'^000000.";

+	next;

+	mes "[Quest Assistant]";

+	mes "This item requires:";

+	mes "^3355FF50 Trunks^000000";

+	mes "^3355FF1 Black Dyestuff^000000";

+	mes "^3355FF90000 Zeny^000000";

+	next; 

+	menu "Could I order one ^3355FF'Stop Post'^000000?",LOrder,"Nah, Not my business.",LNot;

+LOrder:

+	if(countitem(1019) < 50) goto LCheckAgain;

+	if(countitem(983) < 1) goto LCheckAgain;

+	if(Zeny < 90000) goto LCheckAgain;

+	delitem 1019,50;

+	delitem 983,1;

+	set Zeny,zeny-90000;

+	getitem 2272,1;

+	mes "[Quest Assistant]";

+	mes "Here you are! This is the one and only Ornament for you, ^3355FF'Stop Post'^000000!";

+	mes "Thank you for coming by!";

+	close;

+LCheckAgain:

+	mes "[Quest Assistant]";

+	mes "Why don't you check the requirements again??";

+	mes "I don't think you brought every items needed.";

+	close;

+LNot:

+	mes "[Quest Assistant]";

+	mes "Anyway, Thank you for coming by, My Clan, MacMillan's Workshop.";

+	close;

+// Doctor Hat

+DocHat:

+	mes "[Quest Assistant]";

+	mes "I am the Very Famous, Enigmatic Dealer!";

+	mes "I am Always bustling in and out of the Midgard Continent!";

+	mes "Here is what my product requires:";

+	mes "^3355FFDoctor Band^000000: 1 Red Bandana + 50 Iron + 1 Cracked Diamond + 3500 Zeny";

+	next;

+	mes "[Quest Assistant]";

+	mes "Would you like one of these?";

+	next;

+	menu "Sure!",LSure,"Nah, I'm ok.",LNo3;

+LSure:

+	if(countitem(2285) < 1) goto CantMake;

+	if(countitem(998) < 50) goto CantMake;

+	if(Zeny < 3500) goto CantMake;

+	delitem 2285,1;

+	delitem 998,50;

+	set Zeny,zeny-3500;

+	getitem 2273,1;

+	mes "[Quest Assistant]";

+	mes "Hmm! Have you a Medical License?! Alright. I've heard about a well-known unlicensed physician `Cuwaki'.. I hope you won't get caught...";

+	mes "Yeah... It's your business whatever. Take this.";

+	close;

+CantMake:

+	mes "[Quest Assistant]";

+	mes "You Dullard. Check this requirements again.";

+	mes "You Don't look like an idiot though....C'Mon Man. Get real!";

+	close;

+LNo3:

+	mes "[Quest Assistant]";

+	mes "Well, see you around!";

+	close;

+// Feather Bonnet

+FeaBon:

+	mes "[Quest Assistant]";

+	mes "I am the Very Famous, Enigmatic Dealer!";

+	mes "I am Always bustling in and out of the Midgard Continent!";

+	mes "Here is what my product requires:";

+	mes "^3355FFFeather Bonnet^000000 : 1 Romantic Gent + 300 Feather of Birds + 500 Zeny";

+	next;

+	mes "[Quest Assistant]";

+	mes "Would you like one of these?";

+	next;

+	menu "Sure!",LSure1,"Nah, I'm ok.",LNo4;

+LSure1:

+	if(countitem(2247) < 1) goto CantMake1;

+	if(countitem(916) < 300) goto CantMake1;

+	if(Zeny < 500) goto CantMake1;

+	delitem 2247,1;

+	delitem 916,300;

+	set Zeny,zeny-500;

+	getitem 5018,1;

+	mes "[Quest Assistant]";

+	mes "You have good sense, Dude.";

+	mes "I know you had a hard time to collect these, but this one is worth the effort. Take it.";

+	close;

+CantMake1:

+	mes "[Quest Assistant]";

+	mes "You Dullard. Check this requirements again.";

+	mes "You Don't look like an idiot though....C'Mon Man. Get real!";

+	close;

+LNo4:

+	mes "[Quest Assistant]";

+	mes "Well, see you around!";

+	close;

+// Phantom of Opera

+PhaOpe:

+	mes "[Quest Assistant]";

+	mes "I am the Very Famous, Enigmatic Dealer!";

+	mes "I am Always bustling in and out of the Midgard Continent!";

+	mes "Here is what my product requires:";

+	mes "^3355FFPhantom of Opera^000000 : 20 Iron + 1 Singing Plant + 5000 Zeny";

+	next;

+	mes "[Quest Assistant]";

+	mes "Would you like one of these?";

+	next;

+	menu "Sure!",LSure2,"Nah, I'm ok.",LNo5;

+LSure2:

+	if(countitem(707) < 1) goto CantMake2;

+	if(countitem(998) < 20) goto CantMake2;

+	if(Zeny < 5000) goto CantMake2;

+	delitem 707,1;

+	delitem 998,20;

+	set Zeny,zeny-5000;

+	getitem 2281,1;

+	mes "[Quest Assistant]";

+	mes "This is a pretty nice one.";

+	mes "Well, little bit Scary though.. I think it has a Magnetic Attraction. What about you?";

+	mes "You like it.. Alright.. Take it!";

+	close;

+CantMake2:

+	mes "[Quest Assistant]";

+	mes "You Dullard. Check this requirements again.";

+	mes "You Don't look like an idiot though....C'Mon Man. Get real!";

+	close;

+LNo5:

+	mes "[Quest Assistant]";

+	mes "Well, see you around!";

+	close;

+// Sakkat

+Sakkat:

+	mes "[Quest Assistant]";

+	mes "I am the Very Famous, Enigmatic Dealer!";

+	mes "I am Always bustling in and out of the Midgard Continent!";

+	mes "Here is what my product requires:";

+	mes "^3355FFSakkat^000000 : 120 Trunk + 10000 Zeny";

+	mes "Would you like one of these?";

+	next;

+	menu "Sure!",LSure3,"Nah, I'm ok.",LNo6;

+LSure3:

+	if(countitem(1019) < 120) goto CantMake3;

+	if(Zeny < 10000) goto CantMake3;

+	delitem 1019,120;

+	set Zeny,zeny-5000;

+	getitem 2280,1;

+	mes "[Quest Assistant]";

+	mes "If you have a chance to, visit the Uplander Village, Payon.";

+	mes "The ^3355FFSakkat^000000 Dealer has never sold ^3355FFSakkat^000000 to other Dealers but to me. Because only I can recognise its quality. Due to its rarity, ^3355FFSakkat^000000 becomes a very Unique and Exceptional product.";

+	mes "OK! Take it!";

+	close;

+CantMake3:

+	mes "[Quest Assistant]";

+	mes "You Dullard. Check this requirements again.";

+	mes "You Don't look like an idiot though....C'Mon Man. Get real!";

+	close;

+LNo6:

+	mes "[Quest Assistant]";

+	mes "Well, see you around!";

+	close;

+// Boy's Cap

+BoyCap:

+	mes "[Quest Assistant]";

+	mes "Ohhh !! Th ..This is the one..by hearsay ..";

+	mes "Gain Strength even taking a look at it! Inflame the Blood even smelling once!";

+	mes "80 year-old Grampa becomes a Boy after grabbing one bite of it!!!!";

+	mes "It is the ^3355FFTiger's Footskin^000000!!";

+	mes "Please bring me that.. I need 10 of them..";

+	next;

+	menu "Ok, here you go!",LExchange,"I don't have the time.",LCancel2;

+	close;

+LExchange:

+	if(countitem(1030) < 10) goto CantMake4;

+	delitem 1030,10;

+	getitem 5016,1;

+	mes "[Quest Assistant]";

+	mes "T .. Tahnk you !!";

+	mes "Now I can be vigorous again with this item!";

+	mes "I will eat this thing right away!";

+	close;

+CantMake4:

+	mes "[Quest Assistant]";

+	mes "Oh... It seems you don't have enough ^3355FFTiger's Footskin^000000.";

+	close;

+LCancel2:

+	mes "[Quest Assistant]";

+	mes "He.. Hey Young one!! Wai .. Wait!";

+	close;

+// Ph.D Hat

+PhdHat:

+	mes "[Quest Assistant]";

+	mes "Ah .. Definately ..They are  4 kinds of Flowers I was looking for ..";

+	mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000... If you can bring them to me, I could give you my treasue...";

+	next;

+	menu "Sure",LYes2,"Cancel",LCancel1;

+LYes2:

+	if(countitem(710) < 1) goto LNoHat1;

+	if(countitem(103) < 1) goto LNoHat1;

+	if(countitem(704) < 1) goto LNoHat1;

+	if(countitem(708) < 1) goto LNoHat1;

+	delitem 710,1;

+	delitem 703,1;

+	delitem 704,1;

+	delitem 708,1;

+	getitem 5012,1;

+	mes "[Quest Assistant]";

+	mes "I really really appreciate you what you've done for me. I mean I am really grateful.";

+	mes "I will give my precious item to you as I promised.";

+	mes "This is a Hat worn on my Graduation Day in the University. It reminds me of my happy School days.";

+	mes "Please take this...";

+	close;

+LNoHat1:

+	mes "[Quest Assistant]";

+	mes "Don't you think... Flowers are pretty?";

+	mes "Unfortunately, you don't have the ones I need.";

+	close;

+LCancel1:

+	mes "[Quest Assistant]";

+	mes "One of thesedays I will cover whole world with Flowers.";

+	close;

+// Oxygen Mask

+OxyMask:

+	mes "[Quest Assistant]";

+	mes "Ahh! These Thief Bugs are so cute! They hurt my eyes!";

+	mes "I must have 5 ^3355FFOra Ora^000000 to make it stop!";

+	mes "In return, I can give you this ^3355FFOxygen Mask^000000";

+	next;

+	menu "No Problem!",LYes3,"What?!?",LCancel6;

+LYes3:

+	if(countitem(701) < 5) goto LNoMask;

+	delitem 701,5;

+	getitem 5004,1;

+	mes "[Quest Assistant]";

+	mes "Muhahahahah!!! Finally I have this! Ora Ora!";

+	mes "Stupid and Disgusting Thief Bugs!! You will get payed for !!!";

+	close;

+LNoMask:

+	mes "[Quest Assistant]";

+	mes "AHHHHHH!!! You don't have the stuff!";

+	close;

+LCancel6:

+	mes "[Quest Assistant]";

+	mes "Huhuhuhuhu... What If I could not get rid of Thief Bugs...";

+	mes "Only one thing I could do is to Fall in Love with them..Hehehehehehe...";

+	close;

+// Headset

+Headset:

+	mes "[Quest Assistant]";

+	mes "These are Articles needed for my Grandfather's masterpiece.";

+	mes "^3355FF100 Steel^000000";

+	mes "^3355FF1 Oridecon^000000";

+	mes "^3355FF1 Alchol^000000";

+	mes "^3355FF1 Coal^000000";

+	mes "Will you help me?";

+	next;

+	menu "Sure Thing.",LYes4,"No Thanks",LCancel3;

+LYes4:

+	if(countitem(999) < 40) goto LNoItems2;

+	if(countitem(984) < 1) goto LNoItems2;

+	if(countitem(970) < 1) goto LNoItems2;

+	if(countitem(1003) < 1) goto LNoItems2;

+	delitem 999,40;

+	delitem 984,1;

+	delitem 970,1;

+	delitem 1003,1;

+	getitem 5001,1;

+	mes "[Quest Assistant]";

+	mes "Thank you.";

+	mes "Because of you,I could accomplish my grand father's wish.";

+	mes "He would be happy if he look down on me from the Heaven..";

+	close;

+LNoItems2:

+	mes "[Quest Assistant]";

+	mes "Thank you for trying to help me ..But you didn't bring whole items I need.";

+	mes "I think you will make it soon though...";

+	close;

+LCancel3:

+	mes "[Quest Assistant]";

+	mes "Fare well.";

+	close;

+// Binoculars

+Binoc:

+	mes "[Quest Assistant]";

+	mes "Howdi - A new customer !";

+	mes "Stop!!! I know I know what you're gonna talk about.";

+	mes "You want the ^3355FFBinoculars^000000 from me,right ?";

+	mes "Just gimme ^3355FF1 Geek Glasses^000000, ^3355FF40 Steel^000000, and 50,000 Zeny.";

+	next;

+	menu "Yeah, sure.",LYes5,"Ignore him!",LCancel4;

+LYes5:

+	if(countitem(2243) < 1) goto LNoItems1;

+	if(countitem(999) < 100) goto LNoItems1;

+	delitem 2243,1;

+	delitem 999,100;

+	set Zeny,zeny-50000;

+	getitem 2296,1;

+	mes "[Quest Assistant]";

+	mes "Here it is! The Binoculars!";

+	close;

+LNoItems1:

+	mes "[Quest Assistant]";

+	mes "Man, don't take me for a fool! You don't have the items!!";

+	close;

+LCancel4:

+	mes "[Quest Assistant]";

+	mes "Hey you!";

+	mes "Now you're in front of Marius,";

+	mes "Alchemist of the Alchemists!";

+	mes "Do you ignore me now, Huh???";

+	mes "Come on!! I beat your ass!!!";

+	close;

+MCancel:

+	mes "[Quest Assistant]";

+	mes "I see. I will be here whenever you need me!";

+	close;

+}
\ No newline at end of file
diff --git a/npc/quests/bongun.txt b/npc/quests/bongun.txt
new file mode 100644
index 000000000..eea5ba3e7
--- /dev/null
+++ b/npc/quests/bongun.txt
@@ -0,0 +1,58 @@
+comodo.gat,135,227,5	script	Sherri	93,{

+mes "[Sherri]";

+mes " ";

+mes "*sighs*";

+next;

+mes "[Sherri]";

+mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a handsome boy ...";

+next;

+mes "[Sherri]";

+mes "...so why am I sad?";

+mes " ";

+mes "It's because I don't even know how his personality is...say, if you can find me a 'Girl's Diary' about him, I'll give you his diary!";

+next;

+mes "[Sherri]";

+mes "Can you please help me?";

+

+	menu "What do I need again?",ExItems,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd;

+

+    ExItems:

+        mes "[Sherri]";

+        mes "What I desire is...";

+        mes " ";

+	mes "A 'Girl's Diary' about him...";

+	close;

+

+    ExCreate:

+        mes "[Sherri]";

+	mes "Really!! You'll help me!";

+	next;

+	if(countitem(1558)<1) goto NoItem;

+        goto ExGive;

+

+	    NoItem:

+		mes "[Sherri]";

+		mes "Waahhhh, stop playing with my feelings!";

+		mes " ";

+		mes "Go away!";

+		close;

+

+	    ExGive:

+		mes "[Sherri]";

+		mes "YES! I am forever in your debt!";

+		delitem 1558,1;

+		getitem 659,1;

+		mes " ";

+		mes "Here is his diary as promised! Again - Thank you!";

+		next;

+		mes "[Sherri]";

+		mes "Wait! Here's his sword, I found it next to him. But it's broken...I know of a old man just west of Geffen who can fix such a sword!";

+		getitem 7110,1;

+		close;

+

+    ExEnd:

+        mes "[Sherri]";

+	mes "*sighs*";

+        close;

+close;    
+}

diff --git a/npc/quests/bongunsword.txt b/npc/quests/bongunsword.txt
new file mode 100644
index 000000000..50372f388
--- /dev/null
+++ b/npc/quests/bongunsword.txt
@@ -0,0 +1,44 @@
+gef_fild07.gat,183,239,5	script	Old Smith	120,{

+mes "[Old Smith]";

+mes "Ah, isn't it peaceful up here - I used to be one of the legendary Blacksmiths of midgard...sadly my skills have faded.";

+next;

+if(countitem(7110)<1) goto NoItemS;

+mes "[Old Smith]";

+mes "Hmm, it seems as if you need something. What would that be?";

+

+	menu "Can you fix this broken sword?",ExItems,"Nothing really...",ExEnd;

+

+    ExItems:

+        mes "[Old Smith]";

+	mes "Ahhh, this is a very old sword and yes I can fix it, I'll need an 'Oridecon' to mend the breaks though.";

+	next;

+	if(countitem(7110)<1) goto NoItem;

+	if(countitem(984)<1) goto NoItem;

+        goto ExGive;

+

+	    NoItem:

+		mes "[Old Smith]";

+		mes "Hmm, you seem to be missing something...probably that 'Oridecon'.";

+		close;

+

+	    NoItemS:

+		mes "[Old Smith]";

+		mes "...ah well, go out and live life young one. Time never stops!";

+		close;

+

+	    ExGive:

+		mes "[Old Smith]";

+		mes "Ah yes here we go!";

+		delitem 7110,1;

+		delitem 984,1;

+		getitem 10020,1;

+		mes " ";

+		mes "Haha! Gramps still has that old magic touch, Here you go!";

+		close;

+

+    ExEnd:

+        mes "[Old Smith]";

+	mes "...ah well, go out and live life young one. Time never stops!";

+        close;

+close;    }

+}

diff --git a/npc/quests/bunnyband.txt b/npc/quests/bunnyband.txt
new file mode 100644
index 000000000..cfb4c8e30
--- /dev/null
+++ b/npc/quests/bunnyband.txt
@@ -0,0 +1,102 @@
+//===== eAthena Script ======================================= 

+//= Bunny Band Quest

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

+//= eAthena Dev Team

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

+//= v1.1

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

+//= eAthena 7.15 +

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

+//=

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

+//= v1.1 using duplicate command

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

+

+

+

+

+// Prontera ------------------------------------------------------------------------------------------------------------------------------------------

+prontera.gat,146,87,6	script	Kafra Corp. Rep.#1::KCRep	83,

+{

+	mes "[Kafra Corp. Rep.]";

+	if (BUNYBND == 1) goto L_Check;

+	mes "^529DFFSpecial Event, ^FF0000Bunny Band ^529DFFQuest!!^000000";

+	next;

+	menu "Information.",M_Info,  "Join.",M_Join, "Cancel.",M_End;

+

+	M_Info:

+		mes "[Kafra Corp. Rep.]";

+		mes "To thank our customers for using the Kafra Corp. Services, we have prepapred a small event for them.....";

+		next;

+		mes "[Kafra Corp. Rep.]";

+		mes "The ^FF0000Bunny Band ^529DFFQuest!!^000000.  (Sponsered by: The Alberta Merchant Assosiation.)";

+		mes "This quest allows players to obtain the ultra-rare ^FF0000Bunny Band^000000!!";

+		next;

+		mes "[Kafra Corp. Rep.]";

+		mes "All you have to do is collect a number of items and bring them to a Kafra Corp. Rep. such as myself.";

+		mes "We will then carefully hand make a Bunny Band for you on the spot!";

+		next;

+		mes "[Kafra Corp. Rep.]";

+		mes "Here are the items that you will need for the Bunny Band.";

+		mes "^5555FF100 Feather^000000,";

+		mes "^5555FF1 Four Leaf Clover^000000,";

+		mes "^5555FF1 Pearl^000000,";

+		mes "^5555FF1 Kitty Band^000000.";

+		next;

+		mes "[Kafra Corp. Rep.]";

+		mes "When you've collected all of the items, just speak with any Kafra Corp. Rep. like myself.";

+		mes "We can be found in every town across Rune Midgard.";

+		close;

+

+	M_Join:

+

+		mes "[Kafra Corp. Rep.]";

+		mes "Thank you for participating in the event.  Please come back when you have gathered all of the items.";

+		set BUNYBND, 1;

+		close;

+

+	M_End:

+		mes "[Kafra Corp. Rep.]";

+		mes "Have a nice day.";

+		close;

+

+	L_Check:

+		if(countitem(949)<100 || countitem(706)<1 || countitem(722)<1 || countitem(2213)<1) goto sL_NoItems;

+

+		mes "Wow!! Well-Done, well-done! You've got every single item!! I will make the Bunny Band for you right away....";

+		emotion 21;

+		next;

+		mes "~ a few minutes later ~";

+		delitem 949,100;

+		delitem 706,1;

+		delitem 722,1;

+		delitem 2213,1;

+		next;

+		mes "[Kafra Corp. Rep.]";

+		mes "Tah dah!!! Here is your ^FF0000Bunny Band^000000... Please take it!";

+		getitem 2214,1;

+		next;

+		mes "[Kafra Corp. Rep.]";

+		mes "We appreciate your participation in this special event.  Thank you and enjoy your Bunny Band!.";

+		close;

+

+		sL_NoItems:

+			mes "Here are the items that you will need for the Bunny Band.";

+			mes "^5555FF100 Feather^000000,";

+			mes "^5555FF1 Four Leaf Clover^000000,";

+			mes "^5555FF1 Pearl^000000,";

+			mes "^5555FF1 Kitty Band^000000.";

+			close;

+

+}

+

+

+// Geffen ------------------------------------------------------------------------------------------------------------------------------------------

+geffen.gat,116,62,2	duplicate(KCRep)	Kafra Corp. Rep.#2	83,

+// Morroc ------------------------------------------------------------------------------------------------------------------------------------------

+morocc.gat,154,97,4	duplicate(KCRep)	Kafra Corp. Rep.#3	83,

+// Alberta ------------------------------------------------------------------------------------------------------------------------------------------

+alberta.gat,26,229,1	duplicate(KCRep)	Kafra Corp. Rep.#4	83,

+// Payon ------------------------------------------------------------------------------------------------------------------------------------------

+payon.gat,184,104,4	duplicate(KCRep)	Kafra Corp. Rep.#5	83,

+

diff --git a/npc/quests/counteragent_mixture.txt b/npc/quests/counteragent_mixture.txt
new file mode 100644
index 000000000..c8046b705
--- /dev/null
+++ b/npc/quests/counteragent_mixture.txt
@@ -0,0 +1,263 @@
+//===== eAthena Script ======================================= 

+//= Counteragent and Mixture Quest(Morgenstein)

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

+//= kobra_k88

+//= added some dialogs for Morgenstein by Komurka

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

+//= 1.4

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

+//= eAthena 7.15 +

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

+//= Counteragent and mixtures for making dyes

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

+//= Fully working

+//= Update for Alchemist Quest.

+//= 1.2 added check for Empty Bottle [Lupus]

+//= Fixed some lil thingys [Darkchild]

+//= More li'l thing, added comments for items IDs [Lupus]

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

+

+

+

+

+// Merchant Louitz -----------------------------------------------------------

+alberta_in.gat,130,54,2	script	Merchant Louitz	84,{

+	mes "[Louitz]";

+	mes "What's going on?";

+	if(countitem(970) > 0 && countitem(971) > 0 && countitem(972) > 0) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,

+M_Menu:

+	next;

+	menu "Talk",M_Talk,"Cancel",M_Cancel;

+M_Menu2:

+	next;

+	menu "Talk",M_Talk,"More about solutions",M_Solut,"Cancel",M_Cancel;

+	

+	M_Talk:

+		mes "[Merchant Louitz]";

+		mes "I was in Geffen for a while trying to find magic tools when I heard some rumors about a Mad Scientist.";

+		mes "I became very interested in the man and tried to meet with him on serveral occasions.";

+		next;

+		mes "[Merchant Louitz]";

+		mes "After many attempts, I finally got to meet him.  Unfortunately he was too immersed in his work and didn't even take notice of me.";

+		next;

+		mes "[Merchant Louitz]";

+		mes "He kept on mumbling to himself ^0000ff'Karvodainirol... Detrimindexta... Alcohol^000000...'";

+		next;

+		mes "[Merchant Louitz]";

+		mes "I had know idea what he was talking about at first, but I later learned that those were names for some unique and rare solutions.";

+		if(countitem(970) > 0 && countitem(971) > 0 && countitem(972) > 0) goto M_Menu2;//Items: Alcohol, Detrimindexta, Karvodailnirol,

+		goto M_Menu;

+

+	M_Solut:

+		set MORGEN,1;

+		mes "[Merchant Louitz]";

+		mes "Apparently that scientist uses those solutions to make other agents and mixtures.";

+		mes "You should speak with ^0000ddAure Dupon^000000 in Geffen to find out more about it. ";

+		next;

+		mes "[Merchant Louitz]";

+		mes "You can find him near the ^0000ddEast end^000000 of town.  Ask him about ^0000ddMorgenstein^000000.  That's the mad scientists' name.";

+		goto M_Menu2;

+

+	M_Cancel:

+		mes "[Louitz]";

+		mes "Um... Now I've seen everything.";

+		close;

+}

+

+// Aure Dupon ------------------------------------------------------------------------

+geffen.gat,181,114,4	script	Aure Dupon	55,{

+	mes "[Aure Dupon]";

+	mes "TIME never WAITS for you!! Even MAGIC cannot SLOW it down!  I can feel it passing me by even as we speak!!....";

+	emotion 0;

+	next;

+	mes "[Aure Dupon]";

+	mes "So... why did you stop me??";

+	emotion 20;

+	if(MORGEN == 1) goto M_Menu2;

+M_Menu:

+	next;

+	menu "Talk",M_Talk,"Cancel",M_Cancel;

+M_Menu2:

+	next;

+	menu "Talk",M_Talk,"More about Morgenstein",M_Morgen,"Cancel",M_Cancel;

+	

+	M_Talk:

+		mes "[Aure Dupon]";

+		mes "It's true that I'm a little excentric because of my quest to gain the power of magic, but I assure that there are others out there that are even stranger than myself.";

+		next;

+		mes "[Aure Dupon]";

+		mes "Like that mad scientist ^0000ddMorgenstein^000000.  Anyway, if it were up to you, would you be able to devote your ENTIRE life to one single purpose?";

+		next;

+		mes "[Aure Dupon]";

+		mes "Would you be able to give up everthing else in your life to achieve that goal? Even if it meant risking insanity??";

+		if(MORGEN == 1) goto M_Menu2;

+		goto M_Menu;

+

+	M_Morgen:

+		set MORGEN,2;

+		mes "[Aure Dupon]";

+		mes "Morgenstein? Now that man definatley has a few screws loose.  He's always in the ^0000ddBlasksmith Guild Building^000000 making crazy potions.";

+		mes "He calls them ^ff0000Mixtures^000000 and ^ff0000Counteragents^000000.  I'm not sure what there used for though.";

+		next;

+		mes "[Aure Dupon]";

+		mes "You should go speak with him if your that curious about his work.";

+		goto M_Menu2;

+

+	M_Cancel:

+		mes "[Aure Dupon]";

+		mes "Human beings are just a small part of Nature.... therefore the human will is that of Natures will.....";

+		close;

+}

+

+// Chemist Morgenstein -----------------------------------------------------------

+geffen_in.gat,141,140,2	script	Morgenstein	121,{

+	if(MORGEN == 2) goto L_0;

+	if(MORGEN == 3) goto L_1;

+

+	mes "[Chemist Morgenstein]";

+	mes "Heheheheheh... Sniff Sniff... I can smell something appetizing here.";

+	mes "It is a Human Being... living one... umm yummy... Heheheheheh";

+	emotion 38;

+	close;

+

+L_0:

+	mes "[Chemist Morgenstein]";

+	mes "So you've been asking about me huh? What is it that you want to know?";

+M_Menu:

+	next;

+	menu "Ask about research",M_Rsrch,"Nothing",M_End;

+	

+	M_Rsrch:

+		mes "[Chemist Morgenstein]";

+		mes "Heheheheheh... You probably already heard about what I do ...";

+		mes "Okay.. I will tell you everything... there is nothing left for me to hide.... Heheheheheh...";

+		emotion 29;

+		next;

+		mes "[Chemist Morgenstein]";

+		mes "As far as I'm concerned my research has already been completed.....";

+		mes "I am a genius you know, and I can make anything!! Heheheheh... it's only a matter how long it will take...";

+		next;

+		mes "[Chemist Morgenstein]";

+		mes "You know what I mean..... time?.... Hehehehehehehya....";

+		emotion 29;

+		next;

+		mes "[Chemist Morgenstein]";

+		mes "Um.... did you say you want to know about my Research?... Oh it's all very simple.... I'm just trying to find ways to combine different materials...";

+		next;

+		mes "[Chemist Morgenstein]";

+		mes "Isn't it interesting? I'm perfecting a method that melts materials, such as iron and stone, and then mixes them into a new substance!!!";

+		mes "Once it is perfected, I will be able to turn anything in the word into a new substance.....";

+		next;

+		mes "[Chemist Morgenstein]";

+		mes "~~~~ !! Hehe!!!...Heheheheheh!!!...squash squash!!!..Kekekekekelll!!!!";

+		emotion 43;

+		next;

+		mes "[Chemist Morgenstein]";

+		mes "Ack!~cough~cough~ Ahem.... Though it is not yet possible, I did figure out something else incredible.";

+		mes "Through my research I found out how to make different types of liquids.  I call them ^5533FF'counteragents and mixtures'^000000.";

+		next;

+		mes "[Chemist Morgenstein]";

+		mes "I can make one for you right now,if you want?? Ahhh... Talking about my experiments and research makes me.... 'excited'.......";

+		mes "You too can feel my 'excitement' if you wish..... Ahhhhh.... I can make you feel...";

+		set MORGEN,3;

+		if(ALCH_Q == 4) set al_morgen,1;

+		close;

+

+L_1:

+	mes "[Chemist Morgenstein]";

+	mes "What do you want now?";

+M_Menu2:

+	next;

+	menu "Ask about research",M_Rsrch,"Make a new one",M_Make, "Nothing",M_End;

+	

+	M_Make:

+		mes "[Chemist Morgenstein]";

+		mes "Heheheheheheh.... So I see you are interested in my creations?..... Who woudn't.... Kekekekekekeke!!!";

+		mes "So what do you want me to make for you?? Huh? Heheheheheh.............";

+		emotion 29;

+		next;

+		menu "-Counteragent",sM_Counter, "-Mixture",sM_Mixture, "-Forget it",M_End;

+		

+		sM_Counter:

+			mes "[Chemist Morgenstein]";

+			mes "Oh... You said Counteragent... Kekekekekekeke... Let's see.... I'll need some items.......";

+			mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";

+			next;

+			mes "[Chemist Morgenstein]";

+			mes "Oh.... As I recall I need....:";

+			mes "^5533FF1 Alcohol";

+			mes "1 Detrimindexta^000000......";

+			mes "and ^5533FF1 Empty Bottle^000000....";

+			next;

+			mes "[Chemist Morgenstein]";

+			mes "With these 3 things I'll be able to make you a counteragent.  It won't be a big deal to make..... Kekekekekekeke....";

+			mes "Oh, and there will be a fee of ^5533FF3000 zeny^000000 okay? Heheheheheh..... Oh, surely you don'ty think it's rip-off?...";

+			next;

+			mes "[Chemist Morgenstein]";

+			mes "Alright?....";

+			next;

+			menu "Make",-,"Cancel",M_End;

+

+				mes "[Chemist Morgenstein]";

+				if(countitem(970)>0 && countitem(971)>0 && countitem(713)>0 && Zeny>=3000) goto sl_GetCounter;//Items: Alcohol, Detrimindexta, Empty Bottle,

+				mes "I'm sorry but you need 1 Alcohol, 1 Detrimindexta, and 3000 Zeny for me to make a Counteragent.";

+				close;

+	

+				sl_GetCounter:

+					mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";

+					mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";

+					next;

+					getitem 973,1;//Items: Counteragent,

+					delitem 970,1;//Items: Alcohol,

+					delitem 713,1;//Items: Empty Bottle,

+					delitem 971,1;//Items: Detrimindexta,

+					set Zeny, Zeny-3000;

+					mes "[Chemist Morgenstein]";

+					mes ".... Hmmm......";

+					close;

+

+		sM_Mixture:

+			mes "Oh... You said Mixture?... Kekekekekekeke... Let's see... I'll need some items.......";

+			mes "... Let me check... Oh... Oh...... Ahhhh..... Hmmm.....";

+			next;

+			mes "[Chemist Morgenstein]";

+			mes "Oh.... As I recall I need....:";

+			mes "^5533FF1 Alcohol";

+			mes "1 Karvodailnirol^000000.....";

+			mes "and ^5533FF1 Empty Bottle^000000...........";

+			next;

+			mes "[Chemist Morgenstein]";

+			mes "With these 3 things I'll be able to make you a mixture.  It won't be a big deal to make..... Kekekekekekeke....";

+			mes "Oh, and there will be a fee of ^5533FF4000 zeny^000000 okay? Heheheheheh..... Oh, surely you don'ty think it's rip-off?...";

+			next;

+			mes "[Chemist Morgenstein]";

+			mes "Alright??...";

+			next;

+			menu "Make",-,"Cancel",M_End;

+

+				if(countitem(970)>0 && countitem(972)>0 && countitem(713)>0 && Zeny>=4000) goto sl_GetMix;//Items: Alcohol, Karvodailnirol, Empty Bottle,

+				mes "I'm sorry but you need 1 Alcohol, 1 Karvodainirol, and 4000 Zeny for me to make a Mixture.";

+				close;

+			

+				sl_GetMix:

+					mes "[Chemist Morgenstein]";

+					mes "OhOhOhOh...... Heheheheheh...... Fine... Like this..... Fine... Keep... More........ Heheheheheh";

+					mes ".... Ahhhh.... ..... OhOh.... OhOh!..... OhOhOhOhOhOh!!!...!!!!!!";

+					next;

+					getitem 974,1;//Items: Mixture,

+					delitem 970,1;//Items: Alcohol,

+					delitem 713,1;//Items: Empty Bottle,

+					delitem 972,1;//Items: Karvodailnirol,

+					set Zeny, Zeny-4000;

+					mes "[Chemist Morgenstein]";

+					mes ".... Hmmm......";

+					close;

+

+	M_End:

+		mes "[Chemist Morgenstein]";

+		mes "... Kekekekekekeke....";

+		close;

+

+

+}

+

diff --git a/npc/quests/custom/berzebub.txt b/npc/quests/custom/berzebub.txt
new file mode 100644
index 000000000..200f0df87
--- /dev/null
+++ b/npc/quests/custom/berzebub.txt
@@ -0,0 +1,84 @@
+//===== eAthena Script =======================================

+//= Berzebub Card Quest Script

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

+//= jabs <jabbedxorz@hotmail.com>

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

+//= 1.0

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

+//= Any eAthena Version; RO Episode XX

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

+//= Quest to get the Berzebub Card

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

+//= MINE

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

+prontera.gat,165,178,8	script	Old Woman	103,{

+	if(BerzQuest == 1) goto alreadyDone;

+	mes "[Old Woman]";

+	mes "Greeting lad. I found a really nift item while I was picking mushrooms near Glast Heim";

+	next;

+	menu "Keep talking", goOn, "Leave", leave;

+	

+	leave:

+		mes "[Old Woman]";

+		mes "Such a great item I have right here...";

+		close;

+		

+	goOn:

+		mes "[Old Woman]";

+		mes "I have never seen an item like this before.  I am told it can be placed inside am accessory that has a slot avaiable in it.";

+		next;

+		mes "[Old Woman]";

+		mes "If you're interested in this item, tell me and I'll tell you what you need for me to make you one of your own.  I can only give one of these to each player, so once you finish this quest once, you may not do it again.";

+		next;

+		menu "Tell me more about it", getInfo, "Nah, I don't care about it", leave;

+		

+	getInfo:

+		mes "[Old Woman]";

+		mes "I believe the item is called a Berzebub Card.  It can make any spell caster cast spells really fast!";

+		next;

+		mes "[Old Woman]";

+		mes "I need all of the following items:";

+		mes "^0080FF10^000000 Emperium";

+		mes "^0080FF100^000000 Witched Starsand";

+		mes "^0080FF200^000000 Needle of Alarm";

+		mes "^0080FF10^000000 Worn Out Scrolls";

+		mes "^0080FF1^000000 Bible";

+		mes "^0080FF1^000000 Wand of the Occult";

+		mes "^0080FF20^000000 Opal";

+		next;

+		menu "I have all that!", checkItems, "I'll get those ASAP", leave;

+		

+	checkItems:

+		mes "[Old Woman]";

+		mes "Anyone can say they have the items, but do they really have them?  Let's take a look here...";

+		next;

+		if(countitem(714) < 10) goto noItems;

+		if(countitem(1061) < 100) goto noItems;

+		if(countitem(1095) < 200) goto noItems;

+		if(countitem(618) < 10) goto noItems;

+		if(countitem(1551) < 1) goto noItems;

+		if(countitem(1614) < 1) goto noItems;

+		if(countitem(727) < 20) goto noItems;

+		delitem 714, 10;

+		delitem 1061, 100;

+		delitem 1095, 200;

+		delitem 618, 10;

+		delitem 1551, 1;

+		delitem 1614, 1;

+		delitem 727, 20;

+		getitem 4145, 1;

+		set BerzQuest, 1;

+		mes "[Old Woman]";

+		mes "Well congratulations!  You have all the items.  Here is your Berzebub Card, just as I promised.";

+		close;

+	

+	noItems:

+		mes "[Old Woman]";

+		mes "I knew you were lying!  Get out of here and get those items you sorry excuse for a rock star.";

+		close;

+	

+	alreadyDone:

+		mes "[Old Woman]";

+		mes "Hey I remember you!  I already told you that you may only complete this quest once.";

+		close;

+}

diff --git a/npc/quests/custom/elvenear.txt b/npc/quests/custom/elvenear.txt
new file mode 100644
index 000000000..16d3a75d0
--- /dev/null
+++ b/npc/quests/custom/elvenear.txt
@@ -0,0 +1,71 @@
+//===== eAthena Script =======================================

+//= Daily Job Quest For Elven Ears

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

+//= Someone

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

+//= 1.1

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

+//= eAthena 1.0

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

+//= Elven Ears (require 75+ Base Level)

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

+//= Optimized [Lupus], 1.1 misc fix

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

+

+geffen.gat,127,49,5	script	Elven Ears Quest	84,{

+	mes "[Elven Ears Quest]"; 

+	mes "Hi, today's quest is...."; 

+	mes "Ah, the ^61B031Elven Ears ^000000Quest!"; 

+	next; 

+	menu "Requirements",L_Bl, "Make Item",-, "Cancel",L_Cancel; 

+

+	mes "[Elven Ears quest]";

+	mes "Good good, let me just check"; 

+	if(countitem(2213)<1)goto L_NoMake;

+	if(countitem(1040)<20)goto L_NoMake;

+	if (countitem(919)<20) goto L_NoMake; 

+	next;

+

+	mes "[Elven Ears quest]";

+	mes "Give me a second.....";

+	next;

+

+	delitem 2213,1;

+	delitem 1040,20;

+	delitem 919,20;

+	getitem 2286,1;

+

+	mes "[Elven Ears Quest]";

+	mes "Ok done!";

+	close;

+

+L_NoMake:

+	mes "[Elven Ears Quest]";

+	mes "You don't have the requirements.";

+	mes "Please come back another time...";

+	close;

+

+L_Bl: 

+	mes "Ok all you have to do is collect:"; 

+	mes "^362ED61 Kitty Band^000000"; 

+	mes "^362ED620 Elder Pixie Mustaches^000000"; 

+	mes "and ^362ED620 Animal Skin^000000";

+	next;

+

+	menu "Accept",-, "Leave",L_Leave;

+

+	mes "When you are done, bring the items to me.  Ok good luck finding those items.";

+	close;

+

+L_Leave:

+	mes "[Elven Ears quest]";

+	mes "Maybe another time?";

+	close;

+

+L_Cancel:

+	mes "[Elven Ears quest]";

+	mes "Aw, what a shame";

+	mes "Giving up already?";

+	mes "Oh well maybe you will participate in tommorow's quest.";

+	close;

+}

diff --git a/npc/quests/custom/event_32_new_hats.txt b/npc/quests/custom/event_32_new_hats.txt
new file mode 100644
index 000000000..9ef1ed9d7
--- /dev/null
+++ b/npc/quests/custom/event_32_new_hats.txt
@@ -0,0 +1,1278 @@
+//===== eAthena Script =======================================

+//= Quest For Slotted Sunglasses

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

+//= RedxSwordxHero 

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

+//= 1.1

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

+//= eAthena 1.0

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

+//= 4 brothers give you quests to get 32 new hats

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

+//= Event New Hats by RedxSwordxHero 

+//= Ported and improved with timers [Lupus]

+//= Thanks to x[tsk],fixed all item requirments to iRO specs exept

+//= for hats which cannot be made on the real server. [Lupus]

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

+

+

+

+prontera.gat,140,172,5	script	Zac	704,{

+	mes "[Zac]";

+	mes "I am the oldest and strongest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them.";

+	next;

+	mes "[Zac]";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	next;

+	menu "Join",L1,"Information",L2,"Cancel",L3;

+L1:	

+	mes "[Zac]";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Angel Helm",L1_1,"Apple Hat",L1_2,"Blue Bandana",L1_3,"Bongun Hat",L1_4,"Cake Hat",L1_5,"Candle Hat",L1_6,"Chef's Hat",L1_7,"Colored Egg Shell",L1_8;

+L1_1:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2254) < 1)) goto L_ITEM_1;

+	if((countitem(2229) < 1)) goto L_ITEM_2;

+	if((countitem(7036) < 5)) goto L_ITEM_3;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Angel Helm for you right away. Please Wait a Moment.";

+	delitem 2254,1;

+	delitem 2229,1;

+	delitem 7036,5;

+	next;

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Angel Helm^000000...! Please Take it!";

+	getitem 5025,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1:

+	mes "[Zac]";

+	mes "Oh dear, you need 1 Angel Hairband...";

+	close;

+L_ITEM_2:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Slotted Helm...";

+	close;

+L_ITEM_3:

+	mes "[Zac]";

+	mes "Oh, dear. You need 5 Fangs of Garm...";

+	close;

+L1_2:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(748) < 1)) goto L_ITEM_1a;

+	if((countitem(512) < 300)) goto L_ITEM_2a;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Apple Hat for you right away. Please Wait a Moment.";

+	delitem 748,1;

+	delitem 512,300;

+	next;

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Apple Hat^000000...! Please Take it!";

+	getitem 5037,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1a:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Witherless Rose...";

+	close;

+L_ITEM_2a:

+	mes "[Zac]";

+	mes "Oh, dear. You need 300 Apples...";

+	close;

+L1_3:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(7003) < 300)) goto L_ITEM_1b;

+	if((countitem(2211) < 1)) goto L_ITEM_2b;

+	if((countitem(978) < 1)) goto L_ITEM_3b;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Blue Bandana for you right away. Please Wait a Moment.";

+   	next;

+	delitem 7003,300;

+	delitem 2211,1;

+	delitem 978,1;	

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Blue Bandana^000000...! Please Take it!";

+	getitem 5052,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1b:

+	mes "[Zac]";

+	mes "Oh, dear. You need 300 Anolian Skins...";

+	close;

+L_ITEM_2b:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Bandana...";

+	close;

+L_ITEM_3b:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Cobaltblue Dyestuff...";

+	close;

+L1_4:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(609) < 10)) goto L_ITEM_1c;

+	if((countitem(978) < 1)) goto L_ITEM_2c;

+	if((countitem(2264) < 1)) goto L_ITEM_3c;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Bongun Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 609,100;

+	delitem 978,1;

+	delitem 2264,1;	

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Bongun Hat^000000...! Please Take it!";

+	getitem 5046,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1c:

+	mes "[Zac]";

+	mes "Oh, dear. You need 10 Amulets...";

+	close;

+L_ITEM_2c:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Cobaltblue Dyestuff...";

+	close;

+L_ITEM_3c:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Munak Hat...";

+	close;

+L1_5:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(529) < 10)) goto L_ITEM_1d;

+	if((countitem(530) < 5)) goto L_ITEM_2d;

+	if((countitem(538) < 15)) goto L_ITEM_3d;

+	if((countitem(539) < 20)) goto L_ITEM_4d;

+	if((countitem(999) < 10)) goto L_ITEM_5d;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Cake Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 529,10;

+	delitem 530,5;

+	delitem 538,15;

+	delitem 539,20;

+	delitem 999,10;	

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Cake Hat^000000...! Please Take it!";

+	getitem 5024,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1d:

+	mes "[Zac]";

+	mes "Oh, dear. You need 10 Candys...";

+	close;

+L_ITEM_2d:

+	mes "[Zac]";

+	mes "Oh, dear. You need 5 Candy Canes...";

+	close;

+L_ITEM_3d:

+	mes "[Zac]";

+	mes "Oh, dear. You need 15 Well Baked Cookies...";

+	close;

+L_ITEM_4d:

+	mes "[Zac]";

+	mes "Oh, dear. You need 20 Pieces of Cake...";

+	close;

+L_ITEM_5d:

+	mes "[Zac]";

+	mes "Oh, dear. You need 10 Steels...";

+	close;

+L1_6:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2279) < 1)) goto L_ITEM_1e;

+	if((countitem(518) < 100)) goto L_ITEM_2e;

+	if((countitem(7035) < 50)) goto L_ITEM_3e;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Candle Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2279,1;

+	delitem 518,100;

+	delitem 7035,50;	

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Candle Hat^000000...! Please Take it!";

+	getitem 5028,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1e:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Bomb Wick...";

+	close;

+L_ITEM_2e:

+	mes "[Zac]";

+	mes "Oh, dear. You need 100 Honeys...";

+	close;

+L_ITEM_3e:

+	mes "[Zac]";

+	mes "Oh, dear. You need 50 MatchSticks...";

+	close;

+L1_7:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(539) < 120)) goto L_ITEM_1f;

+	if((countitem(1036) < 450)) goto L_ITEM_2f;

+	if((countitem(982) < 1)) goto L_ITEM_3f;

+	if((countitem(949) < 330)) goto L_ITEM_4f;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Chef's Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 539,120;

+	delitem 1036,450;

+	delitem 982,1;

+	delitem 949,330;	

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Chef's Hat^000000...! Please Take it!";

+	getitem 5026,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1f:

+	mes "[Zac]";

+	mes "Oh, dear. You need 120 Pieces of Cake...";

+	close;

+L_ITEM_2f:

+	mes "[Zac]";

+	mes "Oh, dear. You need 450 Dragon Scales...";

+	close;

+L_ITEM_3f:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 White Dyestuff...";

+	close;

+L_ITEM_4f:

+	mes "[Zac]";

+	mes "Oh, dear. You need 330 Feathers...";

+	close;

+L1_8:

+	mes "[Zac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(5015) < 1)) goto L_ITEM_1g;

+	if((countitem(978) < 1)) goto L_ITEM_2g;

+	if((countitem(7030) < 50)) goto L_ITEM_3g;

+	mes "[Zac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Colored Egg Shell for you right away. Please Wait a Moment.";

+   	next;

+	delitem 5015,1;

+	delitem 978,1;

+	delitem 7030,50;	

+	mes "[Zac]";

+	mes "Tah Dah! ^FF0000Colored Egg Shell^000000...! Please Take it!";

+	getitem 5039,1;

+	next;

+	mes "[Zac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1g:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Egg Shell...";

+	close;

+L_ITEM_2g:

+	mes "[Zac]";

+	mes "Oh, dear. You need 1 Cobaltblue Dyestuff...";

+	close;

+L_ITEM_3g:

+	mes "[Zac]";

+	mes "Oh, dear. You need 50 Claws of Desert Wolf...";

+	close;

+L2:	

+	mes "[Zac]";

+	mes "Which hat materials do you wish to know?";

+	next;

+	menu "Angel Helm",L2_1,"Apple Hat",L2_2,"Blue Bandana",L2_3,"Bongun Hat", L2_4,"Cake Hat",L2_5,"Candle Hat",L2_6,"Chef's Hat",L2_7,"Colored Egg Shell",L2_8;

+L2_1:

+	mes "[Zac]";

+	mes "You need 1 Angel Wing, 1 Slotted Helm and 5 Fangs of Garm for Angel Helm.";

+	close;

+L2_2:

+	mes "[Zac]";

+	mes "You need 1 Witherless Rose and 300 Apples for Apple Hat.";

+	close;

+L2_3:

+	mes "[Zac]";

+	mes "You need 300 Anolian Skins, 1 Bandana and 1 Cobaltblue Dyestuff for Blue Bandana.";

+	close;

+L2_4:

+	mes "[Zac]";

+	mes "You need 10 Amulets, 1 Cobaltblue Dyestuff and 1 Munak Hat for Bongun Hat.";

+	close;

+L2_5:

+	mes "[Zac]";

+	mes "You need 10 Candys, 5 Candy Canes, 15 Well Baked Cookies, 20 Pieces Of Cake and 10 Steels for Cake Hat.";

+	close;

+L2_6:

+	mes "[Zac]";

+	mes "You need 1 Bomb Wick, 100 Honeys and 50 Matchsticks for Candle Hat.";

+	close;

+L2_7:

+	mes "[Zac]";

+	mes "You need 120 Pieces of Cake, 450 Dragon Scales, 1 White Dyestuff and 330 Feathers for Chef's Hat.";

+	close;

+L2_8:

+	mes "[Zac]";

+	mes "You need 1 Egg Shell, 1 Cobaltblue Dyestuff and 50 Claws of Desert Wolf for Colored Egg Shell.";

+	close;		

+L3:

+	mes "[Zac]";

+	mes "Stop by some other time with the right materials, so I can make the hats for you.";

+	close;

+}

+

+prontera.gat,143,172,5	script	Blac	732,{

+	mes "[Blac]";

+	mes "I am the youngest and sexiest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them.";

+	next;

+	mes "[Blac]";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	next;

+	menu "Join",L1,"Information",L2,"Cancel",L3;

+L1:	

+	mes "[Blac]";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Crescent Moon Hairpin",L1_9,"Cross Hairband",L1_10,"Deviruchi Hat",L1_11,"Dumpling Decoration",L1_12,"Fashion Sunglasses",L1_13,"HandkerChief",L1_14,"Magic Instructor's Hat",L1_15,"Heart Hairpin",L1_16;

+L1_9:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(5041) < 1)) goto L_ITEM_1;

+	if((countitem(999) < 10)) goto L_ITEM_2;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Crescent Moon Hairpin for you right away. Please Wait a Moment.";

+   	next;

+	delitem 5041,1;

+	delitem 999,10;	

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Crescent Moon Hairpin^000000...! Please Take it!";

+	getitem 5048,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Heart Hairpin...";

+	close;

+L_ITEM_2:

+	mes "[Blac]";

+	mes "Oh, dear. You need 10 Steels...";

+	close;

+L1_10:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2608) < 1)) goto L_ITEM_1a;

+	if((countitem(7069) < 500)) goto L_ITEM_2a;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Cross Hairband for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2608,1;

+	delitem 7069,500;

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Cross Hairband^000000...! Please Take it!";

+	getitem 5036,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1a:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Rosary...";

+	close;

+L_ITEM_2a:

+	mes "[Blac]";

+	mes "Oh, dear. You need 500 Destroyed Armors...";

+	close;

+L1_11:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(7048) < 40)) goto L_ITEM_1b;

+	if((countitem(1038) < 600)) goto L_ITEM_2b;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Deviruchi Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 7048,40;

+	delitem 1038,600;	

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Deviruchi Hat^000000...! Please Take it!";

+	getitem 5038,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1b:

+	mes "[Blac]";

+	mes "Oh, dear. You need 40 Talons of Griffin...";

+	close;

+L_ITEM_2b:

+	mes "[Blac]";

+	mes "Oh, dear. You need 600 Little Evil Horns...";

+	close;

+L1_12:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(10007) < 1)) goto L_ITEM_1c;

+	if((countitem(968) < 50)) goto L_ITEM_2c;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Dumpling Decoration for you right away. Please Wait a Moment.";

+   	next;

+	delitem 10007,1;

+	delitem 968,50;	

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Dumpling Decoration^000000...! Please Take it!";

+	getitem 5042,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1c:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Silk Ribbon...";

+	close;

+L_ITEM_2c:

+	mes "[Blac]";

+	mes "Oh, dear. You need 50 Heroic Emblems...";

+	close;

+L1_13:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2271) < 1)) goto L_ITEM_1d;

+	if((countitem(975) < 1)) goto L_ITEM_2d;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Fashion Sunglasses for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2271,1;

+	delitem 975,1;

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Fashion Sunglasses^000000...! Please Take it!";

+	getitem 5047,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1d:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Jack a Dandy...";

+	close;

+L_ITEM_2d:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Scarlet Dyestuff...";

+	close;

+L1_14:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(1059) < 150)) goto L_ITEM_1e;

+	if((countitem(978) < 1)) goto L_ITEM_2e;

+	if((countitem(907) < 100)) goto L_ITEM_3e;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Handkerchief for you right away. Please Wait a Moment.";

+   	next;

+	delitem 1059,150;

+	delitem 978,1;

+	delitem 907,100;	

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Handkerchief^000000...! Please Take it!";

+	getitem 5023,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1e:

+	mes "[Blac]";

+	mes "Oh, dear. You need 150 Fabrics...";

+	close;

+L_ITEM_2e:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Cobaltblue Dyestuff...";

+	close;

+L_ITEM_3e:

+	mes "[Blac]";

+	mes "Oh, dear. You need 100 Resins...";

+	close;

+L1_15:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2251) < 1)) goto L_ITEM_1f;

+	if((countitem(4052) < 1)) goto L_ITEM_2f;

+	if((countitem(1036) < 400)) goto L_ITEM_3f;

+	if((countitem(7001) < 50)) goto L_ITEM_4f;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Magic Instructor's Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2251,1;

+	delitem 4052,1;

+	delitem 1036,400;

+	delitem 7001,50;	

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Magic Instructor's Hat^000000...! Please Take it!";

+	getitem 5027,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1f:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Wizard's Hat...";

+	close;

+L_ITEM_2f:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1 Elder Willow Card...";

+	close;

+L_ITEM_3f:

+	mes "[Blac]";

+	mes "Oh, dear. You need 400 Dragon Scales...";

+	close;

+L_ITEM_4f:

+	mes "[Blac]";

+	mes "Oh, dear. You need 50 Mould Powders...";

+	close;

+L1_16:

+	mes "[Blac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(7013) < 1200)) goto L_ITEM_1g;

+	mes "[Blac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Heart Hairpin for you right away. Please Wait a Moment.";

+   	next;

+	delitem 7013,1200;	

+	mes "[Blac]";

+	mes "Tah Dah! ^FF0000Heart Hairpin^000000...! Please Take it!";

+	getitem 5041,1;

+	next;

+	mes "[Blac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1g:

+	mes "[Blac]";

+	mes "Oh, dear. You need 1200 Coral Reef's...";

+	close;

+L2:	

+	mes "[Blac]";

+	mes "Which hat materials do you wish to know?";

+	next;

+	menu "Crescent Moon Hairpin",L2_9,"Cross Hairband",L2_10,"Deviruchi Hat",L2_11,"Dumpling Decoration/Chun Li Hat",L2_12,"Fashion Sunglasses",L2_13,"HandkerChief",L2_14,"Magic Instructor's Hat",L2_15,"Heart Hairpin",L2_16;

+L2_9:

+	mes "[Blac]";

+	mes "You need 1 Heart Hairpin and 10 Steels for Crescent Moon Hairpin.";

+	close;

+L2_10:

+	mes "[Blac]";

+	mes "You need 1 Rosary and 500 Destroyed Armors for Cross Hairband.";

+	close;

+L2_11:

+	mes "[Blac]";

+	mes "You need 40 Talon's of Griffin and 600 Little Evil Horns for Deviruchi Hat.";

+	close;

+L2_12:

+	mes "[Blac]";

+	mes "You need 1 Silk Ribbon and 50 Heroic Emblems for Dumping Decoration.";

+	close;

+L2_13:

+	mes "[Blac]";

+	mes "You need 1 Jack a Dandy and 1 Scarlet Dyestuff for Fashion Sunglasses.";

+	close;

+L2_14:

+	mes "[Blac]";

+	mes "You need 150 Fabrics, 1 Cobaltblue Dyestuff and 100 Resins for Handkerchief.";

+	close;

+L2_15:

+	mes "[Blac]";

+	mes "You need 1 Wizard's Hat, 1 Elder Willow Card, 400 Dragon Scales and 50 Mould Powders for Magic Instructor's Hat.";

+	close;

+L2_16:

+	mes "[Blac]";

+	mes "You need 1200 Coral Reef's for Heart Hairpin.";

+	close;

+L3:

+	mes "[Blac]";

+	mes "Stop by some other time with the right materials, so I can make the hats for you.";

+	close;

+}

+

+prontera.gat,141,172,5	script	Jac	107,{

+	mes "[Jac]";

+	mes "I am the 2nd oldest and calmest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat, so I can make them.";

+	next;

+	mes "[Jac]";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	next;

+	menu "Join",L1,"Information",L2,"Cancel",L3;

+L1:	

+	mes "[Jac]";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Heart of Merchant",L1_17,"Innocence of Maiden",L1_18,"Kafra Band",L1_19,"Lightbulb Hairband",L1_20,"Magic Hat",L1_21,"Miner's Helm",L1_22,"Mysterious Apple Hat",L1_23,"Panda Hat",L1_24;

+L1_17:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2233) < 1)) goto L_ITEM_1;

+	if((countitem(969) < 1)) goto L_ITEM_2;

+	if((countitem(949) < 80)) goto L_ITEM_3;

+	if((countitem(938) < 100)) goto L_ITEM_4;

+	if((countitem(999) < 20)) goto L_ITEM_5;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Heart of Merchant for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2233,1;

+	delitem 969,1;

+	delitem 949,80;

+	delitem 999,20;

+	delitem 938,800;	

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Heart of Merchant^000000...! Please Take it!";

+	getitem 5021,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Slotted Circlet...";

+	close;

+L_ITEM_2:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Gold...";

+	close;

+L_ITEM_3:

+	mes "[Jac]";

+	mes "Oh, dear. You need 80 Feather...";

+	close;

+L_ITEM_4:

+	mes "[Jac]";

+	mes "Oh, dear. You need 800 Sticky Muscus...";

+	close;

+L_ITEM_5:

+	mes "[Jac]";

+	mes "Oh, dear. You need 20 Steels...";

+	close;

+L1_18:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(7047) < 100)) goto L_ITEM_1a;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Innocence of Maiden for you right away. Please Wait a Moment.";

+   	next;

+	delitem 7047,100;	

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Innocence of Maiden^000000...! Please Take it!";

+	getitem 5040,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1a:

+	mes "[Jac]";

+	mes "Oh, dear. You need 100 Alice's Apron...";

+	close;

+L1_19:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(10007) < 1)) goto L_ITEM_1b;

+	if((countitem(10008) < 1)) goto L_ITEM_2b;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Kafra Band for you right away. Please Wait a Moment.";

+   	next;

+	delitem 10007,1;

+	delitem 10009,1;	

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Kafra Band^000000...! Please Take it!";

+	getitem 5020,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1b:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Silk Ribbon...";

+	close;

+L_ITEM_2b:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Wild Flower...";

+	close;

+L1_20:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2233) < 1)) goto L_ITEM_1c;

+	if((countitem(746) < 20)) goto L_ITEM_2c;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Lightbulb Hairband for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2233,1;

+	delitem 746,20;	

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Lightbulb Hairband^000000...! Please Take it!";

+	getitem 5034,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1c:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Slotted Criclet...";

+	close;

+L_ITEM_2c:

+	mes "[Jac]";

+	mes "Oh, dear. You need 20 Glass Bead...";

+	close;

+L1_21:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2252) < 1)) goto L_ITEM_1d;

+	if((countitem(943) < 1200)) goto L_ITEM_2d;

+	if((countitem(1054) < 450)) goto L_ITEM_3d;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Magic Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2252,1;

+	delitem 943,1200;

+	delitem 1054,450;		

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Magic Hat^000000...! Please Take it!";

+	getitem 5045,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1d:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Wizard's Hat...";

+	close;

+L_ITEM_2d:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1200 Solid Shells...";

+	close;

+L_ITEM_3d:

+	mes "[Jac]";

+	mes "Oh, dear. You need 450 Ancient Lips...";

+	close;

+L1_22:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(5009) < 1)) goto L_ITEM_1e;

+	if((countitem(999) < 25)) goto L_ITEM_2e;

+	if((countitem(747) < 1)) goto L_ITEM_3e;

+	if((countitem(5028) < 1)) goto L_ITEM_4e;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Miner's Helm for you right away. Please Wait a Moment.";

+   	next;

+	delitem 5009,1;

+	delitem 999,25;

+	delitem 747,1;

+	delitem 5028,1;

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Miner's Helm^000000...! Please Take it!";

+	getitem 5031,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1e:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Safety Helmet...";

+	close;

+L_ITEM_2e:

+	mes "[Jac]";

+	mes "Oh, dear. You need 25 Steels...";

+	close;

+L_ITEM_3e:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Crystal Mirror...";

+	close;

+L_ITEM_4e:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Candle...";

+	close;

+L1_23:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(5037) < 1)) goto L_ITEM_1f;

+	if((countitem(7064) < 500)) goto L_ITEM_2f;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Mysterious Apple Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 5037,1;

+	delitem 7064,500;	

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Mysterious Apple Hat^000000...! Please Take it!";

+	getitem 5050,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1f:

+	mes "[Jac]";

+	mes "Oh, dear. You need 1 Apple Hat...";

+	close;

+L_ITEM_2f:

+	mes "[Jac]";

+	mes "Oh, dear. You need 500 Wings of Dragonfly...";

+	close;

+L1_24:

+	mes "[Jac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(999) < 10)) goto L_ITEM_1g;

+	if((countitem(948) < 200)) goto L_ITEM_2g;

+	mes "[Jac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Panda Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 999,10;

+	delitem 948,200;	

+	mes "[Jac]";

+	mes "Tah Dah! ^FF0000Panda Hat^000000...! Please Take it!";

+	getitem 5030,1;

+	next;

+	mes "[Jac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1g:

+	mes "[Jac]";

+	mes "Oh, dear. You need 10 Steels...";

+	close;

+L_ITEM_2g:

+	mes "[Jac]";

+	mes "Oh, dear. You need 200 Bear Footskins...";

+	close;	

+L2:	

+	mes "[Jac]";

+	mes "Which hat materials do you wish to know?";

+	next;

+	menu "Heart of Merchant",L2_17,"Innocence of Maiden",L2_18,"Kafra Band",L2_19,"Lightbulb Hairband",L2_20,"Magic Hat",L2_21,"Miner's Helm",L2_22,"Mysterious Apple Hat",L2_23,"Panda Hat",L2_24;

+L2_17:

+	mes "[Jac]";

+	mes "You need 1 Slotted Circlet, 1 Gold Bar, 80 Feathers, 20 Steels and 800 Sticky Muscus for Heart of Merchant";

+	close;

+L2_18:

+	mes "[Jac]";

+	mes "You need 100 Alice's Aprons for Innocence of Maiden.";

+	close;

+L2_19:

+	mes "[Jac]";

+	mes "You need 1 Silk Ribbon and 1 Wild Flower for Kafra Band.";

+	close;

+L2_20:

+	mes "[Jac]";

+	mes "You need 1 Slotted Circlet and 20 Glass Beads for Lightbulb Hairband.";

+	close;

+L2_21:

+	mes "[Jac]";

+	mes "You need 1 Wizard's Hat, 1200 Solid Shells and 450 Ancient Lips for Magic Hat.";

+	close;

+L2_22:

+	mes "[Jac]";

+	mes "You need 1 Safety Helmet, 25 Steels, 1 Crystal Mirror and 1 Candle for Miner's Helm.";

+	close;

+L2_23:

+	mes "[Jac]";

+	mes "You need 1 Apple Hat and 500 Wings of Dragonfly for Mysterious Apple Hat.";

+	close;

+L2_24:

+	mes "[Jac]";

+	mes "You need 10 Steels and 200 Bear Footskins for Panda Hat.";

+	close;		

+L3:

+	mes "[Jac]";

+	mes "Stop by some other time with the right materials, so I can make the hats for you.";

+	close;

+}

+

+prontera.gat,142,172,5	script	Pac	705,{

+	mes "[Pac]";

+	mes "I am 3rd oldest and wisest of the 4 brothers that makes all the newer hats. You will need to bring me the correct items for each hat so I can make them.";

+	next;

+	mes "[Pac]";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	next;

+	menu "Join",L1,"Information",L2,"Cancel",L3;

+L1:	

+	mes "[Pac]";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Phantom of the Opera",L1_25,"Poring Hat",L1_26,"Smokie Hat",L1_27,"Solar God Helm",L1_28,"Sphinx Hat",L1_29,"Spore Hat",L1_30,"Striped Bandana",L1_31,"Sunday Hat",L1_32;

+L1_25:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2281) < 1)) goto L_ITEM_1;

+	if((countitem(1048) < 50)) goto L_ITEM_2;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Phantom of the Opera for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2281,1;

+	delitem 1048,50;	

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Phatom of the Opera^000000...! Please Take it!";

+	getitem 5043,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Opera Mask...";

+	close;

+L_ITEM_2:

+	mes "[Pac]";

+	mes "Oh, dear. You need 50 Horrendous Hairs...";

+	close;

+L1_26:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(741) < 1)) goto L_ITEM_1a;

+	if((countitem(909) < 300)) goto L_ITEM_2a;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Poring Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 741,1;

+	delitem 909,300;	

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Poring Hat^000000...! Please Take it!";

+	getitem 5035,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1a:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Poring Doll...";

+	close;

+L_ITEM_2a:

+	mes "[Pac]";

+	mes "Oh, dear. You need 300 Jellopys...";

+	close;

+L1_27:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2213) < 1)) goto L_ITEM_1b;

+	if((countitem(1036) < 20)) goto L_ITEM_2b;

+	if((countitem(7012) < 200)) goto L_ITEM_3b;

+	if((countitem(7065) < 300)) goto L_ITEM_4b;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Smokie Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2213,1;

+	delitem 1036,20;

+	delitem 7012,200;

+	delitem 7065,300;	

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Smokie Hat^000000...! Please Take it!";

+	getitem 5033,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1b:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Kitty Band...";

+	close;

+L_ITEM_2b:

+	mes "[Pac]";

+	mes "Oh, dear. You need 20 Dragon Scales...";

+	close;

+L_ITEM_3b:

+	mes "[Pac]";

+	mes "Oh, dear. You need 200 Tough Scalelike Stems...";

+	close;

+L_ITEM_4b:

+	mes "[Pac]";

+	mes "Oh, dear. You need 300 Fur's of Sea Otter...";

+	close;

+L1_28:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(7086) < 1)) goto L_ITEM_1c;

+	if((countitem(999) < 40)) goto L_ITEM_2c;

+	if((countitem(984) < 2)) goto L_ITEM_3c;

+	if((countitem(969) < 10)) goto L_ITEM_4c;

+	if((countitem(1003) < 50)) goto L_ITEM_5c;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Solar God Helm for you right away. Please Wait a Moment.";

+   	next;

+	delitem 7086,1;

+	delitem 999,40;

+	delitem 984,2;

+	delitem 969,10;

+	delitem 1003,50;	

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Solar God Helm^000000...! Please Take it!";

+	getitem 5022,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1c:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Emblem of the Sun God...";

+	close;

+L_ITEM_2c:

+	mes "[Pac]";

+	mes "Oh, dear. You need 40 Steels...";

+	close;

+L_ITEM_3c:

+	mes "[Pac]";

+	mes "Oh, dear. You need 2 Oridecons...";

+	close;

+L_ITEM_4c:

+	mes "[Pac]";

+	mes "Oh, dear. You need 10 Gold Bar's...";

+	close;

+L_ITEM_5c:

+	mes "[Pac]";

+	mes "Oh, dear. You need 50 Coals...";

+	close;

+L1_29:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(999) < 25)) goto L_ITEM_1d;

+	if((countitem(979) < 1)) goto L_ITEM_2d;

+	if((countitem(976) < 1)) goto L_ITEM_3d;

+	if((countitem(1059) < 150)) goto L_ITEM_4d;

+	if((countitem(969) < 2)) goto L_ITEM_5d;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Sphinx Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 999,1;

+	delitem 979,1;

+	delitem 976,1;

+	delitem 1059,150;

+	delitem 969,2; 	

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Sphinx Hat^000000...! Please Take it!";

+	getitem 5053,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1d:

+	mes "[Pac]";

+	mes "Oh, dear. You need 25 Steels...";

+	close;

+L_ITEM_2d:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 DarkGreen Dyestuff...";

+	close;

+L_ITEM_3d:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Lemon Dyestuff...";

+	close;

+L_ITEM_4d:

+	mes "[Pac]";

+	mes "Oh, dear. You need 150 Fabric...";

+	close;

+L_ITEM_5d:

+	mes "[Pac]";

+	mes "Oh, dear. You need 2 Gold Bar's...";

+	close;

+L1_30:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(7033) < 850)) goto L_ITEM_1e;

+	if((countitem(7068) < 300)) goto L_ITEM_2e;

+	if((countitem(1015) < 1)) goto L_ITEM_3e;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Spore Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 7033,850;

+	delitem 7068,300;

+	delitem 1015,1;		

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Spore Hat^000000...! Please Take it!";

+	getitem 5029,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1e:

+	mes "[Pac]";

+	mes "Oh, dear. You need 850 Poison Spores...";

+	close;

+L_ITEM_2e:

+	mes "[Pac]";

+	mes "Oh, dear. You need 300 Half Burnt Logs...";

+	close;

+L_ITEM_3e:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Tongue...";

+	close;

+L1_31:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(1099) < 1500)) goto L_ITEM_1f;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Striped Bandana for you right away. Please Wait a Moment.";

+   	next;

+	delitem 1099,1500;	

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Striped Bandana^000000...! Please Take it!";

+	getitem 5049,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1f:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1500 Worn-out Prisoner Uniforms...";

+	close;

+L1_32:

+	mes "[Pac]";

+	mes "Let me check the items you have brought here.";

+	next;

+	if((countitem(2221) < 1)) goto L_ITEM_1g;

+	if((countitem(2227) < 1)) goto L_ITEM_2g;

+	if((countitem(1059) < 250)) goto L_ITEM_3g;

+	if((countitem(7063) < 600)) goto L_ITEM_4g;

+	mes "[Pac]";

+	mes "Wow!! Well done! Finally you have gathered all items needed! We will make the Sunday Hat for you right away. Please Wait a Moment.";

+   	next;

+	delitem 2221,1;

+	delitem 2227,1;

+	delitem 1059,250;

+	delitem 7063,600;	

+	mes "[Pac]";

+	mes "Tah Dah! ^FF0000Sunday Hat^000000...! Please Take it!";

+	getitem 5032,1;

+	next;

+	mes "[Pac]";

+	mes "I liked that, I look forward to making more. Thank you.";

+	close;

+L_ITEM_1g:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Slotted Hat...";

+	close;

+L_ITEM_2g:

+	mes "[Pac]";

+	mes "Oh, dear. You need 1 Slotted Cap...";

+	close;

+L_ITEM_3g:

+	mes "[Pac]";

+	mes "Oh, dear. You need 250 Fabrics...";

+	close;

+L_ITEM_4g:

+	mes "[Pac]";

+	mes "Oh, dear. You need 600 Soft Feathers...";

+	close;

+L2:	

+	mes "[Pac]";

+	mes "Which hat materials do you wish to know?";

+	next;

+	menu "Phantom of the Opera",L2_25,"Poring Hat",L2_26,"Smokie Hat",L2_27,"Solar God Helm",L2_28,"Sphinx Hat",L2_29,"Spore Hat",L2_30,"Striped Bandana",L2_31,"Sunday Hat",L2_32;

+L2_25:

+	mes "[Pac]";

+	mes "You need 1 Opera Mask and 50 Horrendous Hairs for Phantom of the Opera.";

+	close;

+L2_26:

+	mes "[Pac]";

+	mes "You need 1 Poring Doll and 300 Jellopys for Poring Hat.";

+	close;

+L2_27:

+	mes "[Pac]";

+	mes "You need 1 Kitty Band, 20 Dragon Scale, 200 Tough Scalelike Stem and 300 Fur's of Sea Otter for Smokie Hat.";

+	close;

+L2_28:

+	mes "[Pac]";

+	mes "You need 1 Emblem of the Sun God, 40 Steels, 2 Oridecons, 10 Gold Bar's and 50 Coals for Solar God Helm.";

+	close;

+L2_29:

+	mes "[Pac]";

+	mes "You need 25 Steels, 1 DarkGreen Dyestuff, 1 Lemon Dyestuff, 150 Fabric and 2 Gold Bar's for Sphinx Hat.";

+	close;

+L2_30:

+	mes "[Pac]";

+	mes "You need 850 Poison Spores, 300 Half Burnt Logs and 1 Tongue for Spore Hat.";

+	close;

+L2_31:

+	mes "[Pac]";

+	mes "You need 1500 Worn-out Prisoner Uniforms for Striped Bandana.";

+	close;

+L2_32:

+	mes "[Pac]";

+	mes "You need 1 Slotted Hat, 1 Slotted Cap, 250 Fabrics and 600 Soft Feathers for Sunday Hat.";

+	close;

+L3:

+	mes "[Pac]";

+	mes "Stop by some other time with the right materials, so I can make the hats for you.";

+	close;

+}

+

+

+//these scripts make our brothers to appear and disappear in order

+-	script	EDZac	-1,{

+OnInit:

+OnMinute15:

+	disablenpc "Zac";

+	end;

+OnMinute01:

+	enablenpc "Zac";

+	end;

+}

+

+-	script	EDJac	-1,{

+OnInit:

+OnMinute30:

+	disablenpc "Jac";

+	end;

+OnMinute16:

+	enablenpc "Jac";

+	end;

+}

+

+-	script	EDPac	-1,{

+OnInit:

+OnMinute45:

+	disablenpc "Pac";

+	end;

+OnMinute31:

+	enablenpc "Pac";

+	end;

+}

+

+-	script	EDBlac	-1,{

+OnInit:

+OnMinute00:

+	disablenpc "Blac";

+	end;

+OnMinute46:

+	enablenpc "Blac";

+	end;

+}

diff --git a/npc/quests/custom/excalibur.txt b/npc/quests/custom/excalibur.txt
new file mode 100644
index 000000000..77db880ec
--- /dev/null
+++ b/npc/quests/custom/excalibur.txt
@@ -0,0 +1,68 @@
+// Excalibur Quest NPC

+// By: Syrus22

+// Version 1.0

+// Any comments or questions PM me on the Yare forums

+// Description: This is a simple item quest NPC. The player must find an

+// Angel Band, a Heaven Ring, and an Emperium. If they do they will receive

+// the Excalibur.

+prt_castle.gat,81,171,5	script	Mysterious King	108,{

+mes "[Excalibur Quest Rep]";

+mes "Hello Adventurer.";

+mes "I'm glad to announce that we are sponsoring a hunt for the legendary sword, Excalibur. Or more appropriately a hunt for certain rare items that can be traded in for the legendary sword.";

+next;

+goto ExMenu;

+    ExMenu:

+	menu "Required Items",ExItems,"Create Excalibur",ExCreate,"End",ExEnd;

+

+    ExItems:

+        mes "[Excalibur Quest Rep]";

+        mes "You need the following items to create the Excalibur.";

+        mes "Angel Band";

+	mes "Heaven Ring";

+	mes "Emperium";

+        next;

+	goto ExMenu;

+

+    ExCreate:

+        mes "[Excalibur Quest Rep]";

+	mes "Let me check your inventory!";

+	next;

+	if(countitem(2254)<1) goto NoAngel;

+	if(countitem(2282)<1) goto NoHeaven;

+	if(countitem(714)<1) goto NoEmp;

+        goto ExGive;

+

+	    NoAngel:

+		mes "[Excalibur Quest Rep]";

+		mes "Sorry but you must have at least 1 Angel Band.";

+		mes "Come back after you get ALL the items.";

+		close;

+

+	    NoHeaven:

+		mes "[Excalibur Quest Rep]";

+		mes "Sorry but you must have at least 1 Heaven Ring.";

+		mes "Come back after you get ALL the items.";

+		close;

+

+	    NoEmp:

+		mes "[Excalibur Quest Rep]";

+		mes "Sorry but you must have at least 1 Emperium.";

+		mes "Come back after you get ALL the items.";

+		close;

+

+	    ExGive:

+		mes "[Excalibur Quest Rep]";

+		mes "Congratulations. You have collected all necessary items. I give to you the Excalibur!!!";

+		delitem 2254,1;

+		delitem 2282,1;

+		delitem 714,1;

+		getitem 1137,1;

+		mes "Thank you for your participation!";

+		close;

+

+    ExEnd:

+        mes "[Excalibur Quest Rep]";

+	mes "Good bye then. Hope you try the quest!";

+        close;

+close;    }

+}

diff --git a/npc/quests/custom/ironcane.txt b/npc/quests/custom/ironcane.txt
new file mode 100644
index 000000000..a3a08c40f
--- /dev/null
+++ b/npc/quests/custom/ironcane.txt
@@ -0,0 +1,52 @@
+//===== eAthena Script =======================================

+//= Quest For Iron Cain

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

+//= Dev Team

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

+//= 1.0

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

+//= eAthena 1.0

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

+//= Iron Cain (lower part of a full helmet)

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

+//= 

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

+

+payon.gat,109,118,5	script	Iron Cain Quest	76,{

+	mes "[Iron Cain Quest]";

+        mes "Here's what you need";

+        mes "The requirements, should you be brave enough to collect them, are:";

+        mes "- 200 Orcish vouchers";

+	mes "- 1 Heroic Emblem";

+	next;

+	mes "[Iron Cain Quest]";

+	mes ". . . . . .";

+	mes "Are you ready for me to make this special item?";

+	next;

+	menu "Sure am!",-, "The requirements are unfathomable!",L_Unfathomable;

+

+	mes "[Iron Cain Quest]";

+	if((countitem(931) < 200) || (countitem(968) < 1)) goto L_NotEnough;

+	mes ". . . . .";

+	mes "Wow!  You are brave indeed!";

+	delitem 931,200;

+	delitem 968,1;

+	next;

+	mes "[Iron Cain Quest]";

+	mes ". . . . .";

+	mes "Enjoy!";

+	getitem 2266,1;

+	close;

+

+L_NotEnough:

+	mes ". . .I'm sorry. You don't have enough money and items.";

+	mes "I can't afford to make this if you don't bring all materials needed.";

+	mes "Please understand this is to benefit heroes such as yourself!";

+	close;

+

+L_Unfathomable:

+	mes ". . . . .";

+	mes "What I had to go through was more unfathomable..";

+	mes "If you succeed in getting these items, you will have incredible strength!";

+	close;

+}

diff --git a/npc/quests/custom/kaho_balmung.txt b/npc/quests/custom/kaho_balmung.txt
new file mode 100644
index 000000000..d10fc038b
--- /dev/null
+++ b/npc/quests/custom/kaho_balmung.txt
@@ -0,0 +1,97 @@
+// $Id: kaho_balmung.txt,v 1.1.1.1 2004/09/10 17:26:46 MagicalTux Exp $

+//-------------------- 'Balmung & Lord Kaho's Horns' Quest --------------------

+

+prontera.gat,158,356,4	script	Royal Messenger	105,{

+	mes "[Royal Messenger]";

+	mes "Welcome to prontera, i am the Royal Messenger in charge of the royal quest.";

+	next;

+	menu "Listen",Lok,"No",Lend;

+Lok:

+	mes "[Royal Messenger]";

+	mes "There are too quests please chose the one you must like.";

+	next;

+	menu "Balmung",Lb,"Lord Kahos horns",Lkahos,"No",Lend;

+Lb:

+	mes "[Royal Messenger]";

+	mes "The Balmung quest consist of the next items:";

+	mes "120 Steel";

+	mes "10 Oridecon";

+	mes "10 Rough Wind";

+	mes "10 Flame Heart";

+	mes "10 Mystic Frozen";

+	mes "10 Great Nature";

+	mes "1,000,000z";

+	next;

+	if(countitem(999)<120) goto Lend2;

+	if(countitem(984)<10) goto Lend2;

+	if(countitem(996)<10) goto Lend2;

+	if(countitem(994)<10) goto Lend2;

+	if(countitem(995)<10) goto Lend2;

+	if(countitem(997)<10) goto Lend2;

+	if(Zeny<1000000) goto NoGold;

+	goto Lget;

+	mes "[Royal Messenger]";

+	mes "Happy item hunting and good luck";

+	close;

+Lkahos:

+	mes "[Royal Messenger]";

+	mes "The Lord Kahos horns quest consists of the next items:";

+	mes "1 Green Feelers";

+	mes "10 Star Dust";

+	mes "10 Rough Wind";

+	mes "10 Flame Heart";

+	mes "10 Mystic Frozen";

+	mes "10 Great Nature";

+	mes "1,000,000z";

+	next;

+	if(countitem(2298)<1) goto Lend2;

+	if(countitem(1001)<10) goto Lend2;

+	if(countitem(996)<10) goto Lend2;

+	if(countitem(994)<10) goto Lend2;

+	if(countitem(995)<10) goto Lend2;

+	if(countitem(997)<10) goto Lend2;

+	if(Zeny<1000000) goto NoGold;

+	goto Lget1;

+	mes "[Royal Messenger]";

+	mes"Happy item hunting and good luck";

+	close;

+Lend:

+	mes "[Royal Messenger]";

+	mes "Have a nice day.";

+	close;

+Lend2:

+	mes "[Royal Messenger]";

+	mes "Sorry you dont have all the items i need.";

+	mes "comeback when you have them all";

+	close;

+NoGold:

+	mes "[Royal Messenger]";

+	mes "Sorry you dont have enought gold";

+	close;

+Lget:

+	delitem 999,120;

+	delitem 984,10;

+	delitem 996,10;

+	delitem 994,10;

+	delitem 995,10;

+	delitem 997,10;

+	set Zeny,Zeny-1000000;

+	mes "[Royal Messenger]";

+	mes "I see you already have all the items you need.";

+	mes "nice work.";

+	getitem 1161,1;

+	close;

+Lget1:

+	delitem 2298,1;

+	delitem 1001,10;

+	delitem 996,10;

+	delitem 994,10;

+	delitem 995,10;

+	delitem 997,10;

+	set Zeny,Zeny-1000000;

+	mes "[Royal Messenger]";

+	mes "I see you already have all the items you need.";

+	mes "nice work.";

+	getitem 5013,1;

+	close;	}

+

diff --git a/npc/quests/custom/kahohorn.txt b/npc/quests/custom/kahohorn.txt
new file mode 100644
index 000000000..84ed22300
--- /dev/null
+++ b/npc/quests/custom/kahohorn.txt
@@ -0,0 +1,79 @@
+geffen.gat,115,107,5	script	Lord Kaho's Servant	61,{

+	mes "[Lord Kaho's Servant]";

+	mes "I worked myself to death trying to fulfill Lord Kaho's ridiculous expectations for a headgear!";

+        mes "Now that I've finally found the formula for the perfect headgear, I'm willing to share my time and talents";

+        next;

+	mes "You need the following to get the Kaho horns!";

+	mes "3 emperiums";

+	mes "Oh yea... i also forgot to mention these X_X";

+	next;

+	mes "1 Skull - From Dark Lord";

+	mes "1 Heroic Emblem - From Orc Hero";

+	mes "1 Evil Horn - From Baphomet";

+	mes "1 Red Frame - From Doppelganger";

+        mes "1 Smoking Pipe - From Eddga";

+        mes "1 Fang of Garm - From Garm";

+	mes "1 Mother's Nightmare - From Maya";

+	mes "1 Sphynx Hat - from Osiris";

+	mes "1 Diamond Ring - from Mistress";

+	next;

+	mes "Were' not done yet sweety...";

+	mes "Im a big fan of dolls, so you need to bring me these cuties";

+	mes "1 Poring Doll - a Poring drop";

+	mes "1 Chonchon Doll - a Chonchon Drop";

+	mes "1 Baphomet Doll - a Baphomet drop";

+	mes "1 Osiris Doll - an Osiris drop";

+        mes "1 Rocker Doll - a Rocker drop";

+	mes "1 Apez Fanitem Doll - a Yoyo drop";

+	mes "1 Racoon Doll - a Smokie drop";

+	next;

+	mes "Finally, i worked hard to make these horns for my master with all the mentioned items above...";

+	mes "Please include 5 million zeny for my efforts."; 

+	next;

+	mes "[Lord Kaho's Servant]";

+	mes ". . . . . .";

+	mes "Are you ready for me to make this special item?";

+	next;

+	menu "Sure am!",LSureAm,"These requirements are unfathomable!",LUnfathomable;

+

+	LSureAm:

+		mes "[Lord Kaho's Servant]";

+		if((countitem(754) < 1) || (countitem(753) < 1) || (countitem(752) < 1) || (countitem(751) < 1) || (countitem(750) < 1) || (countitem(743) < 1) || (countitem(742) < 1) || (countitem(741) < 1) || (countitem(2613) < 1) || (countitem(5053) < 1) || (countitem(7020) < 1) || (countitem(7036) < 1) || (countitem(2268) < 1) || (countitem(734) < 1) || (countitem(923) < 1) || (countitem(968) < 1) || (countitem(7005) < 1) || (countitem(714) < 3) || (Zeny < 5000000)) goto LNotEnough;

+		mes ". . . . .";

+		delitem 754,1;

+		delitem 753,1;

+		delitem 752,1;

+		delitem 751,1;

+		delitem 750,1;

+		delitem 743,1;

+		delitem 742,1;

+		delitem 741,1;

+		delitem 2613,1;

+		delitem 5053,1;

+		delitem 7020,1;

+		delitem 7036,1;

+		delitem 2268,1;

+		delitem 734,1;

+		delitem 923,1;

+		delitem 968,1;

+		delitem 7005,1;

+		delitem 714,3;

+		set Zeny,Zeny-5000000;

+		mes "Wow!  You are brave indeed!";

+		getitem 5013,1;

+		mes ". . . . .";

+		mes "Enjoy being God of Rune Midgard!";

+		close;

+

+		LNotEnough:

+			mes ". . . . .";

+			mes ". . .I'm sorry .. You don't have enough money and items ..";

+			mes "I can't afford to make this if you don't bring all materials needed.  Please understand this is to benefit heroes such as yourself!";

+			close;

+

+	LUnfathomable:

+		mes ". . . . .";

+		mes "What I had to go through was more unfathomable..";

+		mes "If you succeed in getting these items, you will have incredible strength!";

+		close;

+}

diff --git a/npc/quests/custom/new_hats.txt b/npc/quests/custom/new_hats.txt
new file mode 100644
index 000000000..a1d6780bf
--- /dev/null
+++ b/npc/quests/custom/new_hats.txt
@@ -0,0 +1,1469 @@
+//===== eAthena Script =======================================

+//= The 32 New Hats

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

+//= Darkchild

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

+//= 1.4

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

+//= eAthena 1.0

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

+//= 4 brothers give you quests to get 32 new hats

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

+//= There are 2 scripts for these 32 'new' hats.

+//= The other one doesnt have all the new ones and has some old ones

+//= Advise to use this script

+//= 1.2 revision

+//= 1.3 fixed bug where npcs would give out free items [Shinigami]

+//= 1.4 fixed amount of Fish Tail (300 -> 30), Zeny bugs in Ear of Angel,

+//=     Ear of Demon,Big Golden Bell, Mistress Crown,

+//=     Crown of The Ancient Queen, Indian Headband, Orc Hero Helm [Lupus]

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

+prontera.gat,140,172,5	script	Zac	704,{

+	mes "[Zac]";

+	mes "I am the oldest and strongest of the 4 brothers that makes all the newer hats.";

+	mes "You will need to bring me the correct items for each hat so I can make them.";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Attitude Campus Hat",L1_1,"Fox Mask",L1_2,"X Cross Hairpin",L1_3,"Flower Hair Pin",L1_4,"Tulip Hair Pin",L1_5,"Mushroom Hairband",L1_6,"Troublesome Raccoon Doll",L1_7,"Blue Fish",L1_8;

+	L1_1:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if((countitem(2285)<1) && (countitem(1550)<1)) goto L_ITEM_1;//Items: Apple o' Archer, Book,

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Attitude Campus Hat for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2285,1;//Items: Apple o' Archer,

+			delitem 1550,1;//Items: Book,

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000Attitude Campus Hat^000000...! Please Take it!";

+			getitem 5073,1;//Items: Campus Hat,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_1:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "Attitude Campus Hat requires~~";

+			next;

+			mes "[Zac]";

+			mes "1 Apple o' Archer";

+			mes "1 Book";

+			mes "...Did you know this already?";

+			close;

+	L1_2:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(1022)<999) goto L_ITEM_2;//Items: Nine Tails,

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Fox Mask for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 1022,999;//Items: Nine Tails,

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000Fox Mask^000000...! Please Take it!";

+			getitem 5069,1;//Items: Fox Mask,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_2:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "Fox Mask requires~~";

+			next;

+			mes "[Zac]";

+			mes "999 Nine Tails";

+			mes "...Did you know this already?";

+			close;

+	L1_3:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(10011)<1) goto L_ITEM_3;//Items: Stellar Hairpin,

+			if(countitem(2266)<1) goto L_ITEM_3;//Items: Iron Cain,

+			if(countitem(909)<100) goto L_ITEM_3;//Items: Jellopy,

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the X Cross Hairpin for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 10011,1;//Items: Stellar Hairpin,

+			delitem 2266,1;//Items: Iron Cain,

+			delitem 909,100;//Items: Jellopy,

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000X Cross Hairpin^000000...! Please Take it!";

+			getitem 5079,1;//Items: X Hairpin,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_3:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "X Cross Hairpin requires~~";

+			next;

+			mes "[Zac]";

+			mes "1 Stellar Hairpin";

+			mes "1 Iron Cain";

+			mes "100 Jellopy";

+			mes "...Did you know this already?";

+			close;

+	L1_4:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2270)<1) goto L_ITEM_4;//Items: Centimental Leaf,

+			if(countitem(999)<10) goto L_ITEM_4;//Items: Steel,

+			if(Zeny < 20000) goto L_ITEM_4;

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Flower Hair Pin for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2270,1;//Items: Centimental Leaf,

+			delitem 999,10;//Items: Steel,

+			set Zeny,Zeny-20000;

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000Flower Hair Pin^000000...! Please Take it!";

+			getitem 5061,1;//Items: Flower Hairpin,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_4:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "Flower Hair Pin requires~~";

+			next;

+			mes "[Zac]";

+			mes "1 Romantic Leaf";

+			mes "10 Steel";

+			mes "20,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_5:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2278)<1) goto L_ITEM_5;//Items: Mr. Smile,

+			if(countitem(980)<1) goto L_ITEM_5;//Items: Orange Dyestuff,

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Tulip Hair Pin for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2278,1;//Items: Mr. Smile,

+			delitem 980,1;//Items: Orange Dyestuff,

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000Tulip Hair Pin^000000...! Please Take it!";

+			getitem 5077,1;//Items: Tulip Hairpin,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_5:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "Tulip Hair Pin requires~~";

+			next;

+			mes "[Zac]";

+			mes "1 Mr. Smile";

+			mes "1 Orange Dyestuffs";

+			mes "...Did you know this already?";

+			close;

+	L1_6:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(921)<300) goto L_ITEM_6;//Items: Mushroom Spore,

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Mushroom Hairband for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 921,300;//Items: Mushroom Spore,

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000Mushroom Hairband^000000...! Please Take it!";

+			getitem 5082,1;//Items: Mushroom Hairband,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_6:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "Mushroom Hairband requires~~";

+			next;

+			mes "[Zac]";

+			mes "300 Mushroom Spores";

+			mes "...Did you know this already?";

+			close;

+	L1_7:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(1026)<100) goto L_ITEM_7;//Items: Acorn,

+			if(countitem(7065)<100) goto L_ITEM_7;//Items: Sea Otter Fur,

+			if(countitem(945)<100) goto L_ITEM_7;//Items: Raccoon Leaf,

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Troublesome Raccoon Doll for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 1026,100;//Items: Acorn,

+			delitem 7065,100;//Items: Sea Otter Fur,

+			delitem 945,100;//Items: Raccoon Leaf,

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000Troublesome Raccoon Doll^000000...! Please Take it!";

+			getitem 5084,1;//Items: Lazy Racoon Hat,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_7:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "Troublesome Raccoon Doll requires~~";

+			next;

+			mes "[Zac]";

+			mes "100 Acorn";

+			mes "100 Sea Otter Fur";

+			mes "100 Raccoon Leaf";

+			mes "...Did you know this already?";

+			close;

+	L1_8:

+			mes "[Zac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(624)<2) goto L_ITEM_8;//Items: Rotten Fish,

+			if(countitem(959)<300) goto L_ITEM_8;//Items: Stinky Scale,

+			if(countitem(1023)<30) goto L_ITEM_8;//Items: Fish Tail,

+			if(countitem(938)<100) goto L_ITEM_8;//Items: Sticky Mucus,

+			mes "[Zac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Blue Fish for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 624,2;//Items: Rotten Fish,

+			delitem 959,300;//Items: Stinky Scale,

+			delitem 1023,30;//Items: Fish Tail,

+			delitem 938,100;//Items: Sticky Mucus,

+			mes "[Zac]";

+			mes "Tah Dah!!!^FF0000Blue Fish^000000...! Please Take it!";

+			getitem 5065,1;//Items: Fresh Blueish Fish,

+			next;

+			mes "[Zac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_8:

+			mes "[Zac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Zac]";

+			mes "Blue Fish requires~~";

+			next;

+			mes "[Zac]";

+			mes "2 Rotten Fish";

+			mes "300 Rotten Scale";

+			mes "30 Fish Tail";

+			mes "100 Sticky Mucus";

+			mes "...Did you know this already?";

+			close;

+}

+

+

+prontera.gat,141,172,5	script 	Jac	107,{

+	mes "[Jac]";

+	mes "I am the 2nd oldest and calmest of the 4 brothers that makes all the newer hats.";

+	mes "You will need to bring me the correct items for each hat so I can make them.";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Drooped Cat",L1_9,"Leaf of Transformation",L1_10,"Bear Pebble Hat",L1_11,"Sea Otter Hat",L1_12,"Sleepy Hat",L1_13,"Straw Hat",L1_14,"Cowboy Hat",L1_15,"Sombrero",L1_16;

+	L1_9:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2233)<1) goto L_ITEM_9;//Items: Circlet,

+			if(countitem(983)<1) goto L_ITEM_9;//Items: Black Dyestuff,

+			if(countitem(740)<1) goto L_ITEM_9;//Items: Puppet,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Drooped Cat for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2233,1;//Items: Circlet,

+			delitem 983,1;//Items: Black Dyestuff,

+			delitem 740,1;//Items: Puppet,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Drooped Cat^000000...! Please Take it!";

+			getitem 5058,1;//Items: Resting Cat,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_9:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Drooped Cat requires~~";

+			next;

+			mes "[Jac]";

+			mes "1 Slotted Circlet";

+			mes "1 Black Dyestuffs";

+			mes "1 Puppet";

+			mes "...Did you know this already?";

+			close;

+	L1_10:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(945)<600) goto L_ITEM_10;//Items: Raccoon Leaf,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Leaf of Transformation for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 945,600;//Items: Raccoon Leaf,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Leaf of Transformation^000000...! Please Take it!";

+			getitem 5064,1;//Items: Transformation Leaf,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_10:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Leaf of Transformation requires~~";

+			next;

+			mes "[Jac]";

+			mes "600 Raccoon Leaf";

+			mes "...Did you know this already?";

+			close;

+	L1_11:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(5030)<1) goto L_ITEM_11;//Items: Panda Hat,

+			if(countitem(952)<100) goto L_ITEM_11;//Items: Cactus Needle,

+			if(countitem(999)<20) goto L_ITEM_11;//Items: Steel,

+			if(countitem(948)<200) goto L_ITEM_11;//Items: Bears Footskin,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Bear Pebble Hat for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 5030,1;//Items: Panda Hat,

+			delitem 952,100;//Items: Cactus Needle,

+			delitem 999,20;//Items: Steel,

+			delitem 948,200;//Items: Bears Footskin,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Bear Pebble Hat^000000...! Please Take it!";

+			getitem 5059,1;//Items: Bear Hat,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_11:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Bear Pebble Hat requires~~";

+			next;

+			mes "[Jac]";

+			mes "1 Panda Hat";

+			mes "100 Cactus Needle";

+			mes "20 Steel";

+			mes "200 Bear's Footskin";

+			mes "...Did you know this already?";

+			close;

+	L1_12:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(5084)<1) goto L_ITEM_12;//Items: Lazy Racoon Hat,

+			if(countitem(5064)<1) goto L_ITEM_12;//Items: Transformation Leaf,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Sea Otter Hat for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 5084,1;//Items: Lazy Racoon Hat,

+			delitem 5064,1;//Items: Transformation Leaf,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Sea Otter Hat^000000...! Please Take it!";

+			getitem 5078,1;//Items: Sea Otter Hat,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_12:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Sea Otter Hat requires~~";

+			next;

+			mes "[Jac]";

+			mes "1 Troublesome Raccoon Doll";

+			mes "1 Leaf of Transformation";

+			mes "...Did you know this already?";

+			close;

+	L1_13:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2236)<1) goto L_ITEM_13;//Items: Santa's Hat,

+			if(countitem(7111)<200) goto L_ITEM_13;//Items: String Paper,

+			if(countitem(7112)<1) goto L_ITEM_13;//Items: Transparent Paper,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Sleepy Hat for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2236,1;//Items: Santa's Hat,

+			delitem 7111,200;//Items: String Paper,

+			delitem 7112,1;//Items: Transparent Paper,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Sleepy Hat^000000...! Please Take it!";

+			getitem 5060,1;//Items: Pointy Cap,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_13:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Sleepy Hat requires~~";

+			next;

+			mes "[Jac]";

+			mes "1 Santa Hat";

+			mes "200 String Paper";

+			mes "1 Transparent Paper";

+			mes "...Did you know this already?";

+			close;

+	L1_14:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(7012)<400) goto L_ITEM_14;//Items: Tough Scalelike Stem,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Straw Hat for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 7012,400;//Items: Tough Scalelike Stem,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Straw Hat^000000...! Please Take it!";

+			getitem 5062,1;//Items: Straw Hat,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_14:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Straw Hat requires~~";

+			next;

+			mes "[Jac]";

+			mes "400 Tough Scalelike Stem";

+			mes "...Did you know this already?";

+			close;

+	L1_15:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2248)<1) goto L_ITEM_15;//Items: Western Grace,

+			if(countitem(7030)<108) goto L_ITEM_15;//Items: Claw of Desert Wolf,

+			if(countitem(7100)<100) goto L_ITEM_15;//Items: Sharpened Leaf,

+			if(countitem(7120)<4) goto L_ITEM_15;//Items: Burning Horseshoe,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Cowboy Hat for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2248,1;//Items: Western Grace,

+			delitem 7030,108;//Items: Claw of Desert Wolf,

+			delitem 7100,100;//Items: Sharpened Leaf,

+			delitem 7120,4;//Items: Burning Horseshoe,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Cowboy Hat^000000...! Please Take it!";

+			getitem 5075,1;//Items: Cowboy Hat,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_15:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Cowboy Hat requires~~";

+			next;

+			mes "[Jac]";

+			mes "1 Western Grace";

+			mes "108 Claw of Desert Wolf";

+			mes "100 Sharpened Leaf ";

+			mes "4 Burning Horseshoe";

+			mes "...Did you know this already?";

+			close;

+	L1_16:

+			mes "[Jac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(5062)<1) goto L_ITEM_16;//Items: Straw Hat,

+			if(countitem(952)<100) goto L_ITEM_16;//Items: Cactus Needle,

+			if(countitem(1907)<1) goto L_ITEM_16;//Items: Guitar,

+			mes "[Jac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Sombrero for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 5062,1;//Items: Straw Hat,

+			delitem 952,100;//Items: Cactus Needle,

+			delitem 1907,1;//Items: Guitar,

+			mes "[Jac]";

+			mes "Tah Dah!!!^FF0000Sombrero^000000...! Please Take it!";

+			getitem 5067,1;//Items: Sombrero,

+			next;

+			mes "[Jac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_16:

+			mes "[Jac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Jac]";

+			mes "Sombrero requires~~";

+			next;

+			mes "[Jac]";

+			mes "1 Straw Hat";

+			mes "100 Cactus Needle";

+			mes "1 Guitar";

+			mes "...Did you know this already?";

+			close;

+}

+

+prontera.gat,142,172,5	script 	Pac	705,{

+	mes "[Pac]";

+	mes "I am 3rd oldest and wisest of the 4 brothers that makes all the newer hats.";

+	mes "You will need to bring me the correct items for each hat so I can make them.";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Hair Cap",L1_17,"Hot Blood Headband",L1_18,"Ear of Angel",L1_19,"Ear of Demon",L1_20,"Big Golden Bell",L1_21,"Mistress Crown",L1_22,"Crown of Ancient Queen",L1_23,"Alarm Mask",L1_24;

+	L1_17:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2226)<1) goto L_ITEM_17;//Items: Cap,

+			if(countitem(7107)<500) goto L_ITEM_17;//Items: Antelope Skin,

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Hair Cap for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2226,1;//Items: Cap,

+			delitem 7107,500;//Items: Antelope Skin,

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Hair Cap^000000...! Please Take it!";

+			getitem 5076,1;//Items: Furry Hat,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_17:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Hair Cap requires~~";

+			next;

+			mes "[Pac]";

+			mes "1 Cap";

+			mes "500 Fur of Goat";

+			mes "...Did you know this already?";

+			close;

+	L1_18:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(10019)<1) goto L_ITEM_18;//Items: Red Muffler,

+			if(countitem(7097)<300) goto L_ITEM_18;//Items: Burning Heart,

+			if(countitem(982)<1) goto L_ITEM_18;//Items: White Dyestuff,

+			if(countitem(2211)<1) goto L_ITEM_18;//Items: Bandana,

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Hot Blood Headband for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 10019,1;//Items: Red Muffler,

+			delitem 7097,300;//Items: Burning Heart,

+			delitem 982,1;//Items: White Dyestuff,

+			delitem 2211,1;//Items: Bandana,

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Hot Blood Headband^000000...! Please Take it!";

+			getitem 5070,1;//Items: Bandage,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_18:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Hot Blood Headband requires~~";

+			next;

+			mes "[Pac]";

+			mes "1 Red Muffler";

+			mes "300 Burning Heart";

+			mes "1 White Dyestuffs";

+			mes "1 Bandana";

+			mes "...Did you know this already?";

+			close;

+	L1_19:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2254)<1) goto L_ITEM_19;//Items: Angel Wing,

+			if(countitem(2286)<1) goto L_ITEM_19;//Items: Elven Ears,

+			if(Zeny < 20000) goto L_ITEM_19;

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Ear of Angel for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2254,1;//Items: Angel Wing,

+			delitem 2286,1;//Items: Elven Ears,

+			set Zeny,Zeny-20000;

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Ear of Angel^000000...! Please Take it!";

+			getitem 5074,1;//Items: Ears of Angel,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_19:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Ear of Angel requires~~";

+			next;

+			mes "[Pac]";

+			mes "1 Angel Wing";

+			mes "1 Elven Ears";

+			mes "20,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_20:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2255)<1) goto L_ITEM_20;//Items: Evil Wing,

+			if(countitem(2286)<1) goto L_ITEM_20;//Items: Elven Ears,

+			if(Zeny < 20000) goto L_ITEM_20;

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Ear of Demon for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2255,1;//Items: Evil Wing,

+			delitem 2286,1;//Items: Elven Ears,

+			set Zeny,Zeny-20000;

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Ear of Demon^000000...! Please Take it!";

+			getitem 5068,1;//Items: Ears Of Demon,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_20:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Ear of Demon requires~~";

+			next;

+			mes "[Pac]";

+			mes "1 Evil Wing";

+			mes "1 Elven Ears";

+			mes "20,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_21:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(10016)<1) goto L_ITEM_21;//Items: Golden Bell,

+			if(countitem(714)<1) goto L_ITEM_21;//Items: Emperium,

+			if(countitem(969)<3) goto L_ITEM_21;//Items: Gold,

+			if(Zeny < 25000) goto L_ITEM_21;

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Big Golden Bell for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 10016,1;//Items: Golden Bell,

+			delitem 714,1;//Items: Emperium,

+			delitem 969,3;//Items: Gold,

+			set Zeny,Zeny-25000;

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Big Golden Bell^000000...! Please Take it!";

+			getitem 5091,1;//Items: Big Golden Bell,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_21:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Big Golden Bell requires~~";

+			next;

+			mes "[Pac]";

+			mes "1 Golden Bell";

+			mes "1 Emperium";

+			mes "3 Gold";

+			mes "25,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_22:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2249)<1) goto L_ITEM_22;//Items: Coronet,

+			if(countitem(714)<1) goto L_ITEM_22;//Items: Emperium,

+			if(countitem(969)<3) goto L_ITEM_22;//Items: Gold,

+			if(Zeny < 25000) goto L_ITEM_22;

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Mistress Crown for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2249,1;//Items: Coronet,

+			delitem 714,1;//Items: Emperium,

+			delitem 969,3;//Items: Gold,

+			set Zeny,Zeny-25000;

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Mistress Crown^000000...! Please Take it!";

+			getitem 5081,1;//Items: Crown of Mistress,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_22:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Mistress Crown requires~~";

+			next;

+			mes "[Pac]";

+			mes "1 Coronet";

+			mes "1 Emperium";

+			mes "3 Gold";

+			mes "25,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_23:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(10006)<1) goto L_ITEM_23;//Items: Queen's Hair Ornament,

+			if(countitem(714)<1) goto L_ITEM_23;//Items: Emperium,

+			if(countitem(969)<3) goto L_ITEM_23;//Items: Gold,

+			if(Zeny < 25000) goto L_ITEM_23;

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Crown of Ancient Queen for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 10006,1;//Items: Queen's Hair Ornament,

+			delitem 714,1;//Items: Emperium,

+			delitem 969,3;//Items: Gold,

+			set Zeny,Zeny-25000;

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Crown of Ancient Queen^000000...! Please Take it!";

+			getitem 5080,1;//Items: Crown of The Ancient Queen,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_23:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Crown of Ancient Queen requires~~";

+			next;

+			mes "[Pac]";

+			mes "1 Queen's Hair Ornament";

+			mes "1 Emperium";

+			mes "3 Gold";

+			mes "25,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_24:

+			mes "[Pac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(1095)<3000) goto L_ITEM_24;//Items: Needle of Alarm,

+			if(countitem(2218)<1) goto L_ITEM_24;//Items: Flu Mask,

+			mes "[Pac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Alarm Mask for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 1095,3000;//Items: Needle of Alarm,

+			delitem 2218,1;//Items: Flu Mask,

+			mes "[Pac]";

+			mes "Tah Dah!!!^FF0000Alarm Mask^000000...! Please Take it!";

+			getitem 5086,1;//Items: Sad Mask,

+			next;

+			mes "[Pac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_24:

+			mes "[Pac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Pac]";

+			mes "Alarm Mask requires~~";

+			next;

+			mes "[Pac]";

+			mes "3000 Needle of Alarm";

+			mes "1 Flu Mask";

+			mes "...Did you know this already?";

+			close;

+}

+

+prontera.gat,143,172,5	script 	Blac	732,{

+	mes "[Blac]";

+	mes "I am the youngest and sexiest of the 4 brothers that makes all the newer hats.";

+	mes "You will need to bring me the correct items for each hat so I can make them.";

+	mes "I provide 8 hats and my brothers provides the other 24.";

+	mes "What hat do you want me to make?";

+	next;

+	menu "Indian Hairband",L1_25,"Twin Ribbons",L1_26,"Expressionless Mask",L1_27,"Troublesome Mask",L1_28,"Surprise Mask",L1_29,"Goblin Leader Mask",L1_30,"Horn of Incubus",L1_31,"Horn of Succubus",L1_32;

+	L1_25:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2207)<1) goto L_ITEM_25;//Items: Fancy Flower,

+			if(countitem(7101)<10) goto L_ITEM_25;//Items: Peco Feather,

+			if(Zeny < 10000) goto L_ITEM_25;

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Indian Hairband for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2207,1;//Items: Fancy Flower,

+			delitem 7101,10;//Items: Peco Feather,

+			set Zeny,Zeny-10000;

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Indian Hairband^000000...! Please Take it!";

+			getitem 5071,1;//Items: Indian Headband,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_25:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Indian Hairband requires~~";

+			next;

+			mes "[Blac]";

+			mes "1 Fancy Flower";

+			mes "10 Peco's Feather";

+			mes "10,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_26:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2244)<1) goto L_ITEM_26;//Items: Big Ribbon,

+			if(countitem(10007)<1) goto L_ITEM_26;//Items: Silk Ribbon,

+			if(countitem(5079)<1) goto L_ITEM_26;//Items: X Hairpin,

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Twin Ribbons for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2244,1;//Items: Big Ribbon,

+			delitem 10007,1;//Items: Silk Ribbon,

+			delitem 5079,1;//Items: X Hairpin,

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Twin Ribbons^000000...! Please Take it!";

+			getitem 5085,1;//Items: Small Twin Ribbons,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_26:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Twin Ribbons requires~~";

+			next;

+			mes "[Blac]";

+			mes "1 Big Ribbon";

+			mes "1 Silk Ribbon";

+			mes "1 X Cross Hairpin";

+			mes "...Did you know this already?";

+			close;

+	L1_27:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(999)<25) goto L_ITEM_27;//Items: Steel,

+			if(countitem(5090)<1) goto L_ITEM_27;//Items: Mask of The Goblin Leader,

+			if(Zeny < 50000) goto L_ITEM_27;

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Expressionless Mask for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 999,25;//Items: Steel,

+			delitem 5090,1;//Items: Mask of The Goblin Leader,

+			set Zeny,Zeny-50000;

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Expressionless Mask^000000...! Please Take it!";

+			getitem 5087,1;//Items: Expressionless Mask,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_27:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Expressionless Mask requires~~";

+			next;

+			mes "[Blac]";

+			mes "25 Steel";

+			mes "1 Goblin Leader Mask";

+			mes "50,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_28:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(999)<25) goto L_ITEM_28;//Items: Steel,

+			if(countitem(5090)<1) goto L_ITEM_28;//Items: Mask of The Goblin Leader,

+			if(Zeny < 50000) goto L_ITEM_28;

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Troublesome Mask for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 999,25;//Items: Steel,

+			delitem 5090,1;//Items: Mask of The Goblin Leader,

+			set Zeny,Zeny-50000;

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Troublesome Mask^000000...! Please Take it!";

+			getitem 5089,1;//Items: Annoyed Mask,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_28:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Troublesome Mask requires~~";

+			next;

+			mes "[Blac]";

+			mes "25 Steel";

+			mes "1 Goblin Leader Mask";

+			mes "50,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_29:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(999)<25) goto L_ITEM_29;//Items: Steel,

+			if(countitem(5090)<1) goto L_ITEM_29;//Items: Mask of The Goblin Leader,

+			if(Zeny < 50000) goto L_ITEM_29;

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Surprise Mask for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 999,25;//Items: Steel,

+			delitem 5090,1;//Items: Mask of The Goblin Leader,

+			set Zeny,Zeny-50000;

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Surprise Mask^000000...! Please Take it!";

+			getitem 5088,1;//Items: Surprised Mask,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_29:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Surprise Mask requires~~";

+			next;

+			mes "[Blac]";

+			mes "25 Steel";

+			mes "1 Goblin Leader Mask";

+			mes "50,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_30:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2275)<1) goto L_ITEM_30;//Items: Red Bandana,

+			if(countitem(911)<100) goto L_ITEM_30;//Items: Scell,

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Goblin Leader Mask for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2275,1;//Items: Red Bandana,

+			delitem 911,100;//Items: Scell,

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Goblin Leader Mask^000000...! Please Take it!";

+			getitem 5090,1;//Items: Mask of The Goblin Leader,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_30:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Goblin Leader Mask requires~~";

+			next;

+			mes "[Blac]";

+			mes "1 Red Bandana";

+			mes "100 Scell";

+			mes "...Did you know this already?";

+			close;

+	L1_31:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(1038)<500) goto L_ITEM_31;//Items: Little Evil Horn,

+			if(countitem(7048)<80) goto L_ITEM_31;//Items: Talon of Griffon,

+			if(Zeny < 50000) goto L_ITEM_31;

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Horn of Succubus for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 1038,500;//Items: Little Evil Horn,

+			delitem 7048,80;//Items: Talon of Griffon,

+			set Zeny,Zeny-50000;

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Horn of Succubus^000000...! Please Take it!";

+			getitem 5066,1;//Items: Horns of Succubus,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_31:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Horn of Succubus requires~~";

+			next;

+			mes "[Blac]";

+			mes "500 Little Evil Horn";

+			mes "80 Talon of Gryphon";

+			mes "50,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_32:

+			mes "[Blac]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(1038)<500) goto L_ITEM_32;//Items: Little Evil Horn,

+			if(countitem(7048)<80) goto L_ITEM_32;//Items: Talon of Griffon,

+			if(Zeny < 50000) goto L_ITEM_32;

+			mes "[Blac]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Horn of Incubus for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 1038,500;//Items: Little Evil Horn,

+			delitem 7048,80;//Items: Talon of Griffon,

+			set Zeny,Zeny-50000;

+			mes "[Blac]";

+			mes "Tah Dah!!!^FF0000Horn of Incubus^000000...! Please Take it!";

+			getitem 5072,1;//Items: Horns Of Incubus,

+			next;

+			mes "[Blac]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_32:

+			mes "[Blac]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Blac]";

+			mes "Horn of Incubus requires~~";

+			next;

+			mes "[Blac]";

+			mes "500 Little Evil Horn";

+			mes "80 Talon of Gryphon";

+			mes "50,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+}

+

+prontera.gat,144,172,5	script 	Angel	811,{

+	mes "[Angel]";

+	mes "Hello.";

+	mes "Im the hottest angel in Midgard!";

+	mes "What can I do for you?";

+	next;

+	menu "Hat of Nun",L1_33,"Black Cat Ears",L1_34,"Ribbon of Red Tail",L1_35,"Helm of Orc Hero",L1_36;

+	L1_33:

+			mes "[Angel]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2261)<1) goto L_ITEM_33;//Items: Army Cap,

+			if(countitem(1550)<1) goto L_ITEM_33;//Items: Book,

+			if(countitem(2206)<1) goto L_ITEM_33;//Items: Wedding Veil,

+			if(countitem(7021)<2) goto L_ITEM_33;//Items: Foolishness of the Blind,

+			mes "[Angel]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Hat of Nun for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2261,1;//Items: Army Cap,

+			delitem 1550,1;//Items: Book,

+			delitem 2206,1;//Items: Wedding Veil,

+			delitem 7021,2;//Items: Foolishness of the Blind,

+			mes "[Angel]";

+			mes "Tah Dah!!!^FF0000Hat of Nun^000000...! Please Take it!";

+			getitem 5093,1;//Items: Nun Hat,

+			next;

+			mes "[Angel]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_33:

+			mes "[Angel]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Angel]";

+			mes "Hat of Nun requires~~";

+			next;

+			mes "[Angel]";

+			mes "1 Army Cap";

+			mes "1 Book";

+			mes "1 Wedding Veil";

+			mes "2 Foolishness of the Blind";

+			mes "...Did you know this already?";

+			close;

+	L1_34:

+			mes "[Angel]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2213)<1) goto L_ITEM_34;//Items: Kitty Band,

+			if(countitem(7063)<200) goto L_ITEM_34;//Items: Soft Feather,

+			if(countitem(983)<1) goto L_ITEM_34;//Items: Black Dyestuff,

+			if(Zeny < 10000) goto L_ITEM_34;

+			mes "[Angel]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Black Cat Ears for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2213,1;//Items: Kitty Band,

+			delitem 7063,200;//Items: Soft Feather,

+			delitem 983,1;//Items: Black Dyestuff,

+			set Zeny,Zeny-10000;

+			mes "[Angel]";

+			mes "Tah Dah!!!^FF0000Black Cat Ears^000000...! Please Take it!";

+			getitem 5057,1;//Items: Black Cat Ears,

+			next;

+			mes "[Angel]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_34:

+			mes "[Angel]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Angel]";

+			mes "Black Cat Ears require~~";

+			next;

+			mes "[Angel]";

+			mes "1 Kitty Band";

+			mes "200 Soft Feather";

+			mes "1 Black Dyestuffs";

+			mes "10,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+	L1_35:

+			mes "[Angel]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(2244)<1) goto L_ITEM_35;//Items: Big Ribbon,

+			if(countitem(2209)<1) goto L_ITEM_35;//Items: Ribbon,

+			if(countitem(10007)<1) goto L_ITEM_35;//Items: Silk Ribbon,

+			mes "[Angel]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Ribbon of Red Tail for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 2244,1;//Items: Big Ribbon,

+			delitem 2209,1;//Items: Ribbon,

+			delitem 10007,1;//Items: Silk Ribbon,

+			mes "[Angel]";

+			mes "Tah Dah!!!^FF0000Ribbon of Red Tail^000000...! Please Take it!";

+			getitem 5083,1;//Items: Back Ribbon,

+			next;

+			mes "[Angel]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_35:

+			mes "[Angel]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Angel]";

+			mes "Ribbon of Red Tail requires~~";

+			next;

+			mes "[Angel]";

+			mes "1 Big Ribbon";

+			mes "1 Slotted Ribbon";

+			mes "1 Silk Ribbon";

+			mes "...Did you know this already?";

+			close;

+	L1_36:

+			mes "[Angel]";

+			mes "Let me check the items you have brought here.";

+			next;

+			if(countitem(7069)<350) goto L_ITEM_36;//Items: Destroyed Armor,

+			if(countitem(5006)<1) goto L_ITEM_36;//Items: Machoman's Glasses,

+			if(countitem(2202)<1) goto L_ITEM_36;//Items: Sunglasses,

+			if(countitem(5047)<1) goto L_ITEM_36;//Items: Fashion Sunglasses,

+			if(countitem(2242)<1) goto L_ITEM_36;//Items: Purple Glasses,

+			if(countitem(7098)<100) goto L_ITEM_36;//Items: Fire Seed,

+			if(Zeny < 1000000) goto L_ITEM_36;

+			mes "[Angel]";

+			mes "Wow!! Well done! Finally you have gathered all items needed!";

+			mes "We will make the Helm of Orc Hero for you right away.";

+			mes "Please Wait a Moment.";

+   			next;

+			delitem 7069,350;//Items: Destroyed Armor,

+			delitem 5006,1;//Items: Machoman's Glasses,

+			delitem 2202,1;//Items: Sunglasses,

+			delitem 5047,1;//Items: Fashion Sunglasses,

+			delitem 2242,1;//Items: Purple Glasses,

+			delitem 7098,100;//Items: Fire Seed,

+			set Zeny,Zeny-1000000;

+			mes "[Angel]";

+			mes "Tah Dah!!!^FF0000Helm of Orc Hero^000000...! Please Take it!";

+			getitem 5094,1;//Items: Orc Hero Helm,

+			next;

+			mes "[Angel]";

+			mes "I liked that, I look forward to making more.";

+			mes "Thank you.";

+			close;

+		L_ITEM_36:

+			mes "[Angel]";

+			mes "Oh you already know what I create!";

+			mes "Ha ha!!";

+			mes "Hum~~ tell me where did you heard";

+			mes "about this?";

+			next;

+			mes "[Angel]";

+			mes "Helm of Orc Hero requires~~";

+			next;

+			mes "[Angel]";

+			mes "350 Broken Armor Piece";

+			mes "1 Machoman's Glasses";

+			mes "1 Slotted Sunglasses";

+			mes "1 Fashion Sunglasses";

+			mes "1 Purple Glasses";

+			mes "100 Fire Seed";

+			mes "1,000,000 Zeny";

+			mes "...Did you know this already?";

+			close;

+}

diff --git a/npc/quests/custom/sunglasses.txt b/npc/quests/custom/sunglasses.txt
new file mode 100644
index 000000000..0a33321a7
--- /dev/null
+++ b/npc/quests/custom/sunglasses.txt
@@ -0,0 +1,146 @@
+//===== eAthena Script =======================================

+//= Quest For Slotted Sunglasses

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

+//= Aegis - amichan

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

+//= 1.4

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

+//= Any eAthena Version;

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

+//= Quest to get Slotted Sunglasses

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

+//= 1.0 by Aegis

+//= 1.1 by aichan

+//= 1.2 by x[tsk]

+//= 1.3 by Darkchild

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

+

+// quest will reset it self after 1 pair of Slotted Sunglasses is made. 

+// 1st part of the quest

+

+alberta.gat,88,193,5	script	Sunglasses Trader	73,{

+	if(SG_QUEST1 == 1) goto L_SG_Q1_Done;

+	mes "[Sunglasses Trader]";

+	mes "Hello. What can I do for you?";

+	next;

+	menu "I heard that you can make ^0000FFSlotted Sunglasses^000000.",L_SG_Yes,"Nothing, sorry to bother you.",L_SG_No;

+L_SG_Yes:

+	mes "[Sunglasses Trader]";

+	mes "I do not make them, but I can tell you where to find the person who does. For a small fee...";

+	next;

+	menu "How much?",L_SG_1,"No way, I will find her, myself!",L_SG_No1;

+L_SG_No1:

+	mes "[Sunglasses Trader]";

+	mes "Suit yourself, the Maker will not make you ^0000FFSlotted Sunglasses^000000 unless she knows that you are coming.";

+	mes "Only I can tell her you are coming.";

+	next;

+	mes "[Sunglasses Trader]";

+	mes "Come back to me, when you have given up. Hahaha.";

+	close;

+L_SG_1:

+	mes "[Sunglasses Trader]";

+	mes "In order for me to tell you information on ^0000FFSlotted Sunglasses^000000 you need to get me: ";

+	mes "^0000881 Carat Diamond^000000, ";

+	mes "^00008850 Feathers^000000, ";

+	mes "and ^000088100000z^000000.";

+	next;

+	menu "Alright, here.",L_SG_1_Check,"That's too much!",L_SG_NO;

+L_SG_NO:

+	mes "[Sunglasses Trader]";

+	mes "Suit Yourself.";

+	close;

+L_SG_1_Check:

+	if (countitem(730) < 1) goto L_SG_Diamond;

+	if (countitem(949) < 50) goto L_SG_Feathers;

+	if (zeny<100000) goto L_SG_Funds;

+	delitem 730,1;

+	delitem 949,50;

+	set zeny,zeny-100000;

+	set SG_QUEST1,1;

+	mes "[Sunglasses Trader]";

+	mes "Great. Now, listen carefully.";

+	next;

+	mes "[Sunglasses Trader]";

+	mes "Look for someone name Maseph somewhere in the east of Morroc.";

+	mes "I will send her a message to let her know that you are coming.";

+	close;

+L_SG_Diamond:

+	mes "[Sunglasses Trader]";

+	mes "You do not have the ^0000881 Carat Diamond^000000. Come back to me when you do.";

+	close;

+L_SG_Feathers:

+	mes "[Sunglasses Trader]";

+	mes "You do not have ^00008850 Feathers^000000. Come back to me when you do.";

+	close;

+L_SG_Funds:

+	mes "[Sunglasses Trader]";

+	mes "You do not have ^000088100000z^000000. Come back to me when you do.";

+	close;

+L_SG_Q1_Done:

+	mes "[Sunglasses Trader]";

+	mes "There is nothing more I can tell you.";

+	next;

+	mes "[Sunglasses Trader]";

+	mes "Go see Maseph. She is somewhere east of Morroc.";

+	close;

+L_SG_No:

+	mes "[Sunglasses Trader]";

+	mes "Come back to me than you are ready.";

+	close;

+}

+ 

+// 2nd part of the quest

+

+moc_fild09.gat,209,128,5	script	Maseph	702,{

+	if(SG_QUEST1 == 1) goto L_SG_2;

+	mes "[Maseph]";

+	mes "Lovely Day, isn't it ?";

+	close;

+L_SG_2:

+	mes "[Maseph]";

+	mes "Hello there.";

+	next;

+	mes "[Maseph]";

+	mes "You came for the ^000088Slotted Sunglasses^000000, right?";

+	next;

+	menu "Yes",L_SG_2_Start,"No, sorry to bother you.",L_SG_2_No;

+L_SG_2_No:

+	mes "[Maseph]";

+	mes "Off you go, then.";

+	close;

+L_SG_2_Start:

+	mes "[Maseph]";

+	mes "To make one, I will need one pair of ^000088Sunglasses^000000 and 400000z.";

+	next;

+	menu "Here you go.",L_SG_Q2_Check,"No, thanks.",L_SG_2_StartNo;

+L_SG_2_StartNo:

+	mes "[Maseph]";

+	mes "As you wish.";

+	close;

+L_SG_Q2_Check:

+	if(countitem(2201) < 1) goto L_SG_Sunglasses;

+	if(zeny<400000) goto L_SG_Funds;

+	mes "[Maseph]";

+	mes "Thank you. I will get on it right away.";

+	next;

+	delitem 2201,1;

+	set zeny,zeny-400000;

+	mes "[Maseph]";

+	mes "Here you go my friend.";

+	getitem 2202,1;

+	next;

+	mes "[Maseph]";

+	mes "Enjoy your ^000088Slotted Sunglasses^000000.";

+// quest reset

+	set SG_QUEST1,0;

+	close;

+L_SG_Sunglasses:

+	mes "[Maseph]";

+	mes "I need one pair of ^000088Sunglasses^000000. Come back to me when you have one.";

+	close;

+L_SG_Funds:

+	mes "[Maseph]";

+	mes "You do not have enough money. Please come back to me when you do.";

+	close;

+}

+ 

diff --git a/npc/quests/custom/uneasy_cemetery.txt b/npc/quests/custom/uneasy_cemetery.txt
new file mode 100644
index 000000000..e8bf9cf86
--- /dev/null
+++ b/npc/quests/custom/uneasy_cemetery.txt
@@ -0,0 +1,135 @@
+//===== 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 resless cemetery,  we should pour all these grave with the Holy Water. But our sisters and broters are 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 "On 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 nedd " + $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 could 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;

+}
\ No newline at end of file
diff --git a/npc/quests/custom/valhallen.txt b/npc/quests/custom/valhallen.txt
new file mode 100644
index 000000000..6d6d4193d
--- /dev/null
+++ b/npc/quests/custom/valhallen.txt
@@ -0,0 +1,199 @@
+//===== eAthena Script ======================================= 

+//= Valhallen items Quests NPC

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

+//= Avaji

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

+//= 1.0

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

+//= eAthena 7.15 +

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

+//= All-in-one: Mjolnir,Sleipnir,Brisingamen,Gleipnir,Megingjard

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

+//= custom quest, ingridients were based on official RO FAQ

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

+

+prontera.gat,147,171,5	script	Lenneth	811,{

+	mes "[Lenneth]";

+	mes "I come from Valhalla to aid you.";

+	mes "I can transmute for you many of the Valhallen items.";

+	mes "Although they require many rare elements to make.";

+	next;

+	mes "[Lenneth]";

+	mes "What would you like?";

+	next;

+	menu "Mjolnir",-,"Sleipnir",L_SLE,"Brisingamen",L_BRI,"Gleipnir",L_GLE,"Megingjard",L_MEG;

+

+	mes "[Lenneth]";

+	mes "The ^3355FFMjolnir^000000 is a mighty mace with the power of wind.";

+	mes "The items I need to transmute 2 ^3355FFSpanners^000000 into a ^3355FFMjolnir^000000 are as follows:";

+	mes "20 ^3355FFOridecon^000000 5 ^3355FFElunium^000000 and 40 ^3355FFGold^000000";

+	mes "I also need the following essences:";

+	mes "2 ^3355FFThor's Guntlet^000000";

+	mes "4 ^3355FFIron Maiden^000000";

+	mes "5 ^3355FFWrath of Valkyrie^000000";

+	mes "5 ^3355FFBreath of Soul^000000";

+	mes "5 ^3355FFOmen of tempest^000000";

+	next;

+	mes "[Lenneth]";

+	mes "Do you desire the ^3355FFMjolnir^000000";

+	next;

+	menu "Yes",-,"No",L_OUT;

+

+	if (countitem(984) < 20 || countitem(985) < 5 || countitem(969) < 40 || countitem(1531) < 2 || countitem(7089) < 5) goto L_NOTENOUGH;

+	if (countitem(7074) < 2 || countitem(7075) < 4 || countitem(7078) < 5 || countitem(7087) < 5) goto L_NOTENOUGH;

+

+	delitem 984,20;

+	delitem 985,5;

+	delitem 969,40;

+	delitem 1531,2;

+	delitem 7074,2;

+	delitem 7075,4;

+	delitem 7078,5;

+	delitem 7087,5;

+	delitem 7089,5;

+

+	getitem 1530,1;

+

+	mes "[Lenneth]";

+	mes "Here is your ^3355FFMjolnir^000000 may it serve you well.";

+	close;

+L_SLE:

+

+	mes "[Lenneth]";

+	mes "The ^3355FFSleipnir^000000 are shoes that increase your maximum hp/sp";

+	mes "To be able to transmute 2 ^3355FFBoots^000000 into a ^3355FFSleipnir^000000 I will need:";

+	mes "1 ^3355FFOridecon^000000 10 ^3355FFElunium^000000 and 20 ^3355FFGold^000000";

+	mes "I also need the following essences:";

+	mes "3 ^3355FFWheel of the Unknown^000000";

+	mes "5 ^3355FFFeather of Angel^000000";

+	mes "3 ^3355FFSprirt of Fish^000000";

+	mes "3 ^3355FFEmblem of the Sun God^000000";

+	next;

+	mes "[Lenneth]";

+	mes "Do you desire the ^3355FFSleipnir^000000";

+	next;

+	menu "Yes",-,"No",L_OUT;

+

+	if (countitem(969) < 20 || countitem(985) < 10 || countitem(984) < 1 || countitem(2406) < 2 || countitem(7076) < 3) goto L_NOTENOUGH;

+	if (countitem(7079) < 5 || countitem(7083) < 3 || countitem(7086) < 3) goto L_NOTENOUGH;

+

+	delitem 969,20;

+	delitem 985,10;

+	delitem 984,1;

+	delitem 2406,2;

+	delitem 7076,3;

+	delitem 7079,5;

+	delitem 7083,3;

+	delitem 7086,3;

+

+	getitem 2410,1;

+

+	mes "[Lenneth]";

+	mes "Here is your ^3355FFSleipnir^000000 may they help you.";

+	close;

+L_BRI:

+

+	mes "[Lenneth]";

+	mes "The ^3355FFBrisingamen^000000 increases your str agi int and vit.";

+	mes "The items I need to transmute a ^3355FFNecklace^000000 into the ^3355FFBrisingamen^000000 are as follows:";

+	mes "2 ^3355FFSapphire^000000 3 ^3355FFPearl^000000 10 ^3355FFOpal^000000";

+	mes "5 ^3355FFRuby^000000 and 20 ^3355FFGold^000000";

+	mes "I also need the following essences:";

+	mes "4 ^3355FFFreya's Jewel^000000";

+	mes "4 ^3355FFSilver Ornament^000000";

+	mes "3 ^3355FFSnow Crystal^000000";

+	mes "3 ^3355FFQuiet Wave^000000";

+	mes "3 ^3355FFDrifting Air^000000";

+	next;

+	mes "[Lenneth]";

+	mes "Do you desire the ^3355FFBrisingamen^000000";

+	next;

+	menu "Yes",-,"No",L_OUT;

+

+	if (countitem(969) < 20 || countitem(723) < 5 || countitem(727) < 10 || countitem(722) < 3 || countitem(726) < 2) goto L_NOTENOUGH;

+	if (countitem(7090) < 3 || countitem(7088) < 3 || countitem(7077) < 4 || countitem(7073) < 4 || countitem(2603) < 1) goto L_NOTENOUGH;

+	if (countitem(7092) < 3) goto L_NOTENOUGH;

+

+	delitem 726,2;

+	delitem 722,3;

+	delitem 727,10;

+	delitem 723,5;

+	delitem 969,20;

+	delitem 2603,1;

+	delitem 7073,4;

+	delitem 7077,4;

+	delitem 7088,3;

+	delitem 7090,3;

+	delitem 7092,3;

+

+	getitem 2630,1;

+

+	mes "[Lenneth]";

+	mes "Here is your ^3355FFBrisingamen^000000 may it serve you well.";

+	close;

+L_GLE:

+

+	mes "[Lenneth]";

+	mes "The ^3355FFGleipnir^000000 is a light yet strong rope used to make the ^3355FFMegingjard^000000";

+	mes "I will need the following essences to transmute a ^3355FFGleipnir^000000:";

+	mes "4 ^3355FFTread of Cat^000000";

+	mes "5 ^3355FFWoman's Moustache^000000";

+	mes "4 ^3355FFStone Fragment^000000";

+	mes "3 ^3355FFSaliva of Bird^000000";

+	mes "3 ^3355FFSinew of Bear^000000";

+	next;

+	mes "[Lenneth]";

+	mes "Do you desire the ^3355FFGleipnir^000000";

+	next;

+	menu "Yes",-,"No",L_OUT;

+

+	if (countitem(7085) < 3 || countitem(7084) < 3 || countitem(7082) < 4 || countitem(7081) < 5 || countitem(7080) < 4) goto L_NOTENOUGH;

+

+	delitem 7080,4;

+	delitem 7081,5;

+	delitem 7082,4;

+	delitem 7084,3;

+	delitem 7085,3;

+

+	getitem 7058,1;

+

+	mes "[Lenneth]";

+	mes "Here is your ^3355FFGleipnir^000000.";

+	close;

+L_MEG:

+

+	mes "[Lenneth]";

+	mes "The ^3355FFMegingjard^000000 is a powerfull belt that greatly increases ones strength.";

+	mes "To transmute a ^3355FFBelt^000000 into a ^3355FFMegingjard^000000 I will need the following:";

+	mes "10 ^3355FFGold^000000 10 ^3355FFSapphire^000000";

+	mes "5 ^3355FFOridecon^000000 and 1 ^3355FFGleipnir^000000";

+	next;

+	mes "[Lenneth]";

+	mes "Do you desire the ^3355FFMegingjard^000000";

+	next;

+	menu "Yes",-,"No",L_OUT;

+

+	if (countitem(2627) < 1 || countitem(984) < 5 || countitem(726) < 10 || countitem(969) < 10 || countitem(7058) < 1) goto L_NOTENOUGH;

+

+	delitem 7058,1;

+	delitem 969,10;

+	delitem 726,10;

+	delitem 984,5;

+	delitem 2627,1;

+

+	getitem 2629,1;

+

+	mes "[Lenneth]";

+	mes "Here is your ^3355FFMegingjard^000000 may it serve you well.";

+	close;

+L_NOTENOUGH:

+	mes "[Lenneth]";

+	mes "You are lacking a few items, please return when you have them.";

+	close;

+L_OUT:

+	next;

+	mes "[Lenneth]";

+	mes "Please return when you change your mind.";

+	close;

+}

+

diff --git a/npc/quests/doomed_swords.txt b/npc/quests/doomed_swords.txt
new file mode 100644
index 000000000..83d533202
--- /dev/null
+++ b/npc/quests/doomed_swords.txt
@@ -0,0 +1,297 @@
+//===== eAthena Script ======================================= 

+//= Doomed Swords Quest

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

+//= kobra_k88

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

+//= 1.1 

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

+//= eAthena 7.15 +

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

+//= 

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

+//=95% done

+//= 1.1 Fixed items count check. For all 3 swords... [Lupus]

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

+

+

+

+

+

+// Executioner --------------------------------------------------------------------

+izlude_in.gat,173,88,2	script	Nain	102,

+{

+	if(DOOMED_SWORD == 1 ) goto L_1;

+

+	mes "[Nain]";

+	mes "I was once told a legend about a powerfull sword that was used only for executions.";

+	next;

+	mes "[Nain]";

+	mes "For years and years, this mighty sword was used to be-head heinous criminals, but it also took the lives of great warriors as well.";

+	mes "It is said that the overtime the government became corrupt and hence innocent lives fell victim to the sword.";

+	next;

+	mes "[Nain]";

+	mes "This caused the sword to become corrupted with an emense evil power making it almost impossible to weild.";

+	mes "Those who did try to weild it became possed with an dark aura that drove them to blood lust.";

+	next;

+	mes "[Nain]";

+	mes "This ancient civilization eventually collapsed and faded away.  The powerfull sword also vanished.";

+	mes "The sword would later be named the ^ff0000Executioner^000000.  An appropriate name considering its history.";

+	next;

+	mes "[Nain]";

+	mes "Recently there have been rumors of a Legendary Blacksmith that has the skill to re-create the lost sword.";

+	next;

+	mes "[Nain]";

+	mes "Just thinking about it sends shivers down my spine.";

+	mes "No matter how powerfull a sword it is, to think that it is possessed with thousands and thousands of angry ghosts...";

+	mes "I would rather see the Doomed sword stay lost to history.";

+	if(DOOMED_SWORD == 0 ) goto L_0;

+	close;

+

+L_0:

+	next;

+	mes"[Nain]";

+	mes "Say,.... are you really interested in this sword?";

+	next;

+	menu "Yes",M_Yes,"Not really",M_No;

+	

+	M_Yes:

+		set DOOMED_SWORD,1;

+		mes "[Nain]";

+		mes "You should speak with ^0000bbRupeto^000000 then.  He seems to know alot about the ^00aa00Legendary Blacksmith^000000.";

+		mes "You can find him inside the Pub.  With his help you may even be able to track down the Legendary Blacksmith.  Good luck.";

+		close;

+	

+	M_No:

+		mes "[Nain]";

+		mes "Oh, I see.";

+		close;

+

+L_1:

+	mes "[Nain]";

+	mes "Wow! So you're gonna try to re-create the legendary, doomed sword Executioner? You should becarefull though, that's one powerfull sword.";

+	close;

+}

+

+// Grimtooth ------------------------------------------------------------------------

+morocc.gat,281,178,8	script	Cetsu	97,

+{

+	if(DOOMED_SWORD ==2 ) goto L_1;

+

+	mes "[Cetsu]";

+	mes "It is rumored that there was once a dagger made out of the tooth of an ogre.  This made the dagger much stronger than those made out of steel.";

+	mes "It became known as the ^ff0000Grimtooth^000000.  What made the Grimtooth truly special was the fact that it was enchanted with a magic spell.";

+	next;

+	mes "[Cetsu]";

+	mes "Many have tried to re-create the Grimtooth but have faild.  Only one blacksmith, who once lived in Prontera, knows how to do this.";

+	next;

+	mes "[Cetsu]";

+	mes "Unfortunalety he left Prontera long ago and has not been seen since...";

+	if(DOOMED_SWORD ==0 ) goto L_0;

+	close;

+

+L_0:

+	next;

+	mes"[Cetsu]";

+	mes "Say,.... are you really interested in this dagger?";

+	next;

+	menu "Yes",M_Yes,"Not really",M_No;

+	

+	M_Yes:

+		set DOOMED_SWORD,2;

+		mes "[Cetsu]";

+		mes "You should speak with ^0000bbRupeto^000000 then.  He seems to know alot about the ^00aa00Legendary Blacksmith^000000.";

+		mes "You can find him inside the Pub.  With his help you may even be able to track down the Legendary Blacksmith.  Good luck.";

+		close;

+	

+	M_No:

+		mes "[Cetsu]";

+		mes "Oh, I see.";

+		close;

+

+L_1:

+	mes "[Cetsu]";

+	mes "Wow! So you're gonna try to re-create the legendary, doomed dagger Grimtooth? You should becarefull though, that's one powerfull dagger.";

+	close;

+}

+

+// Mysteltain ----------------------------------------------------------------

+prontera.gat,197,188,4	script	Veeyop	50,

+{

+	if(DOOMED_SWORD ==3 ) goto L_1;

+

+	mes "[Veeyop]";

+	mes "Have you ever heard of a doomed sword, ^ff0000Mysteltain^000000? It's named after ^0000bba legendary Young Twig^000000 that was used to murder Balder, the God of Light...";

+	mes "According to the legend, it was a weak, little twig. Other than that I know nothing more of the sword.";

+	next;

+	mes "[Veeyop]";

+	mes "Whatever the legend may be, people say there is a way to re-construct the legendary sword.";

+	mes "I've heard that there was once a Blacksmith who had the knowledge to re-create the legendary sword living in Prontera.";

+	mes "Unfortunately he's disapeared from this town.  Anywho its just heresay.";

+	if(DOOMED_SWORD ==0 ) goto L_0;

+	close;

+

+L_0:

+	next;

+	mes"[Veeyop]";

+	mes "Say,.... are you really interested in this sword?";

+	next;

+	menu "Yes",M_Yes,"Not really",M_No;

+	

+	M_Yes:

+		set DOOMED_SWORD,3;

+		mes "[Veeyop]";

+		mes "You should speak with ^0000bbRupeto^000000 then.  He seems to know alot about the ^00aa00Legendary Blacksmith^000000.";

+		mes "You can find him inside the Pub.  With his help you may even be able to track down the Legendary Blacksmith.  Good luck.";

+		close;

+	

+	M_No:

+		mes "[Veeyop]";

+		mes "Oh, I see.";

+		close;

+

+L_1:

+	mes "[Veeyop]";

+	mes "Wow! So you're gonna try to re-create the legendary, doomed sword Mysteltain? You should becarefull though, that's one powerfull sword.";

+	close;

+}

+

+// Rupeto ---------------------------------------------------------

+prt_in.gat,169,16,3	script	Rupeto	86,

+{

+	if(DOOMED_SWORD > 0) goto L_0;

+	mes "[Rupeto]";

+	mes "Hello.";

+	close;

+

+L_0:

+	mes "[Rupeto]";

+	mes "Looking for the Legendary Blacksmith? Go to the payon field just east of the town of Payon.";

+	mes "I think its payon field 8 or 9.";

+	close;

+}

+

+// Legendary Blacksmith ----------------------------------------------

+pay_fild08.gat,217,273,4	script	Legendary Blacksmith	63,

+{

+

+if(DOOMED_SWORD == 1) goto L_Executioner;

+if(DOOMED_SWORD == 2) goto L_Grimtooth;

+if(DOOMED_SWORD == 3) goto L_Mysteltain;

+

+mes "[Legendary Blacksmith]";

+mes "I wonder what's going on in ^ff0000Prontera^000000?  It's been so long since I've been there.";

+close;

+

+L_Executioner:	//1169

+	if(countitem(7017)>=2 && countitem(7024)>=10 && countitem(1008)>=3 && countitem(609)>=50 && countitem(714)>=1) goto L_GetExec;

+	mes "[Legendary Blacksmith]";

+	mes "So you're interested in making the legendary Executioner Sword heh?.....";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "It's been sometime since I've forged any weapons,... but since it is a special challenge for me to make this sword.....";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "I'll do it! I will re-create the Executioner Sword! I must warn you however, this is a very powerfull and dangerous sword.  Be carefull.";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "For the Executioner Sword I will need the following items:";

+	mes "- ^0000ff2 Executioners Mitten^000000";		//7017

+	mes "- ^0000ff10 Bloody Edge^000000";		//7024

+	mes "- ^0000ff3 Necklace of Oblivion^000000";		//1008

+	mes "- ^0000ff50 Amulet^000000";			//609

+	mes "- and ^0000ff1 Emperium^000000";		//714

+	close;

+

+	L_GetExec:

+		mes "[Legendary Blacksmith]";

+		mes "Good! You have brought me all the necessary items.  Please wait a moment while I forge the Executioner Sword.";

+		next;

+		mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";

+		next;

+		mes "[Legendary Blacksmith]";

+		mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy.";

+		getitem 1169,1;

+		set DOOMED_SWORD,0;

+		delitem 7017,2;

+		delitem 7024,10;

+		delitem 1008,3;

+		delitem 609,50;

+		delitem 714,1;

+		close;

+

+

+L_Grimtooth:	//1237

+	if(countitem(7023)>=10 && countitem(724)>=5 && countitem(7002)>=100 && countitem(7022)>=1 && countitem(714)>=1) goto L_GetGrim;

+	mes "[Legendary Blacksmith]";

+	mes "So you're interested in making the legendary Grimtooth Dagger heh?.....";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "It's been sometime since I've forged any weapons,... but since it is a special challenge for me to make this dagger.....";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "I'll do it! I will re-create the Grimtooth Dagger! I must warn you however, this is a very powerfull and dangerous dagger.  Be carefull.";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "For the Grimtooth Dagger I will need the following items:";

+	mes "- ^0000ff10 Blade Lost in Darkness^000000";		//7023

+	mes "- ^0000ff5 Cursed Ruby^000000";			//724

+	mes "- ^0000ff100 Ogre Tooth^000000";			//7002

+	mes "- ^0000ff1 Old Hilt^000000";				//7022

+	mes "- and ^0000ff1 Emperium^000000";

+	close;

+

+	L_GetGrim:

+		mes "[Legendary Blacksmith]";

+		mes "Good! You have brought me all the necessary items.  Please wait a moment while I forge the Grimtooth Dagger.";

+		next;

+		mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";

+		next;

+		mes "[Legendary Blacksmith]";

+		mes "Phew! Once again a perfect dagger! Hahaha! Here you are my friend, enjoy.";

+		getitem 1237,1;

+		set DOOMED_SWORD,0;

+		delitem 7023,10;

+		delitem 724,5;

+		delitem 7002,100;

+		delitem 7022,1;

+		delitem 714,1;

+		close;

+

+L_Mysteltain:	//1138

+	if(countitem(7021)>=1 && countitem(7019)>=1 && countitem(7020)>=1 && countitem(7018)>=1 && countitem(714)>=1) goto L_GetMyst;

+	mes "[Legendary Blacksmith]";

+	mes "So you're interested in making the legendary Mysteltain Sword heh?.....";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "It's been sometime since I've forged any weapons,... but since it is a special challenge for me to make this sword.....";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "I'll do it! I will re-create the Mysteltain Sword! I must warn you however, this is a very powerfull and dangerous sword.  Be carefull.";

+	next;

+	mes "[Legendary Blacksmith]";

+	mes "For the Mysteltain Sword I will need the following items:";

+	mes "- ^0000ff1 Foolishness of the Blind^000000";		//7021

+	mes "- ^0000ff1 Loki's Whispers^000000";			//7019

+	mes "- ^0000ff1 Mother's Nightmare^000000";			//7020

+	mes "- ^0000ff1 Young Twig^000000";			//7018

+	mes "- and ^0000ff1 Emperium^000000";

+	close;

+	

+	L_GetMyst:

+		mes "[Legendary Blacksmith]";

+		mes "Good! You have brought me all the necessary items.  Please wait a moment while I forge the Mysteltain Sword.";

+		next;

+		mes "(cling-clang!~ klonk!~ klank!~ cling-clang!)";

+		next;

+		mes "[Legendary Blacksmith]";

+		mes "Phew! Once again a perfect sword! Hahaha! Here you are my friend, enjoy.";

+		getitem 1138,1;

+		set DOOMED_SWORD,0;

+		delitem 7021,1;

+		delitem 7019,1;

+		delitem 7020,1;

+		delitem 7018,1;

+		delitem 714,1;

+		close;

+

+}

diff --git a/npc/quests/fashion.txt b/npc/quests/fashion.txt
new file mode 100644
index 000000000..e14d35faa
--- /dev/null
+++ b/npc/quests/fashion.txt
@@ -0,0 +1,70 @@
+//--------------Daily Job Quest---------------\\ 

+

+izlude.gat,135,96,5	script	Fashion Glasses Quest	76,{

+	mes "[Fashionable Glasses Quest]"; 

+	mes "Hi, today's quest is...."; 

+	mes "Ah, the ^CC6633Fashionable Glasses ^000000Quest!"; 

+	next; 

+	menu "Requirements",Bl,"Make Item",B2,"Cancel",Cancel; 

+

+	B2: 

+	mes "[Fashionable Glasses Quest]";

+	mes "Good good, let me just check"; 

+	if(countitem(2276)<1)goto NoMake;

+	if(countitem(716)<20)goto NoMake;

+	if (countitem(1003)<25) goto NoMake; 

+	next;

+

+	mes "[Fashionable Glasses Quest]";

+	mes "Give me a second.....";

+

+	delitem 2276,1;

+	delitem 716,20;

+	delitem 1003,25;

+

+	getitem 5047,1;

+

+	mes "[Fashionable Glasses Quest]";

+	mes "Ok done!";

+	close;

+

+

+	NoMake:

+	mes "[Fashionable Glasses Quest]";

+	mes "You don't have the requirements.";

+	mes "Please come back another time...";

+	close;

+

+	Bl: 

+	mes "Ok all you have to do is";

+	mes "collect-"; 

+	mes "^CC66331 Eagle Eyes^000000"; 

+	mes "^CC663320 Red Gemstones^000000"; 

+	mes "and ^CC663325 Coal^000000";

+	next;

+

+	menu "Accept",Acc,"Leave",Leave;

+

+	Acc:

+	mes "When you are done, bring the items to me,";

+	mes "Ok good luck finding those items.";

+	Close;

+

+	Leave:

+	mes "[Fashionable Glasses Quest]";

+	mes "Maybe another time?";

+	Close;

+

+	Cancel:

+	mes "[Fashionable Glasses Quest]";

+	mes "Aw, what a shame";

+	mes "Giving up already?";

+	mes "Oh well maybe you will";

+	mes "participate in tommorow's";

+	mes "quest.";

+Close;

+}

+

+

+

+

diff --git a/npc/quests/juice_maker.txt b/npc/quests/juice_maker.txt
new file mode 100644
index 000000000..877622c56
--- /dev/null
+++ b/npc/quests/juice_maker.txt
@@ -0,0 +1,308 @@
+//===== eAthena Script ======================================= 

+//= Juice Maker Quest

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

+//= kobra_k88

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

+//= 1.3

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

+//= eAthena 7.15 +

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

+//= 

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

+//= Fully working

+//= 1.1 fixed input number check [Lupus]

+//= 1.2 fixed misplaced Grape<->Carrot juices [Lupus]

+//= 1.3 added a loopless menu 'as many as possible' [Lupus]

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

+

+

+

+

+// Morrison ------------------------------------------------

+prt_in.gat,47,173,2	script	Morrison	97,

+{

+	if(MEAT > 10) goto L_Candy;

+	if(MARIANNE == 10) goto L_GoAway;

+

+	mes "[Little Morrison]";

+	mes "Wahhhhh!!! Wahh... NO more! NO more!";

+	mes "I won't... eat anymore stupid ^0000ffFruit^000000 things!!";

+	next;

+	menu "Talk",M_Talk,"Cancel",M_End;

+

+	M_Talk:

+		if(countitem(517) > 0) goto L_Meat; //Meat

+

+		mes "[Little Morrison]";

+		mes "Arhhggg!! I'VE HAD ENOUGH!!! I can't eat anymore ^0000ffFruits^000000!";

+		mes "They taste so SOUR..... I have to PEEL them before I can eat them.....they feel sticky and squishy...... it's really ANNOYING!!!!";

+		next;

+		mes "[LIttle Morrison]";

+		mes "I just HATE FRUIT! I can't even get full off of the stuff.(~sigh~)";

+		mes "Give me something more edible..... give me some...... ^ff0000MEAT^000000!!!";

+		close;

+

+		L_Meat:

+		mes "[Little Morrison]";

+		mes "...(sniff)....(sniff)(sniff).... Oh! Is that ^ff0000Meat^000000???";

+		next;

+		mes "[Little Morrison]";

+		mes "Do you have some ^ff0000Meat^000000?!!!~(drools)~";

+		mes "Umm... that yummy smell is making me SOOO HUNGRYYYY!!!l";

+		next;

+		mes "[Little Morrison]";

+		mes "... Umm... excuse me..... could you give me some of that meat PLEEAASSSE?";

+		next;

+		menu "Give him some",sM_Give,"Ignore him",sM_Ignore;

+		

+		sM_Give:

+			set MORRISON,1;

+			set MEAT,MEAT + 1;

+			delitem 517,1;	//Meat

+

+			mes "[Little Morrison]";

+			mes "Whoah~!!! It's real Meat, Meat!";

+			mes "Mmmm! It makes my mouth water.";

+			mes "Oh thank you. Now I feel happy. Yum Yum...";

+			close;

+		sM_Ignore:

+			set MORRISON,2;

+

+			mes "[Little Morrison]";

+			mes "Boo...";

+			mes "Boo... Fine... Alright, Alright~!!! Selfish meanie!";

+			close;

+	M_End:

+		mes "[Little Morrison]";

+		mes "Wahhhhh!!! No matter how hard I try, I just can't eat Vegetables or ^0000ffFruit^000000! They're plain disgusting!!";

+		close;

+

+L_GoAway:

+	mes "[Little Morrison]";

+	mes "Pffff... Leave me alone! You DON'T CARE about me! I'm gonna DIE because of these stupid Veggies and Fuits so MIND your own business!";

+	close;

+L_Candy:

+	mes "[Little Morrison]";

+	mes "Ah..I am full now.";

+	mes "You don't have to feed me any more. I think I am gonna BURST if i keep eating more.";

+	next;

+	mes "[Little Morrison]";

+	mes "And... um... Take this.";

+	next;

+	getitem 529,3;

+	getitem 530,1;

+	set MEAT,0;

+

+	mes "[Little Morrison]";

+	mes "It is from my secret stash of Candy that I hide from my Mom.  Since you gave me some Meat, I will give you some candy." ;

+	close;

+

+}

+

+// Housewife Marianne ---------------------------------------------------

+prt_in.gat,49,172,2	script	Housewife Marianne	53,

+{

+	if(MORRISON == 1) goto L_GaveMeat;

+	if(MORRISON == 2) goto L_Juice;

+

+	mes "[Housewife Marianne]";

+	mes "Morrison!! Please eat some fruit will ya? Fruit~!";

+	mes "*Sob*~!! Like father like son...";

+	next;

+	menu "Talk",M_Talk,"Cancel",M_Cancel;

+	close;	

+

+	M_Talk:

+		mes "[Housewife Marianne]";

+		mes "(~Sigh~)...This is Morrison... My one and only son.";

+		mes "He's going through some kinda faze and doesn't want to eat any ^0000ffFruits^000000 or vegetables.  Look at his face, it turns sour just hearing about ^0000fffFruit^000000...";

+		next;

+		mes "[Housewife Marianne]";

+		mes "All he wants to eat is but ^ff0000Meat^000000... (sigh)...he needs ^0000ffFruits^000000 and vegetables for a proper diet.";

+		next;

+		close;

+

+	M_Cancel:

+		mes "[Housewife Marianne]";

+		mes "Morrison!! I will get mad at you if you keep doing this!";

+		close;

+	

+L_GaveMeat:

+	set MORRISON,0;

+

+	mes "[Housewife Marianne]";

+	mes "Oh MY GOD!!... Oh lord...";

+	next;

+	mes "[Housewife Marianne]";

+	mes "WHAT ARE YOU DOING!! HOW DARE YOU feed my son!! And ^ff0000MEAT^000000 of all things!!!";

+	next;

+	mes "[Housewife Marianne]";

+	mes "Arrrgh~~!! Get Lost right now!!!!!!";

+	close;

+

+L_Juice:

+	set MORRISON,0;

+	set MARIANNE,1;

+

+	mes "[Housewife Marianne]";

+	mes "Thank you for not giving my son any meat.  I'm trying to feed him ^0000ffFruits^000000 and vegetables, but this child doesn't want to eat anything except Meat...";

+	next;

+	mes "[Housewife Marianne]";

+	mes "What if I could turn ^0000ffFruits^000000 into a ^0000ffJuice^000000... for example...Orange juice... Would my child like it?";

+	next;

+	mes "[Housewife Marianne]";

+	mes "Ah! Now I remember..There is a town where you can get a variety of ^0000ffFruit^000000 turned into ^0000ffFruit Juices^000000.";

+	next;

+	mes "[Housewife Marianne]";

+	mes "... Was is it...^ff0000Payon^000000...or ^ff0000Morroc^000000...?";

+	next;

+	close;

+

+}

+

+// Juicer Marx Hansen -----------------------------------------------------------------------

+payon_in01.gat,5,48,3	script	Juicer Marx Hansen	86,

+{

+	mes "[Juicer Marx Hansen]";

+	if(MARIANNE == 1) goto L_Juice;

+	mes "Welcome to my shop. What brings you here?";

+	next;

+	menu "Conversation",M_0a,"I am just looking around",M_0b;

+		

+	M_0a:

+		mes "[Juicer Marx Hansen]";

+		mes "In the earliest years of humanity, fruits were the only substanace availble for people to eat.";

+		mes "Fruits were vital for survival and without them people faced certain death.";

+		mes "During that time Mother Nature was worshiped for her generous offerering.";

+		next;

+		mes "[Juicer Marx Hansen]";

+		mes "Nowadays food is plentifull and it comes in a variety of flavors and forms.";

+		mes "With so many other things to eat, fruits aren't consumed as much as they used to be.";

+		mes "This is especially true among kids who'd rather eat pizza and candy.";

+		next;

+		mes "[Juicer Marx Hansen]";

+		mes "Because of this I wanted to find a way to make young people realize the importance of fuit.";

+		mes "I found that when fruits were turned into juices, they became more digestive and even tasty enough for kids.";

+		close;

+	M_0b:

+		mes "[Juicer Marx Hansen]";

+		mes "Ok then.";

+		close;

+

+L_Juice:

+	mes "Welcome to my shop. Do you come here to process Fruits like the rest?";

+	next;

+

+	menu "Yes, I do.",M_1a,"How do you make fruit juice?",M_1b,"No, I don't.",M_1End;

+		

+	M_1a:

+		mes "[Juicer Marx Hansen]";

+		mes "So what kind of fruit juice would you like to process?";

+		next;

+		menu "Apple Juice",sM_1a,"Banana Juice",sM_1b,"Grape Juice",sM_1c,"Carrot Juice",sM_1d,"Nope, I'm fine.",sM_1End;

+

+		sM_1a:

+			set @FRUIT,512;

+			set @JUICE,531;

+			goto sL_Make;

+		sM_1b:

+			set @FRUIT,513;

+			set @JUICE,532;

+			goto sL_Make;

+		sM_1c:

+			set @FRUIT,514;

+			set @JUICE,533;

+			goto sL_Make;

+		sM_1d:

+			set @FRUIT,515;

+			set @JUICE,534;

+

+		sL_Make:

+			mes "[Juicer Marx Hansen]";

+			mes "How many bottles would you like?";

+			next;

+			menu "I'll tell you.",sL_Make_InputN, "As many as possible",-, "I've changed my mind.",sM_1End;

+

+			set @FRUITNUM,100;		//max possible amount of Juice

+			//calc max possible # juices

+			if(Zeny/3 < @FRUITNUM) set @FRUITNUM,Zeny/3;

+			if(countitem(@FRUIT) < @FRUITNUM) set @FRUITNUM,countitem(@FRUIT);

+			if(countitem(713) < @FRUITNUM) set @FRUITNUM,countitem(713);

+			if(@FRUITNUM > 0) goto sL_Make_Max;

+			mes "[Juicer Marx Hansen]";

+			mes "Doh! You don't have enough ingredients for a single bottle of juice.";

+			emotion 0;

+			close;

+

+		sL_Make_Max:

+			delitem @FRUIT,@FRUITNUM;	//del Fruit

+			delitem 713,@FRUITNUM;		//del Empty Bottle

+			set Zeny,Zeny-@FRUITNUM*3;

+			getitem @JUICE,@FRUITNUM;	//get Juice

+			goto sL_Make_Got;

+

+		sL_Make_InputN:

+			mes "[Juicer Marx Hansen]";

+			mes "Very well then.  How many bottles would you like?";

+			mes "Enter 0 if you don't want any.";

+			next;

+			input @input;

+

+			if(@input < 1) goto sM_1End;

+			set @FRUITNUM,(3*@input);

+			set @ZENYNUM,(3*@input);

+			if(countitem(@FRUIT) < @FRUITNUM) goto sl_Fruits;

+			if(countitem(713) <  @input) goto sl_Bottles;

+			if(Zeny <  @ZENYNUM) goto sl_Zeny;

+

+			delitem @FRUIT,@FRUITNUM;	//del Fruit

+			delitem 713,@input;		//del Empty Bottle

+			set Zeny,Zeny - @ZENYUM;	//get Juice

+			getitem @JUICE,@input;

+		sL_Make_Got:

+			mes "[Juicer Marx Hansen]";

+			mes "Here you are. Take it.";

+			close;

+

+

+			sl_Fruits:

+				mes "[Juicer Marx Hansen]";

+				mes "You don't have enough fruit.";

+				if (@FRUIT == 512) mes "You need "+@FRUITNUM+" apples to make that much apple juice.";

+				if (@FRUIT == 513) mes "You need "+@FRUITNUM+" bannanas to make that much bannana juice.";

+				if (@FRUIT == 514) mes "You need "+@FRUITNUM+" grapes to make that much grape juice.";

+				if (@FRUIT == 515) mes "You need "+@FRUITNUM+" carrots to make that much carrot juice.";

+				next;

+				goto M_1a;

+				close;

+

+			sl_Bottles:

+				mes "[Juicer Marx Hansen]";

+				mes "You don't have enough bottles.  You need "+@input+" empty bottle(s) to make that many juice drinks.";

+				next;

+				goto M_1a;

+

+			sl_Zeny:

+				mes "[Juicer Marx Hansen]";

+				mes "You don't have enough zeny.  You need "+@ZENYNUM+" zeny, to make that many juice drinks.";

+				next;

+				goto M_1a;

+

+		sM_1End:

+			mes "[Juicer Marx Hansen]";

+			mes "Oh well... see you next time.";

+			close;

+

+	M_1b:

+		mes "[Juicer Marx Hansen]";

+		mes "# Fruit Juice Info #";

+		mes "Apple Juice - Apple x 3 ea, Empty Bottle x 1 ea, 3 zeny.";

+		mes "Banane Juice - Banana x 3 ea, Empty Bottle x 1 ea, 3 zeny.";

+		mes "Carrot Juice - Carrot x 3 ea, Empty Bottle x 1 ea, 3 zeny.";

+		mes "Grape Juice - Grape x 3 ea, Empty Bottle x 1 ea, 3 zeny.";

+		close;

+

+	M_1End:

+		close;

+}

+

diff --git a/npc/quests/magicalhatquest.txt b/npc/quests/magicalhatquest.txt
new file mode 100644
index 000000000..86bb6dfbe
--- /dev/null
+++ b/npc/quests/magicalhatquest.txt
@@ -0,0 +1,40 @@
+geffen.gat,126,107,5	script	Magic Pimp Hat Dude	51,{

+	mes "[Magic Pimp Hat Dude]";

+	mes "Huh! What do you want?";

+        mes "Ohh, I see, you want me to make you something";

+	mes "Well if you want this Magican Hat here is a list of the items I need you to go out and get them for me:";

+        mes "1 Wizard Hat";

+        mes "1 Bathory Card";

+        mes "and 200,000z for my efforts"; 

+	next;

+	mes "[Magic Pimp Hat Dude]";

+	mes ". . . . . .";

+	mes "Are you ready for me to make this magical item?";

+	next;

+	menu "Sure am!",LSureAm,"These requirements are unfathomable!",LUnfathomable;

+

+	LSureAm:

+		mes "[Magic Pimp Hat Dude]";

+		if((countitem(2252) < 1) || (countitem(4119) < 1) || (Zeny < 200000)) goto LNotEnough;

+		mes ". . . . .";

+		delitem 2252,1;

+		delitem 4119,1;

+		set Zeny,Zeny-200000;

+		mes "Wow!  You are brave indeed!";

+		getitem 5045,1;

+		mes ". . . . .";

+		mes "Enjoy your Magical Hat!";

+		close;

+

+		LNotEnough:

+			mes ". . . . .";

+			mes ". . .I'm sorry .. You don't have enough money and items ..";

+			mes "I can't afford to make this if you don't bring all materials needed.  Please understand this is to benefit heroes such as yourself!";

+			close;

+

+	LUnfathomable:

+		mes ". . . . .";

+		mes "What I had to go through was more unfathomable..";

+		mes "If you succeed in getting these items, you will have incredible strength!";

+		close;

+}

diff --git a/npc/quests/monstertamers.txt b/npc/quests/monstertamers.txt
new file mode 100644
index 000000000..e4de4498f
--- /dev/null
+++ b/npc/quests/monstertamers.txt
@@ -0,0 +1,443 @@
+//===== eAthena Script =======================================

+//= Monster Tamers

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

+//= kobra_k88, Darkchild, x[tsk]

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

+//= 1.0

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

+//= eAthena 1.0

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

+//= Cute pet quest items

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

+//= May not have all of the Monster Tamers, but the ones here are fully working.

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

+

+

+

+

+//<================================================= Alberta ===============================================>\\

+alberta_in.gat,173,77,3	script	Monster Tamer	125,

+{

+	mes "[Monster Tamer Iwado]";

+	mes "Monster taming has never been more popular than it is now! Why not join in on all of the excitement?....";

+M_Menu:

+	next;

+	menu 	"^5555FFMonster Taming^000000",M_0,

+		"^5555FF'Monster Juice'^000000",M_1,

+		"^5555FF'Singing Flower'^000000",M_2,

+		"^5555FF'Wild Flower'^000000",M_3,

+		"Please make one for me",M_Make,

+		"Cancel",M_End;

+	M_0:

+		mes "[Monster Tamer Iwado]";

+		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";

+		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "Here the Taming Items that I offer:";

+		mes "^5555FF'Monster Juice'^000000";

+		mes "^5555FF'Singing Flower'^000000";

+		mes "^5555FF'Wild Flower'^000000";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "These are fantastic items! You should really give them a try!";

+		goto M_Menu;

+	M_1:

+		mes "[Monster Tamer Iwado]";

+		mes "It is a drink made from animal blood.  It's nothing a person would want to drink, but for the monster '^FF5555'Hunter Fly'^000000, it's a delicacy.";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "I can give you a ^5555FF'Monster Juice'^000000 in exchange for:";

+		mes "-^FF5555'1 Animal Gore'";

+		mes "-'2 Apples'^000000";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_2:

+		mes "[Monster Tamer Iwado]";

+		mes "The flower of a Singing Plant.  It is a very unique and unusual item that seems to attract ^FF5555'Rockers'^000000.";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "I can give you a ^5555FF'Singing Flower'^000000 in exchange for:";

+		mes "-^FF5555'1 Singing Plant'^000000";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_3:

+		mes "[Monster Tamer Iwado]";

+		mes "This flower blooms naturally here in Rune-Midgard.  It can be used as armor for your ^FF5555Orc Warrior^000000 pet.";

+		mes "I can give you a ^5555FF'Wild Flower'^000000 in exchange for:";

+		mes "-^FF5555'1 Fancy Flower'";

+		mes "-'1 Clover'^000000";

+		next;

+		mes "[Monster Tamer Iwado]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_Make:

+		mes "[Monster Tamer Iwado]";

+		mes "Which Taming Item would you like?";

+		next;

+		menu "^5555FF'Monster Juice'^000000",sM_1, "^5555FF'Singing Flower'^000000",sM_2, "^5555FF'Wild Flower'^000000",sM_3, "Cancel",M_End;

+

+		sM_1:

+			if(countitem(702)<1 || countitem(512)<2) goto sL_NoItems;

+			mes "[Monster Tamer Iwado]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer Iwado]";

+			mes "Here you are! A Monster Juice! Enjoy and feel free to come back anytime.";

+			getitem 626,1;

+			delitem 702,1;

+			delitem 512,2;

+			close;

+		sM_2:

+			if(countitem(707)<1) goto sL_NoItems;

+			mes "[Monster Tamer Iwado]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer Iwado]";

+			mes "Here you are! A Singing Flower! Enjoy and feel free to come back anytime.";

+			getitem 629,1;

+			delitem 707,1;

+			close;

+		sM_3:

+			if(countitem(2207)<1 || countitem(705)<1) goto sL_NoItems;

+			mes "[Monster Tamer Iwado]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer Iwado]";

+			mes "Here you are! A Wild Flower! Enjoy and feel free to come back anytime.";

+			getitem 10009,1;

+			delitem 2207,1;

+			delitem 705,1;

+			close;

+

+			sL_NoItems:

+				mes "[Monster Tamer Iwado]";

+				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";

+				close;

+	M_End:

+		mes "[Monster Tamer Iwado]";

+		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";

+		close;

+

+}

+

+

+//<================================================= Al De Baran ===============================================>\\

+aldeba_in.gat,167,177,3	script	Monster Tamer	125,

+{

+	mes "[Monster Tamer YuU]";

+	mes "You must be looking for some Taming Items.... When it comes to making Taming Items there is no one better than me here in Rune Midgard.";

+M_Menu:

+	next;

+	menu 	"^5555FF'Monster Taming'^000000",M_0,

+		"^5555FF'Skull Helm'^000000",M_1,

+		"^5555FF'Monster Oxygen Mask'^000000",M_2,

+		"^5555FF'Silk Ribbon'^000000",M_3,

+		"^5555FF'Stellar Hairpin'^000000",M_4,

+		"^5555FF'Tiny Egg Shell'^000000",M_5,

+		"^5555FF'Rocker Glasses'^000000",M_6,

+		"Please make one for me",M_Make,

+		"Cancel",M_End;

+	M_0:

+		mes "[Monster Tamer YuU]";

+		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";

+		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Once you obtain a pet, you must show it love and appreciation.  This is the most important part of monster taming.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "The best way to show your new pet you care, is to get it an 'Accessory' to make it stand out from the rest of the monsters in Rune Midgard.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "These ^5555FF'Cute Pet Accessories'^000000 are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Here the Taming Items that I offer:";

+		mes "^5555FF'Skull Helm'";

+		mes "'Monster Oxygen Mask'";

+		mes "'Silk Ribbon'";

+		mes "'Stellar Hairpin'";

+		mes "'Tiny Egg Shell'";

+		mes "'Rocker Glasses'^000000";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "These are fantastic items! You should really give them a try!";

+		goto M_Menu;

+	M_1:

+		mes "[Monster Tamer YuU]";

+		mes "It may be disgusting, but it has a mysterious power that has the potential to make its wearer go crazy!";

+		mes "This item will look great on your '^FF5555'Baphomet Jr.'^000000 pet.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "I can give you a ^5555FF'Skull Helm'^000000 in exchange for:";

+		mes "-^FF5555'1 Bone Helm'^000000";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_2:

+		mes "[Monster Tamer YuU]";

+		mes "Once worn it makes it difficult to tell whether or not the wearer is a monster or a human.";

+		mes "A great gift for your ^FF5555'Choncon', 'Steel Choncon', or 'Hunter Fly'^000000.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "I can give you a ^5555FF'Monster Oxygen Mask'^000000 in exchange for:";

+		mes "-^FF5555'1 Oxygen Mask'^000000";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_3:

+		mes "[Monster Tamer YuU]";

+		mes "It's a high quality ribbon knitted out of smooth silk.  It will make your pet ^FF5555'Lunatic'^000000 look even cuter!.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "I can give you a ^5555FF'Silk Ribbon'^000000 in exchange for:";

+		mes "-^FF5555'1 Ribbon (0 Slotts)'^000000";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_4:

+		mes "[Monster Tamer YuU]";

+		mes "It is extremely sharp and possesses a mysterious power that makes monsters want to wear it.";

+		mes "Your ^FF5555'Green Petite'^000000 will love wearing this!";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "I can give you a ^5555FF'Stellar Hairpin'^000000 in exchange for:";

+		mes "-^FF5555'1 Stellar'^000000";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_5:

+		mes "[Monster Tamer YuU]";

+		mes "This seems to have a peculiar scent and a magnificent shine! It can be used as armor for your ^FF5555'Picky'^000000.";

+		mes "I can give you a ^5555FF'Tiny Egg Shell'^000000 in exchange for:";

+		mes "-^FF5555'1 Egg Shell'^000000";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_6:

+		mes "[Monster Tamer YuU]";

+		mes "Mysterious pair of eye glasses which make its wearer look like a geek.  It's perfect for your ^FF5555Rocker^000000 pet.";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "I can give you a pair of ^5555FF'Rocker Glasses'^000000 in exchange for:";

+		mes "-^FF5555'1 Ribbon (0 Slotts)'";

+		mes "-'2 Zargon'";

+		mes "-'400 Zeny'^000000";

+		next;

+		mes "[Monster Tamer YuU]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_Make:

+		mes "[Monster Tamer YuU]";

+		mes "Which Taming Item would you like?";

+		next;

+		menu 	"^5555FF'Skull Helm'^000000",sM_1,

+			"^5555FF'Monster Oxygen Mask'^000000",sM_2,

+			"^5555FF'Silk Ribbon'^000000",sM_3,

+			"^5555FF'Stellar Hairpin'^000000",sM_4,

+			"^5555FF'Tiny Egg Shell'^000000",sM_5,

+			"^5555FF'Rocker Glasses'^000000",sM_6,

+			"Cancel",M_End;

+

+		sM_1:

+			if(countitem(5017)<1) goto sL_NoItems;

+			mes "[Monster Tamer YuU]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer YuU]";

+			mes "Here you are! A Skull Helm! Enjoy and feel free to come back anytime.";

+			getitem 10001,1;

+			delitem 5017,1;

+			close;

+		sM_2:

+			if(countitem(5004)<1) goto sL_NoItems;

+			mes "[Monster Tamer YuU]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer YuU]";

+			mes "Here you are! A Monster Oxygen Mask! Enjoy and feel free to come back anytime.";

+			getitem 10002,1;

+			delitem 5004,1;

+			close;

+		sM_3:

+			if(countitem(2208)<1) goto sL_NoItems;

+			mes "[Monster Tamer YuU]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer YuU]";

+			mes "Here you are! A Silk Ribbon! Enjoy and feel free to come back anytime.";

+			getitem 10007,1;

+			delitem 2208,1;

+			close;

+		sM_4:

+			if(countitem(2294)<1) goto sL_NoItems;

+			mes "[Monster Tamer YuU]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer YuU]";

+			mes "Here you are! Stellar Hairpin! Enjoy and feel free to come back anytime.";

+			getitem 10011,1;

+			delitem 2294,1;

+			close;

+		sM_5:

+			if(countitem(5015)<1) goto sL_NoItems;

+			mes "[Monster Tamer YuU]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer YuU]";

+			mes "Here you are! A Tiny Egg Shell! Enjoy and feel free to come back anytime.";

+			getitem 10012,1;

+			delitem 5015,1;

+			close;

+		sM_6:

+			if(countitem(2208)<1 || countitem(912)<2 || Zeny<400) goto sL_NoItems;

+			mes "[Monster Tamer YuU]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer YuU]";

+			mes "Here you are! A pair of Rocker Glasses! Enjoy and feel free to come back anytime.";

+			getitem 10014,1;

+			delitem 2208,1;

+			delitem 912,2;

+			set Zeny, Zeny-400;

+			close;

+

+			sL_NoItems:

+				mes "[Monster Tamer YuU]";

+				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";

+				close;

+	M_End:

+		mes "[Monster Tamer YuU]";

+		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";

+		close;

+

+}

+

+

+//<================================================= Izlude ===============================================>\\

+izlude_in.gat,128,64,3	script	Monster Tamer	125,

+{

+	mes "[Monster Tamer Shogo]";

+	mes "Are you pre-occupied with gathering items for your cute pets, and want a break? Then let us find those items for you.....";

+M_Menu:

+	next;

+	menu 	"^5555FFMonster Taming^000000",M_0,

+		"^5555FF'Book of Devil'^000000",M_1,

+		"^5555FF'No Recipient'^000000",M_2,

+		"^5555FF'Horror of Tribe'^000000",M_3,

+		"Please make one for me",M_Make,

+		"Cancel",M_End;

+	M_0:

+		mes "[Monster Tamer Shogo]";

+		mes "Monster Taming is the way in which players can get certain monsters to become their pets.";

+		mes "By using a ^5555FF'Taming Item'^000000 a player can lure a monster into becoming a pet.";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "These Taming Items are very hard to come by, but Monster Tamer Guild members such as myself can get them to you without any hassle.";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "Here the Taming Items that I offer:";

+		mes "^5555FF'Book of Devil'^000000,";

+		mes "^5555FF'No Recipient'^000000,";

+		mes "^5555FF'Horror of Tribe'^000000.";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "These are fantastic items! You should really give them a try!";

+		goto M_Menu;

+	M_1:

+		mes "[Monster Tamer Shogo]";

+		mes "This book is far too powerfull for any mere mortal to read and contains the secret method of summoning a devil!";

+		mes "Use it to lure the monster ^FF5555'Deviruchi.'^000000.";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "I can give you a ^5555FF'Book of Devil'^000000 in exchange for:";

+		mes "-^FF5555'1 Old Magic Book'";

+		mes "-'2 Horrendous Mouth'^000000";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_2:

+		mes "[Monster Tamer Shogo]";

+		mes "An old letter which wasn't delivered because of an unkown recipient.";

+		mes "It has no meaning to any living human, but ^FF5555'Munaks'^000000 seem to be very fond of it.";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "I can give you a ^5555FF'No Recipient'^000000 in exchange for:";

+		mes "-^FF5555'1 Old Portrait'^000000";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_3:

+		mes "[Monster Tamer Shogo]";

+		mes "This trophy is an ^FF5555'Orc Warrior's'^000000 favorite item.";

+		mes "I can give you a ^5555FF'Horror of Tribe'^000000 in exchange for:";

+		mes "-^FF5555'1 Chivalry Emblem'";

+		mes "-'1 Scorpion Tail'^000000";

+		next;

+		mes "[Monster Tamer Shogo]";

+		mes "Once you bring me these items I will make this Taming item with the uttmost pride!";

+		goto M_Menu;

+	M_Make:

+		mes "[Monster Tamer Shogo]";

+		mes "Which Taming Item would you like?";

+		next;

+		menu "^5555FF'Book of Devil'^000000",sM_1, "^5555FF'No Recipient'^000000",sM_2, "^5555FF'Horror of Tribe'^000000",sM_3, "Cancel",M_End;

+

+		sM_1:

+			if(countitem(1006)<1 || countitem(958)<2) goto sL_NoItems;

+			mes "[Monster Tamer Shogo]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer Shogo]";

+			mes "Here you are! A Book of Devil! Enjoy and feel free to come back anytime.";

+			getitem 642,1;

+			delitem 1006,1;

+			delitem 958,2;

+			close;

+		sM_2:

+			if(countitem(7014)<1) goto sL_NoItems;

+			mes "[Monster Tamer Shogo]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer Shogo]";

+			mes "Here you are! A No Recipient! Enjoy and feel free to come back anytime.";

+			getitem 636,1;

+			delitem 7014,1;

+			close;

+		sM_3:

+			if(countitem(1004)<1 || countitem(904)<1) goto sL_NoItems;

+			mes "[Monster Tamer Shogo]";

+			mes "Alright, just a minute while I prepare the tame......";

+			next;

+			mes "[Monster Tamer Shogo]";

+			mes "Here you are! A Horror of Tribe! Enjoy and feel free to come back anytime.";

+			getitem 635,1;

+			delitem 1004,1;

+			delitem 904,1;

+			close;

+

+			sL_NoItems:

+				mes "[Monster Tamer Shogo]";

+				mes "It looks like you don't have enough items to exchange for this tame.  Please come back when you do.";

+				close;

+	M_End:

+		mes "[Monster Tamer Shogo]";

+		mes "Oh... I see.  You probably haven't decided on what monster to raise as a pet yet.  It's a very important decision, so please, take your time.";

+		close;

+

+}

diff --git a/npc/quests/mrsmile.txt b/npc/quests/mrsmile.txt
new file mode 100644
index 000000000..e4d6fbd80
--- /dev/null
+++ b/npc/quests/mrsmile.txt
@@ -0,0 +1,92 @@
+//===== eAthena Script ======================================= 

+//= Mr. Smile Quest

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

+//= kobra_k88, Akaru

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

+//= 1.1

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

+//= eAthena 7.15 +

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

+//= 

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

+//= Fully working. 1.1 Optimized

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

+

+

+

+// Alberta ------------------------------------------------------------------------------------------

+alberta.gat,113,53,3	script	Smile Assistance::SmileAT	92,

+{

+	npctalk strcharinfo(0)+ " , you suck.";

+	mes "[Smile Assistant]";

+	mes "Hi, I'm a Smile Assistance.  How may I help you?";

+	next;

+	menu "^0099FFMr. Smile^000000?",M_0, "Construct a ^0099FFMr. Smile^000000",M_1, "Quit",M_End;

+	

+	M_0:

+		mes "[Smile Assistant]";

+		mes "Oh, the Mr. Smile Event is a nationwide event that is being sponsered by ^0099FFHis Majesty Tristram the 3rd^000000.";

+		mes "The goal of the event is to get the citizens of Rune Midgard to put on happy looking Mr. Smile masks.";

+		next;

+		mes "[Smile Assistance]";

+		mes "By having this event, His Majesty wishes to encourage the people of Rune Midgard to have more fun and enjoy themselves!";

+		mes "As you may have guessed, the Mr. Smile mask is simply a smiley face.";

+		next;

+		mes "[Smile Assistance]";

+		mes "Although it may be simple, no one can argue the power of a smile! And if everybody in the kingdom were to wear one....";

+		mes "just imagine how much joy and cheer the world would see!";

+		next;

+		mes "[Smile Assistant]";

+		mes "As a Smile Assistant, it is my job to make a Mr. Smile mask for all of those who want one.";

+		mes "All I need to make the mask are some little items, namely:";

+		mes "^5555FF10 Jellopy^000000";

+		mes "^5555FF10 Fluff^000000";

+		mes "^5555FF10 Clover^000000";

+		next;

+		mes "[Smile Girl]";

+		mes "The world could use more smiles so get those items and come back soon.  I'll be waiting right here.";

+		close;

+	M_1:

+		mes "[Smile Assistant]";

+		if((countitem(705) < 10) | (countitem(909) < 10) | (countitem(914) < 10)) goto sL_NoItems;

+		mes "Oh, great! You've brought back all of the items needed.  Wait just a sec while I get your Mr. Smile ready.....";

+		next;

+		mes "~!shook!~!shook!~!clack!~!clack!~!tok!~!tok!~";

+		next;

+		mes "[Smile Assistant]";

+		mes "Here ya go, your very own Mr. Smile!";

+		delitem 705,10;

+		delitem 909,10;

+		delitem 914,10;

+		getitem 2278,1;

+		next;

+		mes "[Smile Assistant]";

+		mes "The Mr. Smile Event is just one of the many ways His Majesty Tristam the 3rd is trying to make life more enjoyable here in Rune Midgard.";

+		next;

+		mes "[Smile Assistant]";

+		mes "Hopefully you will be reminded of that fact everytime you put on your Mr. Smile.";

+		close;

+	

+		sL_NoItems:

+			mes "Oh... Unfortunately you don't have enough items for a Mr. Smile.  What you need are:";

+			mes "^5555FF10 Jellopy^000000,";

+			mes "^5555FF10 Fluff^000000,";

+			mes "^5555FF10 Clover^000000,";

+			mes "I'll be waiting here so hurry back.";

+			close;

+	M_End:

+		close;

+}

+

+// Aldebaran --------------------------------------------------------------------------------

+aldebaran.gat,136,135,4	duplicate(SmileAT)	Smile Assistance#2	92

+// Geffen -----------------------------------------------------------------------------------

+geffen.gat,119,107,4	duplicate(SmileAT)	Smile Assistance#3	92

+// Izlude -----------------------------------------------------------------------------------

+izlude.gat,129,118,4	duplicate(SmileAT)	Smile Assistance#4	92

+// Morroc -----------------------------------------------------------------------------------

+morocc.gat,158,97,4	duplicate(SmileAT)	Smile Assistance#5	92

+// Payon ------------------------------------------------------------------------------------

+payon.gat,187,104,4	duplicate(SmileAT)	Smile Assistance#6	92

+// Prontera ---------------------------------------------------------------------------------

+prontera.gat,186,104,4	duplicate(SmileAT)	Smile Assistance#7	92

diff --git a/npc/quests/munak.txt b/npc/quests/munak.txt
new file mode 100644
index 000000000..92a26da0b
--- /dev/null
+++ b/npc/quests/munak.txt
@@ -0,0 +1,54 @@
+izlude_in.gat,115,76,5	script	Evan	47,{

+mes "[Evan]";

+mes " ";

+mes "*sighs*";

+next;

+mes "[Evan]";

+mes "Oh? Whats the matter? ...Well, I have finally managed to encase the soul of a pretty girl ...";

+next;

+mes "[Evan]";

+mes "...so why am I sad?";

+mes " ";

+mes "It's because I don't even know how she looks like...say, if you can find me and 'Old Portrait' of her, I'll give you her lover's lost letter!";

+next;

+mes "[Evan]";

+mes "Whaddaya say? ..pal?";

+

+	menu "What do I need again?",ExItems,"Here! I got what you need!",ExCreate,"Sorry, I can't help you.",ExEnd;

+

+    ExItems:

+        mes "[Evan]";

+        mes "A picture of her lovely face...";

+        mes " ";

+	mes "An 'Old Portrait' preferrably...";

+	close;

+

+    ExCreate:

+        mes "[Evan]";

+	mes "Really!! You'll help me!";

+	next;

+	if(countitem(7014)<1) goto NoItem;

+        goto ExGive;

+

+	NoItem:

+		mes "[Evan]";

+		mes "Waahhhh, stop playing with my feelings!";

+		mes " ";

+		mes "Go away!";

+		close;

+
+	ExGive:

+		mes "[Evan]";

+		mes "YES! I am forever in your debt!";

+		delitem 7014,1;

+		getitem 636,1;

+		mes " ";

+		mes "Here is lover's lost letter as promised! Again - Thank you!";

+		close;

+

+	ExEnd:

+	mes "[Evan]";
+	mes "*sighs*";

+	close;

+close;
+}

diff --git a/npc/quests/quests_alberta.txt b/npc/quests/quests_alberta.txt
new file mode 100644
index 000000000..1051567a2
--- /dev/null
+++ b/npc/quests/quests_alberta.txt
@@ -0,0 +1,683 @@
+//===== eAthena Script ======================================= 

+//= Items Quest NPC's located in Alberta

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

+//= kobra_k88

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

+//= 1.2

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

+//= eAthena 1.0

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

+//= Dolls Quest

+//= Boy's Cap Quest

+//= Antlers Quest

+//= Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin Quests

+//= Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat Quests

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

+//= Fully working

+//= 1.1 Fixed Spore Doll exploit [Lupus], 1.2 Gramp's Tiger skin label bug

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

+

+

+

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

+//						Doll Quest

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

+alberta.gat,117,134,8	script	Elin	96,

+{

+	

+	mes "[Elin]";

+	if(Sex == 0) mes "Hello, miss. Since you're a girl, you must like dolls, don't you?";

+	if(Sex == 1) mes "Hello, mister. Hmm, since you're a boy, you don't like dolls, do you?";

+	next;

+	mes "[Elin]";

+	mes "I LOVE dolls!!";

+	emotion 14;

+	next;

+	mes "[Elin]";

+	mes "Ya know..... I REALLY, REALLY, want a new doll.  I hope daddy is going to buy me one for my birthday.....";

+	next;

+	menu "Aww, you must be happy...",M_1,"How about I give you one now?",M_2;

+

+	M_1:

+		mes "[Elin]";

+		mes "Yeah, this time I'm hoping for a Yoyo doll.  Hehe, they're so cute! They're my FAVORITE!";

+		emotion 33;

+		close;

+	M_2:

+		mes "[Elin]";

+		mes "Oh my goodness! Really?? You're such a sweetie.... gimme, gimme!!";

+		mes "What kinda doll are you going to give me? Are you really gonna give me one?";

+		emotion 0;

+		next;

+		menu "Puppet",sM_1,"Poring doll",sM_2,"Chonchon doll",sM_3,"Rocker doll",sM_4, "Spore doll",sM_5,

+		           "Osiris doll",sM_6,"Baphomet doll",sM_7,"Racoon doll",sM_8,"Yoyo doll",sM_9, "I am as adorable as a doll!",sM_10;

+		

+		sM_1:

+			if(countitem(740) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Wow--! It's a rabbit! It's SOOOO cute!! Thank you SOOO much!";

+			emotion 14;

+			next;

+			mes "[Elin]";

+			mes "It's SOOO fluffy... Oh yeah! Let me give you a present too!";

+			next;

+			mes "(diggs around in her pockets)";

+			next;

+			mes "[Elin]";

+			mes "Ummm ... found it! Here take this!";

+			next;

+			delitem 740,1;

+			getitem 530,1;

+			mes "[Elin]";

+			mes "I got this from Santa. It's a candy cane~";

+			next;

+			mes "[Elin]";

+			mes "Thanks again for the rabbit doll! I'm gonna HUG this to sleep EVERY night~";

+			emotion 15;

+			close;

+

+

+		sM_2:

+			if(countitem(741) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Yay! It's a poring doll! It's SOOOO cute! Since you gave me a doll I'll give you this....";

+			emotion 14;

+			next;

+			delitem 741,1;

+			getitem 529,1;

+			mes "[Elin]";

+			mes "Thank you for the doll!";

+			emotion 15;

+			close;

+

+

+		sM_3:

+			if(countitem(742) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Ew whats this?.... a Chonchon ... doll? ...";

+			emotion 16;

+			next;

+			mes "[Elin]";

+			mes "Oh well, since you're giving it to me, I guess it's ok ....";

+			next;

+			mes "[Elin]";

+			mes "Well here's a little something for giving me the doll.  Don't eat too much or you'll get cavities.";

+			delitem 742,1;

+			getitem 530,1;

+			next;

+			mes "[Elin]";

+			mes ".... chonchon.... (~grumble, grumble~)";

+			emotion 7;

+			close;

+

+		sM_4:

+			if(countitem(752) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Oh! a Rocker doll.  I hate hopping things but this doll's kinda cute.";

+			next;

+			mes "[Elin]";

+			mes "Thank you.  Let me give you something too.";

+			next;

+			mes "[Elin]";

+			mes "Hmm, didn't I get some stuff from my uncle ...";

+			next;

+			mes "[Elin]";

+			mes "Here it is.  We've got tons of it at home so I'll share some with you~";

+			delitem 752,1;

+			getitem 532,7;

+			next;

+			mes "[Elin]";

+			mes "Thanks again for the doll!";

+			emotion 15;

+			close;

+

+		sM_5:

+			if(countitem(743) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Blehh .... It's a mushroom... Mom's always scolding me for not eating mushrooms ...";

+			emotion 4;

+			next;

+			mes "[Elin]";

+			mes "I'll take it anyway, since the doll looks cute.  But I still won't eat mushrooms though ...";

+			next;

+			mes "[Elin]";

+			mes "Hmm, I'll need to give you a present too.";

+			next;

+			mes "[Elin]";

+			mes "My mom made this so please take it.";

+			delitem 743,1;

+			getitem 538,5;

+			next;

+			mes "[Litte Kid]";

+			mes "Thank you for the doll~";

+			emotion 15;

+			close;

+

+		sM_6:

+			if(countitem(751) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Yay! It's an Osiris doll!";

+			next;

+			mes "[Elin]";

+			mes "Here's something for you too.";

+			delitem 751,1;

+			getitem 522,2;

+			mes "[Elin]";

+			mes "Thank you for the doll!";

+			close;

+

+		sM_7:

+			if(countitem(750) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Yay! It's a Baphomet doll!";

+			next;

+			mes "[Elin]";

+			mes "Here's something for you too.";

+			delitem 750,1;

+			getitem 525,5;

+			mes "[Elin]";

+			mes "Thank you for the doll!";

+			emotion 15;

+			close;

+

+		sM_8:

+			if(countitem(754) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "Ah, it's a Smokie doll.  I hate Smokies, but the doll's really cute! Thank you!";

+			emotion 33;

+			next;

+			mes "[Elin]";

+			mes "Let me give you some of Grandma's home-made cake!";

+			delitem 754,1;

+			getitem 539,3;

+			next;

+			mes "[Elin]";

+			mes "They're really good so make sure you eat them ok.";

+			next;

+			mes "[Elin]";

+			mes "Thanks again for this cute doll!";

+			emotion 15;

+			close;

+

+		sM_9:

+			if(countitem(753) < 1) goto L_Liar;

+			mes "[Elin]";

+			mes "WOW--!!! OH MY GOSH! It's a Yoyo doll! This is what I REALLY wanted!! It's SOOOO cute......";

+			emotion 14;

+			next;

+			mes "[Elin]";

+			mes "As a thank you, I'll give you this.";

+			delitem 753,1;

+			getitem 608,1;

+			next;

+			mes "[Elin]";

+			mes "Dad picked them up during his travels.  It's a seed of some kind.";

+			mes "We tried planting them at home, but it doesn't seem to grow.";

+			next;

+			mes "[Elin]";

+			mes "Anyway, thank you SOOO MUCH for the Yoyo doll!!!!";

+			emotion 15;

+			close;

+

+		sM_10:

+			mes "[Elin]";

+			mes "BLAAAAAAAAHHH!! Don't make fun of me cuz I'm young!";

+			emotion 32;

+			next;

+			mes "[Elin]";

+			mes "(mumbles) .....'stupid'.....";

+			close;

+

+		L_Liar:

+			mes "[Elin]";

+			mes "HEY!! You don't have any dolls... I can't believe you would lie to a little kid!!!";

+			emotion 0;

+			next;

+			mes "[Elin]";

+			mes "You're a MEANIE!! I HATE YOU!!!..... sniff... sniff.... Waaaaaaaaaaaaaaaaaaaahhhhhh!!";

+			emotion 28;

+			close;

+}

+

+

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

+//						Boy's Cap' Quest

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

+alberta_in.gat,28,145,4	script	Grampa	120,{

+	mes "[Grampa]";

+	mes "Gasp ..Gasp";

+	next;

+	mes "[Grampa]";

+	mes "When I look back on my younger days... I regret not making better use of my time...";

+	next;

+	mes "[Grampa]";

+	mes "Even so I STILL feel young at heart..... unfortunately my body is very old and is in poor condtion...... Cough !! Cough .. !!";

+	next;

+	if(countitem(1030) >= 10) menu "Talk.",M_Talk, "Show him Tiger's Footskin.",M_Show, "Cancel.",M_End;

+	menu "Talk",M_Talk, "Cancel",M_End;

+	

+	M_Talk:

+		mes "[Grampa]";

+		mes "Listen to me..... You must take care of your body as best you can....";

+		mes "If you aren't serious about staying healthy now..... you will surely regret it as you get older.";

+		next;

+		mes "[Grampa]";

+		mes "I've tried to restore my body to its youthful, healthy state with all of the best herbs and medicines that money can buy....";

+		next;

+		mes "[Grampa]";

+		mes "Not only have none of them worked, but their emense cost have made me bankurpt!";

+		next;

+		mes "[Grampa]";

+		mes "I have all but given up on trying to restore my youth.... there IS still one last thing I have not yet tried.....";

+		next;

+		mes "[Grampa]";

+		mes "It is the ^3355FFTiger's Footskin^000000, the legendary king of rejuvination!!"; 

+		emotion 0;

+		next;

+		mes "[Grampa]";

+		mes "Have you heard of the Tiger's Footskin???.....";

+		emotion 1;

+		next;

+		mes "[Grampa]";

+		mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!";

+		mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!";

+		next;

+		mes "[Grampa]";

+		mes "It truely is amazing! Ah, if I could only get my hands on some Tiger's Footskin.... my wishes would at last come true.....";

+		next;

+		mes "[Grampa]";

+		mes "For whoever brings me ^5555FF10 Tiger's Footskins^000000, I would gladly give that person my precious ^3355FFBoys Cap^000000.";

+		close;

+

+	M_Show:

+		mes "[Grampa]";

+		mes "Ohhh !! Th-This is the... this is the legendary.... TIGERS FOOTSKIN!!";

+		next;

+		mes "[Grampa]";

+		mes "Just by LOOKING at it, your white hair turns Black again! By SMELLING it, your reflexes become 10x faster!";

+		mes "And just a single TASTE can turn and 80 year old man.... INTO AN 18 BOY!!!!";

+		next;

+		mes "[Grampa]";

+		mes "It is the real Tiger's Footskin !! In my wildest dreams I never thought...... P-P-Please.... I beg you.... let me have it.....";

+		next;

+		menu "-Give him the Tiger's Footskin.", sM_Give, "Walk away.", sM_End;

+

+		sM_Give:

+			mes "[Grampa]";

+			mes "T-Thank YOU!! Thank you SO VERY MUCH!!";

+			delitem 1030,10;

+			getitem 5016,1;

+			emotion 15;

+			next;

+			mes "[Grampa]";

+			mes "Now my body can be reinvigorated!!! I will eat it right away!";

+			close;

+

+		sM_End:

+			mes "[Grampa]";

+			mes "H-He-Hey!! Young one!! W-Wa-it! Please.... come back... I beg you.... come... back.... ooohh... foot.... sk... i... n....";

+			close;

+

+	M_End:

+		mes "[Grampa]";

+		mes "Cough Cough !! .. Tiger ....Tiger's ..... Foot ..... skin .....Cough Cough !!";

+		close;

+

+

+}

+

+

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

+//						Antlers Quest 

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

+alberta_in.gat,122,53,4	script	Cherokee	47,{

+	mes "[Cherokee]";

+	mes "Hey there, I am a Horn Collector.  Sounds great, huh?";

+	next;

+	mes "[Cherokee]";

+	mes "What do you think about Animal horns? I think they are very valuable and are well worth collecting.";

+	mes "You can wear them on your head, or even decorate your house with them.";

+	next;

+	mes "[Cherokee]";

+	mes "You know.... there has been a particular horn that I have not been able to find.  It is the ^5555FF'Evil Horn '^000000..";

+	next;

+	mes "[Cherokee]";

+	mes "Some say that an Evil Horn is really not an animal's horn, but one that comes from a Devil!";

+	mes "Even so, I really wish I could get my hands on one.";

+	next;

+	mes "[Cherokee]";

+	mes "Say.... do you have any ^5555FF'Evil Horns'^000000?";

+	mes "If you offer me ^5533FF20 Evil Horns^000000, I will give you my precious and famed, ^FF3355'Antlers'^000000.  Is it a deal?";

+	next;

+	menu "You got it!",M_0, "Shut up Dumbo.",M_End;

+

+	M_0:

+		mes "[Cherokee]";

+		if(countitem(923) < 20) goto L_NotEnuf;

+		delitem 923,20;

+		mes "Whoah~! This is the first time I've ever seen a real ^3355FF'Evil Horn'^000000!!";

+		emotion 5;

+		next;

+		mes "[Cherokee]";

+		mes "Thank you! Here are the Antlers just as I promised you!";

+		emotion 15;

+		getitem 2284,1;

+		next;

+		mes "[Cherokee]";

+		mes "With your great help I was finally able to realize my long time dream.  I appreciate what you have done! God Bless You ..";

+		close;

+

+		L_NotEnuf:

+			mes "Hmm.... like I said, I need ^FF5533'20 Evil Horns'^000000.";

+			close;

+

+	M_End:

+		mes "[Cherokee]";

+		mes "Well aren't you a rude person.... I will forgive you however, seeing as we will meet again, I'm sure....";

+		close;

+}

+

+

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

+//			Bao Bao, Cresent Hairpin, Fashionbale Glasses, Heart Hairpin

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

+alberta.gat,120,53,3	script	Zic	51,

+{

+	mes "[Zic]";

+	mes "Yay! A cool breeze! That's why I love the sea!!";

+	emotion 2;

+	next;

+	mes "[Zic]";

+	mes "Huh?... Do you have any business with me? You came to me because I'm a merchant right?";

+	emotion 20;

+	next;

+	mes "[Zic]";

+	mes "~Sigh!~ I get tired of my reputation.... I can't get any peace or quite around here.....";

+	next;

+	mes "[Zic]";

+	mes "So what do you wanna get? Tell me, tell me! It's so easy to guess what you want.....";

+	next;

+	menu "-Bao Bao",M_0, "-Cresent Hairpin",M_1, "-Fashionable Glasses",M_2, "-Heart Hairpin",M_3;

+

+	M_0:

+		mes "[Zic]";

+		mes "To make a Bao Bao I will need:";	//5042

+		mes "- ^5555FF1 Silk Ribbon^000000,";	//10007

+		mes "- ^5555FF50 Herioc Emblems^000000.";	//968

+		next;

+		mes "[Zic]";

+		mes "Would you like me to make you one?";

+		next;

+		menu "Sure.",sM_0a, "No thanks.",M_End;

+

+		sM_0a:

+			if (countitem(10007)<1 || countitem(968)<50) goto sL_NotEnuf;

+			mes "[Zic]";

+			mes "Please wait while I make your Bao Bao......";

+			next;

+			mes "[Zic]";

+			mes "There you are, one Bao Bao.  Enjoy.";

+			getitem 5042, 1;

+			delitem 10007, 1;

+			delitem 968, 50;

+			close;

+	M_1:

+		mes "[Zic]";

+		mes "To make a Cresent Hairpin I will need:";	//5048

+		mes "- ^5555FF1 Heart Hair Pin^000000,";	//5041

+		mes "- ^5555FF10 Steel^000000.";	//999

+		next;

+		mes "[Zic]";

+		mes "Would you like me to make you one?";

+		next;

+		menu "Sure.",sM_1a, "No thanks.",M_End;

+

+		sM_1a:

+			if (countitem(5041)<1 || countitem(999)<10) goto sL_NotEnuf;

+			mes "[Zic]";

+			mes "Please wait while I make your Cresent Hairpin......";

+			next;

+			mes "[Zic]";

+			mes "There you are, one Cresent Hairpin.  Enjoy.";

+			getitem 5048, 1;

+			delitem 5041, 1;

+			delitem 999, 10;

+			close;

+	M_2:

+		mes "[Zic]";

+		mes "To make a pair of Fashionable Glasses I will need:";	//5047

+		mes "- ^5555FF1 Jack a Dandy^000000,";	//2271

+		mes "- ^5555FF1 Scarlet Dyestuffs^000000.";	//975

+		next;

+		mes "[Zic]";

+		mes "Would you like me to make you one?";

+		next;

+		menu "Sure.",sM_2a, "No thanks.",M_End;

+

+		sM_2a:

+			if (countitem(2271)<1 || countitem(975)<1) goto sL_NotEnuf;

+			mes "[Zic]";

+			mes "Please wait while I make your Fashionable Glasses......";

+			next;

+			mes "[Zic]";

+			mes "There you are, one Fashionable Glasses.  Enjoy.";

+			getitem 5047, 1;

+			delitem 2271, 1;

+			delitem 975, 1;

+			close;

+	M_3:

+		mes "[Zic]";

+		mes "Are you sure you want a simple item like this? Oh well... To make a Heart Hairpin I will need:";	//5041

+		mes "- ^5555FF1200 Coral Reefs^000000.";	//7031

+		emotion 20;

+		next;

+		mes "[Zic]";

+		mes "Would you like me to make you one?";

+		next;

+		menu "Sure.",sM_3a, "No thanks.",M_End;

+

+		sM_3a:

+			if (countitem(7031)<1200) goto sL_NotEnuf;

+			mes "[Zic]";

+			mes "Please wait while I make your Hear Hairpin......";

+			next;

+			mes "[Zic]";

+			mes "There you are, one Heart Hairpin.  Enjoy.";

+			getitem 5041, 1;

+			delitem 7031, 1200;

+			close;

+

+		sL_NotEnuf:

+			mes "[Zic]";

+			mes "Hmm.... you don't have enough items for me to make it.  Come back some other time.";

+			close;

+

+	M_End:

+		mes "[Zic]";

+		mes "See ya around.";

+		close;

+}

+

+

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

+//				Hat of Sun God, Sunday Hat, Mage Hat, Magician Hat

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

+alberta.gat,135,79,3	script	Tempestra	71,

+{

+	mes "[Tempestra]";

+	mes "Ah...... Such a cool breeze.  It's good to be next to the sea.  I think it was the right choice for me to take a break from my business and come here.";

+	emotion 2;

+	if(TEMPESTRA == 1) goto sM_Menu;

+	next;

+	mes "[Tempestra]";

+	mes "Oh the sun is so bright today.  I'm glad I brought my hat.  If my skin is exposed to the sun like this everyday, I'm sure to get a sunburn.";

+	next;

+	mes "[Tempestra]";

+	mes "Boy, the heat is making me thirsty.  Nothing would be better right now, than sipping on a perfectly chilled yellow potion.....";

+	next;

+	menu "Here you go, my treat.",M_0, "Then go get one, sheesh....",M_1;

+

+	M_0:

+		if(countitem(503) < 1) goto L_NoPot;

+		set TEMPESTRA, 1;

+		mes "[Tempestra]";

+		mes "Oooh! Thank you so much.  I'm so glad to meet such a friendly person here....";

+		emotion 15;

+		next;

+		mes "[Tempestra]";

+		mes "(~gulp~gulp~)";

+		next;

+		mes "[Tempestra]";

+		mes "Hyaaaaaaa!! It's sooo cold!! Thank you.";

+		sM_Menu:

+		next;

+		menu "The weather is really hot, isn't it...",sM_0, "You should wear a hat.",sM_1;

+

+		sM_0:

+			mes "[Tempestra]";

+			mes "Yes, it's very hot indeed.....";

+			next;

+			mes "[Tempestra]";

+			mes "Luckly I brought a lot of hats along.  I have";

+			mes "a ^5555FF'Sunday Hat'^000000,";

+			mes "a ^5555FF'Mage Hat'^000000,";

+			mes "a ^5555FF'Magician Hat'^000000, and more in my room...";

+			next;

+			mes "[Tempestra]";

+			mes "I brought these hats with me so that I could sell them and use the money I made for my vacation expenses....";

+			mes "but now it looks like I'll have to wear one.....";

+			ssM_Menu:

+			next;

+			menu "Sunday Hat?",ssM_0a, "Mage Hat?",ssM_0b, "Magician Hat?",ssM_0c, "End Conversation.",ssM_End;

+

+			ssM_0a:

+				mes "[Tempestra]";

+				mes "A Sunday Hat is made up of:";

+				mes "- ^5555FF250 Fabric^000000,";

+				mes "- ^5555FF1 Slotted Hat^000000,";

+				mes "- ^5555FF1 Slotted Cap^000000,";

+				mes "- ^5555FF600 Soft Feathers^000000.";

+				mes "If you want, I can make one for you.  Just bring me all of those items.";

+				if (countitem(1059)<250 || countitem(2221)<1 || countitem(2227)<1 || countitem(7063)<600) goto ssM_Menu;

+				next;

+				menu "Make one for me.",-, "Cancel",ssM_End;

+

+					mes "[Tempestra]";

+					mes "Please wait just a moment while I make it........";

+					next;

+					getitem 5032, 1;

+					delitem 1059, 250;

+					delitem 2221, 1;

+					delitem 2227, 1;

+					delitem 7063, 600;

+					mes "[Tempestra]";

+					mes "All done... one Sunday Hat just for you.  Thank you and come back any time.";

+					emotion 15;

+					close;

+			ssM_0b:

+				mes "[Tempestra]";

+				mes "A Mage Hat is made up of:";

+				mes "- ^5555FF1 Wizard Hat^000000,";

+				mes "- ^5555FF400 Dragon Scales^000000,";

+				mes "- ^5555FF50 Mould Powder^000000,";

+				mes "- ^5555FF1 Elder Wilow Card^000000.";

+				mes "If you want, I can make one for you.  Just bring me all of those items.";

+				if (countitem(2252)<1 || countitem(1036)<400 || countitem(7001)<50 || countitem(4052)<1) goto ssM_Menu;

+				next;

+				menu "Make one for me.",-, "Cancel",ssM_End;

+

+					mes "[Tempestra]";

+					mes "Please wait just a moment while I make it........";

+					next;

+					getitem 5027, 1;

+					delitem 2252, 1;

+					delitem 1036, 400;

+					delitem 7001, 50;

+					delitem 4052, 1;

+					mes "[Tempestra]";

+					mes "All done... one Mage Hat just for you.  Thank you and come back any time.";

+					emotion 15;

+					close;

+			ssM_0c:

+				mes "[Tempestra]";

+				mes "A Magician Hat is made up of:";

+				mes "- ^5555FF1 Wizard Hat^000000,";

+				mes "- ^5555FF450 Ancient Lips^000000,";

+				mes "- ^5555FF1200 Solid Shells^000000,";

+				mes "If you want, I can make one for you.  Just bring me all of those items.";

+				if (countitem(2252)<1 || countitem(1054)<450 || countitem(943)<1200) goto ssM_Menu;

+				next;

+				menu "Make one for me.",-, "Cancel",ssM_End;

+

+					mes "[Tempestra]";

+					mes "Please wait just a moment while I make it........";

+					next;

+					getitem 5045, 1;

+					delitem 2252, 1;

+					delitem 1054, 450;

+					delitem 943, 1200;

+					mes "[Tempestra]";

+					mes "All done... one Magician just for you.  Thank you and come back any time.";

+					emotion 15;

+					close;

+			ssM_End:

+				close;

+

+		sM_1:

+			mes "[Tempestra]";

+			mes "Oh but the hats I have are for sale.... if I use them for myself I won't be able to sell them to my customers.";

+			next;

+			mes "[Tempestra]";

+			mes "Because you gave me the potion, I would like to make something for you.  Unfortuately I don't have any materials right now.";

+			next;

+			mes "[Tempestra]";

+			mes "Hmm... If you have:";

+			mes "^5555FF1 Amblem of the Sun God";

+			mes "10 Gold";

+			mes "40 Steel";

+			mes "50 Coal";

+			mes "and 2 Oridecon^000000..........";

+			next;

+			mes "[Tempestra]";

+			mes "I can make you a ^5555FF'Hat of the Sun God'^000000!! It's a fantastic piece of work! How's that sound?";

+			next;

+			menu "Alright.",ssM_1a, "Not right now thanks.",ssM_1b;

+

+			ssM_1a:

+				if(countitem(7086)<1 || countitem(969)<10 || countitem(999)<40 || countitem(1003)<50 || countitem(984)<2) goto ssL_NotEnuf;

+				mes "[Tempestra]";

+				mes "Please wait just a moment while I make it........";

+				next;

+				getitem 5022, 1;

+				delitem 7086, 1;

+				delitem 969, 10;

+				delitem 999, 40;

+				delitem 1003, 50;

+				delitem 984, 2;

+				mes "[Tempestra]";

+				mes "All done... one Hat of the Sun God just for you.  Thank you again for the potion, and please come back any time.";

+				emotion 15;

+				close;

+

+				ssL_NotEnuf:

+					mes "[Tempestra]";

+					mes "Um.... where are those items exactly???";

+					emotion 20;

+					close;

+			ssM_1b:

+				mes "[Tempestra]";

+				mes "Come back anytime when you've changed your mind.";

+				close;

+

+		L_NoPot:

+			mes "[Tempestra]";

+			mes "Umm... excuse me but.... where is the potion??";

+			emotion 20;

+			close;

+

+	M_1:

+		mes "[Tempestra]";

+		mes "..... How RUDE!!";

+		emotion 0;

+		close;

+}

diff --git a/npc/quests/quests_aldebaran.txt b/npc/quests/quests_aldebaran.txt
new file mode 100644
index 000000000..b21bd9601
--- /dev/null
+++ b/npc/quests/quests_aldebaran.txt
@@ -0,0 +1,93 @@
+//===== eAthena Script ======================================= 

+//= Item Quest NPCs located in Aldebaran 

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

+//=

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

+//= 1.1

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

+//= eAthena 7.15 +

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

+//= 'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quests.

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

+//= Fully working

+//= 1.1 Fixed Doctor Band items [Lupus]

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

+

+

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

+//			'Doctor Band', 'Feather Bonnet', 'Opera Masque', 'Sakkat Hat' Quest

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

+aldeba_in.gat,152,166,4	script	Trader	86,{

+	mes "[Trader]";

+	mes "Muhahaha! I am the Very Famous Enigmatic Dealer! I am always hustling and bustling in and out of Rune Midgard!";

+	mes "Take a look at my RARE and UNIQUE items from ALL OVER the WORLD!!";

+	next;

+	mes "(1) · ^3355FFDoctor Band^000000 :";

+	mes "^FF55331 Red Bandana + 50 Iron + 1 Cracked Diamond + 3500 Zeny^000000.";

+	mes "(2) · ^3355FFFeather Bonnet^000000 :";

+	mes "^FF55331 Romantic Gent + 300 Feather of Birds + 500 Zeny^000000.";

+	mes "(3) · ^3355FFOpera Masque^000000 :";

+	mes "^FF553320 Iron + 1 Singing Plant + 5000 Zeny^000000.";

+	mes "(4) · ^3355FFSakkat Hat^000000 :";

+	mes "^FF5533120 Trunk + 10000 Zeny^000000.";

+	next;

+	menu "Doctor Band",M_0, "Feather Bonnet",M_1, "Opera Masque",M_2, "Sakkat",M_3;

+		

+	M_0:

+		mes "[Trader]";

+		if ((countitem(2275) == 0) || (countitem(998) < 50) || (Zeny < 3500)) goto L_CantMake; //Items: Red Bandana, Iron,

+		delitem 2275,1;//Items: Red Bandana,

+		delitem 998,50;//Items: Iron,

+		set Zeny,Zeny - 3500;

+		mes "Hmm.... Do you have a.... MEDICAL LICENSE?!";

+		emotion 1;

+		next;

+		mes "[Trader]";

+		mes "I've heard about a well-known unlicensed physician 'Cuwaki'... I hope you don't get caught....";

+		mes "Anyways it's your own buisness what you do... Take this.";

+		getitem 2273,1;//Items: Doctor Band,

+		close;

+	M_1:

+		mes "[Trader]";

+		if ((countitem(2247) == 0) || (countitem(916) < 300) || (Zeny < 500)) goto L_CantMake;//Items: Romantic Gent, Feather of Birds,

+		delitem 2247,1;//Items: Romantic Gent,

+		delitem 916,300;//Items: Feather of Birds,

+		set Zeny,Zeny - 500;

+		mes "Umhahaha. You have good fashion sense.  I know you had a hard time collecting these items, but this bonnet is definately worth it.  Take it.";

+		emotion 18;

+		getitem 5018,1;//Items: Feather Bonnet,

+		close;

+	M_2:

+		mes "[Trader]";

+		if ((countitem(998) < 20) || (countitem(707) == 0) || (Zeny < 5000)) goto L_CantMake;//Items: Iron, Singing Plant,

+		delitem 998,20;//Items: Iron,

+		delitem 707,1;//Items: Singing Plant,

+		set Zeny,Zeny - 5000;

+		mes "This is a pretty nice item.  A little bit creepy looking though.... I think it gives off some kinda weird vibe.  What do you think?";

+		next;

+		mes "[Trader]";

+		mes ".. You like it ..Alright.. Take it!";

+		getitem 2281,1;//Items: Opera Masque,

+		close;

+	M_3:

+		mes "[Trader]";

+		if ((countitem(1019) < 120) || (Zeny < 10000)) goto L_CantMake;//Items: Trunk,

+		delitem 1019,120;//Items: Trunk,

+		set Zeny,Zeny - 10000;

+		mes "If you have a chance to visit the Village of Payon, please go meet the Sakkat Craftsman.";

+		mes "He's never sold a Sakkat to any other dealer but to me.";

+		next;

+		mes "[Trader]";

+		mes "Because only I can recognize a Sakkat hats' quality.  Due to the fact that it's so rare, the Sakkat Hat has become a very popular item!";

+		next;

+		mes "[Trader]";

+		mes "OK! Take it!";

+		getitem 2280,1;//Items: Sakkat,

+		close;

+

+	L_CantMake:

+		mes "You, fool! Check the requirements again..... you're not some kinda idiot are you? C'mon..... give me a break.";

+		emotion 6;

+		close;

+}

+

diff --git a/npc/quests/quests_comodo.txt b/npc/quests/quests_comodo.txt
new file mode 100644
index 000000000..79e8ebe97
--- /dev/null
+++ b/npc/quests/quests_comodo.txt
@@ -0,0 +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;

+

+}

diff --git a/npc/quests/quests_geffen.txt b/npc/quests/quests_geffen.txt
new file mode 100644
index 000000000..c8c46026f
--- /dev/null
+++ b/npc/quests/quests_geffen.txt
@@ -0,0 +1,186 @@
+//===== eAthena Script ======================================= 

+//= Item Quest NPCs located in Geffen

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

+//= kobra_k88

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

+//= 1.0 

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

+//= eAthena 7.15 +

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

+//= Welding Mask and Headset Quests.

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

+//= Fully working

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

+

+

+

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

+// 					Blacksmith: 'Welding Mask' Quest

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

+geffen_in.gat,144,166,4	script	Blacksmith	63,{

+	mes "[Blacksmith]";

+	mes "Who am I?!........";

+	emotion 0;

+	next;

+	mes "[Blacksmith]";

+	mes "Iam the one and only Veteran Blacksmith here!! Haven't you heard???";

+	mes "I've been working for 30 years in this hot, bloody, Hellfire!";

+	emotion 21;

+	next;

+	mes "[Blacksmith]";

+	mes "Since I became a Blacksmith, I invented something really incredible..... wanna hear about it?";

+	next;

+	menu "I'd love to.",M_Yes, "Well, not really....",M_No;

+

+	M_Yes:

+		mes "[Blacksmith]";

+		mes "Blacksmiths are always welding metals under the HOTEST and must grueling conditions!";

+		mes "The tremendous heat from the metals is so intense that it almost feels as if your face is going to burn off....";

+		emotion 23;

+		next;

+		mes "[Blacksmith]";

+		mes "But with my great invention, Blacksmiths no longer have to fear their faces catching on fire! I call it the ^3355FF' Welding Mask'^000000!!";

+		emotion 5;

+		next;

+		mes "[Blacksmith]";

+		mes "By wearing this over ones face, one will be fully protected from scorching heat and flying debirs.";

+		next;

+		mes "[Blacksmith]";

+		mes "So what do you think? For ^4455FF'50 Steels'^000000 and only ^4455FF2000 Zeny^000000, I can make you one.";

+		next;

+		menu "Hm.. Not bad. Alright.",sM_Yes, "No thanks.  I'd have no use for it.",sM_No;

+

+		sM_Yes:

+			mes "[Blacksmith]";

+			if((countitem(999) < 50) || (Zeny < 2000)) goto sL_NotEnuf;

+			mes "Great! I'll make one right away.......";

+			next;	

+			mes "~!clonk!~!clank!~!bang!~ ~!clonk!~!clank!~!bang!~";

+			next;

+			mes "[Blacksmith]";

+			mes "Here you are, your very own Welding Mask! It was a pleasure doing buisness with you!";

+			delitem 999,50;

+			set Zeny, Zeny - 2000;

+			getitem 2292,1;

+			close;

+

+			sL_NotEnuf:

+				mes "Listen here.... I said I needed ^4455FF'50 Steels'^000000 and ^4455FF2000 Zeny^000000 to make you a Welding Mask.";

+				emotion 4;

+				close;

+

+		sM_No:

+			mes "[Blacksmith]";

+			mes "Oh man... Your gonna regret not getting one.  Trust me sooner or later you're gonna need a ^5555FFWelding Mask^000000.";

+			mes "Everybody does.....";

+			close;

+

+	M_No:

+		mes "[Blacksmith]";

+		mes "Well then, stop wasting my time!";

+		emotion 32;

+		close;

+}

+

+

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

+//					Eric: Headset Quest

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

+geffen_in.gat,30,71,4	script	Eric	83,{

+	mes "[Eric]";

+	mes "Please listen to the story of my blessed grand father...";

+	emotion 28;

+	next;

+	menu "Listen.",M_Listen, "Ask about Items needed.",M_Ask, "Make.",M_Make, "End Conversation.",M_End;

+

+	M_Listen:

+		mes "[Eric]";

+		mes "My grand father passed away few years ago.... he was very special to me.....";

+		next;

+		mes "[Eric]";

+		mes "For as long as I can remember, he was always there for me.";

+		mes "He even took better care of me than did my own father, who was always busy with work.";

+		next;

+		mes "[Eric]";

+		mes "To me, my grand father's library was always like a 'Fairyland'.";

+		mes "I spent most of my time there and I learned a lot of things from his vast collection of books";

+		next;

+		mes "[Eric]";

+		mes "Grand father was interested in alchemy and music, so his library was filled with many books on these subjects.";

+		next;

+		mes "[Eric]";

+		mes "One day while I was in grand fathers library, I discovered an interesting design sheet.....";

+		mes "It was a design for what look liked 'Ear Muffs'.... underneath the drawing was a description that read:";

+		next;

+		mes "[Eric]";

+		mes "'When worn on over the ears, anything from music to the faintest whispers can be heard.";

+		mes "The sounds are transmitted to the ears through a thin wire.  Project Name: ^5555FFHeadset^000000";

+		next;

+		mes "[Eric]";

+		mes "It was a project that my grand father was working on before he passed away.... unfortunately he was never able to finish it.....";

+		next;

+		mes "[Eric]";

+		mes "That's why I made up my mind to pick up where he left off and finish his beloved project!";

+		mes "I met with a few Alchemists and asked them to create a working prototype based on his plans.";

+		next;

+		mes "[Eric]";

+		mes "But they were not able to understand my grand fathers concepts and therefore could not help me.";

+		next;

+		mes "[Eric]";

+		mes "Even so I did not give up and decided to make it myself.  So I studied and researched for many years....";

+		mes "And now I have a full working knowledge of my grand fathers invention, the ^5555FFHeadset^000000!!";

+		next;

+		mes "[Eric]";

+		mes "Yet there is still one obsticale that is keeping me from making it.... I do not have the materials necessary to make my grand fathers invention!";

+		next;

+		mes "[Eric]";

+		mes "My only goal in life is to realize my grand fathers ideas and pay tribute to the man I hold so dear to my heart.......";

+		emotion 28;

+		next;

+		mes "[Eric]";

+		mes "If only I had those materials.... Hmm... would you be iterested in this project? All I ask is that you gather the right items for me....";

+		emotion 20;

+		close;

+

+	M_Ask:

+		mes "[Eric]";

+		mes "These are items needed for grand father's Headset:";

+		mes "^3355FFSteel^000000 ^FF555540^000000";

+		mes "^3355FFOridecon^000000 ^FF55551^000000";

+		mes "^3355FFAlcohol^000000 ^FF55551^000000";

+		mes "^3355FFCoal^000000 ^FF55551^000000";

+		close;

+

+	M_Make:

+		mes "[Eric]";

+		if(countitem(999) < 40) || (countitem(984) < 1) || (countitem(970)<1) || (countitem(1003) < 1) goto L_NotEnuf;

+		mes "Oh this is GREAT!! You have all of the materials I need to make my grandfather's Headset!";

+		emotion 5;

+		next;

+		mes "[Eric]";

+		mes "Give me a few minutes to assemble it...............";

+		next;

+		delitem 999,40;

+		delitem 984,1;

+		delitem 970,1;

+		delitem 1003,1;

+		getitem 5001,1;

+		mes "[Eric]";

+		mes "FINALLY!! It's complete! My grand father's Headset! Please take them... without your help this wouldn't have been possible.";

+		emotion 0;

+		next;

+		mes "[Eric]";

+		mes "Thank so very much! Because of you, I could fullfill my grand father's wish.  I just know he's smiling down on me from Heaven.....";

+		emotion 15;

+		close;

+

+		L_NotEnuf:

+			mes "Thank you for trying to help me but..... you don't seem to have all of the items I need.....";

+			emotion 4;

+			close;

+	M_End:

+		mes "[Eric]";

+		mes "Farewell..... boo hoo....";

+		emotion 28;

+		close;

+}

diff --git a/npc/quests/quests_lutie.txt b/npc/quests/quests_lutie.txt
new file mode 100644
index 000000000..df68b332b
--- /dev/null
+++ b/npc/quests/quests_lutie.txt
@@ -0,0 +1,186 @@
+//===== eAthena Script ======================================= 

+//= Item Quest NPCs located in Lutie

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

+//= TonyMan

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

+//= 1.0 

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

+//= eAthena 1.0

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

+//= Blush, Cake Hat, Candle, Chef Hat, Raccoon Hat, Rainbow Eggshell,

+//= Spore Hat, Wonder Nutshell Quests

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

+//= 

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

+

+xmas.gat,117,295,3	script	Titicupe	704,{

+	mes "[^469ED2Titicupe^000000]";

+	mes "I am the well known ^27BEB7Vending Machine Man Titicupe^000000, I am also a Wizard of the great ^9A3CA2Geffen Mage Guild^000000. I can use my special magic to make some rare items, but I need ingridients. Choose an item you want.";

+	next;

+	menu "Blush", blush,"Cake Hat",cake_hat,"Candle",candle,"Chef Hat",chef_hat,"Raccoon Hat",raccoon_hat,"Rainbow Eggshell",rainbow_egg,"Spore Hat",spore_hat,"Wonder Nutshell",wonder_nut,"Cancel",cancel;

+	

+	blush:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+ 	mes "100 Alice's Apron";

+ 	next;

+	menu "Here. Now do your magic!",make_blush,"Cancel",cancel;

+	

+	make_blush:

+	if(countitem(7047)<100) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^D6294BBlush^000000, it's yours.";

+	delitem 7047,100;

+	getitem 5040,1;

+	close;

+	

+	cake_hat:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+ 	mes "10 Candy";

+ 	mes "5 Candy Cane";

+ 	mes "20 Piece of Cake";

+ 	mes "10 Steel";

+ 	mes "15 Well-baked Cookie";

+ 	next;

+	menu "Here. Now do your magic!",make_cake_hat,"Cancel",cancel;

+	

+	make_cake_hat:

+	if((countitem(529)<10) || (countitem(530)<5) || (countitem(539)<20) || (countitem(999)<10) || (countitem(538)<15)) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACake Hat^000000, it's yours.";

+	delitem 529,10;

+	delitem 530,5;

+	delitem 539,20;

+	delitem 999,10;

+	delitem 538,15;

+	getitem 5024,1;

+	close;

+	

+	candle:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+	mes "1 Bomb Wick";

+ 	mes "50 Matchstick";

+ 	mes "100 Royal Jelly";

+ 	next;

+	menu "Here. Now do your magic!",make_candle,"Cancel",cancel;

+	

+	make_candle:

+	if((countitem(2279)<1) || (countitem(7035)<50) || (countitem(526)<100)) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBACandle^000000, it's yours.";

+	delitem 2279,1;

+	delitem 7035,50;

+	delitem 526,100;

+	getitem 5028,1;

+	close;

+	

+	chef_hat:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+	mes "450 Dragon Scale";

+ 	mes "300 Feather";

+ 	mes "120 Piece of Cake";

+ 	mes "  1 White Dyestuffs";

+ 	next;

+	menu "Here. Now do your magic!",make_chef_hat,"Cancel",cancel;

+	

+	make_chef_hat:

+	if((countitem(1036)<450) || (countitem(949)<300) || (countitem(539)<120) || (countitem(982)<1)) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^BD3CBAChef Hat^000000, it's yours.";

+	delitem 1036,450;

+	delitem 949,300;

+	delitem 539,120;

+	delitem 982,1;

+	getitem 5026,1;

+	close;

+

+	raccoon_hat:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+	mes "20 Dragon Scale";

+ 	mes "1 Kitty Band";

+ 	mes "300 Sea-otter Fur";

+ 	mes "200 Tough Scalelike Stem";

+ 	next;

+	menu "Here. Now do your magic!",make_raccoon_hat,"Cancel",cancel;

+	

+	make_raccoon_hat:

+	if((countitem(1036)<20) || (countitem(2213)<1) || (countitem(7065)<300) || (countitem(7012)<200)) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours.";

+	delitem 1036,20;

+	delitem 2213,1;

+	delitem 7065,300;

+	delitem 7012,200;

+	getitem 5033,1;

+	close;

+	

+	rainbow_egg:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+	mes "50 Claw of Desert Wolf";

+ 	mes "1 Cobaltblue Dyestuffs";

+ 	mes "1 Egg Shell";

+ 	next;

+	menu "Here. Now do your magic!",make_rainbow_egg,"Cancel",cancel;

+	

+	make_rainbow_egg:

+	if((countitem(7030)<50) || (countitem(978)<1) || (countitem(5015)<1)) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^8D4178Rainbow Egg^000000, it's yours.";

+	delitem 7030,50;

+	delitem 978,1;

+	delitem 5015,1;

+	getitem 5039,1;

+	close;

+	

+	spore_hat:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+	mes "300 Burnt Tree";

+ 	mes "850 Poison Spore";

+ 	mes "1 Tongue";

+ 	next;

+	menu "Here. Now do your magic!",make_spore_hat,"Cancel",cancel;

+	

+	make_spore_hat:

+	if((countitem(7068)<300) || (countitem(7033)<850) || (countitem(1015)<1)) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours.";

+	delitem 7068,300;

+	delitem 7033,850;

+	delitem 1015,1;

+	getitem 5029,1;

+	close;

+	

+	wonder_nut:

+	mes "[^469ED2Titicupe^000000]";

+	mes "Hmm... spell ingridients are...";

+	mes "1 Nut Shell";

+ 	mes "500 Wing of Dragonfly";

+

+ 	next;

+	menu "Here. Now do your magic!",make_wonder_nut,"Cancel",cancel;

+	

+	make_wonder_nut:

+	if((countitem(5037)<1) || (countitem(7064)<500)) goto fail;

+	mes "[^469ED2Titicupe^000000]";

+	mes "^4599A3Abra ^66A73FKa ^C7A82EDabra, ^64826BSim ^E9239ESa ^B7EB01La ^8080C0Bim^000000!! ^45A8C9*poof*^000000 I succeeded! Here take this ^7D4E31Raccoon Hat^000000, it's yours.";

+	delitem 5037,1;

+	delitem 7064,500;

+	getitem 5050,1;

+	close;

+	

+	cancel:

+	mes "[^469ED2Titicupe^000000]";

+	mes "I bid you farewell, try not to catch a cold out here. It's ^5A9FD8freezing out here!^000000";

+	close;

+	

+	fail:

+	mes "[^469ED2Titicupe^000000]";

+	mes "I can't cast since you don't seem to have all I need...";

+	close;

+}

diff --git a/npc/quests/quests_morocc.txt b/npc/quests/quests_morocc.txt
new file mode 100644
index 000000000..4fb200c20
--- /dev/null
+++ b/npc/quests/quests_morocc.txt
@@ -0,0 +1,119 @@
+//===== eAthena Script ======================================= 

+//= Item Quest NPCs located in Morroc

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

+//= kobra_k88

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

+//= 1.0 

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

+//= eAthena 7.15 +

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

+//= Stop Post and Binoculars Quest.

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

+//= Fully working

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

+

+

+

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

+// 				Stop Post Quest

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

+morocc_in.gat,142,100,4	script	William	89,{

+	mes "[William]";

+	mes "Welcome to MacMillan's ^3355FF'Post'^000000 Workshop .";

+	next;

+	mes "[William]";

+	mes "My Clan, MacMillan, Has been producing professional grade Traffic Signal Posts for more than 250 years.";

+	mes "Nowadays we are taking special orders for our very unique, ^3355FF'Stop Post'^000000.";

+	next;

+	menu "Could I order a ^3355FF'Stop Post'^000000?",M_Order, "I'm not interested.",M_End;

+

+	M_Order:

+		mes "[William]";

+		mes "MacMillan's one of a kind ^3355FF'Stop Post'^000000 fits comfortably on a persons head.";

+		mes "Not only does it make an interesting head accessory, but it can actually be used as a stop sign as well.";

+		next;

+		mes "[William]";

+		mes "I garauntee that our ^3355FF'Stop Post'^000000 will last for well over 100 years, or my name isn't MacMillan!!";

+		next;

+		mes "[William]";

+		mes "For us to make you a ^3355FF'Stop Post'^000000, we will need:";

+		mes "^3355FF91100 Zeny,";

+		mes "50 Wooden Blocks,";

+		mes "and 1 Black Dyestuffs^000000.";

+		next;

+		if((countitem(1019) >= 50) && (countitem(983) >= 1) && (Zeny >= 91100)) goto sL_GetPost;

+		mes "[William]";

+		mes "Come back when you have all of the items.";

+		close;

+

+		sL_GetPost:

+			mes "[William]";

+			mes "Here you are! A hand made, one of a kind, ^3355FF'Stop Post '^000000! Thank you for your patronage!";

+			getitem 2272,1;

+			delitem 1019,50;

+			delitem 983,1;

+			set Zeny, Zeny - 91100;

+			emotion 15;

+			close;

+

+	M_End:

+		mes "[William]";

+		mes "Thanks for stopping by the MacMillan's Workshop.  I hope to see you soon.";

+		close;

+}

+

+

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

+//				Binoculars Quest

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

+morocc_in.gat,76,163,4	script	Alchemist	64,{

+	mes "[Marius]";

+	mes "Howdy! A new customer........ Wait!!! I know what you're here for....... You're interested in those magical goggles aren't you?";

+	next;

+	menu "What is that ?",M_What, "Make",M_Make, "Ignore him",M_End;

+

+	M_What:

+		mes "[Marius]";

+		mes "It is actually called ^3355FF'Binoculars'^000000! It is an opitcal device that allows the wearer to see far away objects.";

+		next;

+		mes "[Marius]";

+		mes "You see, when two lens are placed next to each other in front of your eyes, your brain interperets this image........ blah blah...... blah....";

+		next;

+		mes "[Marius]";

+		mes "............... What's this? You don't seem interested in what I have to say?? I don't think you realize what I'm talking about!";

+		emotion 20;

+		next;

+		mes "[Marius]";

+		mes "Oh c'mon! Don't be a jerk! What I'm talking about is REALLY COOL!!";

+		close;

+

+	M_Make:

+		mes "[Marius]";

+		if(countitem(2243) < 1) || (countitem(999) < 100) goto sL_NotEnuf;

+		mes "Gr~~~~eat ! You'll definitely enjoy a pair of these!";

+		next;

+		mes "[Marius]";

+		mes "Here it is ! The Binoculars !";

+		getitem 2296,1;

+		delitem 2243,1;

+		delitem 999,100;

+		set Zeny, Zeny - 50000;

+		next;

+		mes "[Marius]";

+		mes "But before you go out and use them I have to tell you......";

+		if(sex==0) mes "DON'T USE THEM TO BE A PEEPING TOM!!!";

+		if(sex==1) mes "Becarefull where you look..... you might see someting you didn't want to........";

+		close;

+

+		sL_NotEnuf:

+			mes "Argggghhhhhhh !! You didn't bring enough items!! You need:";

+			mes "^3355FF1 pair of Geek Glasses, and 100 Steel^000000.";

+			emotion 6;

+			close;

+

+	M_End:

+		mes "[Marius]";

+		mes "Hey you! You DARE IGNORE ME!! I am MARIUS the alchemist of ALCHEMISTS!!!!!";

+		emotion 23;

+		close;

+}

diff --git a/npc/quests/quests_payon.txt b/npc/quests/quests_payon.txt
new file mode 100644
index 000000000..a9928db31
--- /dev/null
+++ b/npc/quests/quests_payon.txt
@@ -0,0 +1,291 @@
+//===== eAthena Script ======================================= 

+//= Item Quest NPCs located in Payon

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

+//= kobra_k88

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

+//= 1.2

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

+//= eAthena 7.15 +

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

+//= Pretend Murder, Ear Muffs, Oxygen, Derivuchi Cap, Helm of Angel Quests.

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

+//= Fully working

+//= 1.1 Helm of Angel bug fixed [Lupus]

+//= 1.2 Fixed skirt of virgin [Lupus]

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

+

+

+

+

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

+//				Pretend Murdered quest

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

+payon.gat,154,170,4	script	Granny	78,{

+	mes "[Granny]";

+	if(countitem(1049) >= 4) goto L_Get;

+

+	mes "Oh deary me.  What to do... what to do........  You see I want to nitt some special clothes for my family but I don't have the right cloth to do so.";

+	next;

+	mes "[Granny]";

+	mes ".....sigggghhhhhh........";

+	next;

+	mes "[Granny]";

+	mes "Why what's this? Mushrooms? Oh yes I remember now, I pick these mushrooms on the Payon Mountain side.";

+	mes "Ho ho, I have such a hard time remembering things now.";

+	next;

+	mes "[Granny]";

+	mes "What was I saying before? Oh yes! I need some special cloth to make clothes for my family.";

+	mes "If you happen to come across some ^5555FF'Skirt of Virgin'^000000, please let me know.";

+	emotion 20;

+	next;

+	mes "[Granny]";

+	mes "I need ^5555FF'4 Skirt of Virgin'^000000 to make the clothes.  I will be very greatfull if you could bring me some.";

+	close;

+

+L_Get:

+	mes "Oh! You have 4 Skirt of Virgin.  Would you be willing to give them to me dear?";

+	next;

+	menu "Why of course granny",-,"Heck no ya old bag!",M_No;

+			

+		mes "[Granny]";

+		mes "Bless your kind heart.  Now I can make some special clothes for my family.  Let me give you a reward for being so genrous dear.";

+		emotion 14;

+		next;

+		getitem 2293,1;

+		delitem 1049,4;

+		mes "[Granny]";

+		mes "There you are.  It's something I kept from my younger days as an actress.  I was quite fetching and very popular back then.";

+		mes "I've kept it as a reminder of my days as an actress, but with my memory as bad as it is, it's really of no use to me anymore.";

+		next;

+		mes "[Granny]";

+		mes "I'm sure you'll have fun using it at parties."; 

+		close;

+		

+	M_No:

+		mes "[Granny]";

+		mes "Well I never!!! Kids these days just have no respect or compasion for their elders!";

+		emotion 32;

+		close;

+

+}

+

+

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

+//					Ear Muffs Quest

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

+payon_in01.gat,18,10,4	script	Mystic Lady	75,{

+	mes "[Mystic Lady]";

+	mes "Hi there.";

+	next;

+	menu "Hello.",-,"Please make me a pair of Ear Muffs.",M_Muffs, "End",M_End;

+

+		mes "[Mystic Lady]";

+		mes "My family and I recently came to Payon.";

+		mes "Where we came from the weather was very cold so we started a business hand making a special type of ^5555FF'Ear Muffs'^000000";

+		next;

+		mes "[Mystic Lady]";

+		mes "I have tried to continue the family business here in Payon but it has proven to be difficult because of the warm whether.";

+		next;

+		mes "[Mystic Lady]";

+		mes "Although the 'Ear Muffs' aren't very usefull here, if you plan on going somewhere that's cold our 'Ear Muffs' are a must have.";

+		next;

+		mes "[Mystic Lady]";

+		mes "All I need are:";

+		mes "^5555FF1 Cursed Ruby,";

+		mes "1 Headset,";

+		mes "200 Feathers,";

+		mes "and a 5,000 zeny fee^000000 for my labor.";

+		next;

+		mes "[Mystic Lady]";

+		mes "With those items I can make you a pair of 'Ear Muffs'.  Believe me, they are of the highest quality and look good on just about anybody!";

+		close;

+	

+	M_Muffs:

+		if((countitem(724)<1) || (countitem(5001)<1) || (countitem(949)<200) || (zeny<5000)) goto sL_NotEnuf;

+		mes "[Mystic Lady]";

+		mes "Oh, I see that you have brought all of the required items.  Just a moment please...";

+		next;

+		mes "[Mystic Lady]";

+		mes "... this goes here... that goes there...... some glue here... a couple stitches over there..........";

+		next;

+		getitem 2283,1;

+		delitem 724,1;

+		delitem 5001,1;

+		delitem 949,200;

+		set Zeny, Zeny-5000;

+		mes "[Mystic Lady]";

+		mes "Ah, there you are! One pair of my familys' specialty Ear Muffs.  Enjoy!";

+		close;

+

+		sL_NotEnuf:

+			mes "[Mystic Lady]";

+			mes "I'm sorry but you don't have the required items for me to make you a pair of my familys' specialty Ear Muffs.";

+			close;

+	M_End:

+		close;

+

+}

+

+

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

+//					Oxygen Mask Quest

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

+payon_in02.gat,25,71,4	script	Young Man	86,{

+	mes "[Young Man]";

+	if(countitem(701) >= 5) goto L_GotOra;

+	mes "Blahhhhhh! I... I... I JUST CAN'T take it anymore!! You little stinky, filthy, BASTARDS!!!";

+	emotion 6;

+	next;

+	menu "Continue.",M_Cont, "End Conversation.",M_End;

+	

+	M_Cont:

+		mes "[Young Man]";

+		mes "~Sigh~ I've had a rough life.  You see, both my parents passed away when I was a kid, so I had to work to support myself at a young age.";

+		next;

+		mes "[Young Man]";

+		mes "It sure was rough.  But after 10 years of hard work I was able to save up and finally buy myself a home!";

+		next;

+		mes "[Young Man]";

+		mes "Unfortunately I didn't have that much money, so I couldn't buy the home I really wanted.";

+		mes "Instead, I found this house..... It was big and cheap.... so I bought without really thinking my decision through.....";

+		next;

+		mes "[Young Man]";

+		mes "Jeez was that a mistake...... The house turned out to be a HAVEN for THIEF BUGS!!!";

+		emotion 23;

+		next;

+		mes "[Young Man]";

+		mes "I tried EVERYTHING to get rid of them! I sprayed them, I smashed them, I lured them out with food.........";

+		mes "Finally as a last resort.... I even tried to burn the house down!!";

+		next;

+		mes "[Young Man]";

+		mes "Grrr! What will it take to get rid of these vile creatures???";

+		emotion 32;

+		next;

+		mes "[Young Man]";

+		mes "I've heard there is something called ^3355FF'Ora Ora'^000000, that people in other countries use to fight bugs.....";

+		mes "But will it work for my situation?";

+		next;

+		mes "[Young Man]";

+		mes "I'm willing to give anything a try at this point.  I don't have much money so I can only afford ^5555FF'5 Ora Oras'^000000.";

+		mes "If you happen to come across some 'Ora Ora' please let me know.";

+		close;

+

+	M_End:

+		mes "[Young Man]";

+		mes "I'm just so tired of fighting this never ending battle against these bugs...... those dirty scumbags!!";

+		emotion 32;

+		close;

+

+L_GotOra:

+	mes "ArrrGgghhh!! No!... It can't be!..... I think I'm going mad... they're starting to look so cute... ArrrGgghhh!!... Nooooooo!!";

+	emotion 23;

+	M_Menu:

+	next;

+	menu "Continue",M_Cont, "Show Ora Ora",M_Show, "Give Ora Ora",M_Give, "Cancel",M_End2;

+

+	M_Show:

+		mes "[Young Man]";

+		mes "Oooooohhhh..... is.. is this... is this... Ora Ora...??? If you give it to me I'll give you my prized treasure in return!";

+		mes "What do you say?? Is it a deal?";

+		goto M_Menu;

+

+	M_Give:

+		mes "[Young Man]";

+		mes "Muhahahahah!!! Finally, I have it.... Ora Ora! Stupid and distgusting Thief Bugs.... you'll pay for invading MY HOME!!!";

+		emotion 29;

+		next;

+		mes "[Young Man]";

+		mes "..... Eh em... sorry.  I was a little outa control there.... Ah, let me give you my valuable treasure......";	

+		emotion 4;

+		next;

+		getitem 5004,1;

+		delitem 701,5;

+		mes "[Young Man]";

+		mes "By wearing this over your mouth, the air you breathe will be filltered so that you can breathe clean air.";

+		mes "I picked it up while I was a Sailor out at sea.  I really have no need for it.";

+		next;

+		mes "[Young Man]";

+		mes "Hehehehe!! I can't wait to use this Ora Ora!!!";

+		close;

+

+	M_End2:

+		mes "[Young Man]";

+		mes "What if I CAN'T get rid of these thief bugs???... I guess the only other thing I could do is fall in love with them...... heh... heh... heh....";

+		emotion 4;

+		close;

+

+}

+

+

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

+//			Derivuchi Cap(Hat of Petite Diablo), Helm of Angel

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

+payon_in01.gat,56,12,4	script	Young Man	89,

+{

+	mes "[Young Man]";

+	mes "What is it?............";

+	next;

+	menu "Can you make me a special item?",M_0, "Nothing.",M_End;

+

+	M_0:

+		mes "[Young Man]";

+		mes "I see.... so you know about me huh?.... Ok, tell me what you want.";

+		next;

+		menu "-Helm of Angel",sM_Angel, "-Deviruchi Cap(Hat of Petite Diablo)",sM_Devir, "-I'll come back later.",M_End;

+

+		sM_Angel:

+			mes "[Young Man]";

+			mes "For the Helm of Angel I will need:";

+			mes "- ^5555FF1 Helm (slotted)^000000.";

+			mes "- ^5555FF1 Angel Wing^000000.";

+			mes "- ^5555FF5 Fang of Garm^000000.";

+			set @HAT, 1;

+			next;

+			goto sL_GetHat;

+		sM_Devir:

+			mes "[Young Man]";

+			mes "For the Deviruchi Cap(Hat of Petite Diablo) I will need:";

+			mes "- ^5555FF600 Little Evil Horn^000000.";

+			mes "- ^5555FF40 Talon of Griffon^000000.";

+			set @HAT, 2;

+

+			sL_GetHat:

+				mes "[Young Man]";

+				mes "Wait a moment!  Be carefull about what items you give me.";

+				mes "I do not distinguish between equipment that has been forged or has cards attached to them.";

+				mes "If you don't want to loose a precious card or piece of equipment, make sure you don't have it equiped.";

+				next;

+				mes "[Young Man]";

+				mes "Do you have all of the items needed?";

+				menu "-Give him the items.",-, "Nevermind.",M_End;

+

+				if(@HAT == 2) goto ssL_Devir;

+

+				ssL_Angel:

+					if(countitem(2229)<1 || countitem(2254)<1 || countitem(7036)<5) goto ssL_NotEnuf;

+					mes "[Young Man]";

+					mes "Here is your Helm of Angel.";

+					delitem 2229, 1;

+					delitem 2254, 1;

+					delitem 7036, 5;

+					getitem 5025, 1;

+					close;

+				ssL_Devir:

+					if(countitem(1038)<600 || countitem(7048)<40) goto ssL_NotEnuf;

+					mes "[Young Man]";

+					mes "Here is your Deviruchi Cap(Hat of Petite Diablo).";

+					delitem 1038, 600;

+					delitem 7048, 40;

+					getitem 5038, 1;

+					close;

+				ssL_NotEnuf:

+					mes "[Young Man]";

+					mes "You don't have enough items for me to make what you want.";

+					close;

+

+	M_End:

+		mes "[Young Man]";

+		mes "Fine then.....";

+		close;

+

+}

diff --git a/npc/quests/quests_prontera.txt b/npc/quests/quests_prontera.txt
new file mode 100644
index 000000000..8e2d25362
--- /dev/null
+++ b/npc/quests/quests_prontera.txt
@@ -0,0 +1,92 @@
+//===== eAthena Script ======================================= 

+//= Item Quest NPCs located in Prontera

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

+//= kobra_k88

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

+//= 1.1

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

+//= eAthena 7.15 +

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

+//= Ph.D Hat Quest

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

+//= Fully working

+//= Fixed flower name Dreamy -> Illusion

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

+

+

+// Ph.D Hat Quest-------------------------------------------------------

+prt_in.gat,38,108,4	script	Teacher	53,

+{

+	if((countitem(710) >= 1) && (countitem(703) >= 1) && (countitem(704) >= 1) && (countitem(708) >= 1)) goto L_Start;//Items: Illusion Flower, Hinalle, Aloe, Ment,

+	mes "Don't you think.... ^4444FF'flowers'^000000 are pretty?";

+	next;

+	menu "Talk.",M_Talk, "End Conversation.",M_End;

+	

+	M_Talk:

+		mes "[Teacher]";

+		mes "When I was young, I didn't play with friends like the other children.  Instead, I spent time studing by myself.";

+		next;

+		mes "[Teacher]";

+		mes "Sometimes I regret that decision.... but it doesn't really matter now.  Through hard work, I was able to finish school earlier than my classmates.";

+		next;

+		mes "[Teacher]";

+		mes "I was very lonely however..... when things got rough I had no one to talk to about my feelings.";

+		next;

+		mes "[Teacher]";

+		mes "Then one day, I found my best friend.";

+		next;

+		mes "[Teacher]";

+		mes "It was when I saw this pretty flower blooming in an abandoned garden.... I realised that it was just like me and in it, I found my best friend.";

+		next;

+		mes "[Teacher]";

+		mes "Even though, to others it was just a common flower.... for me this flower meant much more.  This flower gave me the strength to continue my studies.";

+		mes "I could achieve my goals because of her.";

+		next;

+		mes "[Teacher]";

+		mes "So.. now... I am trying to repay to her.  I have started studying Flowers, and It is my goal to cover the whole world in Flowers!";

+		next;

+		mes "[Teacher]";

+		mes "To accomplish my work.. I need a great deal of flowers. Unfortunately because of my studies, I can rarely go outside.";

+		mes "It is really hard to find as many flowers as I need.";

+		next;

+		mes "[Teacher]";

+		mes "I need 1 ^3355FFIllusion Flower^000000 ,1 ^3355FFHinalle^000000,1 ^3355FFAloe^000000 and 1 ^3355FFMent^000000...";

+		mes "If you can bring these flowers to me, I would be willing to give you a special item...";

+		close;

+	

+	M_End:

+		mes "[Teacher]";

+		mes "One of thesedays I will cover whole world in Flowers!.....";

+		close;

+

+L_Start:

+	mes "[Teacher]";

+	mes "Oh... Those Flowers in your hand are....";

+	M_Menu:

+	next;

+	menu "Show Flowers",M_Show, "Give Flowers",M_Give, "Cancel",M_End;

+

+	M_Show:

+		mes "[Teacher]";

+		mes "Ah... How wonderful!! These are definately the 4 kinds of Flowers I was looking for ..";

+		mes "The ^3355FFIllusion Flower, Hinalle, Aloe, and Ment^000000.  Would you give them to me?...";

+		next;

+		mes "[Teacher]";

+		mes "If you do I'd be willing to give you a special item.....";

+		goto M_Menu;

+

+	M_Give:

+		mes "[Teacher]";

+		mes "I really, really appreciate what you've done for me!! I trully am grateful! I will give you a very special item as I promised.";

+		emotion 15;

+		next;

+		mes "[Teacher]";

+		mes "This is the hat I wore at my Graduation Ceremony.  It is a reminder of my joyfull school days at the University.";

+		mes "Please take it...";

+		delitem 710,1;//Items: Illusion Flower,

+		delitem 703,1;//Items: Hinalle,

+		delitem 704,1;//Items: Aloe,

+		delitem 708,1;//Items: Ment,

+		getitem 5012,1;//Items: Ph.D Hat,

+		close;

+}

diff --git a/npc/quests/quests_umbala.txt b/npc/quests/quests_umbala.txt
new file mode 100644
index 000000000..01cd46bf9
--- /dev/null
+++ b/npc/quests/quests_umbala.txt
@@ -0,0 +1,291 @@
+//===== eAthena Script ======================================= 

+//= Quests NPCs related to Umbala City

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

+//= sabernet09 & eAthena Team

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

+//= 1.1

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

+//= eAthena 7.15 +

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

+//= Umbalian Language Quest, +

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

+//= fixed by x[tsk], Lupus, PoW

+//= location of the "card removing old lady" should be revised

+//= Quest completion is now registered

+//= 1.1 fixed Poporing Egg ID -> Poring Egg, fixed condition

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

+

+

+

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

+//this quest is related to Umbalian Chief

+morocc.gat,140,156,5	script	Turban Thief	58,{

+	if(mask_q == 2) goto NoBus;

+	if(umb_quest != 1) goto AWAY;

+	mes "[Turban Thief]";

+	mes "E'llo mah frien, would I interesst tu with this rare mask?  Its value I assure you is real mah frien.  Tis manific!";

+	next;

+	mes "[Turban Thief]";

+	mes "Wah? O ho ho ho, so you know thaz I steal dis from those savages no?  Well I won'tz give it back.  But I will for a pricez... wat you say?";

+	menu "Pay 1,000,000z",MonA,"No deal",NoGo;

+	MonA:

+		next;

+		if(Zeny < 1000000) goto NotEnough;

+		mes "[Turban Thief]";

+		mes "O ho ho, its a deal then!";

+		set zeny,zeny-1000000;

+		getitem 7114,1;

+		set mask_q,2;

+		close;

+	NoGo:

+		next;

+		mes "[Turban Thief]";

+		mes "Ahh a business man are you no?  Fine, how about...";

+		menu "Pay 750,000",MonB,"Nope lower",NoGoB;

+		MonB:

+			next;

+			if(Zeny < 750000) goto NotEnough;

+			mes "[Turban Thief]";

+			mes "It is a done deal, no refunds!";

+			set zeny,zeny-750000;

+			getitem 7114,1;

+			set mask_q,2;

+			close;

+		NoGoB:

+			mes "[Turban Thief]";

+			mes "Hmmm... you drive a hard bargain, ok... my final offer...";

+			menu "Pay 500,000",MonC,"It can go lower than that.",NoGoC;

+			MonC:

+				next;

+				if(Zeny < 500000) goto NotEnough;

+				mes "[Turban Thief]";

+				mes "Alright, here you go then...";

+				set zeny,zeny-500000;

+				getitem 7114,1;

+				set mask_q,2;

+				close;

+			NoGoC:

+				next;

+				mes "[Turban Thief]";

+				mes "Ack!  Forgez it!  I can do bettaz en elsez where!";

+				close;

+	NoBus:

+		mes "[Turban Thief]";

+		mes "You have no more business with me, go away!";

+		close;

+	AWAY:

+		mes "[Turban Thief]";

+		mes "What do you wan te withz me?  Be gone!";

+		close;

+	NotEnough:

+		mes "[Turban Thief]";

+		mes "Are youz playin wit me?  You don't have ze money!";

+		close;

+}

+		

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

+//				Umbala Language Quest

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

+

+prontera.gat,145,290,5	script	Mason	742,{

+	if(ulquest == 1) goto Got;

+	mes "[Mason]";

+	mes "Hey there, I came here to Prontera in search of an old lady who can remove cards from slots. Do you know where I can find her?";

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

+

+	mes "Oooo, could you please tell me where she's at? I'd be really appreciative.";

+	menu "Swordsman Association",-, "Sanctuary",Boo1,"Prontera Chivalry",Boo2,"Armory",Boo3,"Kit Shop",Boo4,"Inn",Boo5,"Trading Post",Yay,"Library",Boo6,"Job Agency",Boo7,"Prontera Castle",Boo8,"City Hall",Boo9;

+

+	next;

+	mes "[Mason]";

+	mes "Hmm... I dunno why she would be there... guess I'll take a look.";

+	close;

+Boo1:

+	next;

+	mes "[Mason]";

+	mes "Wow I never knew she was a religious person... I'll see to it thanks.";

+	close;

+Boo2:

+	next;

+	mes "[Mason]";

+	mes "Hmm.... are you sure about that?";

+	close;

+Boo3:

+	next;

+	mes "[Mason]";

+	mes "Why would she need to go there? I think you might be mistaken.";

+	close;

+Boo4:

+	next;

+	mes "[Mason]";

+	mes "The only thing she'd need at a Kit shop is medicine for her rheumatism. She's probably long gone from there by now.";

+	close;

+Boo5:

+	next;

+	mes "[Mason]";

+	mes "I don't think she needs to be there, she LIVES here in Prontera.";

+	close;

+Boo6:

+	next;

+	mes "[Mason]";

+	mes "Ah I see, if she's studying then I don't want to bother her. Thanks anyways.";

+	close;

+Boo7:

+	next;

+	mes "[Mason]";

+	mes "Job Agency?  I don't think so.  Don't lead me all around Prontera please! She's already a teacher here.";

+	close;

+Boo8:

+	next;

+	mes "[Mason]";

+	mes "The castle eh, I don't want to step in there... just doesn't feel like my style. I don't like that noble feeling of importance type of thing.";

+	close;

+Boo9:

+	next;

+	mes "[Mason]";

+	mes "O wow, did she become an important part of Prontera? I'd think she's too busy for me to visit. I'll try again later.";

+	close;

+Yay:

+	next;

+	mes "[Mason]";

+	mes "Ah, I heard that her class was somewhere around there... thanks a lot! Here's a lil something for your help.";

+	getitem 7117,1;

+	set ulquest,1;

+	close;

+Got:

+	mes "[Mason]";

+	mes "Yay, I found her! Thank you very much for you help!";

+	close;

+

+No:

+	mes "[Mason]";

+	mes "Oh..Ok..Thanks anyways";

+	close;

+}

+

+aldebaran.gat,153,212,1	script	[Mojo]	740,{

+	mes "[Mojo]";

+	mes "Oh no!  I lost my teacher's ^FF0000old magic book^000000!  What am I going to do... those dumb Bathory...";

+	close;

+}

+

+amatsu.gat,267,189,4	script	Marie	744,{

+	if(countitem(9001)>0 && countitem(643)>0) goto ForMe;

+	mes "[Marie]";

+	mes "Hello, is there something you need?";

+	menu "No nothing at all.",Noth,"Your teacher sent me.",-;

+

+	mes "What does he want from me?";

+	next;

+	mes "[Marie]";

+	mes "Oh wait, I see... he wants his reference scroll back am I right? Well, I'm kinda still using it buuut... I'll give it back if you can gimme a poring egg and an incubator. Those things are so cute!";

+	close;

+Noth:

+	mes "Hrrmm okay? Cya then..";

+	close;

+ForMe:

+	mes "[Marie]";

+	mes "Heyyy there, you have a poring egg and the pet incubator to go with it! Are those for me?";

+	menu "Yep",-, "Sorry no",DOH;

+

+	mes "Yatta!  Here's a lil something in return.";

+	getitem 7118,1;

+	delitem 9001,1;

+	delitem 643,1;

+	close;

+DOH:

+	mes "O pooo... sigh...";

+	close;

+}

+

+yuno.gat,157,366,2	script	Wise Man Fabius	743,{

+	if((countitem(1006) < 1) || (countitem(7118) < 1) || (countitem(7117) < 1)) goto FIN;

+	delitem 1006,1;	

+	delitem 7118,1;	

+	delitem 7117,1;

+	mes "[Fabius]";

+	mes "Ah, you've done well in retrieving my references. These artifacts holds information about ruins around the world, from the burning hell of the Magma Dungeon, to the strange eerie Hidden Forest of Yggsadril.";

+	next;

+	mes "[Fabius]";

+	mes "But enough talk, you're just eager to get your reward aren't you?  Well it may not sound much, but my reward for you is knowledge...";

+	next;

+	mes "[Fabius]";

+	mes "Actually it is knowledge of the Umbalian people. They are connected to this world of Midgard in some special way, we just can't confirm it yet. There is a theory that they may be like the elves and protect the ancient tree of Yggsadril.";

+	next;

+	mes "[Fabius]";

+	mes "And I, a great wise man of Yuno, will teach you their language!";

+	next;

+	mes "^0000FF Learned the language of Umbalians! ^000000";

+	set umb_lang,2;

+	close;

+FIN:

+	mes "[Fabius]";

+	mes "Argh! My three students ran off with my references! Hey you! Can you get them back for me? I'll gladly reward you.";

+	next;

+	mes "[Fabius]";

+	mes "From what I know, they're in different seperate towns making something out of themselves. Oh yeah, tell them I sent you, their names are Marie, Mason, and Mojo";

+	close;

+}

+

+//========================================================================================================================\\

+//                       Litle Quest NPC to enter the dungeon

+//                                Fixed by Akaru

+//========================================================================================================================\\

+umbala.gat,65,253,4	script	Tree Guardian	752,{ 

+	mes "[Tree Guardian]"; 

+	mes "Stop, stranger, here is the entrance to the ancient tree!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "I cannot allow you to enter, you look pretty weak!"; 

+	next; 

+L_MENU:

+	menu "Talk about tree",-, "Talk about Umbala",M_TALKUMB, "Enter Dungeon",M_DUN, "Leave",M_Leave; 

+

+	mes "[Tree Guardian]"; 

+	mes "The tree is an ancient relique of our culture!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "But recently some monsters overwhelmed the tree and are now"; 

+	mes "slowly killing the tree...like a poison...from inside.."; 

+	next; 

+	goto L_MENU;

+M_TALKUMB: 

+	mes "[Tree Guardian]"; 

+	mes "We don't have many visitors in our small town.."; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "Most people don't find us or are just afraid of us!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "And now, we are even more unpopular, because of that damn beast!"; 

+	next; 

+	menu "What beast?",- ,"Leave",M_Leave; 

+

+	mes "[Tree Guardian]"; 

+	mes "The Werewolf of course!!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "He is sneaking around our town and killing our soldiers at night!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "Hey...if you could get rid of that beast!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "I'll let you in!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "From now on we can live in peace again, thanks to you!"; 

+	next; 

+	mes "[Tree Guardian]"; 

+	mes "You may enter the dungeon now!"; 

+	set umbdun,1;

+	close; 

+M_DUN: 

+	mes "[Tree Guardian]"; 

+	if (umbdun != 1) mes "We do not permit weak people to enter!";

+	if (umbdun != 1) close;

+	mes "Come on in, brave warrior!"; 

+	warp "um_dun01.gat",42,30; 

+M_Leave:  

+	close; 

+}

diff --git a/npc/quests/quests_yuno.txt b/npc/quests/quests_yuno.txt
new file mode 100644
index 000000000..9d80379d3
--- /dev/null
+++ b/npc/quests/quests_yuno.txt
@@ -0,0 +1,134 @@
+//===== eAthena Script ======================================= 

+//= Quests NPCs located in Yuno City

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

+//= DiaDz (v1.0)

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

+//= 1.2

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

+//= eAthena 7.15 +

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

+//=

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

+//= v1.1 Re-did the text and re-organized the script.  Corrected some items. [kobra_k88]

+//= v1.2 Added part to Bro's for alchemist quest [Darkchild]

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

+

+

+

+

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

+yuno_in01.gat,103,158,4	script	Bain	98,

+{

+	set @name$, "[Bain]";

+OnStart:

+	mes @name$;

+	mes "We are going to invent a doll that can talk and communicate! Well, at least that's what I'm trying to do....";

+	mes "The idea came from an old tale about a doll that acted like a real person.";

+	next;

+	mes @name$;

+	mes "I figure if someone had the ability to make such a doll back then, then it should definitely be possible today.";

+	next;

+	mes @name$;

+	mes "Unfortunately I lack the proper supplies and parts to actually try and build the doll.";

+	mes "Although I can buy some of the things I need, many of these items can only be taken from monsters......";

+	next;

+	mes @name$;

+	mes "I am much to weak to defeat these monsters....... How will I be able to continue this project??.....";

+	next;

+	menu "I'll get the items for you.",-, "Good luck.",M_End;

+

+		mes @name$;

+		mes "Really? Such benevolence is rare in this day and age.  We would be grateful for you assisstance.";

+		mes "Here are the items that we will be needing.......";

+		callsub sF_List;

+		set sleiphnir_q, 1;

+		close;

+

+	M_End:

+		mes @name$;

+		mes "We'll need a lot of luck if this is going to happen.  If you know of anyone who can help us, please let us know.";

+		close;

+

+L_Check:

+	if((countitem(974) < 1) || (countitem(612) < 5) || (countitem(7068) < 5) || (countitem(1003) < 5) || (countitem(7043) < 5) || 

+	(countitem(757) < 3) || (countitem(756) < 3) || (Zeny < 2000)) goto L_NotEnuf;

+	mes "Thank you very much! You found all of the items I needed.  We could not have completed this project without your help";

+	next;

+	delitem 974,1;

+	delitem 612,5;

+	delitem 7068,5;

+	delitem 1003,5;

+	delitem 7043,5;

+	delitem 757,3;

+	delitem 756,3;

+	set Zeny, Zeny-2000;

+	mes @name$;

+	if(ALCH_Q == 6) goto L_Alchemist;

+

+	L_Other:

+		mes "And here is something for you, to show you how much we appreciate your help.";

+		getitem 2410, 1;

+		set sleiphnir_q, 0;

+		close;

+

+	L_Alchemist:

+		mes "Okay, let's try this out!";

+		mes "Hold on for just a second!";

+		next;

+		mes "-Vrrrmrmrmrmrmrmrrmrmrmmrmrmrmrmmm";

+		next;

+		mes "-Pakakakakakakakakakakakakakak";

+		next;

+		mes "-Shakakakakakakakakakakaakakak";

+		next;

+		mes @name$;

+		mes "AHHH it is a success!";

+		mes "I don't know if we can do anything else, but this time we have created";

+		set @wowitem,rand(2);

+		if(@wowitem == 0) mes "5 Ruby!";

+		if(@wowitem == 0) getitem 723,5;

+		if(@wowitem == 1) mes "3 Gold!";

+		if(@wowitem == 1) getitem 969,3;

+		next;

+		set ALCH_Q2, 2;

+		mes @name$;

+		mes "Now that we know that it works,";

+		mes "I don't have any need for this.";

+		mes "Why don't you take it? Oh,";

+		mes "and if you find anymore parts,";

+		mes "bring them to me again. Heheheheh.";

+		next;

+		mes @name$;

+		mes "Thank for helping me out.";

+		mes "You have my eternal gratitude.";

+		mes "I wish you luck in your journeys!";

+		close;

+

+	L_NotEnuf:

+		mes "In case you forgot, these are the items that we will need.  I suggest you write them down......";

+		callsub sF_List;

+		close;

+

+sF_List:

+	next;

+	mes @name$;

+	mes "^5533FF1 Mixture";

+	mes "5 Mini-Furnaces";

+	mes "5 Burnt Trees";

+	mes "5 Coal";

+	mes "5 Fine Sand";

+	mes "3 Rough Elunium";

+	mes "3 Rough Oridecon^000000";

+	next;

+	mes @name$;

+	mes "We will also need ^5533FF2,000 zeny^000000.";

+	mes "The money will help pay for the minor expenses invovled in the undertaking of this project.  Good luck and please be safe.";

+	return;

+}

+

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

+yuno_in01.gat,99,153,4	script	Bajin	47,{

+	set @name$, "[Bajin]";

+	doevent "Bain::OnStart";

+	close;

+}

diff --git a/npc/quests/skills/acolyte_skills.txt b/npc/quests/skills/acolyte_skills.txt
new file mode 100644
index 000000000..6b827a8c5
--- /dev/null
+++ b/npc/quests/skills/acolyte_skills.txt
@@ -0,0 +1,126 @@
+//===== eAthena Script =======================================

+//= Acolyte Skill Quest

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

+//= kobra_k88

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

+//= 1.0a

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

+//= eAthena 7.15 +

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

+//= <Description> 

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

+//= v1.0a Now using functions found in "Global_Functions.txt"

+//= for class checks.

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

+

+

+prt_church.gat,173,23,4	script	Acolyte Klift	79,

+{

+	mes "[Acolyte Klift]";

+	if (callfunc("Is_Holy_Class")) goto L_Start;

+

+L_Other:

+	mes "Ah, welcome to the Prontera Church also known as the Sanctuary.";

+	mes "Unfortunately I cannot be of much help to you.  For my fellow";

+	mes "Priests and Acolytes however, I can help them to find their ^5555FF'hidden";

+	mes "ability'^000000.";

+	close;

+

+L_Start:

+	if (HOLYLIGHT == 1) goto L_Check;

+	if (getskilllv(156)>0) goto L_GotSkill;

+	if(sex==1) mes "Ahh... Brother!";

+	if(sex==0) mes "Ahh... Sister!";

+	mes "Does the task of caring for our lost sheep tire you out? Is it too";

+	mes "much of a burden? Do not despair, I am here to assist you.";

+	next;

+	menu "About an Acolyte's ^5555FF'hidden ablitiy'^000000...",M_0, "End Conversation.",M_End;

+

+	M_0:

+		mes "[Acolyte Klift]";

+		mes "Faced with great danger in an endless struggle with evil, our";

+		mes "brethren are in much need of assistance.";

+		next;

+		mes "[Acolyte Klift]";

+		mes "As acolytes approach their senior years in the clergy, they learn to";

+		mes "call upon their inner power to use a special skill to aid them in";

+		mes "battle.";

+		next;

+		mes "[Acolyte Klift]";

+		mes "That skill is ^5555FF'Holy Light'^000000.  Holy Light does damage to";

+		mes "all foes but is even more effective on the undead.";

+		next;

+		mes "[Acolyte Klift]";

+		mes "For someone like yourself to learn this skill, takes some hard work.";

+		mes "Would you like to learn this skill?";

+		next;

+		menu "Yes, please.",-, "Let me think about it.",M_End;

+

+			mes "[Acolyte Klift]";

+			mes "Very good.  You will need to find these items in order to learn the";

+			mes "skill:";

+			mes "^5555FF1 Opal^000000,";

+			mes "^5555FF1 Crystal Bule^000000,";

+			mes "and ^5555FF1 Rosary^000000.";

+			next;

+			mes "[Acolyte Klift]";

+			mes "Of course you will also need to have a sufficient level of";

+			mes "experience.  Namely a ^5555FFjob level of at least 30^000000.  This does";

+			mes "not apply to Priests or Monks however, because of the vast amount of";

+			mes "experience they already have.";

+			next;

+			mes "[Acolyte Klift]";

+			mes "Come back when you are ready.  I will be here.";

+			set HOLYLIGHT, 1;

+			close;

+	M_End:

+		mes "[Acolyte Klift]";

+		mes "I understand your zeal.  You have much time yet to practice and gain";

+		mes "experience.  Go forth with many blessings...";

+		close;

+

+L_Check:

+	mes "So, are you ready for the Holy Light training? Let me check....";

+	next;

+	mes "[Acolyte Klift]";

+	if (Class==Job_Acolyte && JobLevel<30) goto L_LowLvl;

+	if (countitem(727)<1 || countitem(991)<1 || countitem(2608)<1) goto L_NoItems;

+

+	mes "Oh! Very good.  You have brought back all of the items I asked for.";

+	next;

+	mes "[Acolyte Klift]";

+	mes "Ok lets get started...";

+	next;

+	mes "(after hours of praying and meditation)";

+	next;

+	mes "[Acolyte Klift]";

+	mes "Yes! I feel it. You have released your hidden abilities and can now";

+	mes "use ^5555FFHoly Light^000000!";

+	delitem 727,1;

+	delitem 991,1;

+	delitem 2608,1;

+	skill 156,1,0;

+	set HOLYLIGHT, 0;

+	mes "[Priest]";

+	mes "You have done well.  May God bless you!";

+	emotion 21;

+	close;

+

+	L_LowLvl:

+		mes "I'm sorry but you need more training before I can teach you Holy";

+		mes "Light.  Come back when your job level is at least 30.";

+		close;

+	L_NoItems:

+		mes "I'm sorry but you don't have the required items for Holy Light.";

+		mes "You need:";

+		mes "^5555FF1 Opal^000000,";

+		mes "^5555FF1 Crystal Bule^000000,";

+		mes "and ^5555FF1 Rosary^000000.";

+		close;

+

+L_GotSkill:

+	mes "Ah, I see you have been using Holy Light.  It is such a great skill";

+	mes "that I truly believe it to be a gift from the lord himself.  May";

+	mes "God be with you always.";

+	close;

+}

diff --git a/npc/quests/skills/archer_skills.txt b/npc/quests/skills/archer_skills.txt
new file mode 100644
index 000000000..4b8650d08
--- /dev/null
+++ b/npc/quests/skills/archer_skills.txt
@@ -0,0 +1,210 @@
+//===== eAthena Script =======================================

+//= Archer Skill Quest

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

+//= eAthena dev team

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

+//= 1.0 a

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

+//= eAthena 7.15 +

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

+//= Arrow crafting, Arrow Repel skills

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

+//= v1.0 Roberto message text is based off RO npc.  Jason message

+//= text is custom from old version.

+//= All items are from official quests though.[kobra_k88]

+//= v1.0a Now using functions found in "Global_Functions.txt"

+//= for class checks.[kobra_k88]

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

+

+

+

+//<======================== Roberto: Arrow crafting =========================>\\

+morocc.gat,121,109,5	script	Roberto	88,

+{

+	mes "[Roberto]";

+	if (callfunc("Is_Bow_Class")) goto L_Start;

+

+L_Other:

+	mes "Eh?... First time seeing an archer of something? Why don't you just";

+	mes "go about your business and leave me be.  I only talk to high level";

+	mes "Archer types........";

+	emotion 1;

+	close;

+L_Start:

+	if (Class==Job_Archer && JobLevel<35) goto L_LowLvl;

+	if (getskilllv(147)>0) goto L_GotSkill;

+	if (ARWCRFT == 1) goto L_GetSkill;

+	mes "Hmmm?.... Oh you seem to be a high level Archer type.  Why don't we";

+	mes "converse for a while, eh? Let me start off by talking about my";

+	mes "childhood.... . . . . . . . . . . .";

+	next;

+	mes "[Roberto]";

+	mes "When I turned 15, I decided I'd work for a Blacksmith........";

+	next;

+	mes "[Roberto]";

+	mes "............... ~(blah blah blah)~...................";

+	next;

+	mes "[Roberto]";

+	mes ".... man was my Junior Prom a mess...........";

+	next;

+	mes "[Roberto]";

+	mes "..~(blah blah)~........ ~(blah blah)~.........";

+	next;

+	mes "(many grueling hours later.....)";

+	next;

+	mes "[Roberto]";

+	mes "So that's how I found out how to create all of these different";

+	mes "kinds of arrows for myself.  It definately comes in handy.";

+	next;

+	mes "[Roberto]";

+	mes "Say, would you like me to teach you?  We've had such a nice talk";

+	mes "that I feel like can trust you with this knowledge.......";

+	next;

+	menu "Zzz... Eh!! Uh, Arrows... making... yes, teach.",M_0, "Zzzzz... Eh! uh... where am I????",M_1;

+

+	M_0:

+		mes "[Roberto]";

+		mes "Alright then!  In order for me to teach you the art of ^5533FF'Arrow";

+		mes "Crafting'^000000, you must first bring me these items:";

+		mes "^FF335520 Resin,";

+		mes "7 Poison Spores,";

+		mes "41 Pointed Scales,";

+		mes "13 Trunks,";

+		mes "1 Red potion^000000";

+		set ARWCRFT, 1;

+		emotion 5;

+		close;

+	M_1:

+		mes "[Roberto]";

+		mes "................................................................";

+		emotion 7;

+		next;

+		mes "[Roberto]";

+		mes "Let me teach you this special skill.... It's called, my boot up";

+		mes "your A........";

+		emotion 32;

+		next;

+		mes "!!!!SMACK!!!!";

+		percentheal -5,0;

+		close;

+

+L_GetSkill:

+	if ((countitem(907)<20) || (countitem(7033)<7) || (countitem(906)<41) || (countitem(1019)<13) || (countitem(501)<1)) goto L_NotEnuf;

+	mes "You've brought all of the items... very good.  Lets begin.....";

+	next;

+	mes "~ hands you a very long list of ingredients ~";

+	next;

+	mes "[Roberto]";

+	mes "There you are.  Your all set.";

+	next;

+	mes ".......................";

+	next;

+	mes "[Roberto]";

+	mes "Hmm?...... What do you mean 'that's it'?....... What else were you";

+	mes "expecting...... With that list you will be able to make any kind of";

+	mes "arrows you want.......";

+	next;

+	mes "[Roberto]";

+	mes "I hope you didn't expect some kind of elaborate ceremony or some";

+	mes "kind of unique and lengthy training.......";

+	next;

+	delitem 907, 20;

+	delitem 7033, 7;

+	delitem 906, 41;

+	delitem 1019, 13;

+	delitem 501, 1;

+	skill 147,1,0;

+	set ARWCRFT, 0;

+	mes "[Roberto]";

+	mes "...... Well good luck and have fun making arrows.  I've got other";

+	mes "things to do if you don't mind.......";

+	close;

+

+	L_NotEnuf:

+		mes "You don't have everything I need.";

+		next;

+		goto M_0;

+L_GotSkill:

+	mes "Hmmm?.... Sorry but I've got nothing left to teach you.  Just keep";

+	mes "on making those arrows..... For us Archer types there can never be";

+	mes "to many arrows.....";

+	close;

+L_LowLvl:

+	mes "Hmm?... Do you have something to say to me? Unfortunately I have";

+	mes "nothing to say to you.....";

+	emotion 1;

+	next;

+	mes "[Roberto]";

+	mes "It's sad but conversations with people who have ^5533FFlow job levels^000000 such";

+	mes "as yourself always seem to end abrubtly..... Maybe if you trained a";

+	mes "little bit longer we would have more to talk about............";

+	close;

+}

+

+

+//<============================== Arrow Repel ===============================>\\

+payon.gat,190,176,5	script	Jason	88,

+{

+	mes "[Jason]";

+	if (callfunc("Is_Bow_Class")) goto L_Start;

+

+L_Other:

+	mes "What does life need from a lonely lad like me?";

+	close;

+L_Start:

+	if (getskilllv(148)>0) goto L_GotSkill;

+	if (Class == Job_Archer && JobLevel < 35) goto L_LowLvl;

+	if (ARWREP == 1) goto L_Check;

+	mes "Hi, I'm the master of the skill ^0033FFArrow Repel^000000. I might be able to";

+	mes "teach you the skill, but only if you help me get the ingredients";

+	mes "for my Grandma's soup.";

+	next;

+	mes "[Jason]";

+	mes "Arrow Repel allows you to use your arrows to repel, push back, an";

+	mes "enemy and keep them at a distance.  This is a great skill for us";

+	mes "Archer types.";

+	next;

+

+	L_List:

+	mes "[Jason]";

+	mes "I need the following:";

+	mes "- 2 ^FF0000Emeralds^000000";

+	mes "- 3 ^FF0000Yoyo tails^000000";

+	mes "- 10 ^FF0000Tentacles^000000";

+	mes "- 10 ^FF0000Bill of birds^000000";

+	mes "- 36 ^FF0000Banana Juices^000000";

+	next;

+	mes "[Jason]";

+	mes "Hurry hurry!";

+	set ARWREP, 1;

+	close;

+

+L_LowLvl:

+	mes "Oh I think you're a bit inexperienced to learn anything from me,";

+	mes "come back later!  Maybe around ^5533FFjob level 35^000000 or so.....";

+	close;

+

+L_Check:

+	if ((countitem(721)<2) || (countitem(942)<3) || (countitem(962)<10) || (countitem(925)<10) || (countitem(532)<36)) goto L_NotEnuf;

+	mes "OH! Marvelous you brought me all the ingredients!";

+	mes "Now It'll be my pleasure to teach you the skill ^0033FFArrow Repel^000000";

+	next;

+	delitem 721,2;

+	delitem 942,3;

+	delitem 962,10;

+	delitem 925,10;

+	delitem 532,36;

+	skill 148,1,0;

+	set ARWREP, 0;

+	mes "[Jason]";

+	mes "There you go! Happy hunting in the future.";

+	close;

+

+	L_NotEnuf:

+		mes "You don't have everything I need.";

+		next;

+		goto L_List;

+L_GotSkill:

+	mes "Hey! It's you again? I'm afraid I've taught you everything I know.";

+	close;

+}

diff --git a/npc/quests/skills/mage_skills.txt b/npc/quests/skills/mage_skills.txt
new file mode 100644
index 000000000..fd47c8e0b
--- /dev/null
+++ b/npc/quests/skills/mage_skills.txt
@@ -0,0 +1,114 @@
+//===== eAthena Script =======================================

+//= Mage Skill Quest

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

+//= kobra_k88

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

+//= 1.0a

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

+//= eAthena 7.15 +

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

+//= <Description> 

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

+//= v1.0a Now using functions found in "Global_Functions.txt"

+//= for class checks.[kobra_k88]

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

+

+

+

+geffen_in.gat,151,119,4	script	BLIZZARDRISS	71,

+{

+	mes "[BLIZZARDRISS]";

+	if(callfunc("Is_Magic_Class")) goto L_Start;

+

+L_Other:

+	mes "What new magic spells will I discover today......??";

+	emotion 20;

+	close;

+

+L_Start:

+	if(ENRGYCOAT == 1) goto L_GetSkill;

+	if(getskilllv(157)>0) goto L_GotSkill;

+	mes "Hey! My friend! I see that you are a magic user.  If you look within yourself, you'll find that you have... 'HIDDEN ABILITIES'!!";

+	next;

+	menu "'Hidden Abilities'.....?",M_0, "End Conversation.",M_End;

+

+	M_0:

+		mes "[BLIZZARDRISS]";

+		mes "For many years I studied the ancient magic of Geffen, and I recently re-discovered a forgotten magic spell that is quite usefull.";

+		next;

+		mes "[BLIZZARDRISS]";

+		mes "The spell uses your 'pyscho-kenetic energy' to 'coat' your body in a magical shield, protecting you from enemy attacks.";

+		next;

+		mes "[BLIZZARDRISS]";

+		mes "Only highly trained magic users can learn this amazing spell.";

+		mes "Those who want to use this spell must tap into the hidden energies and abilities burried deep within!";

+		next;

+		mes "[BLIZZARDRISS]";

+		mes "The spell is called ^5555FF'Energy Coat'^000000!.  Would you like me to teach it to you?";

+		next;

+		menu "Wow! Sounds great!",sM_0, "Meh... not interested.",sM_End;

+

+		sM_0: 

+			mes "[BLIZZARDRISS]";

+			mes "In order for me to teach you this spell I will need the following items:";

+			mes "^5533FF 3 Glass Beads,";

+			mes " 1 One Carat Diamond,";

+			mes " 5 Shells,^000000";

+			mes " and ^5533FF1 Solid shell^000000.";

+			next;

+			mes "[BLIZZARDRISS]";

+			mes "You will also need to have a sufficient amount of experience.  For Mages, a job level of at least 35 is needed.";

+			mes "Wizards and Sages are high level magic users and can learn the skill at any job level.";

+			next;

+			mes "[BLIZZARDRISS]";

+			mes "When you are fully trained and have all of the required items come back and see me.";

+			set ENRGYCOAT, 1;

+			close;

+

+		sM_End:

+			mes "[BLIZZARDRISS]";

+			mes "Hmf! Suit yourself.  Don't come complaining to me when get beat up by a bunch of spores!!";

+			emotion 6;

+			close;

+

+	M_End:

+		mes "[BLIZZARDRISS]";

+		mes "The wise man must have patience!  Prepare yourself and return when you are ready.";

+		close;

+

+L_GetSkill:

+	if(Class==Job_Mage && JobLevel < 35) goto L_JobLvl;

+	if(countitem(746)<3 || countitem(730)<1 || countitem(935)<5 || countitem(943)<1) goto L_Items;

+	mes "Ohh my, ohh my...... This is going to be swell.  Hand over the items... Thank you.";

+ 	next;

+	mes "~ several hours later ~";

+	next;

+	delitem 746,3;

+	delitem 730,1;

+	delitem 935,5;

+	delitem 943,1;

+	skill 157,1,0;

+	set ENRGYCOAT,0;

+ 	mes "[BLIZZARDRISS]";

+ 	mes "You can now use the spell, 'Energy Coat'!! Use it wisely my friend!";

+	emotion 21;

+ 	close;

+

+	L_JobLvl:

+		mes "Didn't you listen to my explanation? You need a job level of at least 35 to learn 'Energy Coat'.";

+		emotion 1;

+		close;

+

+	L_Items:

+		mes "Didn't you listen to my explanation? You need the following items for me to teach you 'Energy Coat':";

+		mes "^5533FF 3 Glass Beads,";

+		mes " 1 One Carat Diamond,";

+		mes " 5 Shells,^000000";

+		mes " and ^5533FF1 Solid shell^000000.";

+		emotion 1;

+		close;

+

+L_GotSkill:

+	mes "Well hello there.  The 'Energy Coat' skill is great isn't it? Anyway, good luck with your journey.";

+	close;

+}

diff --git a/npc/quests/skills/merchant_skills.txt b/npc/quests/skills/merchant_skills.txt
new file mode 100644
index 000000000..f3d6adcf3
--- /dev/null
+++ b/npc/quests/skills/merchant_skills.txt
@@ -0,0 +1,308 @@
+//===== eAthena Script =======================================

+//= Merchant Skills Quests

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

+//= kobra_k88

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

+//= 1.1a

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

+//= eAthena 7.15 +

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

+//= <Description> 

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

+//= Fully working

+//= v1.1 Bug fixes

+//= v1.a Now using functions found in "Global_Functions.txt"

+//= for class checks.[kobra_k88]

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

+

+

+

+

+//--------------------------------------- Necko: Crazy Uproar--------------------------------\\

+alberta.gat,89,96,5	script	Necko	139,0,4,

+{

+	mes "[!?]";

+	mes "Muahahahahhhahahahahhahah!!";

+	mes "Pukakakakakkakakakakakakaka!!";

+	close;

+}

+

+alberta.gat,83,96,5	script	Necko	98,

+{

+	mes "[Necko]";

+	if (callfunc("Is_Merc_Class")) goto L_Start;

+

+L_Other:

+	mes "Necko's store is closed right now.  Come back later..... Hehe....";

+	close;

+

+L_Start:

+	if (getskilllv(155)>0) goto L_GotSkill;

+	if (CRAZYROAR == 1) goto L_GetSkill;

+	mes "Oh! Did you come here because you were intrigued by my boisterous voice? My voice is quite loud, isn't it?";

+	mes "Afterall you did hear it from a far off distance.";

+	emotion 1;

+	next;

+	mes "[Necko]";

+	mes "I'll let you in on something....... My voice is more than just loud..... it's actually quite unique......";

+	next;

+	mes "[Necko]";

+	if(Class==Job_Merchant && JobLevel < 15) goto L_JobLvl;

+	mes "You see, I know a skill that lets me shout in a way that actually helps me.... It is the ^3355FFCrazy Uproar^000000 skill!!!";

+	emotion 5;

+	next;

+	mes "[Necko]";

+	mes "Crazy Uproar uses your loud voice to boost your battle spirit!";

+	mes "The skill requires ^FF55338 sp^000000 to use and inturn you will recieve an additional ^3355FF4 STR for 5 min^000000!!";

+	next;

+	mes "[Necko]";

+	mes "This skill is very usefull.  To learn it you must learn the essentials of sound.  There was a singer in Payon that taught sound theory.......";

+	next;

+	mes "[Necko]";

+	mes "Unfortunately that person passed away so you can no longer learn those essentials..............";

+	mes "Aww.... you look disappointed.... Do you really want to learn Crazy Uproar??";

+	next;

+	mes "[Necko]";

+	mes "Hmm..... I will teach you then, that is, if you trully wish to learn.  You will have to train your vocal cords.";

+	mes "You will also need to gather these items:";

+	next;

+	mes "[Necko]";

+	mes "- ^3355FF7 Pearls,";

+	mes "- 1Banana juice,";

+	mes "- 50 Mushroom spores^000000.";

+	next;

+	mes "[Necko]";

+	mes "Come back when you are ready! I think I shall do a little vocal training myself........";

+	mes "Bbooowuuuuuuuuuuuuuuuuuuuuuuuuuh!!";

+	set CRAZYROAR, 1;

+	close;

+

+	L_JobLvl:

+		mes "Once you've reached a ^3355FFjob level of 15^000000 come back and see me.  I'll tell you all about the secrect to my voice.....";

+		next;

+		mes "[Necko]";

+		mes "Uahahahahahahhahahahahahaha!";

+		mes "Kyukwakakakakkakakakakakkakaka!";

+		close;

+

+L_GetSkill:

+	if ((countitem(722)<7) || (countitem(532)<1) || (countitem(921)<50)) goto L_Items;

+	mes "Oh You've gathered the items! Very good, very good.  Now it's time to start your training.....";

+	next;

+	mes "[Necko]";

+	mes "Repeat after me: Fa fa fa fa fa.... So so so so so..... La la la la la.... Mi mi mi mi mi mi......";

+	next;

+	mes "~several hours later~";

+	next;

+	mes "[Necko]";

+	mes "Raaaaaawwwwrrrrrrrrrrr!....... Ha ha!! Execellent.  Your voice is now finely tuned for ^3355FFCrazy Uproar^000000.  Good job.";

+	delitem 722,7;

+	delitem 532,1;

+	delitem 921,50;

+	skill 155,1,0;

+	set CRAZYROAR, 0;

+	emotion 21;

+	close;

+

+	L_Items:

+	 	mes "You need to get these items for Crazy Uproar:";

+		mes "- ^3355FF7 Pearls,";

+		mes "- 1Banana juice,";

+		mes "- 50 Mushroom spores^000000.";

+		close;

+

+L_GotSkill:

+	mes "Hello again.  I can tell by the sound of your mighty voice that you are becoming very good at Crazy Uproar.";

+	close;

+}

+

+

+//----------------------------------------- Charlron: Change cart ---------------------------------\\

+alberta.gat,119,221,6	script	Charlron	107,

+{

+	mes "[Charlron]";

+	if (callfunc("Is_Merc_Class")) goto L_Start;

+L_Other:

+	mes "I am a merchant that deals in many things.  My name is Charlron.  If you ever find anything interesting, come back and try to negotiate a deal with me.";

+	close;

+L_Start:

+	if (getskilllv(154)>0) goto L_GotSkill;

+	if (CHANGECART == 1) goto L_GetSkill;

+	mes "Welcome young one.  Is selling fun for you? I am the merchant Charlron.";

+	next;

+	mes "[Charlron]";

+	mes "Aren't you tired of your old, and plain looking cart? Well I can help.";

+	next;

+	mes "[Charlon]";

+	mes "I have been doing some research on cart design recently and have come up with some new and interesting designs for the cart.";

+	next;

+	mes "[Charlon]";

+	mes "I can change the way your cart looks for you.  Of course some conditions need to be met......";

+	next;

+	mes "[Charlron]";

+	if (Class==Job_Merchant && JobLevel < 30) goto L_JobLvl;

+	mes "First you will need to bring me these items:";

+	mes "^3355FF50 Trunks,";

+	mes "20 Animal Skin,";

+	mes "10 Iron^000000.";

+	set CHANGECART, 1;

+	close;

+

+	L_JobLvl:

+		mes "I'm a pretty famous merchant, so I don't really do business with beginners but..........";

+		mes "Once you've reached ^3355FFjob level 30^000000 I may consider doing business with you.";

+		close;

+

+L_GetSkill:

+	if ((countitem(1019)<50) || (countitem(998)<10) || (countitem(919)<20)) goto L_Items;

+	mes "Oh good, you have all of the items.  Well here you are..... Hmm?... Oh these are the design sheets for your cart.";

+	mes "Now that you have the proper materials, just follow these guides to make your cart look spectactular.";

+	//delitem 1019,50;

+	//delitem 998,10;

+	//delitem 919,20;

+	skill 154,1,0;

+	set CHANGECART, 0;

+	mes "[Charlron]";

+	mes "Good luck, see you around";

+	close;

+

+	L_Items:

+		mes "Come back when you've brought me these items:";

+		mes "^3355FF50 Trunks,";

+		mes "20 Animal Skin,";

+		mes "10 Iron^000000.";

+		close;

+L_GotSkill:

+	mes "Heh heh... It's nice to see fancy looking carts like yours on the streets of town.  Well back to the drawing board....";

+	close;

+

+}

+

+

+//-------------------------====-------- Gershuan: Cart Revolution ---------------------------------\\

+alberta.gat,232,106,6	script	Gershaun	57,

+{

+	if (callfunc("Is_Merc_Class")) goto L_Start;

+

+L_Other:

+	mes "[Gershaun]";

+	mes "If it doesn't work, make it work!";

+	mes "If it doesn't work, make it work!";

+	mes "If it doesn't work, make it work!";

+	close;

+

+L_Start:

+	if (getskilllv(153)>0) goto L_GotSkill;

+	if (CARTREVO == 1) goto L_GetSkill;

+	mes "[Gershaun]";

+	mes "Hmm... a young merchant.  You must use carts too right? Since to have to do all of that vending.....  But is that all you use your cart for?";

+	emotion 20;

+	next;

+	mes "[Gershaun]";

+	mes "I researched some ways of using the cart differently.  One way involved cooking ramen and another involved jump-roping (don't ask).";

+	mes "Still none of my new ideas were satisfactory.";

+	next;

+	menu "I know what you mean.",M_0, "......???",M_1;

+

+	M_0:

+		mes "[Gershuan]";

+		mes "You KNOW what I MEAN!! HOW the HECK would YOU KNOW what I MEAN????";

+		emotion 23;

+		close;

+	M_1:

+		mes "[Gershuan]";

+		mes "In despair, I wandered through the fields with my cart.  Day after day I did this.... I was in a daze....";

+		next;

+		mes "[Gershuan]";

+		mes "Then I crossed paths with a very strong monster! I knew immediately that my life was in danger!";

+		mes "I thought to myself, 'Why me! A weaponless, amorless merchant!?'";

+		emotion 0;

+		next;

+		mes "[Gershuan]";

+		mes "I was scared to death... hoping that this would not be the end of me.  With what strength I had left, I tried a desperation move.....";

+		emotion 19;

+		next;

+		mes "[Gershuan]";

+		mes "I used my cart to attack the monster!!";

+		emotion 0;

+		next;

+		mes "[Gershuan]";

+		mes "Just like that the monster was defeated!! Finally I had found another exellent use for the cart! A WEAPON!!!";

+		next;

+		mes "[Gershuan]";

+		mes "I called my new found discovery ^3355FF'Cart Revolution'^000000!";

+		mes "By using ^FF553312 sp^000000 you can spin your cart around your body doing major damage to an enemy!";

+		emotion 5;

+		next;

+		mes "[Gershuan]";

+		mes "The heavier your cart is, the more damage it will do.  Would you like to learn this skill?";

+		next;

+		menu "Yes!!",sM_0, "Actually I want to learn some sushi skills...",sM_1;

+

+		sM_0:

+			mes "[Gershuan]";

+			if (Class==Job_Merchant && JobLevel < 35) goto ssL_LowLvl;

+			mes "Ok! I will give you the special training for Cart Revolution.  The first thing you will have to do is bring me these items:";

+			mes "^3355FF30 Sticky Mucus,";

+			mes "20 Fly wings,";

+			mes "15 Iron,";

+			mes "5 Tentacles,";

+			mes "2 Grape Juice^000000.";

+			next;

+			mes "[Gershuan]";

+			mes "Come back when you have all of these items.  Good luck.";

+			set CARTREVO, 1;

+			close;

+

+			ssL_LowLvl:

+				mes "[Gershuan]";

+				mes "Ok! I will give you the special training for Cart Revolution.";

+				mes "But first you will have to get yourself to a ^3355FFjob level of 35^000000! After you've done that, then we can talk.";

+				close;

+

+		sM_1:

+			mes "[Sushi King Gershuan]";

+			mes "Stupid!! You're waaay to young to even try your hand at sushi!!";

+			emotion 6;

+			close;

+

+L_GetSkill:

+	if ((countitem(533)<2) || (countitem(998)<15) || (countitem(938)<30) || (countitem(601)<20) || (countitem(962)<5)) goto sM_0;

+	mes "[Gershaun]";

+	mes "It's Good to see you again.  I'm glad you were able to get all of the items.  Take a minute to prepare, for your training is about to take place....";

+	next;

+	mes "[Gershuan]";

+	mes "First make sure your feet are shoulder width apart.  Balance is key! Now get into a good crouch... grasp the handles of the cart firmly but not too tight...";

+	next;

+	mes "[Gershuan]";

+	mes "NOW SWING!!!";

+	next;

+	mes "[Gershuan]";

+	mes "Eh....... that was terrible.... Okay, lets try again.....";

+	emotion 4;

+	next;

+	mes "~many hours later~";

+	next;

+	mes "[Gershuan]";

+	mes "YES!!! FINALLY! I could REALLY FEEL the power in that swing!";

+	mes "Give yourself a good pat on the back becuase you have just mastered Cart Revolution!";

+	emotion 21;

+	next;

+	delitem 533,2;

+	delitem 998,15;

+	delitem 938,30;

+	delitem 601,20;

+	delitem 962,5;

+	skill 153,1,0;

+	set CARTREVO, 0;

+	mes "[Gershuan]";

+	mes "Take care of yourself and remember to fill that cart up so that it can do some major damage.";

+	emotion 29;

+	close;

+

+L_GotSkill:

+	mes "[Gershaun]";

+	mes "So how do you like cart revolution? Remeber, the ^3355FFheavier^000000 the cart, the ^3355FFgreater^000000 the damge.";

+	close;

+

+}

diff --git a/npc/quests/skills/novice_skills.txt b/npc/quests/skills/novice_skills.txt
new file mode 100644
index 000000000..aab02da0e
--- /dev/null
+++ b/npc/quests/skills/novice_skills.txt
@@ -0,0 +1,258 @@
+//===== eAthena Script ======================================= 

+//= Novice Skills Quests

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

+//= kobra_k88

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

+//= 1.0 

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

+//= eAthena 7.15 +

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

+//= Customized novice skills quest

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

+//= Fully working

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

+

+

+

+

+//<---------------------------------------------------------------------------------------------- Nurse Aid: First Aid NPC ---------------------------------------------------------------------------->\\

+prt_in.gat,235,133,4	script	Nurse Aid	90,

+{

+	mes "[Nurse Aid]";

+	if(FIRSTAID == 1) goto L_GetAid;

+	if(getskilllv(142)>0) goto L_GotAid;

+

+	mes "Oh hello there!  You look tired and a little worn out.  Have the monsters outside of town been giving you trouble?";

+	next;

+	menu "Ha! Me strong like BULL!!",M_Nope, "Well..um..kinda..",M_Yep;

+

+	M_Nope:

+		mes "[Nurse Aid]";

+		mes "Oh I see.  You must be a mighty warrior.  Well, come back anytime if you do ever feel overwhelmed by the monsters.  I'll be able to help.";

+		close;

+

+	M_Yep:

+		mes "[Nurse Aid]";

+		mes "Well don't feel bad.  It can be very difficult fighting those nasty monsters in the begining.";

+		next;

+		mes "[Nurse Aid]";

+		mes "I know because I've been treating a lot people lately who have been fighting them.";

+		mes "There are so many injured now that I don't think I can continue treating anyone.";

+		next;

+		mes "[Nurse Aid]";

+		mes "~Sigh~";

+		next;

+		mes "[Nurse Aid]";

+		mes "That's why I've decided to teach people how to heal themselves!  Would you like me to teach you?";

+		emotion 5;

+		next;

+		menu "Would you??",sM_Yes, "(...she's nuts!...run!!!)",sM_No;

+

+		sM_Yes:

+			mes "[Nurse Aid]";

+			mes "In order for me to teach you First Aid you need to have at least a^0000ff job level of 3^000000.";

+			mes "You then need to give me:^ff0000 5 red herbs^000000,^00bb00 5 clovers^000000, and an^aaaa00 old bandage^000000.";

+			next;

+			mes "[Nurse Aid]";

+			mes "You can get the bandage from the^0000ff 'Newbie Assistant'^000000 located on the second floor of the Castle.";

+			next;

+			mes "[Nurse Aid]";

+			mes "Once you get job level 3 and have all of the items come back and see me ok.";

+			set FIRSTAID,1;

+			close;				

+

+		sM_No:

+			mes "[Nurse Aid]";

+			mes "Hey!...Where are you running too??...";

+			emotion 4;

+			close;

+

+L_GetAid:

+	if((JobLevel <  3) || (CountItem(507) < 5 ) || (CountItem(705) < 5) || (CountItem(930) < 1)) goto sM_Yes;

+	mes "Oh good.  You have everything needed for me to teach you first aid.  Here we go...";

+	next;

+	mes "....... 1 hour later.......";

+	next;

+	delitem 507,5;

+	delitem 705,5;

+	delitem 930,1;

+	skill 142,1,0;

+	set FIRSTAID,0;

+	mes "[Nurse Aid]";

+	mes "YES! You finally got it.  Now you can heal yourself and continue fighting those bad monsters.  Well, take care.";

+	emotion 21;

+	close;

+

+L_GotAid:

+	mes "Well hello again.  I sure hope the First Aid skill has been helpfull to you.  Make sure to continue your hard work and don't forget to rest and heal!";

+	close;

+

+}

+

+

+//<-------------------------------------------------------------------------------------------------- Bulma: Play Dead -------------------------------------------------------------------------------------------->\\

+prt_in.gat,73,87,2	script	Bulma	98,

+{

+	mes "[Bulma]";

+	if(Class == Job_Novice) goto L_Novice;

+

+L_Other:

+	mes "Yeah... I look great.... Afterall, I'm a Knight of the Prontera Chivalry.  Kuhahahaha!";

+	emotion 18;

+	next;

+	mes "[Bulma]";

+	mes "It hasn't been that long since I became a Knight, but I still look good as one right? What do you think???";

+	emotion 20;

+	close;

+

+L_Novice:

+	if(JobLevel >= 7) goto L_Start;

+	mes "Hello my young friend.  You remind me of myself when I was young.....";

+	mes "Heh heh, I sure miss those days..... Wow... It's funny to think about those years now......";

+	next;

+	mes "[Bulma]";

+	mes "They were difficult.... thankfully you can use the ^5555FFPlay Dead^000000 skill when you reach a ^5555FFjob level of 7^000000.";

+	mes "If you're interested in it come back and talk to me when you've leveled up a bit more.";

+	close;

+

+L_Start:

+	if(PLAYDEAD == 1) goto L_GetSkill;

+	if(getskilllv(143)>0) goto L_GotSkill;

+	mes "Hello my young friend.  You remind me of myself when I was young..... Heh heh, I sure miss those days.....";

+	mes "Look at me acting all sentimental like some old man........";

+	next;

+	mes "[Bulma]";

+	mes "Sorry about that.  Anyhow, I just want you to know that if you work hard and are patient, you too will recieve the job you desire.";

+	mes "It may take some time but stay focused and never loose your determination.";

+	next;

+	mes "[Bulma]";

+	mes "Hmm..... actually I might be able to help you out........";

+	emotion 20;

+	next;

+	mes "[Bulma]";

+	mes "What's this? Ha ha, don't look so surprised.  What I have to offer will be very useful to you.";

+	next;

+	mes "[Bulma]";

+	mes "You see I can teach you the skill ^5555FF'Play Dead'^000000.";

+	mes "This skill allows you to act like you just died making any monster that is currently attacking you leave you alone.";

+	next;

+	mes "[Bulma]";

+	mes "I myself have used it as a novice and found it to be very usefull.";

+	mes "It may sound easy enough, but it takes a lot of hard work and practice to make your performance look believable.";

+	next;

+	mes "[Bulma]";

+	mes "You MUST look perfectly DEAD in order for this skill to work.  Even the slightest movement will give you away.";

+	next;

+	mes "[Bulma]";

+	mes "I think I've done enough explaining..... The look in your eyes tells me that you are ready to learn this skill.";

+	next;

+	mes "[Bulma]";

+	mes "First take this pill....";

+	next;

+	mes "(you take the pill) ~gulp~";

+	next;

+	mes "[Bulma]";

+	mes "Good.  Now go to the 2nd floor on the East side of the Prontera Castle.";

+	mes "Speak with the ^5555FFNewbie Assistant^000000 and he will give you a ^5555FFNewbie Tag^000000.";

+	next;

+	mes "[Bulma]";

+	mes "Once you have the tag come back here.  You MUST make it back here WITHIN ^FF555510 minutes^000000!";

+	mes "If you don't, then the pill you just swallowed will start making it hard for you to breath!.....";

+	next;

+	mes "[Bulma]";

+	mes "Kekekeke..... Just kidding!  The pill actually helps you stay calm, nothing more.";

+	emotion 18;

+	next;

+	mes "[Bulma]";

+	mes "Well get going... GO! GO! GO! RUN!!!";

+	emotion 27;

+	set PLAYDEAD, 1;

+	close;

+

+L_GetSkill:

+	if(countitem(7039)<1) goto sL_NotRdy;

+	mes "Good to see you again.  Alright, lets start your training....";

+	next;

+	mes "[Bulma]";

+	mes "Let me first introduce to you the concept of 'Method Acting'.  Method Acting stresses the need to undrestand every aspect of the role you are playing.";

+	next;

+	mes "[Bulma]";

+	mes "You must learn to think, feel, and even live like your character so that you can understand his/her motivation in any given momement.";

+	next;

+	mes "[Bulma]";

+	mes "Now let us use this technique to develop your ability to Play Dead!";

+	mes "I want you to think like a dead person, feel like a dead person, eat, breath, sleep, kiss, etc. like a person who is dead!!!";

+	next;

+	mes "[Bulma]";

+	mes "Don't just stand there! Lay down on the ground and live life through the eyes of a dead person.... errr or don't live.... anyways just do it!!";

+	next;

+	mes "~ several hours later ~";

+	next;

+	mes "[Bulma]";

+	mes "Ok, lights, camera, ACTION! Yes... yes... YES!! That's it!! As I watch you laying there I TRULLY believe that you are dead.";

+	mes "What a wonderful performance! BRAVO! BRAVO!";

+	emotion 0;

+	next;

+	mes "[Bulma]";

+	mes "With the right motivation and focus you will be able to play dead anywhere at any given moment.  Congratulations on mastering this skill.";

+	emotion 21;

+	skill 143,1,0;

+	delitem 7039, 1;

+	set PLAYDEAD, 0;

+	close;

+

+	sL_NotRdy:

+		mes "HEY! What are you doing here?  It's irresponsible of you to still be here while your time is running out.........";

+		emotion 0;

+		next;

+		mes "[Bulma]";

+		mes "Now GO! Run! Run! RUN!!";

+		emotion 27;

+		close;

+

+L_GotSkill:

+	mes "Yeah.... I remember back then..... especially those embarrasing novice years... heh.  Luckily there was Play Dead.";

+	mes "That saved me many times in the past.  I'm sure it has been saving you too.";

+	next;

+	mes "[Bulma]";

+	mes "Hopefully it is something you have been using well.  If you have any friends who are novices, tell them about me.  I will help them out as best I can.";

+	close;

+}

+

+

+//Newbie Assistant------------------------------------------------------------------------------

+prt_castle.gat,174,147,2	script	Newbie Assistant	84,

+{

+	mes "[Newbie Assistant]";

+	if(Class == Job_Novice) goto L_Start;

+

+L_NonNov:

+	mes "What am I doing here?  I'm just trying to help out young newbies.  You remember how it was to be a newbie... confused.... lost.... heh heh.";

+	emotion 1;

+	close;

+L_Start:

+	if(FIRSTAID==1 && countitem(930)==0) goto L_Aid;

+	if(PLAYDEAD==1 && countitem(7039)==0) goto L_Play;

+	mes "Hello.  I'm here to provide help to newbies like you.  If there is anything in particular that you need assistance with just let me know.";

+	close;

+L_Aid:

+	mes "So Nurse Aid sent you huh.  She's a great nurse, you should feel very fortunate that she is helping you out.  Here take this.";

+	next;

+	getitem 930,1;

+	mes "[Newbie Assistant]";

+	mes "You'll need it in order for her to teach you her exellent healing technique.";

+	next;

+	mes "[Newbie Assistant]";

+	mes "When I watch her work it is like watching an angel that has descended down from the heavens.....";

+	next;

+	mes "[Newbie Assistant]";

+	mes "Her beauty, her grace, sometimes I wish........ (blushes).......... um.... well...err... tell her I said hello.";

+	emotion 3;

+	close;

+L_Play:

+	mes "So Bulma sent you uh.... okay here you go.";

+	getitem 7039,1;

+	next;

+	mes "Good luck on your adventure.";

+	close;

+}

diff --git a/npc/quests/skills/swordsman_skills.txt b/npc/quests/skills/swordsman_skills.txt
new file mode 100644
index 000000000..578f0a1c2
--- /dev/null
+++ b/npc/quests/skills/swordsman_skills.txt
@@ -0,0 +1,371 @@
+//===== eAthena Script =======================================

+//= Swordsman Skills Quests

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

+//= kobra_k88

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

+//= 1.0a

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

+//= eAthena 7.15 +

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

+//= <Description> 

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

+//= Fully working

+//=1.0a Now using functions found in "Global_Functions.txt" for

+//= class checks.

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

+

+

+

+//<-------------------------------------- Fatal Blow------------------------------------>\\

+prt_in.gat,75,88,5	script	Leon	85,

+{

+	mes "[Leon]";

+	if(callfunc("Is_Sword_Class")) goto L_Start;

+	if(Class == Job_Novice) goto L_Novice;

+

+	mes "Hello there.  I am Leon, a well known and well respected member of the famous Prontera Chivalry.";

+	next;

+	mes "[Leon]";

+	mes "Are you here to learn more about the Chivalry, or are you hear to bask in the glory of us Knights? Hahahaha!";

+	emotion 18;

+	close;

+

+L_Novice:

+	mes "Oh a novice.... I'm afraid I have nothing to offer you.";

+	mes "I have no fun or nice things to say to anyone other then Swordsmen.";

+	next;

+	mes "[Leon]";

+	mes "See you in a better world!";

+	close;

+

+L_Start:

+	if (FATALBLOW == 1) goto L_Check;

+	if (getskilllv(145)>0) goto L_Done;

+

+	if(sex==1)mes "Oooh! I see that you are quite a strong Swordsman.";

+	if(sex==0)mes "Oooh! I see that you are quite a strong Swordswoman.";

+	mes "How did I know? Hahaha! Just look at that strong arm of yours!";

+	next;

+	mes "[Leon]";

+	mes "You must enjoy using ^0000ff'Bash'^000000, huh? Hahaha!";

+	emotion 18;

+	next;

+	mes "[Leon]";

+	if(sex==1)mes "I like a Swordsman who isn't afraid to use a powerfull skill such as that.";

+	if(sex==0)mes "Now, now, don't be shy.  It's ok for girls to like Bash.";

+	if(sex==0)mes "Afterall, whether your a Swordsman or Swordswoman, there's no denying the power of Bash!";

+	next;

+	mes "[Leon]";

+	mes "As great as Bash is though, I often felt that it could be even better if there was someway to stun an opponent with it.";

+	mes "I decided to withdraw from the battlefield and research ways of making bash more powerfull.";

+	next;

+	mes "[Leon]";

+	mes "I discovered that if one could strike an enemy's weak point with a precisely placed Bash, an opponent would be left utterly parralyzed!!";

+	next;

+	mes "[Leon]";

+	mes "I then went on to develop the skill, ^ff0000'Fatal Blow'^000000, which allows you to do just that!";

+	mes "Will rigorous training, one can learn to stun an opponent with a mighty Bash.";

+	next;

+	mes "[Leon]";

+	mes "Since you seem to be so fond of Bash, I'd be willing to teach you the skill.";

+	mes "However, I must warn you that a lot of hard work will be required.";

+	next;

+	mes "[Leon]";

+	mes "So what do you think? Are you interested?";

+	next;

+	menu "You betcha!!",M_0, "Nah.... Not really.",M_1, "Any advice on how to eat sushi?",M_2;

+

+	M_0:

+		set FATALBLOW,1;

+		mes "[Leon]";

+		mes "Hahaha! I knew you love Bash as much as I do.";

+		next;

+		mes "[Leon]";

+		mes "In order for me to teach you Fatal Blow, you must have at least ^5555FFlevel 5 Bash^000000.  You then need to give me these items:";

+		mes "- 10 ^FF0000Fire Arrows^000000,";

+		mes "- 10 ^FF0000Silver Arrows^000000,";

+		mes "- 1 ^FF0000Banana Juice^000000,";

+		mes "- 30 ^FF0000Tentacles^000000,";

+		mes "- and 5 ^FF0000Royal Jelly^000000.";

+		next;

+		mes "[Leon]";

+		mes "When you have gathered all of these items come back and see me.";

+		close;

+	M_1:

+		mes "[Leon]";

+		mes "I see... I must have misjudged you...";

+		close;

+	M_2:

+		mes "[*Sushi King* Leon]";

+		mes "The best way to eat sushi is with your hands.  That is the basic method.  Oh, and dip the FISH, NOT the RICE, into the soy sauce.";

+		next;

+		mes "[*Sushi King* Leon]";

+		mes "That way you get a richer flavor.  Also, always eat the kind that is in season.";

+		mes "Eating in the order of white fish, then blue fish, will make it taste even better!";

+		next;

+		mes "[*Sushi King* Leon]";

+		mes "Mmmmm..... I love sushi!!!";

+		emotion 33;

+		close;

+

+L_Check:

+	mes "So your back.  Did you get what I asked for?";

+	next;

+	mes "[Leon]";

+	if(countitem(1752)<10 || countitem(1751)<10 || countitem(532)<1 || countitem(962)<30 || countitem(526)<5) goto L_NoItems;

+	if(getskilllv(5)<5) goto L_BashLvl;

+

+	mes "Great work.  You have everything I need for me to teach you Fatal Blow.";

+	next;

+	mes "[Leon]";

+	mes "Ok, lets get started.";

+	next;

+	mes "!SMACK!~!CRACK!~!THWACK!~!BASH!.......... !SMACK!~!CRACK!~!THWACK!~!BASH!..........";

+	next;

+	mes "(5 hours later)";

+	next;

+	mes "[Leon]";

+	mes "Yes! That's it! You have just mastered Fatal Blow!";

+	emotion 21;

+	next;

+	delitem 1752,10;

+	delitem 1751,10;

+	delitem 532,1;

+	delitem 962,30;

+	delitem 526,5;

+	skill 145,1,0;

+	set FATALBLOW,0;

+	mes "[Leon]";

+	mes "Use it wisely young warrior!!";

+	close;

+

+	L_NoItems:

+		mes "Hmm... you still don't have enough items.  Come back when you do.";

+		close;

+	L_BashLvl:

+		mes "Wait a minute... you have to train a little more before learning this skill.";

+		mes "You need to have at least a ^5555FFlevel 5 Bash^000000.";

+		close;

+

+L_Done:

+	mes "So how is Fatal Blow? Isn't it great!! Hahaha! I knew you'd like it.";

+	next;

+	mes "[Leon]";

+	mes "Go on and Bash the heck out of those monsters! Hahaha.";

+	emotion 18;

+	close;

+

+}

+

+

+//<---------------------------------- Moving HP Recovery ---------------------------------->\\

+izlude_in.gat,175,130,2	script	Knight De Thomas	98,

+{

+	mes "[Knight De Thomas]";

+	if(callfunc("Is_Sword_Class")) goto L_Start;

+

+L_Other:

+	mes "I am Thomas De Knight of the Prontera Chivalry.  I am very busy now so please leave me alone.";

+	close;

+

+L_Start:

+	if (MOVHPREC == 1) goto L_Check;

+	if (getskilllv(144)>0) goto L_GotSkill;

+	mes "Oh no! You must have been hurt in battle! Are you ok?";

+	mes "It must have been a hard fought battle for you to recieve such serious injuries....";

+	emotion 19;

+	next;

+	mes "[Knight De Thomas]";

+	mes "Being a Swordsman or Knight comes with a lot of responsiblity and requires a great deal of self sacrifice.";

+	mes "For Swordsmen and Knights there is a wonderfull skill that can aid in the recovery of HP.";

+	next;

+	mes "[Knight De Thomas]";

+	mes "I present to you..... ^5555FF'Moving HP Recovery'^000000!! This skill allows you to recover HP while moving!";

+	next;

+	mes "[Knight De Thomas]";

+	mes "The skill has not been perfected yet so the amount of HP recovered is a little low.  Still, it is helpful.";

+	mes "What do you think? Would you like to learn this skill?";

+	next;

+	menu "What a great skill! I would like to learn it!!",M_0, "No thank you.",M_End;

+

+	M_0:

+		mes "[Knight De Thomas]";

+		mes "Very well.  I will tell you what is needed to learn this skill.  First you must have a job level of 35 or greater.";

+		mes "This however doesn't apply to Knights or Crusaders.  You will also need:";

+		mes "^5555FF200 Empty Bottles^000000,";

+		mes "^5555FF1 Padded Armour^000000,";

+		mes "and ^5555FF1 Moth Wings^000000.";

+		next;

+		mes "[Knight De Thomas]";

+		mes "The bottles are proof that you have fought feircely and have used many potions.  The Padded Armor is proof of an experienced fighter.";

+		mes "The Moth Wings..... well... really aren't necessary.  It's just that my niece recieved a bug hunting assignment for summer vacation.......";

+		next;

+		mes "[Knight De Thomas]";

+		mes "I would get them myself... it's just... I must work here all day long so I don't have any time to go out and get them.......";

+		next;

+		mes "[Knight De Thomas]";

+		mes "Don't you think it's sad that I have to stay in once place everyday without even being able to go outside??";

+		mes "Please.... find a pair of Moth Wings for my niece?.... (~sniff~sniff~)....";

+		emotion 28;

+		next;

+		mes "[Knight De Thomas]";

+		mes "If you don't..... I won't teach you anything!! Muahahahaha!!";

+		emotion 29;

+		set MOVHPREC, 1;

+		close;

+	M_End:

+		mes "[Knight De Thomas]";

+		mes "What?? What did you say?.....";

+		emotion 1;

+		close;

+

+L_Check:

+	mes "Ah, you've come back.  Let's, see... are you ready for HP Moving Recovery?....";

+	next;

+	mes "[Knight De Thomas]";

+	if ((countitem(713)<200) || (countitem(1058)<1) || (countitem(2312)<1)) goto L_NoItems;

+	if (Class==Job_Swordman && JobLevel < 35) goto L_LowLvl;

+

+	mes "Great! You have everything needed to learn this skill.  Take a deep breath.... let us begin.";

+	next;

+	mes "(2 hours later)";

+	next;

+	mes "[Knight De Thomas]";

+	mes "Can you feel it? Can you feel the energy flowing in you while you move around?";

+	mes "Haha! You have just learned HP Moving Recovery!";

+	delitem 713,200;

+	delitem 1058,1;

+	skill 144,1,0;

+	set MOVHPREC, 0;

+	next;

+	mes "[Knight De Thomas]";

+	mes "Congratulations on learning the new skill and thank you for the Moth Wings! ^_^";

+	emotion 21;

+	close;

+

+	L_NoItems:

+		mes "As I said before you need to bring me these items:";

+		mes "^5555FF200 Empty Bottles^000000,";

+		mes "^5555FF1 Padded Armour^000000,";

+		mes "and ^5555FF1 Moth Wings^000000.";

+		close;

+	L_LowLvl:

+		mes "You are not yet experienced enough to learn this skill.  Come back when you have a job level of at least 35.";

+		close;

+	L_GotSkill:

+		mes "Ah, you're looking well.  That HP Moving Recovery skill must be very helpfull.";

+		mes "Well, continued success on your adventure!";

+		close;

+

+}

+

+

+//<----------------------------------------- Auto-Berserk --------------------------------->\\

+prt_in.gat,94,57,3	script	Juan	85,

+{

+	mes "[Juan]";

+	if(callfunc("Is_Sword_Class")) goto L_Start;

+

+L_Other:

+	mes "So how's your adventure going? I hope there will be good days ahead of you.";

+	next;

+	mes "[Juan]";

+	mes "Who am I? Oh, I'm just a kind knight named Juan.  Don't mind me.  Hahahaha....";

+	emotion 18;

+	close;

+

+L_Start:

+	if (Class==Job_Swordman && JobLevel<34) goto L_LowLvl;

+	if (BERSERK == 1) goto L_Check;

+	if (getskilllv(146)>0) goto L_GotSkill;

+

+	mes "Oh no! You have more injuries since the last time I saw you.";

+	mes "You went into battle like this? It seems like you're straining yourself.";

+	next;

+	mes "[Juan]";

+	mes "Even though you may have a lot of strength, there is only so much you can do when you have reached your limits.";

+	mes "So don't overestimate your own power.";

+	next;

+	mes "[Juan]";

+	mes "Of course you could always use the ^5555FF'skill'^000000 we developed to overcome these limits.....";

+	next;

+	menu "Eh! What are you talking about?",M_0, "Haha! There's no such thing....",M_1, "Keuuuuuhhh!",M_3;

+

+	M_0:

+		mes "[Juan]";

+		mes "The skill is called ^5555FFBerserk^000000.  It has been deemed the flower of the battlefield!";

+		mes "When your health is low, you can call upon your hidden potential by provoking yourself.";

+		next;

+		mes "[Juan]";

+		mes "A surge of energy will flow through your body giving you a greater attack prowess at the cost of defensive strength.";

+		mes "With this you will be able to fight on with a FIREY RAGE and an absolute disregard to your own safety!!";

+		next;

+		mes "[Juan]";

+		mes "The enemy will be shocked by your new found strength!!";

+		mes "This skill is especially great for those who fight with a no-holds-bar mentality.";

+		next;

+		mes "[Juan]";

+		mes "In order to learn this skill you will need to bring me the following items:";

+		mes "^5555FF35 Powder of Butterfly,";

+		mes "10 Horrendous Mouth,";

+		mes "10 Decayed Nail^000000,";

+		mes "and ^5555FF10 Honeys^000000!";

+		next;

+		mes "[Juan]";

+		mes "Did you get all of that down? Please come back when you are ready.  I look forward to seeing you again.";

+		set BERSERK, 1;

+		close;

+	M_1:

+		mes "[Juan]";

+		mes "Bleh! Have you been a fool all of your life?? Go away and don't talk to me.";

+		emotion 32;

+		close;

+	M_3:

+		mes "[Juan]";

+		mes "Keuuuuuuuuuuuuuuuuuuh!";

+		mes "Oooowwwwwwwwuuuuuuuuuuhhhhhh!";

+		mes "Keuaaaaaaaaaaaaaaaaaah!";

+		close;

+

+	L_LowLvl:

+		mes "Oh, nice to meet you.";

+		next;

+		mes "[Juan]";

+		mes "You can go on your way now.";

+		emotion 33;

+		close;

+

+L_Check:

+	if ((countitem(924)<35) && (countitem(957)<10) && (countitem(958)<10) && (countitem(518)<10)) goto L_NoItems;

+	mes "Good job my dear friend.  You have all 4 of the items I asked for.";

+	mes "In return I will now teach you the skill: ^FF0000Berserk^000000.";

+	next;

+	mes "[Juan]";

+	mes "Great job you have done well and deserve this skill.";

+	next;

+	delitem 924,35;

+	delitem 958,10;

+	delitem 957,10;

+	delitem 518,10;

+	skill 146,1,0;

+	set BERSERK, 0;

+	mes "[Juan]";

+	mes "Muhahahaha!! Don't hold back young warrior, fight without any fears or regrets!!";

+	emotion 29;

+	close;

+

+	L_NoItems:

+		mes "[Juan]";

+		mes "In order to learn this skill you will need to bring me the following items:";

+		mes "^5555FF35 Powder of Butterfly,";

+		mes "^10 Horrendous Mouth,";

+		mes "^10 Decayed Nail^000000,";

+		mes "and ^5555FF10 Honeys^000000!";

+		close;

+L_GotSkill:

+

+	mes "You have the eyes of a person who has seen death first hand!!";

+	mes "But, because of Berserk, I'm sure you have been able to escape it many times as well.";

+	emotion 0;

+	close;

+}

diff --git a/npc/quests/skills/thief_skills.txt b/npc/quests/skills/thief_skills.txt
new file mode 100644
index 000000000..1258e1bfb
--- /dev/null
+++ b/npc/quests/skills/thief_skills.txt
@@ -0,0 +1,386 @@
+//===== eAthena Script ======================================= 

+//= Thief Skills Quests

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

+//= kobra_k88

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

+//= 1.1a

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

+//= eAthena 7.15 +

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

+//= Sand Attack, Back Slide, Find Stone, Stone Fling skill quests.

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

+//= v1.0 Fully working

+//= v1.1 Changed Sand Attack requirements from 5 Grit to 5 Fine Grit and a

+//= Leather Bag of Infinity.  These are the official RO requirments

+//= Added npc RuRumuni, maker of Leather Bag of Infinity. [kobra_k88]

+//= v1.1a Now using functions found in "Global_Functions.txt" for

+//= class checks.[kobra_k88]

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

+

+

+

+

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

+moc_prydb1.gat,154,128,4	script	Alcouskou	118,

+{

+	mes "[Alcouskou]";

+	if(callfunc("Is_Thief_Class")) goto L_Start;

+	if(Class==Job_Novice) goto L_Novice;

+

+L_Other:

+	mes "Your kind isn't welcome here.";

+	close;

+

+L_Novice:

+	mes "Although thieves and assasins have basic skills which aid them in their jobs, most don't have the 'special' skills which can make them truly great!";

+	next;

+	mes "[Alcouskou]";

+	mes "I just happen to be the ONLY one who can teach them these skills!";

+	mes "If you ever decide to become a Thief or an Assassin, come back here and I'll teach you these cool skills.";

+	next;

+	mes "[Alcouskou]";

+	mes "And if you know anyone who already is one, send them to me.  I'm willing to teach anyone who's interested.";

+	close;

+

+L_Start:

+	mes "During the course of your life you will experience many things.";

+	mes "You many have trouble understanding the importance of some of these experiences, and may even consider them to be useless to you.";

+	next;

+	mes "[Alcouskou]";

+	mes "But do not be to hastey with your judgement of them, for some of these experience may actually prove to be benificial for you.";

+	next;

+	mes "[Alcouskou]";

+	mes "Let me explain:";

+M_Menu:

+	next;

+	menu "-Sand Attack",M_Sand, "-Back Slide",M_Back, "-Find Stone",M_Find, "-Stone Fling",M_Fling, "-I will be back later.",M_End;

+

+	M_Sand:

+		mes "[Alcouskou]";

+		if(SANDATTACK == 1) goto L_Sand;

+		if(getskilllv(149) > 0) goto L_GotSand;

+		mes "The most important aspect of being a good Thief/Assassin is stealth.  One should never be seen our touched unless he/she wants to be";

+		next;

+		mes "[Alcouskou]";

+		mes "Some may consider this cowardly but I don't see it that way.";

+		mes "We live in a world where it is the survival of the fittest and you must do whatever it takes to survive.....";

+		next;

+		mes "[Alcouskou]";

+		mes "Even if this means throwing sand in an enemy's face.  That is why the skill, ^5555FFSand Attack^000000, was created.";

+		next;

+		mes "[Alcouskou]";

+		mes "This skill allows the user to throw and kick sand in the eyes of an opponent, temporarily blinding them.";

+		mes "This effectively impares the opponent's ability to defend or attack giving the user a brief but great advantage.";

+		next;

+		mes "[Alcouskou]";

+		mes "In order to learn this skill you will need to gather ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000.";

+		if(Class == Job_Thief) mes "You will also need a job level of at least ^5555FF25^000000.";

+		next;

+		mes "[Alcouskou]";

+		mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000.";

+		mes "He can be found in the ^009500West end of Payon^000000.";

+		next;

+		mes "[Alcouskou]";

+		mes "Come back when you are ready.";

+		set SANDATTACK, 1;

+		goto M_Menu;

+	M_Back:

+		mes "[Alcouskou]";

+		if (BACKSLIDE == 1)goto L_Back;

+		if (getskilllv(150)>0) goto L_GotBack;

+		mes "People tend to focus on attack and damage, but it's necessary to understand that FLEEING is JUST AS IMPORTANT as attacking!";

+		next;

+		mes "[Alcouskou]";

+		mes "We thieves/assassins pride ourselves on our speed and ability to quickly dodge.";

+		mes "Of course I'm sure you've noticed that there is a down side to that speed and quickness.....";

+		next;

+		mes "[Alcouskou]";

+		mes "If we DO get hit, depending on the monster, that single hit could put us in serious danger!";

+		next;

+		mes "[Alcouskou]";

+		mes "I can understand how funny it is to watch a monster constantly miss while its attacking you, but......";

+		next;

+		mes "[Alcouskou]";

+		mes "If you get attacked by a large group of monsters..... you may not even have room to dodge and that won't be at all funny.";

+		next;

+		mes "[Alcouskou]";

+		mes "That's why most Thiefs/Assassins fear large mobs and will flee at the first sign of them.";

+		mes "There are those however, that do not fear being overwhelmed by a large mob.";

+		next;

+		mes "[Alcouskou]";

+		mes "These are the people who have learned a unique skill that allows them to deal with mob situatuions.";

+		mes "The skill enables the user to quickly 'back' out of the way of a mob, putting a great deal of distance between the two.";

+		next;

+		mes "[Alcouskou]";

+		mes "The skill is called ^5555FFBack Slide^000000 and requires a lot of practice to master.";

+		mes "If you wish to learn this skill you will first need to bring in ^5555FF20 Grasshopper's Legs^000000.";

+		next;

+		mes "[Alcouskou]";

+		mes "Think of it as the first part of your training.";

+		if(Class == Job_Thief) mes "If you are a Thief, you will also need to have a job level of at least ^5555FF35^000000.";

+		set BACKSLIDE, 1;

+		goto M_Menu;

+	M_Find:

+		mes "[Alcouskou]";

+		if (FINDSTONE == 1) goto L_Find;

+		if (getskilllv(151)>0) goto L_GotFind;

+		mes "The more experienced and better skilled members of our guild are quite handy.";

+		mes "They can turn something as common as a rock on the ground into a very effective weapon.";

+		next;

+		mes "[Alcouskou]";

+		mes "They can throw a rock at a far away target with great accuracy and strength.";

+		mes "They can throw it so powerfully that sometimes an enemy will become stunned by it.";

+		next;

+		mes "[Alcouskou]";

+		mes "Of course not every stone can be used as a weapon.  That is why the skill, ^5555FFFind Sone^000000, was developed.";

+		mes "With practice one can learn to pick out a stone that has a weight and shape that is fit for 'flinging'.";

+		next;

+		mes "[Alcouskou]";

+		mes "Once mastered a Thieve/Assassin will be able to pick up stones from any location.";

+		mes "Think about it... the ability to use a long range weapon without spending any zeny.... isn't it great?";

+		next;

+		mes "[Alcouskou]";

+		mes "If you wan't to learn this skill you must do a little training first.  Start by picking up ^5555FF1 Bear's Footskin^000000.";

+		mes "Then try to find ^5555FF1 Zargon^000000.  Next pick out ^5555FF5 Spawn^000000.  Once you've done all this come back and see me.";

+		next;

+		mes "[Alcouskou]";

+		mes "Collecting those items will help you develop the skills neccessary to learn Find Stone.";

+		set FINDSTONE, 1;

+		goto M_Menu;

+	M_Fling:

+		mes "[Alcouskou]";

+		if (STONEFLING == 1) goto L_Fling;

+		if (getskilllv(152)>0) goto L_GotFling;

+		mes "The more experienced and better skilled members of our guild are quite handy.";

+		mes "They can turn something as common as a rock on the ground into a very effective weapon.";

+		next;

+		mes "[Alcouskou]";

+		mes "They can throw a stone at a far away target with great accuracy and strength.";

+		mes "They can throw it so powerfully that sometimes an enemy will become stunned by it.";

+		next;

+		mes "[Alcouskou]";

+		mes "These guild members call this skill ^5555FFStone Fling^000000.  It is extrememly useful and doesn't cost any zeny.";

+		next;

+		mes "[Alcouskou]";

+		mes "If you wish to learn Stone Fling you must first bring me ^5555FF2 Garlet and 2 Scell^000000.";

+		mes "You will also need to have mastered ^5555FFFind Stone^000000 as well.";

+		set STONEFLING, 1;

+		goto M_Menu;

+	M_End:

+		mes "[Alcouskou]";

+		mes "It seems that you are not experienced enough yet....";

+		close;

+

+L_Sand:

+	if (countitem(7041)<5 || countitem(7042)<1) goto L_NotRdy1;

+	if (Class==Job_Thief && JobLevel<25) goto L_LowLvl1;

+	mes "Alright, you've got all the items.  Now its time to learn.... the... ultimate.... attack.... Sand Attack!!!";

+	next;

+	mes "[Alcouskou]";

+	mes "Look down at your feet.  See that? The very thing your stepping on is the secrect behind this skill.........  SAND!!";

+	next;

+	mes "[Alcouskou]";

+	mes "Okay, grab a handfull....... yep, that much will do....... now.........";

+	next;

+	mes "[Alcouskou]";

+	mes "THROW IT AT ME!!!";

+	emotion 27;

+	next;

+	mes "[Alcouskou]";

+	mes "(AHHH!! My EYES!!! Son of a)......... ya see how effective that was........ (JEEZE that STINGS!!).......";

+	emotion 23;

+	next;

+	mes "[Alcouskou]";

+	mes "Anyways that's all there is too it....... (CRAP that's a lot of sand!!).... So yeah, Sand Attack, use it as a last resort...... (AWW MAN!!)";

+	next;

+	mes "[Alcouskou]";

+	mes "Oh and it does Earth Property damage....... (I gota finda better way to teach this).........";

+	emotion 4;

+	delitem 7041, 5;

+	delitem 7042, 1;

+	skill 149,1,0;

+	set SANDATTACK, 0;

+	set BAGNFNTY, 0;

+	close;

+

+	L_NotRdy1:

+		mes "You need ^5555FF5 Fine Grit^000000 and a ^FF3355'Leather Bag of Infinity'^000000.";

+		next;

+		mes "[Alcouskou]";

+		mes "You can find the Leather Bag of Infinity by talking to a merchant by the name of ^5533FFRuRumuni^000000.";

+		mes "He can be found in the ^009500West end of Payon^000000.";

+		close;

+	L_LowLvl1:

+		mes "You need to have a ^5555FFJob level of 25^000000 to learn Sand Attack.";

+		close;

+	L_GotSand:

+		mes "Oh your back... hopefully not to throw anymore sand in my eyes, heh heh.... heh........ heh..............";

+		emotion 4;

+		close;

+

+L_Back:

+	if (countitem(940)<20) goto L_NotRdy2;

+	if (Class==Thief && JobLevel<35) goto L_LowLvl2;

+	mes "Great, you have the grasshopper legs.  While you were collecting them I'm sure you picked up on many of the characteristics of grasshoppers.";

+	next;

+	mes "[Alcouskou]";

+	mes "You will need that knowledge because this skill is based on the movement of the grasshopper.  Like it you will become quick, agile, and have a keen eyesight.";

+	next;

+	mes "[Alcouskou]";

+	mes "Okay, lets begin........";

+	next;

+	mes "~fwoosh~";

+	next;

+	mes "~fwooooosh~";

+	next;

+	mes "~fwoooooooooooooooosh~";

+	next;

+	mes "[Alcouskou]";

+	mes "Ah! You've got it.  Just like a pro.  With this skill being overwhelmed by mobs is a thing of the past.";

+	delitem 940,20;

+	skill 150,1,0;

+	set BACKSLIDE, 0;

+	close;

+

+	L_NotRdy2:

+		mes "You need ^5555FF20 Grasshopper's Legs^000000.";

+		close;

+	L_LowLvl2:

+		mes "You need a ^5555FFJob level of 35^000000 to learn Back Slide.";

+		close;

+	L_GotBack:

+		mes "Seeing as you already have Back Slide..... why don't you 'Back' on outa here.....";

+		close;

+

+L_Find:

+	if (countitem(912)<1 || countitem(948)<1 || countitem(908)<5) goto L_NotRdy3;

+	mes "Ah! I see that you're fully prepared to learn this skill.  Let us begin....";

+	next;

+	mes "[Alcouskou]";

+	mes "There are many stones on the floor here.  Pick them all up one by one and examine each one carefully.";

+	mes "Get a feel for how much each one weighs and become aware of how each one has a different texture.";

+	next;

+	mes "[Alcouskou]";

+	mes "You must become one with the stone... it is the only way you will be able to use it effectively...";

+	next;

+	mes "~ an hour later... ~";

+	next;

+	mes "[Alcouskou]";

+	mes "Very good.  You have chosen some fine stones.  This tells me that you have now perfected the Find Stone skill.";

+	emotion 21;

+	delitem 912,1;

+	delitem 948,1;

+	delitem 908,5;

+	skill 151,1,0;

+	set FINDSTONE, 0;

+	next;

+	mes "[Alcouskou]";

+	mes "Have fun using it.";

+	close;

+

+	L_NotRdy3:

+		mes "You need ^5555FF1 Bear's Footskin, 1 Zargon, and 5 Spawns^000000 to learn Find Stone.";

+		close;

+	L_GotFind:

+		mes "Picking up stones can be fun but...... don't spend all day doing it ok?.....";

+		close;

+

+L_Fling:

+	if (getskilllv(151) == 0) goto L_NotRdy4;

+	if ((countitem(910)<2) || (countitem(911)<2)) goto L_NotRdy4;

+	mes "Good! You look like your ready for me to teach you the Stone Fling skill.  Let us begin....";

+	next;

+	mes "[Alcouskou]";

+	mes "First, loosen up your arm.  Next, find a good quality stone using Find Stone.  Now close your eyes and visualize the target in your mind.";

+	next;

+	mes "[Alcouskou]";

+	mes "Now imagine yourself going straight through the target! Continue to visualize this!";

+	next;

+	mes "~ 1/2 hour later... ~";

+	next;

+	mes "[Alcouskou]";

+	mes "Think of the stone as an extension of your body.  Keep the target clear in your mind! You are one with the stone, the stone is one with you.....";

+	next;

+	mes "[Alcouskou]";

+	mes "Open your eyes! SEE THE TARGET!! Throw the stone at the target as if you were hurrling yourself towards it! DO IT NOW!!";

+	emotion 27;

+	next;

+	mes "!!Whooooossshh!!................. !!Thwack!!";

+	next;

+	mes "[Alcouskou]";

+	mes "Haha! Excellent! It's a bullseye.  You have now masterd Stone Fling, congratulations.";

+	emotion 21;

+	delitem 910,2;

+	delitem 911,2;

+	skill 152,1,0;

+	set STONEFLING, 0;

+	next;

+	mes "[Alcouskou]";

+	mes "As you can see this is a skill that relies heavily on concentration.";

+	mes "As long as you keep your mind focused you will have on problems using this skill.";

+	close;

+

+	L_NotRdy4:

+		mes "You need ^5555FF2 Scell and 2 Zargon^000000, and the ability to use ^5555FFFind Stone^000000 to learn Stone Fling.";

+		close;

+	L_GotFling:

+		mes "So Stone Fling is comming in handy huh? Just make sure you don't hit the wrong moster.";

+		close;

+}

+

+

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

+payon.gat,149,120,4	script	RuRumuni	99,

+{

+	mes "[RuRumuni]";

+	if(SANDATTACK == 1 && BAGNFNTY != 2) goto L_Start;

+

+	mes "I am a humble merchant here in Payon.  I buy leather hides, brought in by the hunters, to make leather pouches to sell.";

+	mes "I grew up around leather and am quite good at working with it.";

+	next;

+	mes "[RuRumuni]";

+	mes "There is a Thief guild in the Morroc area.";

+	mes "I know someone there that sends me Thieves in need of the items I make, such as the ^5533FF'Leather Bag of Infinity'^000000.";

+	close;

+

+L_Start:

+	if(BAGNFNTY == 1) goto L_Check;

+	mes "Hello.  So you were sent by Alcouskou to obtain a ^5533FF'Leather Bag of Inifinity'^000000........";

+	mes "I will be more than happy to make one for you............";

+	next;

+	mes "[RuRumuni]";

+	mes "But this bag is very special, and I will need some special items in order to make it.";

+	next;

+	set BAGNFNTY, 1;

+

+	L_List:

+	mes "[RuRumuni]";

+	mes "Here are the items that I will need:";

+	mes "- 5 ^5533FFScorpion Tails^000000";

+	mes "- 1 ^5533FFCobweb^000000";

+	mes "- 1 ^5533FFCactus Needle^000000";

+	mes "- 1 ^5533FFEarthworm Peeling^000000.";

+	next;

+	mes "[RuRumuni]";

+	mes "Once you have all of these items I will be able to make the Bag of Infinity for you.";

+	close;

+

+L_Check:

+	mes "Nice to see you again.  Do you have all of the items? Lets see........";

+	next;

+	if(countitem(904)<5 || countitem(1025)<1 || countitem(952)<1 || countitem(1055)<1) goto L_List;

+	mes "[RuRumuni]";

+	mes "Great you have everything I asked for.  Let me start making the bag right away.......";

+	next;

+	mes "~( 30 minutes later)~";

+	next;

+	mes "[RuRumuni]";

+	mes "Here you go, one Leather Bag of Infinity.  Enjoy!";

+	getitem 7042, 1;

+	delitem 904, 5;

+	delitem 1025, 1;

+	delitem 952, 1;

+	delitem 1055, 1;

+	set BAGNFNTY, 2;

+	close;

+}