//===== eAthena Script =======================================
//= iRO Repeatable EXP Quests.
//===== By: ==================================================
//= Kisuka
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= eAthena SVN
//===== Description: =========================================
//= Each of these quests are repeatable.
//= Therefore, you are able to get a character from 
//= levels 2 - 85 using only these quests instead of 
//= normal monster killing. 
//=
//= Note: Before enabling remove
//= 1) 925,Bill_Of_Birds; 2) 7106,Goat's_Horn
//= From Vendor shops in npc/merchants/shops.txt
//===== Additional Comments: =================================
//= 1.0 First version. [Kisuka]
//============================================================

// Yullo - 25 Porcupine Quill
//============================================================
mjolnir_01,296,29,5	script	Yullo#iROExp	95,{
	if((BaseLevel < 24)) {
		mes "[Yullo]";
		mes "Hmm, this maybe a little much of a";
		mes "request for you. Come back when you";
		mes "are taller and stronger.";
		close;
	}
	else if((BaseLevel > 60)) {
		mes "[Yullo]";
		mes "Hello, my name is Yullo.";
		mes "Now wait a minute, are you not a";
		mes "little too high of level for this?";
		next;
		close;
	}
	mes "[Yullo]";
	mes "I can't, no more and I mean it.";
	mes "Look at me I am serious I can't";
	mes "gather any more of these things.";
	next;
	mes "[Yullo]";
	mes "You know what, here is an idea.";
	mes "You can gather them and I can give";
	mes "you a reward for your efforts!";
	next;
	mes "[Yullo]";
	mes "Ok, so I need 25 Porcupine";
	mes "Quill's.";
	mes "Please tell me you have some or can";
	mes "help me";
	next;
	if (select("I have Porcupine Quills:Well I don't think I can help.") == 2) {
		mes "[Yullo]";
		mes "I need ^00CE0025 Porcupine Quills^000000.";
		close;
	}
	if (countitem(1027) < 25) {
		mes "[Yullo]";
		mes "Where are the Porcupine Quills? You";
		mes "think I wouldn't notice?";
		close;
	}else{
		delitem 1027,25;
		getitem 501,10;
		getexp 10425,6272;
		mes "[Yullo]";
		mes "Great, you have enough!";
		mes "Just like I promised a little";
		mes "reward.";
		close;
	}
}

// Shone - 25 Earthworm Peeling
//============================================================
moc_fild17,208,346,5	script	Shone#iROExp	707,{
	if((BaseLevel < 25)) {
		mes "[Shone]";
		mes "You need some help, but I can't";
		mes "provide that for you. Come back";
		mes "when you are stronger and have";
		mes "earned much more wisdom.";
		close;
	}
	else if((BaseLevel > 60)) {
		mes "[Shone]";
		mes "You are much to strong to be";
		mes "fighting these things!";
		next;
		close;
	}
	mes "[Shone]";
	mes "Wait! You can see me?";
	mes "Oh well, I haven't yet mastered my";
	mes "skills.";
	next;
	mes "[Shone]";
	mes "Hey do you think you van help me? I";
	mes "am trying to collect ^00CE0025 Earthwarm^000000";
	mes "^00CE00Peelings^000000. I will reward you if you";
	mes "help.";
	next;
	if (select("I have 25 Earthworm Peelings:What was it again?") == 2) {
		mes "[Shone]";
		mes "I need ^00CE0025 Earthworm Peelings^000000.";
		close;
	}
	if (countitem(1055) < 25) {
		mes "[Shone]";
		mes "I don't see any ^00CE00Earthworm Peerlings^000000.";
		mes "Are you trying to scam me?";
		close;
	}else{
		delitem 1055,25;
		getitem 502,10;
		getexp 15775,1125;
		mes "[Shone]";
		mes "Thank you for the 25 Earthworm";
		mes "Peelings!";
		mes "Here is that reward I promised you,";
		mes "I hope take this wisdom I have";
		mes "passed on to you and share it with";
		mes "others.";
		close;
	}
}

