* 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

3 files changed, 359 insertions, 1466 deletions

diff --git a/npc/re/quests/eden/26-40.txt b/npc/re/quests/eden/26-40.txt
index cdb9fbadc..1db721025 100644
--- a/npc/re/quests/eden/26-40.txt
+++ b/npc/re/quests/eden/26-40.txt
@@ -3,7 +3,7 @@
 //===== By: ==================================================
 //= L0ne_W0lf
 //===== Current Version: =====================================
-//= 1.1
+//= 1.2
 //===== Compatible With: =====================================
 //= rAthena SVN
 //===== Description: =========================================
@@ -11,480 +11,96 @@
 //===== Additional Comments: =================================
 //= 1.0 First Version.
 //= 1.1 Some little optimization here and there. [Masao]
+//= 1.2 Optimized. [Euphy]
 //============================================================
 
 moc_para01,38,38,3	script	Mission [26 - 40]	857,{
-	if (countitem(6219) > 0) {
-		mes "[26 ~ 40 Lv. Mission Board]";
-		mes "- Many missions are -";
-		mes "- on the bulletin board. -";
+	if (countitem(6219) != 1) {
+		mes "You are not a qualified member. You can not use the bulletin board.";
+		close;
+	}
+	mes "[26 ~ 40 Lv. Mission Board]";
+	mes "- Many missions are -";
+	mes "- on the bulletin board. -";
+	next;
+	if ((BaseLevel < 26) && (BaseLevel > 40)) {
+		mes "Your level is not qualified. You can not use the bulletin board.";
+		close;
+	}
+	switch(select("Hunting Mission:Delivery Mission:Gathering Mission:Escort Mission")) {
+	case 1:
+		mes "[Hunting Mission Board]";
+		mes "- Hunting Mission details -";
+		mes "- are on the board. -";
 		next;
-		if ((BaseLevel > 25) && (BaseLevel < 41)) {
-			set .@checkquest1,checkquest(8266);
-			set .@checkquest2,checkquest(8267);
-			set .@checkquest3,checkquest(8268);
-			set .@checkquest4,checkquest(8269);
-			set .@checkquest5,checkquest(8270);
-			set .@checkquest6,checkquest(8271);
-			set .@checkquest7,checkquest(8272);
-			set .@checkquest8,checkquest(8273);
-			set .@checkquest9,checkquest(8274);
-			set .@checkquest10,checkquest(8275);
-			set .@checkquest11,checkquest(8276);
-			set .@checkquest12,checkquest(8277);
-			set .@checkquest13,checkquest(8278);
-			set .@checkquest14,checkquest(8279);
-			switch (select("Hunting Mission:Delivery Mission:Gathering Mission:Escort Mission")) {
-			case 1:
-				mes "[26 ~ 40 Lv. Hunting Mission Board]";
-				mes "- Hunting Mission details -";
-				mes "- are on the board. -";
-				next;
-				switch (select("Hunting Poison Spore:Hunting Smokie:Hunting Elder Willow(Above Lv.30):Hunting Coco(Above Lv.35):Hunting Thara Frog(Above Lv.38)")) {
-				case 1:
-					mes "[Hunting Poison Spore]";
-					mes "Client : Sponiac";
-					mes "Client Location : Geffen";
-					mes "Requested Mission : Hunt 10 Poison Spores";
-					mes " ";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Hunting Poison Spore mission.";
-						close;
-					case 2:
-						if (.@checkquest1 == -1 || .@checkquest1 == 0 || .@checkquest1 == 2) {
-							setquest 8266;
-							mes "You have accepted the Hunting Poison Spore mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 2:
-					mes "[Hunting Smokie]";
-					mes "Client : Sponiac";
-					mes "Client Location : Geffen";
-					mes "Requested Mission : Hunt 10 Smokies";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Hunting Smokie mission.";
-						close;
-					case 2:
-						if (.@checkquest2 == -1 || .@checkquest2 == 0 || .@checkquest2 == 2) {
-							setquest 8267;
-							mes "You have accepted the Hunting Smokie mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 3:
-					if (BaseLevel < 30) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Hunting Elder Willow' mission.";
-						close;
-					}
-					mes "[Hunting Elder Willow !!]";
-					mes "Client : Sponiac";
-					mes "Client Location : Geffen";
-					mes "Requested Mission : Hunt 10 Elder Willows";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Hunting Elder Willow mission.";
-						close;
-					case 2:
-						if (.@checkquest3 == -1 || .@checkquest3 == 0 || .@checkquest3 == 2) {
-							setquest 8268;
-							mes "You have accepted the Hunting Elder Willow mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 4:
-					if (BaseLevel < 35) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Hunting Coco' mission.";
-						close;
-					}
-					mes "[Hunting Coco !!]";
-					mes "Client : Sponiac";
-					mes "Client Location : Geffen";
-					mes "Requested Mission : Hunt 10 Coco's.";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Hunting Coco mission.";
-						close;
-					case 2:
-						if (.@checkquest4 || .@checkquest4 == 0 || .@checkquest4 == 2) {
-							setquest 8269;
-							mes "You have accepted the Hunting Coco mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 5:
-					if (BaseLevel < 38) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Hunting Thara Frog' mission.";
-						close;
-					}
-					mes "[Hunting Thara Frog !!]";
-					mes "Client : Sponiac";
-					mes "Client Location : Geffen";
-					mes "Requested Mission : Hunt 10 Thara Frogs.";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Hunting Thara Frog mission.";
-						close;
-					case 2:
-						if (.@checkquest5 == -1 || .@checkquest5 == 0 || .@checkquest5 == 2) {
-							setquest 8270;
-							mes "You have accepted the Hunting Thara Frog mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				}
-			case 2:
-				mes "[26 ~ 40 Lv. Delivery Mission Board]";
-				mes "- Delivery Mission details -";
-				mes "- are on the board. -";
-				next;
-				switch (select("Deliver an Insecticide:Deliver Honey:Deliver Blanket(Above Lv.35)")) {
-				case 1:
-					mes "[Deliver an Insecticide !!]";
-					mes "Client : Dieshin Man";
-					mes "Client Location : Morroc Ruins";
-					mes "Requested Mission : Get an 'Insecticide' from Dieshin Man and deliver it south east of Payon";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Deliver an Insecticide mission.";
-						close;
-					case 2:
-						if (.@checkquest6 == -1 || .@checkquest6 == 0 || .@checkquest6 == 2) {
-							setquest 8271;
-							mes "You have accepted the Deliver an Insecticide mission.";
-							mes "Please obtain the delivery box from the client first.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "Please obtain the delivery box from the client first.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 2:
-					mes "[Deliver Honey !!]";
-					mes "Client : Dieshin Man";
-					mes "Client Location : Morroc Ruins";
-					mes "Requested Mission : Get 'Honey' from Dieshin Man and deliver it west of St. Capitolina Abbey";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Deliver Honey mission.";
-						close;
-					case 2:
-						if (.@checkquest7 == -1 || .@checkquest7 == 0 || .@checkquest7 == 2) {
-							setquest 8272;
-							mes "You have accepted the Deliver Honey mission.";
-							mes "Please obtain the delivery box from the client first.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "Please obtain the delivery box from the client first.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 3:
-					if (BaseLevel < 35) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Deliver Blanket' mission.";
-						close;
-					}
-					mes "[Deliver Blanket !!]";
-					mes "Client : Dieshin Man";
-					mes "Client Location : Morroc Ruins";
-					mes "Requested Mission : Get Blankets from Dieshin Man and deliver to the field south of Lutie";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Deliver Blanket mission.";
-						close;
-					case 2:
-						if (.@checkquest8 == -1 || .@checkquest8 == 0 || .@checkquest8 == 2) {
-							setquest 8273;
-							mes "You have accepted the Deliver Blanket mission.";
-							mes "Please obtain the delivery box from the client first.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "Please obtain the delivery box from the client first.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				}
-			case 3:
-				mes "[26 ~ 40 Lv. Gathering Mission Board]";
-				mes "- Gathering Mission details -";
-				mes "- are on the board. -";
-				next;
-				switch (select("Gather Bones:Gather Animal Skins:Gather Peelings(Above Lv.30):Gather Tails(Above Lv.32):Gather Cookies(Above Lv.35):Gather Mustaches(Above Lv.35)")) {
-				case 1:
-					mes "[Gather Bones !!]";
-					mes "Client : Dashia";
-					mes "Client Location : Payon";
-					mes "Requested Mission : Gather '10 Skel-Bones' and give them to Dashia";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Gather Bones mission.";
-						close;
-					case 2:
-						if (.@checkquest9 == -1 || .@checkquest9 == 0 || .@checkquest9 == 2) {
-							setquest 8274;
-							mes "You have accepted the Gather Bones mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 2:
-					mes "[Gather Animal Skins !!]";
-					mes "Client : Dashia";
-					mes "Client Location : Payon";
-					mes "Requested Mission : Gather '10 Bear's Footskins' and '5 Animal Skins' and give them to Dashia";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Gather Animal Skins mission.";
-						close;
-					case 2:
-						if (.@checkquest10 == -1 || .@checkquest10 == 0 || .@checkquest10 == 2) {
-							setquest 8275;
-							mes "You have accepted the Gather Animal Skins mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 3:
-					if (BaseLevel < 30) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Gather Peelings' mission.";
-						close;
-					}
-					mes "[Gather Peelings !!]";
-					mes "Client : Dashia";
-					mes "Client Location : Payon";
-					mes "Requested Mission : Gather '20 Worm Peelings' and '20 Garlets' and give them to Dashia";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Gather Peelings mission.";
-						close;
-					case 2:
-						if (.@checkquest11 == -1 || .@checkquest11 == 0 || .@checkquest11 == 2) {
-							setquest 8276;
-							mes "You have accepted the Gather Peelings mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 4:
-					if (BaseLevel < 32) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Gather Tails' mission.";
-						close;
-					}
-					mes "[Gather Tails !!]";
-					mes "Client : Dashia";
-					mes "Client Location : Payon";
-					mes "Requested Mission : Gather '10 Yoyo Tails', '10 Acorns' and '10 Raccon Leafs' and give them to Dashia";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Gather Tails mission.";
-						close;
-					case 2:
-						if (.@checkquest12 == -1 || .@checkquest12 == 0 || .@checkquest12 == 2) {
-							setquest 8277;
-							mes "You have accepted the Gather Tails mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 5:
-					if (BaseLevel < 35) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Gather Cookies' mission.";
-						close;
-					}
-					mes "[Gather Cookies !!]";
-					mes "Client : Dashia";
-					mes "Client Location : Payon";
-					mes "Requested Mission : Gather '5 Well-baked Cookies' and '1 Piece of Cake' and give them to Dashia";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Gather Cookies mission.";
-						close;
-					case 2:
-						if (.@checkquest13 == -1 || .@checkquest13 == 0 || .@checkquest13 == 2) {
-							setquest 8278;
-							mes "You have accepted the Gather Cookies mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				case 6:
-					if (BaseLevel < 35) {
-						mes "Your level doesn't meet the requirements. You can't take the 'Gather Mustaches' mission.";
-						close;
-					}
-					mes "[Gather Mustaches !!]";
-					mes "Client : Dashia";
-					mes "Client Location : Payon";
-					mes "Requested Mission : Gather '5 Mole Whiskers' and '3 Mole Claws' and give them to Dashia";
-					mes " ";
-					mes "Will you accept this mission?";
-					next;
-					switch (select("No, I won't accept it.:Yes, I will accept it.")) {
-					case 1:
-						mes "You have declined the Gather Mustaches mission.";
-						close;
-					case 2:
-						if (.@checkquest14 == -1 || .@checkquest14 == 0 || .@checkquest14 == 2) {
-							setquest 8279;
-							mes "You have accepted the Gather Mustaches mission.";
-							mes "You can get a reward from the client after you finish the mission.";
-							next;
-							mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-							close;
-						}
-						mes "You are already doing this mission.";
-						mes "You can get a reward from the client after you finish the mission.";
-						next;
-						mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
-						close;
-					}
-				}
-			case 4:
-				mes "[26 ~ 40 Lv. Escort Mission Board]";
-				mes "There are currently no Escort Missions registered on the board.";
-				close;
-			}
+		switch(select("Hunting Poison Spore:Hunting Smokie:Hunting Elder Willow(Above Lv.30):Hunting Coco(Above Lv.35):Hunting Thara Frog(Above Lv.38)")) {
+			case 1: callsub L_Quest,8266,0,"Hunting Poison Spore","Sponiac","Geffen","Hunt 10 Poison Spores";
+			case 2: callsub L_Quest,8267,0,"Hunting Smokie","Sponiac","Geffen","Hunt 10 Smokies";
+			case 3: callsub L_Quest,8268,30,"Hunting Elder Willow","Sponiac","Geffen","Hunt 10 Elder Willows";
+			case 4: callsub L_Quest,8269,35,"Hunting Coco","Sponiac","Geffen","Hunt 10 Cocos";
+			case 5: callsub L_Quest,8270,38,"Hunting Thara Frog","Sponiac","Geffen","Hunt 10 Thara Frogs";
 		}
-		mes "Your level is not qualified. You can not use the bulletin board.";
+	case 2:
+		mes "[Delivery Mission Board]";
+		mes "- Delivery Mission details -";
+		mes "- are on the board. -";
+		next;
+		switch(select("Deliver an Insecticide:Deliver Honey:Deliver Blanket(Above Lv.35)")) {
+			case 1: callsub L_Quest,8271,0,"Deliver an Insecticide","Dieshin Man","Morroc Ruins","Get an 'Insecticide' from Dieshin Man and deliver it south east of Payon";
+			case 2: callsub L_Quest,8272,0,"Deliver Honey","Dieshin Man","Morroc Ruins","Get 'Honey' from Dieshin Man and deliver it west of St. Capitolina Abbey";
+			case 3: callsub L_Quest,8273,35,"Deliver Blanket","Dieshin Man","Morroc Ruins","Get Blankets from Dieshin Man and deliver to the field south of Lutie";
+		}
+	case 3:
+		mes "[Gathering Mission Board]";
+		mes "- Gathering Mission details -";
+		mes "- are on the board. -";
+		next;
+		switch(select("Gather Bones:Gather Animal Skins:Gather Peelings(Above Lv.30):Gather Tails(Above Lv.32):Gather Cookies(Above Lv.35):Gather Mustaches(Above Lv.35)")) {
+			case 1: callsub L_Quest,8274,0,"Gather Bones","Dashia","Payon","Gather '10 Skel-Bones' and give them to Dashia";
+			case 2: callsub L_Quest,8275,0,"Gather Animal Skins","Dashia","Payon","Gather '10 Bear's Footskins' and '5 Animal Skins' and give them to Dashia";
+			case 3: callsub L_Quest,8276,30,"Gather Peelings","Dashia","Payon","Gather '20 Worm Peelings' and '20 Garlets' and give them to Dashia";
+			case 4: callsub L_Quest,8277,32,"Gather Tails","Dashia","Payon","Gather '10 Yoyo Tails', '10 Acorns' and '10 Raccon Leafs' and give them to Dashia";
+			case 5: callsub L_Quest,8278,35,"Gather Cookies","Dashia","Payon","Gather '5 Well-baked Cookies' and '1 Piece of Cake' and give them to Dashia";
+			case 6: callsub L_Quest,8279,35,"Gather Mustaches","Dashia","Payon","Gather '5 Mole Whiskers' and '3 Mole Claws' and give them to Dashia";
+		}
+	case 4:
+		mes "[Escort Mission Board]";
+		mes "There are currently no Escort Missions registered on the board.";
 		close;
 	}
-	mes "You are not a qualified member. You can not use the bulletin board.";
+	end;
+L_Quest:
+	//QuestID,ReqLvl,Quest,Client,Loc,Desc
+	if (BaseLevel < getarg(1,26)) {
+		mes "Your level doesn't meet the requirements. You can't take the '"+getarg(2)+"' mission.";
+		close;
+	}
+	mes "["+getarg(2)+" !!]";
+	mes "Client : "+getarg(3);
+	mes "Client Location : "+getarg(4);
+	mes "Requested Mission : "+getarg(5);
+	mes " ";
+	mes "Will you accept this mission?";
+	next;
+	if(select("No, I won't accept it.:Yes, I will accept it.") == 1) {
+		mes "You have declined the "+getarg(2)+" mission.";
+		close;
+	}
+	if (checkquest(getarg(0)) == 1) mes "You are already doing this mission.";
+	else {
+		setquest getarg(0);
+		mes "You have accepted the "+getarg(2)+" mission.";
+	}
+	mes "You can get a reward from the client after you finish the mission.";
+	next;
+	mes "For more details, please press 'Alt + U', to get more information from the Quest Window.";
 	close;
 }
 
 geffen,103,42,5	script	Sponiac	99,{
-
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 3500) {
 		mes "[Sponiac]";
-		mes "Why are you carrying too many items?";
+		mes "Why are you carrying so many items?";
 		mes "Are you in a training course or something?";
 		close;
 	}
@@ -500,278 +116,71 @@ geffen,103,42,5	script	Sponiac	99,{
 	mes "[Sponiac]";
 	mes "Why don't you do some hunting outside instead of walking around and wasting your time?";
 	next;
-	switch (select("I am about to leave now.:I've got a Hunting Mission.")) {
-	case 1:
+	if(select("I am about to leave now.:I've got a Hunting Mission.") == 1) {
 		mes "[Sponiac]";
 		mes "Oh, well. Then, go figure.";
 		mes "Bye~ bye.";
 		close;
-	case 2:
-		break;
 	}
-	set .@checkquest,checkquest(8266);
-	set .@checkquest2,checkquest(8267);
-	set .@checkquest3,checkquest(8268);
-	set .@checkquest4,checkquest(8269);
-	set .@checkquest5,checkquest(8270);
 	mes "[Sponiac]";
 	mes "Oh, you are from the Eden Group?";
 	mes "What mission do you have?";
 	next;
-	switch (select("Hunting Poison Spore:Hunting Smokie:Hunting Elder Willow:Hunting Coco:Hunting Thara Frog")) {
-	case 1:
-		if (.@checkquest == 0) {
-			mes "[Sponiac]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Sponiac]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (.@checkquest == 1) {
-			if (checkquest(8266,HUNTING) == 2) {
-				mes "[Sponiac]";
-				mes "Hunting Poison Spore!";
-				mes "Wow, I didn't expect you would do that mission. I was just about to give up. But you did good job. I appreciate it!";
-				next;
-				mes "[Sponiac]";
-				mes "Well, I requested the mission and you did an excellent job.";
-				mes "I will give you a reward as I promised.";
-				next;
-				mes "[Sponiac]";
-				mes "Here it is. Thank you very much. God bless you!";
-				getitem 569,100; //Novice_Potion
-				getexp 1000,0;
-				erasequest 8266;
-				close;
-			}
-			mes "[Sponiac]";
-			mes "Oh, you are right.";
-			next;
+	switch(select("Hunting Poison Spore:Hunting Smokie:Hunting Elder Willow:Hunting Coco:Hunting Thara Frog")) {
+		case 1: callsub L_Quest,8266,"Hunting Poison Spore",1000,0,100,"You can find Poison Spores on the Geffen Dungeon 1F or northeast of Prontera. There are other spots but I'll leave it up to you to find out.";
+		case 2: callsub L_Quest,8267,"Hunting Smokie",1000,0,100,"You can find Smokies northeast and northwest of Geffen. Oh, also the field east of Ayotaya is good spot to find them.";
+		case 3: callsub L_Quest,8268,"Hunting Elder Willow",1000,100,110,"You can find Elder Willows northeast of Geffen, east of payon and southwest of Prontera.";
+		case 4: callsub L_Quest,8269,"Hunting Coco",1000,200,150,"You can find Cocos around the east of Payon, southwest of Prontera and the field east of Ayotaya.";
+		case 5: callsub L_Quest,8270,"Hunting Thara Frog",1500,300,200,"You can find Thara Frogs in the Cave east of Comodo or on Turtle Island.";
+	}
+	end;
+L_Quest:
+	//QuestID,Quest,BExp,JExp,PotionAmt,Desc
+	if (checkquest(getarg(0)) == 1) {
+		if (checkquest(getarg(0),HUNTING) == 2) {
 			mes "[Sponiac]";
-			mes "But, you haven't done the mission yet. Why did you come to me now? You haven't completed the mission!";
-			mes "I will give you a reward if you complete the mission. Ok? Are we good?";
+			mes getarg(1)+"!";
+			mes "Wow, I didn't expect you would do that mission. I was just about to give up. But you did good job. I appreciate it!";
 			next;
 			mes "[Sponiac]";
-			mes "You can find Poison Spores on the Geffen Dungeon 1F or northeast of Prontera. There are other spots but I'll leave it up to you to find out.";
-			mes "You can check the world map by pressing 'ctrl + ~' key.";
+			mes "Well, I requested the mission and you did an excellent job.";
+			mes "I will give you a reward as I promised.";
 			next;
 			mes "[Sponiac]";
-			mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
+			mes "Here it is. Thank you very much. God bless you!";
+			getitem 569,getarg(4); //Novice_Potion
+			getexp getarg(2),getarg(3);
+			erasequest getarg(0);
 			close;
 		}
 		mes "[Sponiac]";
-		mes "Huh? Are you sure? Something is wrong...";
+		mes "Oh, you are right.";
 		next;
 		mes "[Sponiac]";
-		mes "It is weird.";
-		mes "Please check your Quest Window by pressing 'alt + u'.";
-		close;
-	case 2:
-		if (.@checkquest2 == 0) {
-			mes "[Sponiac]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Sponiac]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (.@checkquest2 == 1) {
-			if (checkquest(8267,HUNTING) == 2) {
-				mes "[Sponiac]";
-				mes "Hunting Smokie!";
-				mes "Wow, I didn't expect you would do that mission. I was just about to give up. But you did good job. I appreciate it!";
-				next;
-				mes "[Sponiac]";
-				mes "Well, I requested the mission and you did an excellent job.";
-				mes "I will give you a reward as I promised.";
-				next;
-				mes "[Sponiac]";
-				mes "Here it is. Thank you very much. God bless you!";
-				getitem 569,100; //Novice_Potion
-				getexp 1000,0;
-				erasequest 8267;
-				close;
-			}
-			mes "[Sponiac]";
-			mes "Oh, you are right.";
-			next;
-			mes "[Sponiac]";
-			mes "But, you haven't done the mission yet. Why did you come to me now? You haven't completed the mission!";
-			mes "I will give you a reward if you complete the mission. Ok? Are we good?";
-			next;
-			mes "[Sponiac]";
-			mes "You can find Smokies northeast and northwest of Geffen. Oh, also the field east of Ayotaya is good spot to find them.";
-			mes "You can check the world map by pressing 'ctrl + ~' key.";
-			next;
-			mes "[Sponiac]";
-			mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-			close;
-		}
-		mes "[Sponiac]";
-		mes "Huh? Are you sure? Something is wrong...";
+		mes "But, you haven't done the mission yet. Why did you come to me now? You haven't completed the mission!";
+		mes "I will give you a reward if you complete the mission. Ok? Are we good?";
 		next;
 		mes "[Sponiac]";
-		mes "It is weird.";
-		mes "Please check your Quest Window by pressing 'alt + u'.";
-		close;
-	case 3:
-		if (.@checkquest3 == 0) {
-			mes "[Sponiac]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Sponiac]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (.@checkquest3 == 1) {
-			if (checkquest(8268,HUNTING) == 2) {
-				mes "[Sponiac]";
-				mes "Hunting Elder Willow!";
-				mes "Wow, I didn't expect you would do that mission. I was just about to give up. But you did good job. I appreciate it!";
-				next;
-				mes "[Sponiac]";
-				mes "Well, I requested the mission and you did an excellent job.";
-				mes "I will give you a reward as I promised.";
-				next;
-				mes "[Sponiac]";
-				mes "Here it is. Thank you very much. God bless you!";
-				getitem 569,110; //Novice_Potion
-				getexp 1000,100;
-				erasequest 8268;
-				close;
-			}
-			mes "[Sponiac]";
-			mes "Oh, you are right.";
-			next;
-			mes "[Sponiac]";
-			mes "But, you haven't done the mission yet. Why did you come to me now? You haven't completed the mission!";
-			mes "I will give you a reward if you complete the mission. Ok? Are we good?";
-			next;
-			mes "[Sponiac]";
-			mes "You can find Elder Willows northeast of Geffen, east of payon and southwest of Prontera.";
-			mes "You can check the world map by pressing 'ctrl + ~' key.";
-			next;
-			mes "[Sponiac]";
-			mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-			close;
-		}
-		mes "[Sponiac]";
-		mes "Huh? Are you sure? Something is wrong...";
+		mes getarg(5);
+		mes "You can check the world map by pressing 'ctrl + ~' key.";
 		next;
 		mes "[Sponiac]";
-		mes "It is weird.";
-		mes "Please check your Quest Window by pressing 'alt + u'.";
-		close;
-	case 4:
-		if (.@checkquest4 == 0) {
-			mes "[Sponiac]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Sponiac]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (.@checkquest4 == 1) {
-			if (checkquest(8269,HUNTING) == 2) {
-				mes "[Sponiac]";
-				mes "Hunting Coco!";
-				mes "Wow, I didn't expect you would do that mission. I was just about to give up. But you did good job. I appreciate it!";
-				next;
-				mes "[Sponiac]";
-				mes "Well, I requested the mission and you did an excellent job.";
-				mes "I will give you a reward as I promised.";
-				next;
-				mes "[Sponiac]";
-				mes "Here it is. Thank you very much. God bless you!";
-				getitem 569,150; //Novice_Potion
-				getexp 1000,200;
-				erasequest 8269;
-				close;
-			}
-			mes "[Sponiac]";
-			mes "Oh, you are right.";
-			next;
-			mes "[Sponiac]";
-			mes "But, you haven't done the mission yet. Why did you come to me now? You haven't completed the mission!";
-			mes "I will give you a reward if you complete the mission. Ok? Are we good?";
-			next;
-			mes "[Sponiac]";
-			mes "You can find Coco's around the east of Payon, southwest of Prontera and the field east of Ayotaya.";
-			mes "You can check the world map by pressing 'ctrl + ~' key.";
-			next;
-			mes "[Sponiac]";
-			mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-			close;
-		}
-		mes "[Sponiac]";
-		mes "Huh? Are you sure? Something is wrong...";
-		next;
-		mes "[Sponiac]";
-		mes "It is weird.";
-		mes "Please check your Quest Window by pressing 'alt + u'.";
-		close;
-	case 5:
-		if (.@checkquest5 == 0) {
-			mes "[Sponiac]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Sponiac]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (.@checkquest5 == 1) {
-			if (checkquest(8270,HUNTING) == 2) {
-				mes "[Sponiac]";
-				mes "Hunting Thara Frog!";
-				mes "Wow, I didn't expect you would do that mission. I was just about to give up. But you did good job. I appreciate it!";
-				next;
-				mes "[Sponiac]";
-				mes "Well, I requested the mission and you did an excellent job.";
-				mes "I will give you a reward as I promised.";
-				next;
-				mes "[Sponiac]";
-				mes "Here it is. Thank you very much. God bless you!";
-				getitem 569,200; //Novice_Potion
-				getexp 1500,300;
-				erasequest 8270;
-				close;
-			}
-			mes "[Sponiac]";
-			mes "Oh, you are right.";
-			next;
-			mes "[Sponiac]";
-			mes "But, you haven't done the mission yet. Why did you come to me now? You haven't completed the mission!";
-			mes "I will give you a reward if you complete the mission. Ok? Are we good?";
-			next;
-			mes "[Sponiac]";
-			mes "You can find Thara Frogs in the Cave east of Comodo or on Turtle Island.";
-			mes "You can check the world map by pressing 'ctrl + ~' key.";
-			next;
-			mes "[Sponiac]";
-			mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-			close;
-		}
-		mes "[Sponiac]";
-		mes "Huh? Are you sure? Something is wrong...";
-		next;
-		mes "[Sponiac]";
-		mes "It is weird.";
-		mes "Please check your Quest Window by pressing 'alt + u'.";
+		mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
 		close;
 	}
+	mes "[Sponiac]";
+	mes "Huh? Are you sure? Something is wrong...";
+	next;
+	mes "[Sponiac]";
+	mes "It is weird.";
+	mes "Please check your Quest Window by pressing 'alt + u'.";
+	close;
 }
 
 moc_ruins,173,55,3	script	Dieshin Man	89,{
-
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 3500) {
 		mes "[Dieshin Man]";
-		mes "Why are you carrying too many items?";
+		mes "Why are you carrying so many items?";
 		mes "Are you in a training course or something?";
 		close;
 	}
@@ -786,129 +195,76 @@ moc_ruins,173,55,3	script	Dieshin Man	89,{
 	mes "[Dieshin Man]";
 	mes "How can I help you?";
 	next;
-	switch (select("I don't need help.:I've got a Delivery Mission.")) {
-	case 1:
+	if(select("I don't need help.:I've got a Delivery Mission.") == 1) {
 		mes "[Dieshin Man]";
 		mes "Oh, well. Then, go figure. Bye~!";
 		close;
-	case 2:
-		break;
 	}
-	set .@checkquest,checkquest(8271);
-	set .@checkquest2,checkquest(8272);
-	set .@checkquest3,checkquest(8273);
 	mes "[Dieshin Man]";
 	mes "Oh, you are from the Eden Group?";
 	mes "What mission do you have?";
 	next;
-	switch (select("Deliver an Insecticide.:Deliver Honey.:Deliver Blankets.")) {
-	case 1:
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Dieshin Man]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dieshin Man]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (countitem(6218) > 0) {
-			mes "[Dieshin Man]";
-			mes "Wait, but you already have a delivery box.";
-			next;
-			mes "[Dieshin Man]";
-			mes "We can't allow you to deliver two boxes at once. So, please finish your delivery first.";
-			next;
-			mes "[Dieshin Man]";
-			mes "If you forgot where to deliver, then please check Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		mes "[Dieshin Man]";
-		mes "Ah ha! I got it!";
-		mes "The insecticide? It must be the Zoologist on the southeast of Payon who ordered the Insecticide.";
-		next;
+	switch(select("Deliver an Insecticide.:Deliver Honey.:Deliver Blankets.")) {
+		case 1: callsub L_Quest,8271;
+		case 2: callsub L_Quest,8272;
+		case 3: callsub L_Quest,8273;
+	}
+	end;
+L_Quest:
+	if (checkquest(getarg(0)) != 1) {
 		mes "[Dieshin Man]";
-		mes "Dieshin's cooperation motive is to give the fastest and credited delivery. So please deliver it now without any delay.";
+		mes "Huh? Are you sure? Something is wrong...";
 		next;
 		mes "[Dieshin Man]";
-		mes "If you forgot where to make the delivery, then please check the Quest Window by pressing 'alt + u'.";
-		getitem 6218,1; //Disin_Delivery_Box
+		mes "It is weird.";
+		mes "Please check your Quest Window by pressing 'alt + u'.";
 		close;
-	case 2:
-		if (.@checkquest2 == -1 || .@checkquest2 == 0 || .@checkquest2 == 2) {
-			mes "[Dieshin Man]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dieshin Man]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (countitem(6218) > 0) {
-			mes "[Dieshin Man]";
-			mes "Wait, but you already have a delivery box.";
-			next;
-			mes "[Dieshin Man]";
-			mes "We can't allow you to deliver two boxes at once. So, please finish your delivery first.";
-			next;
-			mes "[Dieshin Man]";
-			mes "If you forgot where to deliver, then please check Quest Window by pressing 'alt + u'.";
-			close;
-		}
+	}
+	if (countitem(6218) > 0) {
 		mes "[Dieshin Man]";
-		mes "Ah ha! I got it!";
-		mes "Honey? It must be the Entomologist at the west of St. Capitolina Abbey, wich is northeast of Prontera who ordered the Honey.";
+		mes "Wait, but you already have a delivery box.";
 		next;
 		mes "[Dieshin Man]";
-		mes "Dieshin's cooperation motive is to give the fastest and credited delivery. So please deliver it now without any delay.";
+		mes "We can't allow you to deliver two boxes at once. So, please finish your delivery first.";
 		next;
 		mes "[Dieshin Man]";
-		mes "If you forgot where to make the delivery, then please check the Quest Window by pressing 'alt + u'.";
-		getitem 6218,1; //Disin_Delivery_Box
+		mes "If you forgot where to deliver, then please check Quest Window by pressing 'alt + u'.";
 		close;
-	case 3:
-		if (.@checkquest3 == -1 || .@checkquest3 == 0 || .@checkquest3 == 2) {
-			mes "[Dieshin Man]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dieshin Man]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
-		if (countitem(6218) > 0) {
-			mes "[Dieshin Man]";
-			mes "Wait, but you already have a delivery box.";
-			next;
-			mes "[Dieshin Man]";
-			mes "We can't allow you to deliver two boxes at once. So, please finish your delivery first.";
-			next;
-			mes "[Dieshin Man]";
-			mes "If you forgot where to deliver, then please check Quest Window by pressing 'alt + u'.";
-			close;
-		}
+	}
+	switch(getarg(0)) {
+	case 8271:
+		mes "[Dieshin Man]";
+		mes "Ah ha! I got it!";
+		mes "The insecticide? It must be the Zoologist on the southeast of Payon who ordered the Insecticide.";
+		break;
+	case 8272:
+		mes "[Dieshin Man]";
+		mes "Ah ha! I got it!";
+		mes "Honey? It must be the Entomologist at the west of St. Capitolina Abbey, wich is northeast of Prontera who ordered the Honey.";
+		break;
+	case 8273:
 		mes "[Dieshin Man]";
 		mes "Oh, Right!";
 		mes "The blankets! It must be the biologist in the south of Lutie field who ordered the blankets.";
 		next;
 		mes "[Dieshin Man]";
 		mes "You can can go to Lutie by asking Mr. Claus in the northeastern part of Al De Baran.";
-		next;
-		mes "[Dieshin Man]";
-		mes "Dieshin's cooperation motive is to give the fastest and credited delivery. So please deliver it now without any delay.";
-		next;
-		mes "[Dieshin Man]";
-		mes "If you forgot where to make the delivery, then please check the Quest Window by pressing 'alt + u'.";
-		getitem 6218,1; //Disin_Delivery_Box
-		close;
+		break;
 	}
+	next;
+	mes "[Dieshin Man]";
+	mes "Dieshin's cooperation motive is to give the fastest and credited delivery. So please deliver it now without any delay.";
+	next;
+	mes "[Dieshin Man]";
+	mes "If you forgot where to make the delivery, then please check the Quest Window by pressing 'alt + u'.";
+	getitem 6218,1; //Disin_Delivery_Box
+	close;
 }
 
 pay_fild07,83,89,7	script	Zoologist	89,{
-
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 3500) {
 		mes "[Zoologist]";
-		mes "Why are you carrying too many items?";
+		mes "Why are you carrying so many items?";
 		mes "Are you in a training course or something?";
 		close;
 	}
@@ -922,62 +278,58 @@ pay_fild07,83,89,7	script	Zoologist	89,{
 	mes "[Zoologist]";
 	mes "I am currently studying about it and try to prove the theory. So I plan to kill the flies around Bigfoot and observe his reaction.";
 	next;
-	switch (select("...I am not interested.:Here is the Insecticide.")) {
-	case 1:
+	if(select("...I am not interested.:Here is the Insecticide.") == 1) {
 		mes "[Zoologist]";
 		mes "Oh, I need an Insecticide to continue the study.";
 		close;
-	case 2:
-		set .@checkquest,checkquest(8271);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Zoologist]";
-			mes "Huh?";
-			mes "You are not Dieshin's delivery man?";
-			next;
-			mes "[Zoologist]";
-			mes "I am waiting for a special delivery.";
-			close;
-		}
-		if (countitem(6218) > 0) {
-			mes "[Zoologist]";
-			mes "Oh ho! Yes! That one!";
-			next;
-			mes "[Zoologist]";
-			mes "That is the Insecticide that I ordered! You were sent by Dieshin right?";
-			next;
-			mes "[Zoologist]";
-			mes "I have been waiting for this!";
-			mes "Give it to me!";
-			next;
-			mes "[Zoologist]";
-			mes "It arrived much faster than I thought. I want to test it right away!";
-			next;
-			mes "[Zoologist]";
-			mes "Well done. Good Job! Thank you so much! Here is a little gift for you.";
-			delitem 6218,1; //Disin_Delivery_Box
-			erasequest 8271;
-			getitem 569,100; //Novice_Potion
-			getexp 1000,0;
-			close;
-		}
+	}
+	if (checkquest(8271) != 1) {
+		mes "[Zoologist]";
+		mes "Huh?";
+		mes "You are not Dieshin's delivery man?";
+		next;
+		mes "[Zoologist]";
+		mes "I am waiting for a special delivery.";
+		close;
+	}
+	if (countitem(6218) > 0) {
+		mes "[Zoologist]";
+		mes "Oh ho! Yes! That one!";
+		next;
 		mes "[Zoologist]";
-		mes "I appreciate your kindness.";
-		mes "But, what did you bring?";
+		mes "That is the Insecticide that I ordered! You were sent by Dieshin right?";
 		next;
 		mes "[Zoologist]";
-		mes "Hmm, I thought that Dieshin was fast and accurate, but you brought me an empty box. How disappointing.";
+		mes "I have been waiting for this!";
+		mes "Give it to me!";
 		next;
 		mes "[Zoologist]";
-		mes "Please bring my order. Dieshin will give you my product.";
+		mes "It arrived much faster than I thought. I want to test it right away!";
+		next;
+		mes "[Zoologist]";
+		mes "Well done. Good Job! Thank you so much! Here is a little gift for you.";
+		delitem 6218,1; //Disin_Delivery_Box
+		erasequest 8271;
+		getitem 569,100; //Novice_Potion
+		getexp 1000,0;
 		close;
 	}
+	mes "[Zoologist]";
+	mes "I appreciate your kindness.";
+	mes "But, what did you bring?";
+	next;
+	mes "[Zoologist]";
+	mes "Hmm, I thought that Dieshin was fast and accurate, but you brought me an empty box. How disappointing.";
+	next;
+	mes "[Zoologist]";
+	mes "Please bring my order. Dieshin will give you my product.";
+	close;
 }
 
 prt_fild03,30,254,3	script	Entomologist	83,{
-
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 3500) {
 		mes "[Entomologist]";
-		mes "Why are you carrying too many items?";
+		mes "Why are you carrying so many items?";
 		mes "Are you in a training course or something?";
 		close;
 	}
@@ -991,62 +343,58 @@ prt_fild03,30,254,3	script	Entomologist	83,{
 	mes "[Entomologist]";
 	mes "I am currently studying about it and trying to prove the theory. So I plan to set a Honey trap on the places he usually passes and observe his reaction.";
 	next;
-	switch (select("...I am not interested.:Here is the Honey.")) {
-	case 1:
+	if(select("...I am not interested.:Here is the Honey.") == 1) {
 		mes "[Entomologist]";
 		mes "Oh, I need Honey to continue the study.";
 		close;
-	case 2:
-		set .@checkquest,checkquest(8272);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Entomologist]";
-			mes "Huh?";
-			mes "You are not Dieshin's delivery man?";
-			next;
-			mes "[Entomologist]";
-			mes "I am waiting for a special delivery.";
-			close;
-		}
-		if (countitem(6218) > 0) {
-			mes "[Entomologist]";
-			mes "Oh ho! Yes! That one!";
-			next;
-			mes "[Entomologist]";
-			mes "That is the Honey that I ordered! You were sent by Dieshin right?";
-			next;
-			mes "[Entomologist]";
-			mes "I have been waiting for this!";
-			mes "Give it to me!";
-			next;
-			mes "[Entomologist]";
-			mes "It arrived much faster than I thought. I want to test it right away!";
-			next;
-			mes "[Entomologist]";
-			mes "Well done. Good Job! Thank you so much! Here is a little gift for you.";
-			delitem 6218,1; //Disin_Delivery_Box
-			erasequest 8272;
-			getitem 569,100; //Novice_Potion
-			getexp 1000,0;
-			close;
-		}
+	}
+	if (checkquest(8272) != 1) {
 		mes "[Entomologist]";
-		mes "I appreciate your kindness.";
-		mes "But, what did you bring?";
+		mes "Huh?";
+		mes "You are not Dieshin's delivery man?";
 		next;
 		mes "[Entomologist]";
-		mes "Hmm, I thought that Dieshin was fast and accurate, but you brought me an empty box. How disappointing.";
+		mes "I am waiting for a special delivery.";
+		close;
+	}
+	if (countitem(6218) > 0) {
+		mes "[Entomologist]";
+		mes "Oh ho! Yes! That one!";
 		next;
 		mes "[Entomologist]";
-		mes "Please bring my order. Dieshin will give you my product.";
+		mes "That is the Honey that I ordered! You were sent by Dieshin right?";
+		next;
+		mes "[Entomologist]";
+		mes "I have been waiting for this!";
+		mes "Give it to me!";
+		next;
+		mes "[Entomologist]";
+		mes "It arrived much faster than I thought. I want to test it right away!";
+		next;
+		mes "[Entomologist]";
+		mes "Well done. Good Job! Thank you so much! Here is a little gift for you.";
+		delitem 6218,1; //Disin_Delivery_Box
+		erasequest 8272;
+		getitem 569,100; //Novice_Potion
+		getexp 1000,0;
 		close;
 	}
+	mes "[Entomologist]";
+	mes "I appreciate your kindness.";
+	mes "But, what did you bring?";
+	next;
+	mes "[Entomologist]";
+	mes "Hmm, I thought that Dieshin was fast and accurate, but you brought me an empty box. How disappointing.";
+	next;
+	mes "[Entomologist]";
+	mes "Please bring my order. Dieshin will give you my product.";
+	close;
 }
 
 xmas_fild01,92,57,3	script	Biologist	97,{
-
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 3500) {
 		mes "[Biologist]";
-		mes "Why are you carrying too many items?";
+		mes "Why are you carrying so many items?";
 		mes "Are you in a training course or something?";
 		close;
 	}
@@ -1060,62 +408,58 @@ xmas_fild01,92,57,3	script	Biologist	97,{
 	mes "[Biologist]";
 	mes "But, this place is freaking cold.";
 	next;
-	switch (select("...I am not interested.:Here are the blankets.")) {
-	case 1:
+	if(select("...I am not interested.:Here are the blankets.") == 1) {
 		mes "[Biologist]";
 		mes "Huh, whatever. But be careful! It's very slippery here.";
 		close;
-	case 2:
-		set .@checkquest,checkquest(8273);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Biologist]";
-			mes "Huh?";
-			mes "You are not Dieshin's delivery man?";
-			next;
-			mes "[Biologist]";
-			mes "I am waiting for a special delivery.";
-			close;
-		}
-		if (countitem(6218) > 0) {
-			mes "[Biologist]";
-			mes "Oh ho! Yes! That one!";
-			next;
-			mes "[Biologist]";
-			mes "Those are the Blankets that I ordered! You were sent by Dieshin right?";
-			next;
-			mes "[Biologist]";
-			mes "I have been waiting for this!";
-			mes "Give it to me!";
-			next;
-			mes "[Biologist]";
-			mes "It arrived much faster than I thought. I want to test them right away!";
-			next;
-			mes "[Biologist]";
-			mes "Well done. Good Job! Thank you so much! Here is a little gift for you.";
-			delitem 6218,1; //Disin_Delivery_Box
-			erasequest 8273;
-			getitem 569,100; //Novice_Potion
-			getexp 1000,0;
-			close;
-		}
+	}
+	if (checkquest(8273) != 1) {
 		mes "[Biologist]";
-		mes "I appreciate your kindness.";
-		mes "But, what did you bring?";
+		mes "Huh?";
+		mes "You are not Dieshin's delivery man?";
 		next;
 		mes "[Biologist]";
-		mes "Hmm, I thought that Dieshin was fast and accurate, but you brought me an empty box. How disappointing.";
+		mes "I am waiting for a special delivery.";
+		close;
+	}
+	if (countitem(6218) > 0) {
+		mes "[Biologist]";
+		mes "Oh ho! Yes! That one!";
 		next;
 		mes "[Biologist]";
-		mes "Please bring my order. Dieshin will give you my product.";
+		mes "Those are the Blankets that I ordered! You were sent by Dieshin right?";
+		next;
+		mes "[Biologist]";
+		mes "I have been waiting for this!";
+		mes "Give it to me!";
+		next;
+		mes "[Biologist]";
+		mes "It arrived much faster than I thought. I want to test them right away!";
+		next;
+		mes "[Biologist]";
+		mes "Well done. Good Job! Thank you so much! Here is a little gift for you.";
+		delitem 6218,1; //Disin_Delivery_Box
+		erasequest 8273;
+		getitem 569,100; //Novice_Potion
+		getexp 1000,0;
 		close;
 	}
+	mes "[Biologist]";
+	mes "I appreciate your kindness.";
+	mes "But, what did you bring?";
+	next;
+	mes "[Biologist]";
+	mes "Hmm, I thought that Dieshin was fast and accurate, but you brought me an empty box. How disappointing.";
+	next;
+	mes "[Biologist]";
+	mes "Please bring my order. Dieshin will give you my product.";
+	close;
 }
 
 payon,179,66,3	script	Dashia	931,{
-
 	if (checkweight(1201,1) == 0 || (MaxWeight - Weight) < 3500) {
 		mes "[Dashia]";
-		mes "Why are you carrying too many items?";
+		mes "Why are you carrying so many items?";
 		mes "Are you in a training course or something?";
 		close;
 	}
@@ -1128,44 +472,23 @@ payon,179,66,3	script	Dashia	931,{
 	mes "[Dashia]";
 	mes "Hey~! Dude! You look like a very rich adventurer.";
 	next;
-	switch (select("I am a poor adventurer.:I have a gathering mission.")) {
-	case 1:
+	if(select("I am a poor adventurer.:I have a gathering mission.") == 1) {
 		mes "[Dashia]";
 		mes "Really? Hmm, oh right. You don't look sophisticated.";
 		next;
 		mes "[Dashia]";
 		mes "You are a poor adventurer~! Good luck!";
 		close;
-	case 2:
-		break;
 	}
 	mes "[Dashia]";
 	mes "Oh, you are from the Eden Group?";
 	mes "What mission do you have?";
 	next;
-	switch (select("gather Bones:Gather Animal Skin:Gather Peelings:Gather Tails:Gather Cookies:Gather Mustaches")) {
+	switch(select("Gather Bones:Gather Animal Skin:Gather Peelings:Gather Tails:Gather Cookies:Gather Mustaches")) {
 	case 1:
-		set .@checkquest,checkquest(8274);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Dashia]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dashia]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
+		callsub L_Quest,8274;
 		if (countitem(932) > 9) {
-			mes "[Dashia]";
-			mes "Wow~ you did an excellent job!";
-			next;
-			mes "[Dashia]";
-			mes "Thank you very much. God bless you!";
-			emotion e_heh;
-			next;
-			mes "[Dashia]";
-			mes "Ha~! Ha~!";
-			mes "I will give you a reward as promised.";
+			callsub L_Reward;
 			delitem 932,10; //Skel_Bone
 			getitem 569,100; //Novice_Potion
 			getexp 1000,100;
@@ -1184,32 +507,11 @@ payon,179,66,3	script	Dashia	931,{
 		next;
 		mes "[Dashia]";
 		mes "To find Skeletons, you better check Payon Dungeon 1F, which is located in Archer Village, north of Payon.";
-		next;
-		mes "[Dashia]";
-		mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-		close;
+		break;
 	case 2:
-		set .@checkquest,checkquest(8275);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Dashia]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dashia]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
+		callsub L_Quest,8275;
 		if ((countitem(948) > 9) && (countitem(919) > 4)) {
-			mes "[Dashia]";
-			mes "Wow~ you did an excellent job!";
-			next;
-			mes "[Dashia]";
-			mes "Thank you very much. God bless you!";
-			emotion e_heh;
-			next;
-			mes "[Dashia]";
-			mes "Ha~! Ha~!";
-			mes "I will give you a reward as promised.";
+			callsub L_Reward;
 			getitem 569,100; //Novice_Potion
 			delitem 948,10; //Bear's_Foot
 			delitem 919,5; //Animal's_Skin
@@ -1230,32 +532,11 @@ payon,179,66,3	script	Dashia	931,{
 		next;
 		mes "[Dashia]";
 		mes "Bigfoot is around the north of Geffen field or the southeast of Payon field.";
-		next;
-		mes "[Dashia]";
-		mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-		close;
+		break;
 	case 3:
-		set .@checkquest,checkquest(8276);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Dashia]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dashia]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
+		callsub L_Quest,8276;
 		if ((countitem(955) > 19) && (countitem(910) > 19)) {
-			mes "[Dashia]";
-			mes "Wow~ you did an excellent job!";
-			next;
-			mes "[Dashia]";
-			mes "Thank you very much. God bless you!";
-			emotion e_heh;
-			next;
-			mes "[Dashia]";
-			mes "Ha~! Ha~!";
-			mes "I will give you a reward as promised.";
+			callsub L_Reward;
 			delitem 955,20; //Worm_Peelings
 			delitem 910,20; //Garlet
 			getitem 569,100; //Novice_Potion
@@ -1278,32 +559,11 @@ payon,179,66,3	script	Dashia	931,{
 		next;
 		mes "[Dashia]";
 		mes "'Thief Bug', 'Female Thief Bug' and 'Male Thief Bug' are int he Prontere Culvert. To get there, you need to be a volunteer of the Prontera Culvert's punitive force.";
-		next;
-		mes "[Dashia]";
-		mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-		close;
+		break;
 	case 4:
-		set .@checkquest,checkquest(8277);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Dashia]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dashia]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
+		callsub L_Quest,8277;
 		if ((countitem(942) > 9) && (countitem(1026) > 9) && (countitem(945) > 9)) {
-			mes "[Dashia]";
-			mes "Wow~ you did an excellent job!";
-			next;
-			mes "[Dashia]";
-			mes "Thank you very much. God bless you!";
-			emotion e_heh;
-			next;
-			mes "[Dashia]";
-			mes "Ha~! Ha~!";
-			mes "I will give you a reward as promised.";
+			callsub L_Reward;
 			delitem 942,10; //Yoyo_Tail
 			delitem 1026,10; //Acorn
 			delitem 945,10; //Raccoon_Leaf
@@ -1328,32 +588,11 @@ payon,179,66,3	script	Dashia	931,{
 		next;
 		mes "[Dashia]";
 		mes "To get to Ayotaya, you better go to 'Aibakthing' in Alberta and pay his fare.";
-		next;
-		mes "[Dashia]";
-		mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-		close;
+		break;
 	case 5:
-		set .@checkquest,checkquest(8278);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Dashia]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dashia]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
+		callsub L_Quest,8278;
 		if ((countitem(538) > 4) && (countitem(539) > 0)) {
-			mes "[Dashia]";
-			mes "Wow~ you did an excellent job!";
-			next;
-			mes "[Dashia]";
-			mes "Thank you very much. God bless you!";
-			emotion e_heh;
-			next;
-			mes "[Dashia]";
-			mes "Ha~! Ha~!";
-			mes "I will give you a reward as promised.";
+			callsub L_Reward;
 			delitem 538,5; //Well_Baked_Cookie
 			delitem 539,1; //Piece_Of_Cake
 			getitem 569,150; //Novice_Potion
@@ -1375,32 +614,11 @@ payon,179,66,3	script	Dashia	931,{
 		next;
 		mes "[Dashia]";
 		mes "Both monsters canbe found in the Toy Factory Warehouse or Toy Monitoring Room. To get there, ask Mr. Claus in the northeastern part of Al De Baran.";
-		next;
-		mes "[Dashia]";
-		mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
-		close;
+		break;
 	case 6:
-		set .@checkquest,checkquest(8279);
-		if (.@checkquest == -1 || .@checkquest == 0 || .@checkquest == 2) {
-			mes "[Dashia]";
-			mes "Huh? Are you sure? Something is wrong...";
-			next;
-			mes "[Dashia]";
-			mes "It is weird.";
-			mes "Please check your Quest Window by pressing 'alt + u'.";
-			close;
-		}
+		callsub L_Quest,8279;
 		if ((countitem(1017) > 4) && (countitem(1018) > 2)) {
-			mes "[Dashia]";
-			mes "Wow~ you did an excellent job!";
-			next;
-			mes "[Dashia]";
-			mes "Thank you very much. God bless you!";
-			emotion e_heh;
-			next;
-			mes "[Dashia]";
-			mes "Ha~! Ha~!";
-			mes "I will give you a reward as promised.";
+			callsub L_Reward;
 			delitem 1017,5; //Moustache_Of_Mole
 			delitem 1018,3; //Nail_Of_Mole
 			getitem 569,150; //Novice_Potion
@@ -1422,9 +640,33 @@ payon,179,66,3	script	Dashia	931,{
 		next;
 		mes "[Dashia]";
 		mes "To get there, ask a Kafra Employee in Geffen, they can warp you there.";
+		break;
+	}
+	next;
+	mes "[Dashia]";
+	mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
+	close;
+L_Quest:
+	if (checkquest(getarg(0)) != 1) {
+		mes "[Dashia]";
+		mes "Huh? Are you sure? Something is wrong...";
 		next;
 		mes "[Dashia]";
-		mes "Anyway, I will be here waiting for you. Please come back when you finish the mission!";
+		mes "It is weird.";
+		mes "Please check your Quest Window by pressing 'alt + u'.";
 		close;
 	}
+	return;
+L_Reward:
+	mes "[Dashia]";
+	mes "Wow~ you did an excellent job!";
+	next;
+	mes "[Dashia]";
+	mes "Thank you very much. God bless you!";
+	emotion e_heh;
+	next;
+	mes "[Dashia]";
+	mes "Ha~! Ha~!";
+	mes "I will give you a reward as promised.";
+	return;
 }
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;
 }
diff --git a/npc/re/quests/eden/eden_common.txt b/npc/re/quests/eden/eden_common.txt
index e37495cf9..72c37ba72 100644
--- a/npc/re/quests/eden/eden_common.txt
+++ b/npc/re/quests/eden/eden_common.txt
@@ -109,8 +109,7 @@ moc_para01,27,35,5	script	Secretary Lime Evenor	952,{
 			mes "[Lime Evenor]";
 			mes "Do you want to register some missions that you want us to do?";
 			next;
-			switch (select("Yes, I want to register.:No, I don't.")) {
-			case 1:
+			if(select("Yes, I want to register.:No, I don't.") == 1) {
 				mes "[Lime Evenor]";
 				mes "Alrigh. Please write down your name on it.";
 				input .@input$;
@@ -161,9 +160,6 @@ moc_para01,27,35,5	script	Secretary Lime Evenor	952,{
 				mes "Missions are fully booked. You have to wait for an spot to clear up.";
 				mes "Please kindly wait until your turn.";
 				next;
-				break;
-			case 2:
-				break;
 			}
 			break;
 		case 4: