* Optimized Eden Quest lv. 26-40 and 41-55 (re\quests\eden\)

* Minor cleaning on Cooking Quest (quests\cooking_quest.txt)

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

1 files changed, 50 insertions, 395 deletions

diff --git a/npc/re/quests/eden/41-55.txt b/npc/re/quests/eden/41-55.txt
index 40e910cb8..f0101a3db 100644
--- a/npc/re/quests/eden/41-55.txt
+++ b/npc/re/quests/eden/41-55.txt
@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,19 +11,19 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version.
 //= 1.1 Some little optimization here and there. [Masao]
+//= 1.2 Optimized. [Euphy]
 //============================================================
 
 moc_para01,40,38,3	script	Mission [41 - 55]	857,{
-
+	if (countitem(6219) < 1) {
+		mes "You are not an Eden group member. You are not qualified to access the bulletin board.";
+		close;
+	}
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 1000) {
 		mes "^008800Wait a sec!!";
 		mes "You cannot receive any more items because you're carrying too many items. Please try again after you lighten up.^000000";
 		close;
 	}
-	if (countitem(6219) < 1) {
-		mes "You are not an Eden group member. You are not qualified to access the bulletin board.";
-		close;
-	}
 	if (checkquest(12088) == -1) {
 		if (BaseLevel < 41 || BaseLevel > 55) {
 			mes "[41 ~ 55 Lv. Mission Board]";
@@ -32,398 +32,42 @@ moc_para01,40,38,3	script	Mission [41 - 55]	857,{
 		mes "[Mission Board]";
 		mes "Mission bulletin board.";
 		next;
-		switch (select("Check the Missions.:Cancel.")) {
-		case 1:
-			switch (select("Thara Frog Hunting:Cruiser Hunting:Kukre Hunting:Orc Baby Hunting:Orc Warrior Hunting:Vadon Hunting:Megalodon Hunting:Marse Hunting:Cornutus Hunting:Myst Hunting:Shellfish Hunting:Marine Sphere Hunting")) {
-			case 1:
-				mes "[Mission Board Memo]";
-				mes "Have you seen a red frog? It is called Thara Frog and it's very rare. We are trying to verify where it inhabits. So please hunt 20 Thara Frogs.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12072;
-					setquest 12088;
-					close;
-				case 2:
-					close;
-				}
-			case 2:
-				mes "[Mission Board Memo]";
-				mes "I heard of some toys attacking people. It is ridiculous! Let's show them our power! We have to hunt 15 Cruisers!";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12073;
-					setquest 12088;
-					close;
-				case 2:
-					close;
-				}
-			case 3:
-				mes "[Mission Board Memo]";
-				mes "Someone got robbed near the beach! The possible suspect is a criminal monster called Kukre. Please hunt 30 Kukre.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12074;
-					setquest 12088;
-					close;
-				case 2:
-					close;
-				}
-			case 4:
-				mes "[Mission Board Memo]";
-				mes "Orc Babies are getting more violent these days. Please hunt 15 Orc Babies.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12075;
-					setquest 12088;
-					close;
-				case 2:
-					close;
-				}
-			case 5:
-				mes "[Mission Board Memo]";
-				mes "Orc Warriors are increasing their aggression. Please hunt 20 Orc Warriors.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12076;
-					close;
-				case 2:
-				}
-			case 6:
-				mes "[Mission Board Memo]";
-				mes "Have you seen crabs with thick shells? They are Vadons. Please hunt 15 Vadons..";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12077;
-					close;
-				case 2:
-					close;
-				}
-			case 7:
-				mes "[Mission Board Memo]";
-				mes "Dead fish are all around the beach and it is getting worse. Please hunt 30 Megalodon.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12078;
-					close;
-				case 2:
-					close;
-				}
-			case 8:
-				mes "[Mission Board Memo]";
-				mes "Can you hunt Marse? I need 15 Marse for my study. Please help me.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12079;
-					setquest 12088;
-					close;
-				case 2:
-					close;
-				}
-			case 9:
-				mes "[Mission Board Memo]";
-				mes "An idiot Cornutus bit the Mayor's foot. The Mayor is upset so we need to hunt 20 Cornutus to make him happy!";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12080;
-					close;
-				case 2:
-					close;
-				}
-			case 10:
-				mes "[Mission Board Memo]";
-				mes "People are freaking out because of Myst. It looks like a ghost so, it scares people. Please hunt 15 Myst.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12081;
-					close;
-				case 2:
-					close;
-				}
-			case 11:
-				mes "[Mission Board Memo]";
-				mes "Don't ask why, but please hunt 30 Shellfish. It is a secret mission!";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12082;
-					close;
-				case 2:
-					close;
-				}
-			case 12:
-				mes "[Mission Board Memo]";
-				mes "Marine Sphere? Do you know what a Marine Sphere is? I got a mission for you to hunt 15 Marine Sphere, so please do so.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12083;
-					close;
-				case 2:
-					close;
-				}
-			case 13:
-				mes "[Mission Board Memo]";
-				mes "The mayor wants to eat a delicious fish dish. Phen will be the perfect ingredient for it. Please hunt 20 Phen!";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12084;
-					close;
-				case 2:
-					close;
-				}
-			case 14:
-				mes "[Mission Board Memo]";
-				mes "Dead Orc monsters got back to our town and they've revived as Orc Skeletons. We are in chaos! Please hunt 15 Orc Skeleton.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12085;
-					close;
-				case 2:
-					close;
-				}
-			case 15:
-				mes "[Mission Board Memo]";
-				mes "Some weird monsters called Zenorc are attacking us. Please hunt 30 Zenorc.";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12086;
-					close;
-				case 2:
-					close;
-				}
-			case 16:
-				mes "[Mission Board Memo]";
-				mes "Be prepared! It is a cruel mission! Hunt 15 Mummies!! I tried once, but I couldn't succeed. It is too scary!";
-				next;
-				switch (select("Accept the mission.:Cancel.")) {
-				case 1:
-					mes "[Mission Board]";
-					mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
-					setquest 12088;
-					setquest 12087;
-					close;
-				case 2:
-					close;
-				}
-			}
-		case 2:
+		if(select("Check the Missions.:Cancel.") == 2) {
 			mes "^000077Ok. Let's check the missions next time.^000000.";
 			close;
 		}
