prontera,160,187,4	script	Monster Quest#prt	900,{

mes "[^990000Monster Quest^000000]";
mes "Hello there! I provide various monster hunting quests that needs to be done daily!.";
next;
mes "[^990000Monster Quest^000000]";
mes "If you finish my quests, you'll get a good reward!";
next;
mes "[^990000Monster Quest^000000]";
if( BaseLevel < 50 ){
	mes "Unfortunately, you're too weak to start the quest. ^FF0000Please come back on you're at level 50!^000000";
	next;
	mes "[^990000Monster Quest^000000]";
	mes "Good luck "+strcharinfo(0)+"!";
	close;
}
mes "So what would you like to do today?";
next;
switch(select( ( monster_quest )?"":"Start Monster Quest",( monster_quest )?"Complete Quest":"",( monster_quest )?"Remove Quests":"","Information")) {
    Case 1: 
		mes "[^990000Monster Quest^000000]";
		mes "Your current level is ^000066"+BaseLevel+"^000000,";
		next;
		mes "[^990000Monster Quest^000000]";
		mes "Therefore, here are the quests that are most suited to your level for today.";
		next;
		switch( gettime(4) ){
			Case 0:
				if( BaseLevel >= 50 && BaseLevel <= 69 ){
					setarray .@monster$,"Marc","Bongun","Dustiness","Driller","Wootan Fighter";
					setarray .@questid,82006,82013,82020,82027,82034;
				}else if( BaseLevel >= 70 && BaseLevel <= 99 ){
					setarray .@monster$,"Karakasa","Grand Peco","Pasana","Metaling","Dancing Dragon","Mavka","Uzhas","Poison Toad","Zombie Prisoner","Clock Tower Manager","Breeze","Bloody Injustice","Wicked Nymph";
					setarray .@questid,82045,82052,82258,82065,82071,82079,82086,82093,82100,82107,82114,82121,82128;
				}else if( BaseLevel >= 100 && BaseLevel <= 125 ){
					setarray .@monster$,"Assaulter","Hill Wind","Kobold (Shield & Hammer)","Diabolic","Muscipular","Dullahan","Aunoe","Venatu (Blue)","Hell Poodle","Dimik (Orange)","Plasma (Red)","Cornus","Remover";
					setarray .@questid,82138,82145,82151,82159,82166,82171,82180,82187,82194,82201,82208,82215,82222;
				}else{
					setarray .@monster$,"Shelter","Observation","Banshee","Erend","Antler Scaraba";
					setarray .@questid,82232,82239,82246,82254,82261;
				}
				break;
			Case 1:
				if( BaseLevel >= 50 && BaseLevel <= 69 ){
					setarray .@monster$,"Beetle King","Alligator","Rice Cake Boy","Jakk","Mantis","Dryad";
					setarray .@questid,82000,82007,82014,82021,82028,82035;
				}else if( BaseLevel >= 70 && BaseLevel <= 99 ){
					setarray .@monster$,"Sidewinder","Nine Tails","Argiope","Iara","Comodo","Punk","Raydric Archer","Penomena","Venomous","Permeter","Teddy Bear","Waste Stove","Stapo","The Paper";
					setarray .@questid,82039,82046,82266,82059,82066,82073,82080,82087,82094,82101,82108,82115,82122,82129;
				}else if( BaseLevel >= 100 && BaseLevel <= 125 ){
					setarray .@monster$,"Neraid","Quve","Drosera","Phendark","Sting","Deleter (Flying)","Kobold Archer","Ice Titan","Dark Pinguicula","Plasma(Blue)","Plasma (Green)","Gremlin","Owl Baron","Knight of Abyss";
					setarray .@questid,82132,82139,82146,82153,82160,82167,82174,82181,82188,82195,82202,82209,82216,82223;
				}else{
					setarray .@monster$,"Vanberk","Centipede","Frus","Acidus","Necromancer","Salamander";
					setarray .@questid,82226,82233,82240,82248,82255,82262;
				}
				break;
			Case 2:
				if( BaseLevel >= 50 && BaseLevel <= 69 ){
					setarray .@monster$,"Goblin Archer","Swordfish","Merman","Hunter Fly","Tri-Joint","Dokebi";
					setarray .@questid,82001,82008,82015,82022,82029,82036;
				}else if( BaseLevel >= 70 && BaseLevel <= 99 ){
					setarray .@monster$,"Toucan","Marduk","Dark Frame","Evil Druid","Clock","Les","Novus","Miyabi Doll","Siorova","Marionette","Demon Pungus","Enchanted Peach Tree","Roween","Obsidian";
					setarray .@questid,82040,82047,82253,82060,82067,82074,82081,82088,82095,82102,82109,82116,82123,82130;
				}else if( BaseLevel >= 100 && BaseLevel <= 125 ){
					setarray .@monster$,"Siroma","Gargoyle","Blazer","Desert Wolf","Fake Angel","Gazeti","Anolian","Aliza","Draco","Raydric","Plasma (Purple)","Centipede Larva","Beholder","Hodremlin";
					setarray .@questid,82133,82140,82147,82154,82161,82168,82175,82182,82189,82196,82203,82210,82217,82224;
				}else{
					setarray .@monster$,"Lady Solace","Echio","Agav","Incantation of Morrocc (Ground)","Rawrel","Rake Scaraba";
					setarray .@questid,82227,82234,82241,82249,82256,82263;
				}
				break;
			Case 3:
				if( BaseLevel >= 50 && BaseLevel <= 69 ){
					setarray .@monster$,"Greatest General","Minorous","Strouf","Hode","Steam Goblin","Curupira";
					setarray .@questid,82009,82016,82023,82030,82037;
				}else if( BaseLevel >= 70 && BaseLevel <= 99 ){
					setarray .@monster$,"Zerom","Tamruan","Parasite","Goat","Wood Goblin","Mi Gao","Stem Worm","Rafflesia","Noxious","Pitman","Skeleton Prisoner","Solider","Anopheles","Tengu";
					setarray .@questid,82041,82048,82254,82061,82068,82075,82082,82089,82096,82103,82110,82117,82124,82131;
				}else if( BaseLevel >= 100 && BaseLevel <= 125 ){
					setarray .@monster$,"Dark Priest","Explosion","Kobold (With Mace)","Lava Golem","Anubis","Nightmare Terror","Loli Ruri","Ancient Mimic","Ancient Mummy","Pot Dofle","King Dramoh","Plasma (Yellow)","Flame Skull","Hillslion";
					setarray .@questid,82134,82141,82147,82155,82162,82167,82176,82183,82190,82197,82204,82211,82218,82225;
				}else{
					setarray .@monster$,"Ragged Zombie","Ferus (Green)","Tatacho","Whikebain","Armania","Miming";
					setarray .@questid,82228,82235,82242,82250,82257,82264;
				}
				break;
			Case 4:
				if( BaseLevel >= 50 && BaseLevel <= 69 ){
					setarray .@monster$,"Mummy","Munak","Golems","Leaf Cat","Horong","Baby Leopard";
					setarray .@questid,82003,82010,82017,82024,82031,82038;
				}else if( BaseLevel >= 70 && BaseLevel <= 99 ){
					setarray .@monster$,"Jaguar","Geographer","Wraith","Headless Mule","Sleeper","Kapha","Cendrawasih","Witch","Spring Rabbit","Novus","Red Eruma","Deviruchi","Shinobi";
					setarray .@questid,82042,82049,82255,82062,82068,82076,82083,82090,82097,82104,82111,82118,82125,82132;
				}else if( BaseLevel >= 100 && BaseLevel <= 125 ){
					setarray .@monster$,"Heater","Anacondaq","Lude","Disguise","Deleter (Not Flying)","Kobold (With Axe)","Luciola Vespa","Sropho","Nepenthes","Dimik (Grey)","Naga","Succubus","Aqua Elemental";
					setarray .@questid,82135,82142,82148,82156,82163,82168,82177,82184,82191,82198,82205,82212,82219;
				}else{
					setarray .@monster$,"Seeker","Skogul","Imp","Incantation of Morrocc","Kavac","Little Fatum";
					setarray .@questid,82229,82236,82243,82251,82258,82265;
				}
				break;
			Case 5:
				if( BaseLevel >= 50 && BaseLevel <= 69 ){
					setarray .@monster$,"Metaller","Isis","Sandman","Stone Shooter","Grizzly";
					setarray .@questid,82004,82011,82018,82025,82032;
				}else if( BaseLevel >= 70 && BaseLevel <= 99 ){
					setarray .@monster$,"Requiem","Rideword","Orc Archer","Alnoldi","Raydric Archer","Ancient Worm","Mole","Dragon Tail","Firelock Soldier","Wild Ginseng","Elder","Freezer","Evil Cloud Hermit";
					setarray .@questid,82043,82050,82256,82063,82069,82077,82084,82091,82098,82105,82112,82119,82126;
				}else if( BaseLevel >= 100 && BaseLevel <= 125 ){
					setarray .@monster$,"Rybio","Alice","Medusa","Carat","Pinguicula","Majoruros","Magmaring","Venatu (Red)","Ancient Mummy","Dimik (Red)","Mini Demon","Wanderer","Retribution";
					setarray .@questid,82136,82143,82149,82157,82164,82169,82178,82185,82192,82199,82206,82213,82220;
				}else{
					setarray .@monster$,"Zombie Slaughter","Knocker","Acidus (Gold)","Dolomedes","Kasa";
					setarray .@questid,82230,82237,82244,82252,82259;
				}
				break;
			Case 6:
				if( BaseLevel >= 50 && BaseLevel <= 69 ){
					setarray .@monster$,"Green Iguana","Flora","Ghoul","Sohee","Wootan Shooter";
					setarray .@questid,82005,82012,82019,82026,82033;
				}else if( BaseLevel >= 70 && BaseLevel <= 99 ){
					setarray .@monster$,"Wooden Golem","Piranha","Petite","Jing Guai","Cramp","Harpy","Porcellio","Hyegun","Alarm","Zipper Bear","Owl Duke","Bloody Butterfly","Evil Cloud Hermit";
					setarray .@questid,82044,82051,82257,82064,82070,82078,82085,82092,82099,82106,82113,82120,82127;
				}else if( BaseLevel >= 100 && BaseLevel <= 125 ){
					setarray .@monster$,"Kaho","Galion","Heirozoist","Snowier","Gibbet","Arclouse","Sedora","Venatu (Grey)","Deathword","Dimik (Blue)","Violy","Incubus","Apocalypse";
					setarray .@questid,82137,82144,82150,82158,82165,82170,82179,82186,82193,82200,82207,82214,82221;
				}else{
					setarray .@monster$,"Isilla","Ferus (Red)","One Horned Scaraba","Bradium Golem","Ygnizem";
					setarray .@questid,82231,82238,82245,82253,82260;
				}
				break;
			default: close;
		}
		.@size = getarraysize( .@monster$ );
		for( .@i = 0; .@i < .@size; .@i++ )
			.@menu$ = .@menu$ + .@monster$[.@i] +":";
		.@i = select( .@menu$ ) - 1;
		mes "You are required to hunt^FF0000 "+.@monster$[.@i]+". ^000000 Once you're done, return to me.";
		setquest .@questid[.@i];
		monster_quest = .@questid[.@i];
		break;
	Case 2: 
		mes "[^990000Monster Quest^000000]";
		if( checkquest( monster_quest,HUNTING ) == 2 ) {
				mes "you've done it! here's your reward!";
				// get exp
				if( monster_quest < 82012 ) getexp 315000,354888;
				else if( monster_quest < 82019 ) getexp 463750,446250;
				else if( monster_quest < 82039 ) getexp 525000,600000;
				else if( monster_quest < 82069 ) getexp 463750,446250;
				else if( monster_quest < 82099 ) getexp 2129400,2010320;
				else if( monster_quest < 82132 ) getexp 2679075,2245410;
				else if( monster_quest < 82154 ) getexp 2756250,2455000;
				else if( monster_quest < 82183 ) getexp 3150000,2555000;
				else if( monster_quest < 82207 ) getexp 4284000,3555000;
				else if( monster_quest < 82226 ) getexp 5005000,3655000;
				else if( monster_quest < 82247 ) getexp 5705000,4055000;
				else getexp 7705000,555000;
				erasequest monster_quest;
				monster_quest = 0;
		}else{
			mes "It's not yet done.";
		}
		break;
    Case 3:
		mes "[^990000Monster Quest^000000]";
		mes "Would you like to remove your current quest?";
		next;    
		switch(select("No Thanks!:Yes, remove my current quest.")){
		    Case 1: 
				mes "[^990000Monster Quest^000000]";
				mes "Sure! let me know if you require anything else!";
				mes "Happy Hunting Riser!";
				break;
		    Case 2:
				if( monster_quest ){
					erasequest monster_quest;
					monster_quest = 0;
					mes "[^990000Monster Quest^000000]";
					mes "Quest has been removed!";
					mes "All progress towards the quest have been deleted";
					next;
					mes "[^990000Monster Quest^000000]";
					mes "If you'd like a new quest, please come and look for me!";
				}else{
					mes "You dont have taken any quest.";
				}
				break;
		}
		break;
    Case 4:
		mes "[^990000Monster Quest^000000]";
		mes "My job is supply quest depending on your level";
		next;
		mes "[^990000Monster Quest^000000]";
		mes "However, this would only apply to players level 50 and above";
		next;
		mes "[^990000Monster Quest^000000]";
		mes "You may party up to kill the monsters, however the kill counts only if you're within the same screen, EXP still applies for the entire map though";
		next;
		mes "[^990000Monster Quest^000000]";
		mes "Oh and I almost forgot to mention! You are only able to accept one quest at a time. You could remove it though by selecting the remove option. Cheers!";
}
close;				
}