// Langry - 25 Fluff
//============================================================
gef_fild07,321,193,3	script	Langry#iROExp	754,{
	if((BaseLevel < 2)) {
		mes "[Langry]";
		mes "You may just be the most unlikely";
		mes "person ever,";
		mes "recycle a few Fabres and come";
		mes "back.";
		close;
	}
	if((BaseLevel > 20)) { mes "[Langry]"; }
	mes "Hello, my name is Langry.";
	mes "I have to complete this community";
	mes "service, but I am just too lazy.";
	next;
	if((BaseLevel > 20)) { close; }
	mes "[Langry]";
	mes "Do you think you can help me?";
	mes "Please?";
	next;
	mes "[Langry]";
	mes "I need to collect ^0000CE25 Fluff^000000 to";
	mes "complete this community service";
	mes "project.";
	mes "You know what I can even reward you";
	mes "a little for helping me.";
	next;
	if (select("I have some Fluff:What was that again?") == 2) {	
		mes "[Langry]";
		mes "I need ^00CE0025 Fluff^000000.";
		close;
	}
	if (countitem(914) < 25) {
		mes "[Langry]";
		mes "I see no fluff, wait yea I do it's";
		mes "the lies coming from your mouth.";
		close;
	}else{
		delitem 914,25;
		getexp 385,30;
		mes "[Langry]";
		mes "Thank you for the Fluff. This helps";
		mes "me out greatly.";
		mes "Oh and here you go, this should";
		mes "help you get stronger, faster!";
		close;
	}
}

// Halgus - 25 Chrysalis
//============================================================
gef_fild04,191,54,4	script	Halgus#iROExp	123,{
	if((BaseLevel < 2)) {
		mes "[Halgus]";
		mes "Please return to me when you are a";
		mes "little stronger.";
		close;
	}
	else if((BaseLevel > 20)) {
		mes "[Halgus]";
		mes "You are way to learned to be";
		mes "hunting these little things.";
		next;
		close;
	}
	mes "[Halgus]";
	mes "New here are you? Well look I like";
	mes "helping new faces around here.";
	mes "And lets be honest you are not the";
	mes "prettiest look face I have seen.";
	next;
	mes "[Halgus]";
	mes "None-the-less my daughter would";
	mes "like a new necklace.";
	mes "I am not rich by any means so I am";
	mes "looking to collect Chrysalis from";
	mes "the Pupa's in this area.";
	next;
	mes "[Halgus]";
	mes "Can you collect ^00CE0025 Chrysalis^000000 and";
	mes "return them to me, I promise to";
	mes "reward you well.";
	next;
	if (select("I have Chrysalis:What did you need?") == 2) {
		mes "[Halgus]";
		mes "I need ^00CE0025 Chrysalis^000000.";
		close;
	}
	if (countitem(915) < 25) {
		mes "[Halgus]";
		mes "I need ^00CE0025 Chrysalis^000000 and no less";
		mes "please.";
		close;
	}else{
		delitem 915,25;
		getexp 385,30;
		mes "[Halgus]";
		mes "Amazing you found so many that";
		mes "fast.";
		mes "Like I promised, give me the";
		mes "Chrysalis and I will reward you";
		mes "with my wisdom.";
		close;
		
	}
}

// Laertes - 25 Powder of Butterfly
//============================================================
prt_fild04,356,148,3	script	Laertes#iROExp	798,{
	if((BaseLevel < 15 )) {
		mes "Your level is too low!";
		next;
		mes "Go kill more Porings!";
		close;
	}
	mes "[Laertes]";
	mes "Good Morning!";
	next;
	if((BaseLevel < 45)) { mes "[Laertes]"; }
	mes "I work for an apothecary in";
	mes "Prontera";
	if((BaseLevel > 45)) {
		mes "I come here to collect materials";
		mes "for medicine";
		close;
	}
	mes "I need to have a good supply";
	mes "of ^FF0000Powder of Butterfly^000000";
	next;
	if (select("I have Powder of Butterfly:What did you need?") == 2) {
		mes "[Laertes]";
		mes "If you bring me";
		mes "^FF000025 Powder of Butterfly^000000,";
		mes "I will give you some medical";
		mes "supplies.";
		close;
	}
	if (countitem(924) < 25) {
		mes "[Laertes]";
		mes "It doesn't look";
		mes "like you have enough.";
		next;
		mes "[Laertes]";
		mes "If you bring me";
		mes "^FF000025 Powder of Butterfly^000000,";
		mes "I will give you some medical";
		mes "supplies.";
		close;
	}else{
		delitem 924,25;
		getitem 502,5;
		getexp 2950,1125;
		mes "[Laertes]";
		mes "Hey, thank you again.";
		mes "Here you go, as promised.";
		close;
	}
}

