Eden Scripts: 100-140 Implemented

1 files changed, 597 insertions, 0 deletions

diff --git a/npc/re/quests/eden/131-140.txt b/npc/re/quests/eden/131-140.txt
new file mode 100644
index 000000000..d732449fb
--- /dev/null
+++ b/npc/re/quests/eden/131-140.txt
@@ -0,0 +1,597 @@
+//===== Hercules Script ======================================
+//= Eden Group Quests - Mission [131-140]
+//===== By: ==================================================
+//= Capuche
+//===== Current Version: =====================================
+//= 1.1
+//===== Compatible With: =====================================
+//= Hercules
+//===== Description: =========================================
+//= [Official Conversion]
+//= Repeatable quests for players between BaseLevel 131 - 140.
+//===== Additional Comments: =================================
+//= 1.0 First version.
+//= 1.1 Some CleanUps. [Dastgir]
+//============================================================
+
+moc_para01,41,76,3	script	Ragi#1	4_M_RAGI,{
+	cutin "ragi01",0;
+	mes "[Ragi]";
+	if (!countitem(Para_Team_Mark)) {// Para_Team_Mark
+		mes "Only adventurers from Eden Group are welcome here.";
+		mes "I'm giving requests to base level ^FF0000130-140^000000 adventurers only.";
+	}
+	else if (!para_130lv01) {
+		mes "Hi. I'm the new member of the Dandelion band Ragi. I am making songs on behalf of Aigu. Are you interested in a story?";
+		next;
+		mes "[Ragi]";
+		mes "Haha. I am sorry to request to adventurers even though I am a new.";
+		next;
+		mes "[Ragi]";
+		mes "Just take a look at the list. Can you help me if it is okay with you?";
+		para_130lv01 = 1;
+	}
+	else {
+		mes "I am collecting stories to make a song on behalf of Aigu.";
+		next;
+		if (select( "Request to collect stories", "Conversation" ) == 1) {
+			mes "[Ragi]";
+			if (BaseLevel < 131) {
+				cutin "ragi02",0;
+				mes "This is the request of Aigu but it is dangerous. You should grow up more.";
+			}
+			else if (BaseLevel < 141) {
+				mes "This song and story is about monsters. ^FF0000Tell me the story about how you felt while you were fighting with them.^000000";
+				next;
+				switch( select( "The story of the lost", "Story of devil", "Story from far away distance" ) ) {
+				case 1:
+					mes "[Ragi]";
+					mes "Lighthalzen has many stories that I'm sure are sad and lost. Their stories should not be forgotten so please tell me what you can.";
+					next;
+					switch( select( "Egnigem Cenia (Swordman Monster)",
+									"Armeyer Dinze (Merchant Monster)",
+									"Wickebine Tres (Thief Monster)",
+									"Kavach Icarus (Archer Monster)",
+									"Errende Ebecee (Acolyte Monster)",
+									"Laurell Weinder (Mage Monster)" ) ) {
+					case 1:
+						mes "[Ragi]";
+						if (questprogress(13144,PLAYTIME) == 1)
+							mes "Some adventurers tell me stories a little bit but they are not enough to make a song out of.";
+						else if (questprogress(13143,HUNTING) == 1) {
+							cutin "À̱״ÏÁª¼¼´Ï¾ÆÄ«µå",3;  //ygnizem_card
+							mes "She is a sad swordman in such a far away place. What brought here there do you think?";
+							next;
+							mes "[Ragi]";
+							mes "These are very important stories to someone. I want to make a song with these stories. Please help me.";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13143,HUNTING) == 2) {
+							mes "Have you heard any new stories? Please tell me stories if you have any from your journey.";
+							callsub S_Quest,13143,13144,1100000,300000;
+						}
+						else {
+							cutin "À̱״ÏÁª¼¼´Ï¾ÆÄ«µå",3;  //ygnizem_card
+							mes "A sword woman who is stronger than any swordmen. Egnigem Cenia. That is her name. I am not sure if that is her or someone else.";
+							next;
+							mes "[Ragi]";
+							mes "I can not lose her story. I really wish you to stop by.";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "It will be more dangerous than you think. But story must be conveyed for everyone.";
+								callsub S_Quest,13144,13143;
+							}
+						}
+						break;
+					case 2:
+						mes "[Ragi]";
+						if (questprogress(13146,PLAYTIME) == 1)
+							mes "Some adventurers tell me stories a little bit but they are not enough to make a song out of.";
+						else if (questprogress(13145,HUNTING) == 1) {
+							cutin "¾Æ¸£¸¶À̾îµòÁ¦Ä«µå",3;  //armaia_card
+							mes "How far could she have continued her journey? I guess she could not do it alone.";
+							next;
+							mes "[Ragi]";
+							mes "You do not wonder why that journey should have stopped?";
+							next;
+							mes "[Ragi]";
+							mes "I want to make a song with these stories. Please help me.";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13145,HUNTING) == 2) {
+							mes "Have you heard any new stories? Please tell me stories if you have any from your journey.";
+							callsub S_Quest,13145,13146,1100000,300000;
+						}
+						else {
+							cutin "¾Æ¸£¸¶À̾îµòÁ¦Ä«µå",3;  //armaia_card
+							mes "A daughter of a merchant. Armeyer Dinze, she looks like a rich woman. But she looks insecure.";
+							next;
+							mes "[Ragi]";
+							mes "What made her disappear? Or for what? Please listen to her story.";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "It will be more dangerous than you think. But the story must be conveyed.";
+								callsub S_Quest,13146,13145;
+							}
+						}
+						break;
+					case 3:
+						mes "[Ragi]";
+						if (questprogress(13148,PLAYTIME) == 1)
+							mes "Some adventurers tell me stories a little bit but they are not enough to make a song out of.";
+						else if (questprogress(13147,HUNTING) == 1) {
+							cutin "ÈÖÄɹÙÀÎÆ®¸®½ºÄ«µå",3;  //whikebain_card
+							mes "What might have moved her mind? She only cared about money.";
+							next;
+							mes "[Ragi]";
+							mes "I wonder how far her heart has been reached? Please listen to her story. Please tell me.";
+							next;
+							mes "[Ragi]";
+							mes "Please make a song for us.";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13147,HUNTING) == 2) {
+							mes "Have you heard any new stories? Please tell me stories if you have any from your journey.";
+							callsub S_Quest,13147,13148,1100000,300000;
+						}
+						else {
+							cutin "ÈÖÄɹÙÀÎÆ®¸®½ºÄ«µå",3;  //whikebain_card
+							mes "Nobody knows how it has started. Wickebine Tres is the name who could have found a true companion.";
+							next;
+							mes "[Ragi]";
+							mes "She was the one who only cared for money. How far has her journey continued? Please listen to her story in Lighthalzen.";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "It will be more dangerous than you think. But the story must be conveyed.";
+								emotion e_no1;
+								callsub S_Quest,13148,13147;
+							}
+						}
+						break;
+					case 4:
+						mes "[Ragi]";
+						if (questprogress(13150,PLAYTIME) == 1)
+							mes "Some adventurers tell me stories a little bit but they are not enough to make a song out of.";
+						else if (questprogress(13149,HUNTING) == 1) {
+							cutin "Ä«¹ÙÅ©ÀÌÄ«·ç½ºÄ«µå",3;  //kavac_card
+							mes "Yes. It seems that I have heard the same name from Payon. I am not sure it means the same.";
+							next;
+							mes "[Ragi]";
+							mes "Please try to find him or a bow at Lighthalzen.";
+							next;
+							mes "[Ragi]";
+							mes "Please do not forget to tell me any story you hear.";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13149,HUNTING) == 2) {
+							mes "Have you heard any new stories? Please tell me stories if you have any from your journey.";
+							callsub S_Quest,13149,13150,1100000,300000;
+						}
+						else {
+							cutin "Ä«¹ÙÅ©ÀÌÄ«·ç½ºÄ«µå",3;  //kavac_card
+							mes "Kavach Icarus is the name whose hands are faster than eyes and shoots arrows swiftly.";
+							next;
+							mes "[Ragi]";
+							mes "I heard his shadow and his arrow are wandering somewhere. Please go to Lighthalzen and tell me his story.";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "Please be careful of his arrows. You may have laid down on the cold floor before this story is finished.";
+								callsub S_Quest,13150,13149;
+							}
+						}
+						break;
+					case 5:
+						mes "[Ragi]";
+						if (questprogress(13152,PLAYTIME) == 1)
+							mes "Some adventurers tell me stories a little bit but they are not enough to make a song out of.";
+						else if (questprogress(13151,HUNTING) == 1) {
+							cutin "ÀÌ·»µå¿¡º£½ÃÄ«µå",3;  //erend_card
+							mes "No matter if it was for friendship or a mission. If that journey was for someone, It would not be easy to stop the journey.";
+							next;
+							mes "[Ragi]";
+							mes "What made stopped their journey? What kind of story is in it?";
+							next;
+							mes "[Ragi]";
+							mes "Please check that story in Lighthalzen.";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13151,HUNTING) == 2) {
+							mes "Have you heard any new stories? Please tell me stories if you have any from your journey.";
+							callsub S_Quest,13151,13152,1100000,300000;
+						}
+						else {
+							cutin "ÀÌ·»µå¿¡º£½ÃÄ«µå",3;  //erend_card
+							mes "Errende Ebecee  is the one who started a journey to look for someone.";
+							next;
+							mes "[Ragi]";
+							mes "But I guess... His journey also might have stopped somewhere in Lighthalzen. Please listen to his story.";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "Please be careful not get lost like these ^FF0000poor souls^000000.";
+								callsub S_Quest,13152,13151;
+							}
+						}
+						break;
+					case 6:
+						mes "[Ragi]";
+						if (questprogress(13154,PLAYTIME) == 1)
+							mes "Some adventurers tell me stories a little bit but they are not enough to make a song out of.";
+						else if (questprogress(13153,HUNTING) == 1) {
+							cutin "¶ó¿ì·¼ºá´õÄ«µå",3;  //rawrel_card
+							mes "By the way. I have read a book called ^FF0000How to be a wizard^000000...";
+							next;
+							mes "[Ragi]";
+							mes "According to that book, some magic by 25 years olds can be stronger than older wizards.";
+							next;
+							mes "[Ragi]";
+							mes "What are you listening to seriously? Let's finish the request about Laurell Weinders story!";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13153,HUNTING) == 2) {
+							mes "Have you heard any new stories? Please tell me stories if you have any from your journey.";
+							callsub S_Quest,13153,13154,1100000,300000;
+						}
+						else {
+							cutin "¶ó¿ì·¼ºá´õÄ«µå",3;  //rawrel_card
+							mes "Laurell Weinder, who decided to have a difficult journey to repay gratitude for some wizards deed.";
+							next;
+							mes "[Ragi]";
+							mes "But... These talented wizards could not return? Who made them? Find a clue in Lighthalzen.";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "I like this story but be careful if you do not want to end up a story yourself.";
+								callsub S_Quest,13154,13153;
+							}
+						}
+					}
+					break;
+				case 2:
+					mes "[Ragi]";
+					mes "Do you know the story about Satan Morroc? I want to sing a song of their story even when time passes by.";
+					next;
+					switch( select( "Angel Incarnation", "Black Nightmare Incarnation", "Ghost Incarnation" ) ) {
+						mes "[Ragi]";
+					case 1:
+						if (questprogress(13156,PLAYTIME) == 1) {
+							mes "A monster from Morroc has wings like an angel. Maybe, Satan Morocc wants to be an angel?";
+							next;
+							mes "[Ragi]";
+							mes "Haha please do not mind. It is just joke of a story teller. Please give me another story next time.";
+						}
+						else if (questprogress(13155,HUNTING) == 1) {
+							mes "Appearance looks fine but inside.. I am sure they are flesh and blood!";
+							next;
+							mes "[Ragi]";
+							mes "Of course, I did not check by myself. But I am just a story teller as you see.";
+							next;
+							mes "[Ragi]";
+							mes "But it is not safe.. So be careful! Please give me more stories! Maybe I can meet Satan Morocc somewhere around here?";
+						}
+						else if (questprogress(13155,HUNTING) == 2) {
+							mes "Wow. There are so many stories coming to me! Thanks to you!";
+							callsub S_Quest,13155,13156,1100000,200000;
+						}
+						else {
+							mes "Well... This song is not about the prince of darkness, but it is taken from people who claim to have seen him.";
+							next;
+							mes "[Ragi]";
+							mes "Please help me to make a story by searching the flying Incarnations of Morocc.";
+							next;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "Be sure to get at least 30 Angel looking Incarnations of Morocc.";
+								emotion e_wah;
+								callsub S_Quest,13156,13155;
+							}
+						}
+						break;
+					case 2:
+						mes "[Ragi]";
+						if (questprogress(13158,PLAYTIME) == 1) {
+							mes "Story is not made yet, so I will ask next time !";
+							cutin "ragi02",0;
+						}
+						else if (questprogress(13157,HUNTING) == 1) {
+							mes "The shape is not completed but it has a very sharp tooth.";
+							next;
+							mes "[Ragi]";
+							mes "Do not you think that is going to be a very funny story?";
+						}
+						else if (questprogress(13157,HUNTING) == 2) {
+							mes "Wow. There are so many stories coming to me! Thanks to you!";
+							callsub S_Quest,13157,13158,1100000,200000;
+						}
+						else {
+							mes "I do not know if everything came out from Satan Morocc himself but things like this look horrible.";
+							next;
+							mes "[Ragi]";
+							mes "But I think there also will be a story in it. That is why those creature are made. Please look for something black and tar-like.";
+							next;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "Find and get rid of 30 Dark Incarnation of Morocc.";
+								callsub S_Quest,13158,13157;
+							}
+						}
+						break;
+					case 3:
+						mes "[Ragi]";
+						if (questprogress(13160,PLAYTIME) == 1)
+							mes "The creature without clothing has very weird shape. Haha do not take it seriously. I am just a story teller.";
+						else if (questprogress(13159,HUNTING) == 1) {
+							mes "This story should be spread out for weak adventurers like me! Because not everyone can be adventurer.";
+							next;
+							mes "[Ragi]";
+							mes "Maybe, adventurers have a good merit to know this kind of story. So can you please look for these creatures near Morroc?";
+						}
+						else if (questprogress(13159,HUNTING) == 2) {
+							mes "Wow. There are so many stories coming to me! Thanks to you!";
+							callsub S_Quest,13159,13160,1100000,200000;
+						}
+						else {
+							mes "This one is weird.. But he is also is an Incarnation of Morocc.";
+							next;
+							mes "[Ragi]";
+							mes "But I am curious because it looks like a ghost and attacks does not work.";
+							next;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "Please make a story after hunting at least 30 Ghost Incarnation of Morocc!";
+								callsub S_Quest,13160,13159;
+							}
+						}
+					}
+					break;
+				case 3:
+					mes "[Ragi]";
+					mes "I never been to Ash Vacuum but I heard there are many interesting creatures there in the Scaraba Hall.";
+					next;
+					switch( select( "Uni-Horn Scaraba Story", "Horn Scaraba Story", "Antler Scaraba Story", "Rake Horn Scaraba Story" ) ) {
+					case 1:
+						mes "[Ragi]";
+						if (questprogress(13162,PLAYTIME) == 1)
+							mes "I am making a story about Uni-Horn Scaraba. One means less than two!~ I started but it is difficult to finish. Can you help me?";
+						else if (questprogress(13161,HUNTING) == 1) {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "They also have some stories right? First, I wonder about the shape of the one with one horn.";
+							next;
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13161,HUNTING) == 2) {
+							mes "I wonder what Uni-Horn Scarabas think? I want to make a song. Thanks for your help!";
+							callsub S_Quest,13161,13162,1100000,200000;
+						}
+						else {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "New world is full of amazing monsters. They will become a dream for children who want to be adventurers.";
+							next;
+							mes "[Ragi]";
+							mes "I want to make a song about the ^FF0000Uni-Horn Scaraba^000000!? Children will really like it.";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "You can find them near somewhere in the east at Scaraba Hall.";
+								callsub S_Quest,13162,13161;
+							}
+						}
+						break;
+					case 2:
+						mes "[Ragi]";
+						if (questprogress(13164,PLAYTIME) == 1)
+							mes "I am making a story... Two means less than three~ I started to make a story but I can not finish. Will you help me?";
+						else if (questprogress(13163,HUNTING) == 1) {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "That horn thing bothers me a little bit. What is the difference between one and two horns? Just appearance?";
+							next;
+							mes "[Ragi]";
+							mes "Maybe it is unnecessary. But curiosity is important for story tellers. Hahaha.";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13163,HUNTING) == 2) {
+							mes "You came back safely! How is it? Horn Scaraba seemed to be a fun story. You really did a good job.";
+							callsub S_Quest,13163,13164,1100000,200000;
+						}
+						else {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "We talk about Horn Scaraba? There is one more we should mention.. That is Horn Scaraba!";
+							next;
+							mes "[Ragi]";
+							mes "I do no know why. I just heard from people. I need to make a song so please take a look at their world!";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "You can find them near somewhere in the east at Scaraba Hall.";
+								callsub S_Quest,13164,13163;
+							}
+						}
+						break;
+					case 3:
+						mes "[Ragi]";
+						if (questprogress(13166,PLAYTIME) == 1)
+							mes "There seem to be more story about Antler Scaraba! Please help me if you have time.";
+						else if (questprogress(13165,HUNTING) == 1) {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "There seemed to be more special Scarabas according to rumors. Stronger and more scary ones.";
+							next;
+							mes "[Ragi]";
+							mes "Do you think Antler Scaraba might be one of them?";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13165,HUNTING) == 2) {
+							mes "It must be tiring traveling long distance! Please tell me if there are more interesting stories!";
+							callsub S_Quest,13165,13166,1100000,200000;
+						}
+						else {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "This one is very unique! Horns look like the one of a deer so it is called an Antler Scaraba.";
+							next;
+							mes "[Ragi]";
+							mes "Aren't you curious why it has that horn? I think it has an interesting story that people would like. Shall I ask you adventurer?";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "Can you please find a story about Antler Scaraba? Experience yourself is the best I guess!";
+								callsub S_Quest,13166,13165;
+							}
+						}
+						break;
+					case 4:
+						mes "[Ragi]";
+						if (questprogress(13168,PLAYTIME) == 1)
+							mes "I feel like Rake Horn Scaraba has more story. Please help me if you have time.";
+						else if (questprogress(13167,HUNTING) == 1) {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "Here my plan is. I am making 4 passages for each Scaraba.";
+							next;
+							mes "[Ragi]";
+							mes "Whoever listen or sing will be confused to sing a troll. It sounds fun, right?";
+							cutin "ragi01",0;
+						}
+						else if (questprogress(13167,HUNTING) == 2) {
+							mes "Thank you ! I am sure that I can make a great song.";
+							callsub S_Quest,13167,13168,1100000,200000;
+						}
+						else {
+							cutin "½ºÄ«¶ó¹ÙÄ«µå",3;  //scaraba_card
+							mes "I'm starting to get confused. I am going to make a song of the Rake Horn Scarabas story.";
+							next;
+							mes "[Ragi]";
+							mes "A song begins with Uni-horn Scaraba then sing along with Rake Horn Scaraba. Will you help me?";
+							next;
+							cutin "ragi01",0;
+							if (select( "Take the request", "Quit." ) == 1) {
+								mes "[Ragi]";
+								mes "Please find a story about Rake Horn Scaraba from Scaraba Hall. Battle or experienced stories are fine.";
+								callsub S_Quest,13168,13167;
+							}
+						}
+						break;
+					}
+				}
+			}
+			else {
+				mes "Music and Stories continues to be collected. Finding Adventure is not bad been an Adventurer.";
+				next;
+				callsub S_Erasequest,
+					13143,1,"Egnigem Cenia",
+					13145,1,"Armeyer Dinze",
+					13147,1,"Wickebine Tres",
+					13149,1,"Kavach Icarus",
+					13151,1,"Errende Ebecee",
+					13153,1,"Laurell Weinder",
+					13155,2,"",
+					13157,2,"",
+					13159,2,"",
+					13161,3,"",
+					13163,3,"",
+					13165,3,"",
+					13167,3,"";
+				mes "[Ragi]";
+				mes "[Smiling.]Goodbye... I hope, one day we will meet elsewhere.";
+			}
+		}
+		else {
+			mes "[Ragi]";
+			mes "Well, I am kind of busy doing an errand for Sir Aigu. Do you have any questions?";
+			next;
+			switch( select( "Where did you get your hair-do?", "Please sing a song for me.", "Do you have a girl friend?", "About Aigu" ) ) {
+				mes "[Ragi]";
+			case 1:
+				mes "There is a fine hair artist in Alberta. He butchered my hair with a some cooking scissors. Looks illegal.";
+				next;
+				mes "[Ragi]";
+				mes "Sometimes, hair-dos or color are strange... but I was lucky I didn't die.";
+				break;
+			case 2:
+				mes "I did not make a song as a member of band yet. Someday, I will make a great song for you!";
+				break;
+			case 3:
+				cutin "ragi03",0;
+				mes "......";
+				next;
+				cutin "ragi02",0;
+				mes "[Ragi]";
+				mes "Aigu is only on my mind. I can not think of anything else. I am fine even if it is just a one-sided love...";
+				break;
+			case 4:
+				mes "I will never forget the first day I met her. She stared at me out of all the people in Izlude port. Now I help her by doing small errands.";
+				next;
+				mes "[Ragi]";
+				mes "But alas, I think Aigu likes someone else. ^FF0000We've never met... But I hate him.^000000";
+				next;
+				mes "[Ragi]";
+				mes "But I hate myself more because I want to stay around her even if she will never see me. Haha was I too serious?";
+				next;
+				mes "[Ragi]";
+				mes "I am just a storyteller.. Any story can be made up. Most of the times it contains the truth.";
+			}
+		}
+	}
+	close2;
+	cutin "",255;
+	end;
+S_Quest:
+	if (questprogress(getarg(0)))
+		erasequest getarg(0);
+	setquest getarg(1);
+	if (getarg(2,0))
+		getexp getarg(2),getarg(3);
+	return;
+S_Erasequest:
+	.@total = getargcount();
+	for ( .@i = 0; .@i < .@total; .@i += 3 ) {
+		.@quest_id = getarg(.@i);
+		switch( questprogress(.@quest_id,HUNTING) ) {
+		case 0:
+			if (questprogress(.@quest_id+1))
+				erasequest (.@quest_id+1);
+			continue;
+		case 1:
+			mes "[Ragi]";
+			switch( getarg(.@i+1) ) {
+			case 1:
+				mes "Okay, I'll ask Someone else to finish portion of "+ getarg(.@i+2) +".";
+				break;
+			case 2:
+				mes "I'll ask someone else to take care of the rest of the Satan Morroc Incarnations, then!";
+				break;
+			case 3:
+				mes "I'll need to ask another adventurer to help with the Scaraba!"; 
+			}
+			break;
+		case 2:
+			mes "[Ragi]";
+			switch( getarg(.@i+1) ) {
+			case 1:
+				mes "So you've heard the story of "+ getarg(.@i+2) +", then? Thanks so much. I'll definitely write a good song.";
+				getexp 1100000,300000;
+				break;
+			case 2:
+				mes "Was the story of Satan Morroc worth putting to song? Great work!"; 
+				getexp 1100000,200000;
+				break;
+			case 3:
+				mes "Did you enjoy your long adventure? Tell me about it someday.";
+				getexp 1100000,200000;
+			}
+		}
+		erasequest .@quest_id;
+		next;
+	}
+	return;
+}