//================= Hercules Script =======================================
//= _ _ _
//= | | | | | |
//= | |_| | ___ _ __ ___ _ _| | ___ ___
//= | _ |/ _ \ '__/ __| | | | |/ _ \/ __|
//= | | | | __/ | | (__| |_| | | __/\__ \
//= \_| |_/\___|_| \___|\__,_|_|\___||___/
//================= License ===============================================
//= This file is part of Hercules.
//= http://herc.ws - http://github.com/HerculesWS/Hercules
//=
//= Copyright (C) 2015 Hercules Dev Team
//= Copyright (C) Dastgir
//= Copyright (C) Capuche
//=
//= Hercules is free software: you can redistribute it and/or modify
//= it under the terms of the GNU General Public License as published by
//= the Free Software Foundation, either version 3 of the License, or
//= (at your option) any later version.
//=
//= This program is distributed in the hope that it will be useful,
//= but WITHOUT ANY WARRANTY; without even the implied warranty of
//= MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
//= GNU General Public License for more details.
//=
//= You should have received a copy of the GNU General Public License
//= along with this program. If not, see <http://www.gnu.org/licenses/>.
//=========================================================================
//= Eden Group Quests - Mission [131-140]
//================= File Encoding =========================================
//= CP-949 (EUC-KR compatible). Do NOT read/save it as UTF-8.
//= -If the encoding is correct, the next three lines have the same length-
//= ============ �ġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġġ� ============
//= ============ ============================================= ============
//= ============ ������������������������������������������������������������������������������������������ ============
//================= Description ===========================================
//= Repeatable quests for players between BaseLevel 131 - 140.
//================= Current Version =======================================
//= 1.1
//=========================================================================
moc_para01,41,76,3 script Ragi#1 4_M_RAGI,{
cutin "ragi01",0;
mes "[Ragi]";
if (!countitem(Para_Team_Mark) && !countitem(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;
}