// Nutters - 25 Acorn
//===========================================================
mjolnir_01,293,20,3	script	Nutters#iROExp	779,{
	if((BaseLevel < 18)) {
		mes "[Nutters]";
		mes "You are just too small to fight";
		mes "these things for me. Can you get a";
		mes "little taller then return?";
		close;
	}
	else if((BaseLevel > 60)) {
		mes "[Nutters]";
		mes "You are much to strong to be";
		mes "fighting these things!";
		next;
		close;
	}
	mes "[Nutters]";
	mes "I..I just can't seem to find any.";
	mes "Pesky Coco's have hidden all the";
	mes "Acorns.";
	next;
	mes "[Nutters]";
	mes "Can you help me find ^00CE0025 Acorns^000000.I";
	mes "will reward you with much if you";
	mes "can.";
	next;
	if (select("I have 25 Acorns:Please come again?") == 2) {
		mes "[Nutters]";
		mes "I need ^00CE0025 Acorns^000000.";
		close;
	}
	if (countitem(1026) < 25) {
		mes "[Nutters]";
		mes "Where are my ^00CE00Acorns^000000? Hey, I'm not";
		mes "playing, you better not hold out on";
		mes "me.";
		close;
	}else{
		mes "[Nutters]";
		mes "Oh great you found out where they";
		mes "were hiding them. Gimme Gimme!!!";
		next;
		delitem 1026,25;
		getitem 502,5;
		getexp 3600,3905;
		mes "[Nutters]";
		mes "Oh thats right, sorry I just love";
		mes "roasting Acorns. Mmm.";
		mes "Here is what I promised you.";
		close;
	}
}

// Cuir - 25 Anolian Skin
//===========================================================
cmd_fild01,362,256,3	script	Cuir#iROExp	106,{
	if((BaseLevel < 45)) {
		mes "[Cuir]";
		mes "You certainly are brave, but";
		mes "bravery turns to foolishness if you";
		mes "continue going East.";
		mes "Perhaps when you are stronger you";
		mes "and I can do business.";
		close;
	}
	else if((BaseLevel > 80)) {
		mes "[Cuir]";
		mes "You are too powerful for this task,";
		mes "I need the skins in fair condition,";
		mes "not exploded!";
		next;
		close;
	}
	mes "[Cuir]";
	mes "You look like a sturdy adventurer!";
	mes "How'd you like to help me make a";
	mes "buck selling gator skin?";
	next;
	mes "[Cuir]";
	mes "If you can bring me ^00CE0020 Anolian^000000";
	mes "^00CE00Skin^000000. I can help you get stronger.";
	next;
	if (select("I've the Anolian Skins:Gators bite!") == 2) {
		mes "[Cuir]";
		mes "I need ^00CE0020 Anolian Skin^000000.";
		close;
	}
	if (countitem(7003) < 20) {
		mes "[Cuir]";
		mes "I know a gator skin when I see it";
		mes "and I don't see ^00CE0020 Anolian Skins^000000.";
		close;
	}else{
		delitem 7003,20;
		getitem 503,10;
		getexp 68950,43300;
		mes "[Cuir]";
		mes "Thank you for the ^00CE0020 Anolian^000000";
		mes "^00CE00Skins^000000!";
		mes "I hope you can continue to help me";
		mes "collect these skins.";
		mes "The armor creators around the world";
		mes "are clamoring for them.";
		close;
	}
}