-	}
-	if (checkquest(12072,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12072;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 9600,0;
-		close;
-	}
-	if (checkquest(12073,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12073;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 7200,0;
-		close;
-	}
-	if (checkquest(12074,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12074;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 15750,0;
-		close;
-	}
-	if (checkquest(12075,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12075;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 7875,0;
-		close;
-	}
-	if (checkquest(12076,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12076;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 11100,0;
-		close;
-	}
-	if (checkquest(12077,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12077;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 8550,0;
-		close;
-	}
-	if (checkquest(12078,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12078;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 17100,0;
-		close;
-	}
-	if (checkquest(12079,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12079;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 9000,0;
-		close;
-	}
-	if (checkquest(12080,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12080;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 12300,0;
-		close;
-	}
-	if (checkquest(12081,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12081;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 9900,0;
-		close;
-	}
-	if (checkquest(12082,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12082;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 20250,0;
-		close;
-	}
-	if (checkquest(12083,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12083;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 10350,0;
-		close;
-	}
-	if (checkquest(12084,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12084;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 13800,0;
-		close;
-	}
-	if (checkquest(12085,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12085;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 11025,0;
-		close;
-	}
-	if (checkquest(12086,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12086;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 22500,0;
-		close;
-	}
-	if (checkquest(12087,HUNTING) == 2) {
-		mes "[Mission Board]";
-		mes "You have completed the mission.";
-		mes "Here is your reward.";
-		erasequest 12087;
-		erasequest 12088;
-		specialeffect2 EF_STEAL;
-		getexp 11250,0;
-		close;
-	}
+		switch(select("Thara Frog Hunting:Cruiser Hunting:Kukre Hunting:Orc Baby Hunting:Orc Warrior Hunting:Vadon Hunting:Megalodon Hunting:Marse Hunting:Cornutus Hunting:Myst Hunting:Shellfish Hunting:Marine Sphere Hunting")) {
+			case 1: callsub L_Quest,12072,"Have you seen a red frog? It is called Thara Frog and it's very rare. We are trying to verify where it inhabits. So please hunt 20 Thara Frogs.";
+			case 2: callsub L_Quest,12073,"I heard of some toys attacking people. It is ridiculous! Let's show them our power! We have to hunt 15 Cruisers!";
+			case 3: callsub L_Quest,12074,"Someone got robbed near the beach! The possible suspect is a criminal monster called Kukre. Please hunt 30 Kukre.";
+			case 4: callsub L_Quest,12075,"Orc Babies are getting more violent these days. Please hunt 15 Orc Babies.";
+			case 5: callsub L_Quest,12076,"Orc Warriors are increasing their aggression. Please hunt 20 Orc Warriors.";
+			case 6: callsub L_Quest,12077,"Have you seen crabs with thick shells? They are Vadons. Please hunt 15 Vadons.";
+			case 7: callsub L_Quest,12078,"Dead fish are all around the beach and it is getting worse. Please hunt 30 Megalodon.";
+			case 8: callsub L_Quest,12079,"Can you hunt Marse? I need 15 Marse for my study. Please help me.";
+			case 9: callsub L_Quest,12080,"An idiot Cornutus bit the Mayor's foot. The Mayor is upset so we need to hunt 20 Cornutus to make him happy!";
+			case 10: callsub L_Quest,12081,"People are freaking out because of Myst. It looks like a ghost so, it scares people. Please hunt 15 Myst.";
+			case 11: callsub L_Quest,12082,"Don't ask why, but please hunt 30 Shellfish. It is a secret mission!";
+			case 12: callsub L_Quest,12083,"Marine Sphere? Do you know what a Marine Sphere is? I got a mission for you to hunt 15 Marine Sphere, so please do so.";
+			case 13: callsub L_Quest,12084,"The mayor wants to eat a delicious fish dish. Phen will be the perfect ingredient for it. Please hunt 20 Phen!";
+			case 14: callsub L_Quest,12085,"You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
+			case 15: callsub L_Quest,12086,"Some weird monsters called Zenorc are attacking us. Please hunt 30 Zenorc.";
+			case 16: callsub L_Quest,12087,"Be prepared! It is a cruel mission! Hunt 15 Mummies!! I tried once, but I couldn't succeed. It is too scary!";
+		}
+		end;
+	}
+	setarray .@Exp[0],9600,7200,15750,7875,11100,8550,17100,9000,12300,9900,20250,10350,13800,11025,22500,11250;
+	for(set .@i,0; .@i<16; set .@i,.@i+1)
+		if (checkquest(12072+.@i,HUNTING) == 2) {
+			mes "[Mission Board]";
+			mes "You have completed the mission.";
+			mes "Here is your reward.";
+			erasequest 12088;
+			erasequest 12072+.@i;
+			specialeffect2 EF_STEAL;
+			getexp .@Exp[.@i],0;
+			close;
+		}
 	if ((checkquest(12072,HUNTING) == 0) && (checkquest(12073,HUNTING) == 0) && (checkquest(12074,HUNTING) == 0) && (checkquest(12075,HUNTING) == 0) && (checkquest(12076,HUNTING) == 0) && (checkquest(12077,HUNTING) == 0) && (checkquest(12078,HUNTING) == 0) && (checkquest(12079,HUNTING) == 0) && (checkquest(12080,HUNTING) == 0) && (checkquest(12081,HUNTING) == 0) && (checkquest(12082,HUNTING) == 0) && (checkquest(12083,HUNTING) == 0) && (checkquest(12084,HUNTING) == 0) && (checkquest(12085,HUNTING) == 0) && (checkquest(12086,HUNTING) == 0) && (checkquest(12087,HUNTING) == 0)) {
 		mes "You may now view the bulletin board.";
 		erasequest 12088;
@@ -431,4 +75,15 @@ moc_para01,40,38,3	script	Mission [41 - 55]	857,{
 	}
 	mes "There is nothing special to do.";
 	close;
+L_Quest:
+	mes "[Mission Board Memo]";
+	mes getarg(1);
+	next;
+	if(select("Accept the mission.:Cancel.") == 1) {
+		mes "[Mission Board]";
+		mes "You have accepted the mission. For more details, please press 'alt + u' keys, you can get information from the Quest Window.";
+		setquest 12088;
+		setquest getarg(0);
+	}
+	close;
 }