// Li - 50 Dokebi Horns
//===========================================================
pay_fild10,108,357,5	script	Li#iROExp	90,{
	if((BaseLevel < 35)) {
		mes "This place is dangerous!";
		next;
		mes "You should leave quickly!";
		close;
	}
	else if((BaseLevel > 70)) {
		mes "[Li]";
		mes "Hello";
		mes "I read fortunes";
		mes "in payon.";
		close;
	}
	mes "[Li]";
	mes "Hello";
	next;
	mes "[Li]";
	mes "My fortune teller business";
	mes "needs a good supply";
	mes "of ^FF0000Dokebi Horn^000000";
	mes "to give my customers good luck.";
	next;
	if(select("I have some Dokebi Horns:What did you need?") == 2) {
		mes "[Li]";
		mes "If you bring me";
		mes "^FF000050 Dokebi Horn^000000,";
		mes "I can give you some good luck.";
		close;
	}
	if (countitem(1021) < 50) {
		mes "[Li]";
		mes "It doesn't look";
		mes "like you have enough.";
		next;
		mes "[Li]";
		mes "I need ^FF000050 Dokebi Horn^000000.";
		mes "for my fortune telling.";
		close;
	}else{
		delitem 1021,50;
		getexp 42000,36000;
		mes "[Li]";
		mes "Oh, great!";
		mes "Thank you for the horns.";
		close;
	}
}

// Lemly - 25 Frill
//===========================================================
moc_fild17,66,273,5	script	Lemly#iROExp	725,{
	if((BaseLevel < 30)) {
		mes "What are you doing here?";
		next;
		mes "The desert will kill you here!";
		close;
	}
	else if((BaseLevel > 65)) {
		mes "[Lemly]";
		mes "Hey there.";
		next;
		mes "[Lemly]";
		mes "These lizards are gross.";
		next;
		mes "[Lemly]";
		mes "I can't believe I am stuck";
		mes "doing this.";
		close;
	}
	mes "[Lemly]";
	mes "Hey there cutie!";
	next;
	mes "[Lemly]";
	mes "I am looking for lizard";
	mes "^FF0000Frills^000000.";
	next;
	mes "The lizards around here";
	mes "have a natural stealth";
	mes "property that the assassin";
	mes "guild wants to study.";
	next;
	if(select("I have some Frills:What did you need?") == 2) {
		mes "[Lemly]";
		mes "I need";
		mes "^FF000025 Frill^000000";
		mes "for the assassin guild.";
		close;
	}
	if (countitem(1012) < 25) {
		mes "[Lemly]";
		mes "Sigh,";
		mes "Please don't waste my time.";
		next;
		mes "[Lemly]";
		mes "I need";
		mes "^FF000025 Frill^000000";
		mes "for the assassin guild.";
		close;
	}else{
		delitem 1012,25;
		getexp 30000,23000;
		mes "[Lemly]";
		mes "Hey, thank you.";
		mes "These are pretty icky though.";
		close;
	}
}

// Private Jeremy - 25 Stone Heart
//===========================================================
moc_fild05,213,163,7	script	Private Jeremy#iROExp	707,{
	if((BaseLevel < 25)) {
		mes "[Private Jeremy]";
		mes "It is dangerous here";
		mes "citizen.";
		close;
	}	
	mes "[Private Jeremy]";
	mes "Greetings citizen!";
	next;
	if((BaseLevel > 60)) {
		mes "[Private Jeremy]";
		mes "Please do not interrupt";
		mes "my mission for the";
		mes "Morroc Guard.";
		close;
	}
	mes "[Private Jeremy]";
	mes "The Morroc guard";
	mes "need ^FF0000Stone Hearts^000000";
	mes "for our training regimen";
	next;
	if(select("I have Stone Hearts:What did you need?") == 2) {
		mes "[Private Jeremy]";
		mes "The Morroc Guard needs";
		mes "^FF000025 Stone Heart^000000,";
		mes "for our training regimen.";
		close;
	}
	if (countitem(953) < 25) {
		mes "[Private Jeremy]";
		mes "It doesn't look";
		mes "like you have enough.";
		next;
		mes "[Private Jeremy]";
		mes "The Morroc Guard needs";
		mes "^FF000025 Stone Heart^000000,";
		mes "for our training regimen.";
		close;
	}else{
		delitem 953,25;
		getexp 14000,9000;
		mes "[Private Jeremy]";
		mes "The Morroc Guard thanks you,";
		mes "citizen.";
		close;
	}
}

// Gregor - 25 Bill of Birds
//===========================================================
moc_fild06,33,204,3	script	Gregor#iROExp	97,{
	if((BaseLevel < 10)) {
		mes "[Gregor]";
		mes "He there.";
		next;
		mes "[Gregor]";
		mes "Those pickys over there";
		mes "seem to be about your";
		mes "speed.";
		close;
	}
	else if((BaseLevel > 30)) {
		mes "[Gregor]";
		mes "Here peco peco peco";
		next;
		mes "[Gregor]";
		mes "Come here peco.";
		close;
	}
	mes "[Gregor]";
	mes "Peco Pecos are fascinating.";
	mes "I need some";
	mes "^FF0000Bill of Birds^000000";
	mes "for my, uh, research...";
	next;
	if(select("I have some Bill of Birds:What did you need?") == 2) {
		mes "[Gregor]";
		mes "Can you help me";
		mes "out and bring me";
		mes "^FF000025 Bill of Birds^000000?";
		close;
	}
	if (countitem(925) < 25) {
		mes "[Gregor]";
		mes "It doesn't look";
		mes "like you have enough.";
		next;
		mes "[Gregor]";
		mes "Can you help me";
		mes "out and bring me";
		mes "^FF000025 Bill of Birds^000000?";
		close;
	}else{
		delitem 925,25;
		getexp 4000,2000;
		mes "[Gregor]";
		mes "Thank you so much.";
		next;
		mes "[Gregor]";
		mes "This is gonna be";
		mes "delicious!";
		close;
	}
}

// Lilla - 50 Sharp Leaf
//===========================================================
um_fild01,35,281,5	script	Lilla#iROExp	724,{
	if((BaseLevel < 60)) {
		mes "[Lilla]";
		mes "You are way too tiny to be helping";
		mes "me. Thank you for your offer";
		mes "though.";
		close;
	}
	else if((BaseLevel > 85)) {
		mes "[Lilla]";
		mes "Sorry but you are a little to old";
		mes "and scary to talk to!";
		next;
		close;
	}
	mes "[Lilla]";
	mes "Why hello!";
	mes "You look like someone who is";
	mes "willing to help a lil thing like";
	mes "myself out.";
	next;
	mes "[Lilla]";
	mes "I really need to gather ^00CE0050 Sharp^000000";
	mes "^00CE00Leaf^000000 for my garden tea party.";
	mes "Do you have any?";
	next;
	if(select("I have 50 Sharp Leaf:What, sorry I was day dreaming") == 2) {
		mes "[Lilla]";
		mes "I need ^00CE0050 Sharp Leafs^000000.";
		close;
	}
	if (countitem(7100) < 50) {
		mes "[Lilla]";
		mes "Why, I may look cute and silly but";
		mes "please don't play games with me.";
		close;
	}else{
		mes "[Lilla]";
		mes "Hey, your a sweet little thing.";
		mes "Thanks so much for helping me!";
		next;
		delitem 7100,50;
		getitem 504,10;
		getexp 262485,141835;
		mes "[Lilla]";
		mes "Oh, I almost forgot. I have";
		mes "something for you ^_^";
		mes "Thank you so much again for your";
		mes "help.";
		close;
	}
}

// Lella - 50 Huge Leaf
//============================================================
ayo_fild01,44,241,5	script	Lella#iROExp	877,{
	if((BaseLevel < 36)) {
		mes "[Lella]";
		mes "Quickly escape before they get";
		mes "their claws into your sanity!";
		close;
	}
	else if((BaseLevel > 65)) {
		mes "[Lella]";
		mes "Not sure why you are here,";
		mes "but I can't offer you a bounty";
		mes "as there would be no effort";
		mes "in it for you!";
		close;
	}
	mes "[Lella]";
	mes "Why hello!";
	mes "You look like someone who is";
	mes "willing to help someone who is";
	mes "slowly going mad.";
	next;
	mes "[Lella]";
	mes "I really need to gather ^00CE0050 Huge^000000";
	mes "^00CE00Leaf^000000 for my sanity.";
	mes "Do you have any?";
	next;
	if(select("I have 50 Huge Leaf:What, sorry I was day dreaming") == 2) {
		mes "[Lella]";
		mes "I need ^00CE0050 Huge Leafs^000000.";
		close;
	}
	if (countitem(7198) < 50) {
		mes "[Lella]";
		mes "Meow meow meow meow meow...";
		mes "NOOOOOOOOOOOO.";
		close;
	}else{
		mes "[Lella]";
		mes "Wonderful I can tell it is just a";
		mes "little bit quieter around here!";
		next;
		delitem 7198,50;
		getitem 503,10;
		getexp 25740,31512;
		mes "[Lella]";
		mes "The more leafs I collect the";
		mes "quieter it seems around here.";
		close;
	}
}

// Vegetable Farmer - 50 Antelope Horn
//============================================================
ein_fild06,82,171,7	script	Vegetable Farmer#iROExp	919,{
	if((BaseLevel < 70)) {
		mes "[Vegetable Farmer]";
		mes "My greens, where did they all go?";
		mes "Oh, no..no!!!";
		close;
	}
	else if((BaseLevel > 84)) {
		mes "[Vegetable Farmer]";
		mes "Oh boy, Oh boy!";
		next;
		mes "[Vegetable Farmer]";
		mes "Sorry I can't talk right now";
		mes "I am in a world of hurt here,";
		mes "these darn Goats are going to kill";
		mes "me.";
		close;
	}
	mes "[Vegetable Farmer]";
	mes "Oh great!";
	mes "You are here to help me right?";
	mes "If not, then I am in a world of hurt.";
	next;
	mes "[Vegetable Farmer]";
	mes "These Goats keep eating my";
	mes "vegetables.";
	mes "Can you do what you can to help";
	mes "me?";
	mes "I need ^FF0000Antelope Horns^000000";
	mes "to show for your hard work, and I";
	mes "will reward you.";
	next;
	if(select("I have Antelope Horns:What did you need?") == 2) {
		mes "[Vegetable Farmer]";
		mes "I need to see that you have";
		mes "gathered";
		mes "^FF000050 Antelope Horns^000000,";
		mes "and then I can reward you.";
		close;
	}
	if (countitem(7106) < 50) {
		mes "[Vegetable Farmer]";
		mes "It doesn't look";
		mes "like you have enough.";
		next;
		mes "[Vegetable Farmer]";
		mes "I need to see that you have";
		mes "gathered";
		mes "^FF000050 Antelope Horns^000000,";
		mes "and then I can reward you.";
		close;
	}else{
		delitem 7106,50;
		getitem 504,10;
		getexp 258490,155155;
		mes "[Vegetable Farmer]";
		mes "Amazing, you did that with speed. I";
		mes "am truly grateful.";
		close;
	}
}

// Local Villager - 50 Bacillus
//============================================================
ein_fild01,43,249,7	script	Local Villager#iROExp	898,{
	if((BaseLevel < 60)) {
		mes "[Local Villager]";
		mes "Its amazing, truly it is. I just";
		mes "wish I could get through this all.";
		close;
	}
	else if((BaseLevel > 75)) {
		mes "[Local Villager]";
		mes "Um, um. I don't think..";
		next;
		mes "[Local Villager]";
		mes "Yeah, sorry I can't talk right";
		mes "now.";
		close;
	}
	mes "[Local Villager]";
	mes "Hey, you there. Yeah you!";
	mes "Do you think you can help me with";
	mes "something?";
	next;
	mes "[Local Villager]";
	mes "I am trying to make my way through";
	mes "but I can't seem to get past these";
	mes "Demon Pungus. Can you help by";
	mes "collecting ^FF0000Bacillus^000000?";
	mes "I will reward you for helping clear";
	mes "this out for me.";
	next;
	if(select("I have Bacillus:What did you need?") == 2) {
		mes "[Local Villager]";
		mes "I need to see that you have";
		mes "gathered";
		mes "^FF000050 Bacillus^000000,";
		mes "and then I can reward you.";
		close;
	}
	if (countitem(7119) < 50) {
		mes "[Local Villager]";
		mes "It doesn't look";
		mes "like you have enough.";
		next;
		mes "[Local Villager]";
		mes "I need to see that you have";
		mes "gathered";
		mes "^FF000050 Bacillus^000000,";
		mes "and then I can reward you.";
		close;
	}else{
		delitem 7119,50;
		getitem 504,10;
		getexp 250266,144452;
		mes "[Local Villager]";
		mes "I had my doubts, but you have";
		mes "proven me wrong.";
		close;
	}
}