diff options
Diffstat (limited to 'npc/re/quests/eden/71-85.txt')
-rw-r--r-- | npc/re/quests/eden/71-85.txt | 738 |
1 files changed, 179 insertions, 559 deletions
diff --git a/npc/re/quests/eden/71-85.txt b/npc/re/quests/eden/71-85.txt index 9a11bf2b5..db704a3de 100644 --- a/npc/re/quests/eden/71-85.txt +++ b/npc/re/quests/eden/71-85.txt @@ -3,13 +3,14 @@ //===== By: ================================================== //= L0ne_W0lf //===== Current Version: ===================================== -//= 1.2 +//= 1.3 //===== Description: ========================================= //= Repetable Quests for Players between Baselevel 71 - 85. //===== Additional Comments: ================================= //= 1.0 First Version. //= 1.1 Some little optimization here and there. [Masao] //= 1.2 Optimized. [Euphy] +//= 1.3 Updated to match the official scripts. [Euphy] //============================================================ moc_para01,44,38,3 script Mission [71 - 85] 857,{ @@ -19,586 +20,205 @@ moc_para01,44,38,3 script Mission [71 - 85] 857,{ mes "- this bulletin board. -"; close; } - mes "- Many hunting missions -"; - mes "- are on the bulletin board. -"; - next; - if ((BaseLevel > 70) && (BaseLevel < 86)) { - switch (select("Sphinx Dungeon:Glast Heim:Juno Area:Clock Tower:Localized Islands")) { - case 1: - mes "- Sphinx Dungeon -"; - mes "- I am Meidi who lives -"; - mes "- in Morocc. I want to hunt -"; - mes "- monsters in the Sphinx -"; - mes "- Dungeon. I will wait for -"; - mes "- you in front of the -"; - mes "- western gate. -"; - callsub L_Quest,10102,1; - mes "- Good. Now go find Meidi -"; - mes "- at the western gate -"; - mes "- in Morroc. -"; - close; - case 2: - mes "- Glast Heim -"; - mes "- I am Ancellia. -"; - mes "- I need some help -"; - mes "- hunting monsters -"; - mes "- in Glast Heim.-"; - mes "- Please help me. -"; - callsub L_Quest,10103,2; - mes "- Look for Ancellia. -"; - mes "- in Geffen. -"; - close; - case 3: - mes "- Juno Area -"; - mes "- I want to go to Juno, -"; - mes "- but the monsters on -"; - mes "- the way there are too -"; - mes "- strong for me. Come -"; - mes "- visit me in Al De Baran. -"; - mes "- My name is Jeanbai. -"; - callsub L_Quest,10104,3; - mes "- Look for Jeanbai -"; - mes "- in Al De Baran. -"; - close; - case 4: - mes "- Clock Tower -"; - mes "- A Clock is the best thing! -"; - mes "- I'm asking you to hunt -"; - mes "- some monster inside of.-"; - mes "- the Clock Tower, -"; - mes "- Risingeter. -"; - callsub L_Quest,10105,4; - mes "- Look for Risingeter -"; - mes "- in front of the -"; - mes "- Clock Tower. -"; - close; - case 5: - mes "- Localized Islands -"; - mes "- I need someone who -"; - mes "- can hunt monsters -"; - mes "- for Funfi in Alberta. -"; - callsub L_Quest,10106,5; - mes "- Loof for Funfi -"; - mes "- in Alberta. -"; - close; - } - } - mes "- Only members of the -"; - mes "- right level can read -"; - mes "- this bulletin board. -"; - mes "- Try to find a board -"; - mes "- that suits your level. -"; - close; -L_Quest: - next; - if(select("Accept mission.:Decline mission.") == 2) { - mes "- I don't want to do -"; - mes "- a mission right now. -"; - close; - } - if (slv_quest && slv_quest != getarg(1)) { - mes "- You are already on -"; - mes "- another mission. -"; - mes "- You can't do multiple -"; - mes "- missions. Finish your -"; - mes "- current mission first. -"; - close; - } - if (checkquest(getarg(0)) <= 0) { - setquest getarg(0); - set slv_quest,getarg(1); - return; - } - mes "- You are already on -"; - mes "- or have recently -"; - mes "- completed a mission. -"; - mes "- You can't do anymore -"; - mes "- missions right now. -"; - close; -} -morocc,35,174,5 script Meidi 729,{ - - if ((checkquest(10107) == 2) && (checkquest(10108) == 2) && (checkquest(10109) == 2) && (slv_quest == 6)) { - set slv_quest,0; - mes "[Meidi]"; - mes "You have completed the hunting missions."; - mes "I don't have anymore missions for you."; - mes "Thanks, you did a great job!"; - close; - } - if (checkquest(10107) == 1 || checkquest(10108) == 1 || checkquest(10109) == 1) { - mes "[Meidi]"; - mes "Wow! How did you come back so fast?"; - mes "What monster did you hunt?"; - next; - setarray .@monsters$[0],"Requiem","Marduk","Pasana"; - set .@i, select(implode(.@monsters$,":"))-1; - if (checkquest(10107+.@i,HUNTING) == 2) { - mes "[Meidi]"; - mes "You've hunted all 10 "+.@monsters$[.@i]+"."; - mes "Thank you very much."; - next; - mes "[Meidi]"; - mes "I know it isn't much but here's a small gift."; - mes "I hope that it will be helpful to you."; - next; - completequest 10107+.@i; - getexp 48000,0; - mes "[Meidi]"; - mes "Wooohoo!"; - mes "Good luck."; - close; + // Clear the original quest data (no longer used). + if (slv_quest) set slv_quest,0; + if (checkquest(10102) > -1 || checkquest(10103) > -1 || checkquest(10104) > -1 || checkquest(10105) > -1 || checkquest(10106) > -1) { + for(set .@quest,10102; .@quest<=10106; set .@quest,.@quest+1) { + if (checkquest(.@quest) > -1) + erasequest .@quest; } - mes "[Meidi]"; - mes "You didn't hunt 10 "+.@monsters$[.@i]+" yet."; - mes "You should make sure that you hunt all of them."; - mes "Can you check again?"; - close; - } - if (slv_quest == 6) { - mes "[Meidi]"; - mes "Sphinx Dungeon... many adventurers came back with great injuries."; - mes "That place is very dangerous."; - mes "Someone should go inside an make it safer for everyone."; - mes "Hopefully, very soon!"; - close; - } - mes "[Meidi]"; - mes "Sphinx Dungeon... many adventurers came back with great injuries."; - mes "That place is very dangerous."; - mes "Someone should go inside an make it safer for everyone."; - mes "Hopefully, very soon!"; - if (slv_quest == 1) { - next; - mes "[Meidi]"; - mes "Oh! Are you from the Eden Group?"; - mes "Are you here for my mission?"; - mes "You came right on time."; - mes "I was worried that noone would accept the mission that I posted."; + mes "- Since the client has moved -"; + mes "- to another place, -"; + mes "- the application form has been removed. -"; next; - mes "[Meidi]"; - mes "So, I need help hunting 3 monsters"; - mes "inside of the Sphinx Dungeon."; - mes "Got it? Its too dangerous for me so that's why I posted the mission."; - next; - mes "[Meidi]"; - mes "Requiem, Marduk and Pasana..."; - mes "I heard they are very dangerous monsters."; - mes "Can you hunt 10 of those monsters?"; - mes "10 of each sounds good enough, right?"; - next; - mes "[Meidi]"; - mes "If you succeed, I will give you a small reward for your help."; - next; - switch (select("Accept mission.:Decline mission.")) { - case 1: - mes "[Meidi]"; - mes "Oh. Thank you so much."; - mes "How can I pay you backf or your effort?"; - mes "May Freya bless you~"; - next; - completequest 10102; - setquest 10107; - setquest 10108; - setquest 10109; - set slv_quest,6; - mes "[Meidi]"; - mes "Requiem, Marduk and Pasana."; - mes "Don't forget and good luck."; - close; - case 2: - set slv_quest,0; - erasequest 10102; - mes "[Meidi]"; - mes "I see. There is no other way."; - mes "I will send a message to the Eden Group."; - mes "Don't worry and nevermind."; - close; - } } - close; -} -geffen,146,132,3 script Ancellia 906,{ - if ((checkquest(10110 == 2)) && (checkquest(10111) == 2) && (checkquest(10112) == 2) && (checkquest(10113) == 2) && (slv_quest == 6)) { - set slv_quest,0; - mes "[Ancellia]"; - mes "Wow. You've finished all"; - mes "of my missions. Great!"; - mes "You are of great help."; - mes "I will inform the Eden Group of your assistance."; - mes "You can go back, don't worry."; - close; - } - if (checkquest(10110) == 1 || checkquest(10111) == 1 || checkquest(10112) == 1 || checkquest(10113) == 1) { - mes "[Ancellia]"; - mes "You seem to have hunted all of the monsters."; - mes "What monster have you hunted?"; - mes "Do you remember its name?"; - next; - setarray .@monsters$[0],"Dark Frame","Evil Druid","Wraith","Raydric Archer"; - set .@i, select(implode(.@monsters$,":"))-1; - if (checkquest(10110+.@i,HUNTING) == 2) { - mes "[Ancellia]"; - mes "Ah, you've hunted 10 "+.@monsters$[.@i]+"s."; - mes "That was pretty difficult!"; - mes "Thank you very much."; + if (BaseLevel < 71) { + mes "- Only members of the -"; + mes "- right level can read -"; + mes "- this bulletin board. -"; + mes "- Try to find a board -"; + mes "- that suits your level. -"; + close; + } else if (BaseLevel > 85) { + // Quest IDs: 10107-10123, 5055-5057 + setarray .@quests[0], + 10107,10108,10109, + 10110,10111,10112,10113, + 10114,10115,10116,10117, + 10118,10119,10120, + 10121,10122,10123,5055,5056; + for(set .@i,0; .@i<getarraysize(.@quests); set .@i,.@i+1) { + if (checkquest(.@quests[.@i],HUNTING) == 2) + set .@complete[getarraysize(.@complete)], .@quests[.@i]; + } + if (checkquest(5057) > -1 && countitem(7187) >= 30) + set .@complete[getarraysize(.@complete)],5057; + if (getarraysize(.@complete)) { + mes "You have quests in progress."; + mes "Do you want to turn them in?"; next; - completequest 10110+.@i; - getexp 48000,0; - mes "[Ancellia]"; - mes "Perhaps you can hunt the rest as well."; - mes "I will wait for you here."; + if(select("Of course.:No.") == 2) + close; + for(set .@i,0; .@i<getarraysize(.@complete); set .@i,.@i+1) + callsub L_Quest,.@complete[.@i]; close; } - mes "[Ancellia]"; - mes "Hmm... maybe you were confused."; - mes "You didn't hunt all 10 "+.@monsters$[.@i]+"."; - mes "Can you check again?"; - close; - } - if (slv_quest == 6) { - mes "[Ancellia]"; - mes "Go to Glast Heim and kill"; - mes "Dark Frames, Evil Druids,"; - mes "Wraith and Raydric Archers."; - mes "10 of each should do just fine."; + mes "- Only members of the -"; + mes "- right level can read -"; + mes "- this bulletin board. -"; + mes "- Try to find a board -"; + mes "- that suits your level. -"; close; } - mes "[Ancellia]"; - mes "Glast Heim is very far away."; - mes "I heared that the castle was cursed by the ancient King of Prontera."; - mes "There is a another story."; + mes "- Choose where you -"; + mes "- would like to hunt. -"; next; - mes "[Ancellia]"; - mes "One day the came out of the castle and attacked a nearby village, it was terrible."; - mes "That's why I can't stop worrying."; - if (slv_quest == 2) { - next; - mes "[Ancellia]"; - mes "Oh, you got my mission"; - mes "from the Eden Group. Great~!"; - mes "Thank you very much."; - next; - mes "[Ancellia]"; - mes "I already explained."; - mes "So I expect you understand."; - mes "You need to hurry hunting"; - mes "Dark Frames, Evil Druids,"; - mes "Wraith and Raydric Archesr."; - next; - mes "[Ancellia]"; - mes "You should hunt them all."; - mes "These are dangerous monsters so please take care of yourself."; - next; - switch (select("Accept mission.:Decline mission.")) { - case 1: - mes "[Ancellia]"; - mes "Thanks a lot."; - mes "Be careful when you hunt these monsters. Good luck."; - next; - completequest 10103; - setquest 10110; - setquest 10111; - setquest 10112; - setquest 10113; - set slv_quest,6; - mes "[Ancellia]"; - mes "Remember, Dark Frames,"; - mes "Evil Druids, Wraiths"; - mes "and Raydric Archers."; - close; - case 2: - set slv_quest,0; - erasequest 10103; - mes "[Ancellia]"; - mes "Was the mission too hard?"; - mes "I guess I'll just have to wait for someone else from the Eden Group to help me."; - close; + switch(select("Sphinx Dungeon:Glast Heim:Juno Area:Clock Tower:Localized Islands")) { + case 1: + mes "- There are several requests -"; + mes "- related to the Sphinx Dungeon -"; + mes "- on this mission Board. -"; + next; + set .@str1$,"The villagers of Morroc are worried by the increasing number of monsters in the Sphinx Dungeon. "; + set .@str2$,"- Meidi from Morroc -"; + switch(select("Hunt Requiem:Hunt Marduk:Hunt Pasana")) { + case 1: callsub L_Quest,10107,.@str1$+"Hunt 10 Requiems.",.@str2$; + case 2: callsub L_Quest,10108,.@str1$+"Hunt 10 Marduks.",.@str2$; + case 3: callsub L_Quest,10109,.@str1$+"Hunt 10 Pasanas.",.@str2$; } - } - close; -} - -aldebaran,144,230,3 script Jeanbai 900,{ - if ((checkquest(10114) == 2) && (checkquest(10115) == 2) && (checkquest(10116) == 2) && (checkquest(10117) == 2) && (slv_quest == 6)) { - set slv_quest,0; - mes "[Jeanbai]"; - mes "You've hunted all of the monsters."; - mes "I will inform the Eden Group."; - mes "Thank you."; - close; - } - if (checkquest(10114) == 1 || checkquest(10115) == 1 || checkquest(10116) == 1 || checkquest(10117) == 1) { - mes "[Jeanbai]"; - mes "Huh? So... fast..."; - mes "You amaze me!"; - mes "So what monster did you hunt?"; - next; - setarray .@monsters$[0],"Grand Peco","Sleeper","Goat","Harpy"; - set .@i, select(implode(.@monsters$,":"))-1; - if (checkquest(10114+.@i,HUNTING) == 2) { - mes "[Jeanbai]"; - mes "You've hunted 20 "+.@monsters$[.@i]+"s. Perfect!"; - mes "Thanks a lot."; - next; - completequest 10114+.@i; - getexp 48000,0; - mes "[Jeanbai]"; - mes "Please hunt the others as soon as possible."; - mes "I have faith in you!"; - close; + case 2: + mes "- There are several requests -"; + mes "- related to Glast Heim -"; + mes "- on this mission Board. -"; + next; + set .@str1$,"I am very afraid that the monsters from Glast Heim will attack us. "; + set .@str2$,"- Ancellia from Geffen -"; + switch(select("Hunt Dark Frame:Hunt Evil Druid:Hunt Wraith:Hunt Raydric Archer")) { + case 1: callsub L_Quest,10110,.@str1$+"Hunt 10 Dark Frames.",.@str2$; + case 2: callsub L_Quest,10111,.@str1$+"Hunt 10 Evil Druids.",.@str2$; + case 3: callsub L_Quest,10112,.@str1$+"Hunt 10 Wraiths.",.@str2$; + case 4: callsub L_Quest,10113,.@str1$+"Hunt 10 Raydric Archers.",.@str2$; } - mes "[Jeanbai]"; - mes "What? Maybe you were confused."; - mes "You haven't hunted all 20 "+.@monsters$[.@i]+"s."; - mes "Please check again."; - close; - } - if (slv_quest == 6) { - mes "[Jeanbai]"; - mes "Grand Pecos, Sleepers, Goats"; - mes "and Harpies. Hunt 20 of each."; - mes "When you're finished hunting, come back to me."; - mes "I hope you finish as soon as you can."; - close; - } - mes "[Jeanbai]"; - mes "I am traveler Jeanbai."; - mes "As I said I'm a traveler not a adventurer so, I am not good at fighting."; - mes "That's why I can't travel all over the world."; - next; - mes "[Jeanbai]"; - mes "Monsters are increasing in numbers so travelers like me have a hard time getting around."; - mes "I wish I could travel around without having to worry about that."; - if (slv_quest == 3) { - next; - mes "[Jeanbai]"; - mes "Oh, did you get my mission from the Eden Group?"; - mes "Great~! We don't have a lot of time."; - mes "Let me explain."; - next; - mes "[Jeanbai]"; - mes "The monsters around Juno,"; - mes "Grand Pecos, Sleepers, Goats"; - mes "and Harpies. Please hunt 20 of them."; - mes "I've been hesitating to visit Juno because of those monsters around there."; - next; - mes "[Jeanbai]"; - mes "Will you accept this mission?"; - mes "I hope you are the right person for the job."; - mes "So what do you say?"; - next; - switch (select("Accept mission.:Decline mission.")) { - case 1: - mes "[Jeanbai]"; - mes "Great!"; - mes "You won't regret it."; - next; - completequest 10104; - setquest 10114; - setquest 10115; - setquest 10116; - setquest 10117; - set slv_quest,6; - mes "[Jeanbai]"; - mes "When you're finished hunting, come back to me."; - mes "I hope you finish as soon as you can."; - close; - case 2: - set slv_quest,0; - erasequest 10104; - mes "[Jeanbai]"; - mes "Too bad. I'm disappointed."; - mes "I should inform the Eden Group again."; - mes "I see, nevermind."; - close; + case 3: + mes "- There are several requests -"; + mes "- related to the area -"; + mes "- around Juno. -"; + next; + set .@str1$,"Those who can't fight, like me, find it much more difficult to travel due to the large number of monsters. "; + set .@str2$,"- Jeanbai, traveler -"; + switch(select("Hunt Grand Peco:Hunt Sleeper:Hunt Goat:Hunt Harpy")) { + case 1: callsub L_Quest,10114,.@str1$+"Hunt 20 Grand Pecos.",.@str2$; + case 2: callsub L_Quest,10115,.@str1$+"Hunt 20 Sleepers.",.@str2$; + case 3: callsub L_Quest,10116,.@str1$+"Hunt 20 Goats.",.@str2$; + case 4: callsub L_Quest,10117,.@str1$+"Hunt 20 Harpies.",.@str2$; } - } - close; -} - -aldebaran,105,116,3 script Risingeter 869,{ - if ((checkquest(10118) == 2) && (checkquest(10119) == 2) && (checkquest(10120 == 2)) && (slv_quest == 6)) { - set slv_quest,0; - mes "[Risingeter]"; - mes "You've completed all of my missions."; - mes "Amazing~! I will inform the Eden Group."; - mes "of your assistance. Thanks again!"; - close; - } - if (checkquest(10118) == 1 || checkquest(10119) == 1 || checkquest(10120) == 1) { - mes "[Risingeter]"; - mes "Wow. Are you done?"; - mes "So fast~?! Unbelievable~"; - mes "You were the right person for this mission."; - mes "Which monster did you hunt?"; - next; - setarray .@monsters$[0],"Clock","Punk","Rideword"; - set .@i, select(implode(.@monsters$,":"))-1; - if (checkquest(10118+.@i,HUNTING) == 2) { - mes "[Risingeter]"; - mes "Good! You've hunted 15 "+.@monsters$[.@i]+"s."; - mes "Ah, now I can hear the clock sound clearly..."; - mes "Tic!! toc!! tic!! toc!!..."; - next; - completequest 10118+.@i; - getexp 48000,0; - mes "[Risingeter]"; - mes "Thanks a lot!"; - mes "I hope you can hunt the rest as well."; - mes "Go as soon as you can!"; - close; + case 4: + mes "- There are several requests -"; + mes "- related to the Clock Tower -"; + mes "- on this mission Board. -"; + next; + set .@str1$,"I used to love listening to the sweet melody of the Al De Baran Clock Tower but I can't hear anything anymore because of all the noises the monsters are making. "; + set .@str2$,"- Rizingsetter, President of the Love Clock community -"; + switch(select("Hunt Clock:Hunt Punk:Hunt Rideword")) { + case 1: callsub L_Quest,10118,.@str1$+"Hunt 15 Clocks before it breaks.",.@str2$; + case 2: callsub L_Quest,10119,.@str1$+"Hunt 15 Punks before it breaks.",.@str2$; + case 3: callsub L_Quest,10120,.@str1$+"Hunt 15 Ridewords before it breaks.",.@str2$; } - mes "[Risingeter]"; - mes "Uh? Something is wrong."; - mes "15 "+.@monsters$[.@i]+"s, right?"; - mes "You better check how many you've hunted."; - close; - } - if (slv_quest == 6) { - mes "[Risingeter]"; - mes "Hunt 15 Clocks, Punks, and Ridewords."; - mes "Please hurry."; - close; - } - mes "[Risingeter]"; - mes "I like clocks so much."; - mes "They move with regular rhythm"; - mes "making tic toc sounds."; - mes "Ahah!! Hail to the clocks!"; - next; - mes "[Risingeter]"; - mes "That's why I like the Clock Tower so much."; - mes "It makes a really nice sound."; - mes "I like it so much!"; - if (slv_quest == 4) { - next; - mes "[Risingeter]"; - mes "Uh? Have you come to help me solve my trouble."; - mes "You already know I like clocks right?"; - mes "That's why I need your help to hunt these monsters."; - next; - mes "[Risingeter]"; - mes "There are too many monsters inside the Clock Tower."; - mes "Their presence is destroying the Clock Tower."; - next; - mes "[Risingeter]"; - mes "Anyway. Can you help me?"; - mes "Please hunt 15 Clocks, Punks and Ridewords before it breaks down."; - next; - switch (select("Accept mission.:Decline mission.")) { - case 1: - completequest 10105; - setquest 10118; - setquest 10119; - setquest 10120; - set slv_quest,6; - mes "[Risingeter]"; - mes "Ok! I expect you will do the right thing."; - mes "Hunt 15 Clocks, Punks and Ridewords."; - close; - case 2: - set slv_quest,0; - erasequest 10105; - mes "[Risingeter]"; - mes "You don't understand my love for clocks"; - mes "I will find another brave adventurer."; - mes "I will inform the Eden Group."; - close; + case 5: + mes "- There are several requests -"; + mes "- related to the Localized Islands -"; + mes "- on this mission Board. -"; + next; + set .@str1$,"I want to go on an adventure but there are so many things I have to deal with. If I can't, then others can't either! "; + set .@str2$,"- Funfy, who wants to go on an adventure -"; + switch(select("Hunt Kikimora:Hunt Miyabi Doll:Hunt Mi Gao:Hunt Headless Mule:Hunt Tamruan:Gather Festival Masks for the Festival")) { + case 1: callsub L_Quest,10121,.@str1$+"Hunt 15 Kikimoras in Moscovia!",.@str2$; + case 2: callsub L_Quest,10122,.@str1$+"Hunt 15 Miyabi Dolls in Amatsu!",.@str2$; + case 3: callsub L_Quest,10123,.@str1$+"Hunt 15 Mi Gaos in Louyang!",.@str2$; + case 4: callsub L_Quest,5055,"I know there are many terrifying monsters outside the city, but what terrifies me are these Headless Mules lurking around. I hope they will never venture into town. Hunt 15 Headless Mules!","- Mariana from Brasilis -"; + case 5: callsub L_Quest,5056,"Tamruans make a lot of noise. I don't mind in the morning but they keep me from falling asleep at night. I want to sleep. Hunt 15 Tamruans!","- Shaman Pumo from Ayotaya -"; + case 6: callsub L_Quest,5057,"The Dumpling Childs stole all the masks that I had prepared for the festival. Try to get a hold of 30 masks! I'll owe you~","- SaYumMoon Chief of Kunlun -"; } } - close; -} + end; -alberta,215,111,5 script Funfi 828,{ - if ((checkquest(10121) == 2) && (checkquest(10122) == 2) && (checkquest(10123) == 2) && (slv_quest == 6)) { - set slv_quest,0; - mes "[Funfi]"; - mes "Um! Thank you so much for all your efforts!"; - mes "I will inform, the Eden Group about your assistance, don't worry!"; - mes "Hahahaha..."; - close; - } - if (checkquest(10121) == 1 || checkquest(10122) == 1 || checkquest(10123) == 1) { - mes "[Funfi]"; - mes "Unbelievable~! So fast~!"; - mes "Which monster did you hunt?"; - next; - setarray .@monsters$[0],"Kikimora","Miyabi Doll","Mi Gao"; - set .@i, select(implode(.@monsters$,":"))-1; - if (checkquest(10121+.@i,HUNTING) == 2) { - mes "[Funfi]"; - mes "Ok! You've hunted 15 "+.@monsters$[.@i]+"!"; - mes "You're the best!"; +//callsub L_Quest,<quest ID>{,"<description1>","<description2>"}; +L_Quest: + set .@quest, getarg(0); + switch(.@quest) { + case 10107: set .@name$,"Hunt Requiem"; set .@exp,15000; break; + case 10108: set .@name$,"Hunt Marduk"; set .@exp,15000; break; + case 10109: set .@name$,"Hunt Pasana"; set .@exp,15000; break; + case 10110: set .@name$,"Hunt Dark Frame"; set .@exp,20000; break; + case 10111: set .@name$,"Hunt Evil Druid"; set .@exp,20000; break; + case 10112: set .@name$,"Hunt Wraith"; set .@exp,20000; break; + case 10113: set .@name$,"Hunt Raydric Archer"; set .@exp,20000; break; + case 10114: set .@name$,"Hunt Grand Peco"; set .@exp,30000; break; + case 10115: set .@name$,"Hunt Sleeper"; set .@exp,30000; break; + case 10116: set .@name$,"Hunt Goat"; set .@exp,30000; break; + case 10117: set .@name$,"Hunt Harpy"; set .@exp,30000; break; + case 10118: set .@name$,"Hunt Clock"; set .@exp,25000; break; + case 10119: set .@name$,"Hunt Punk"; set .@exp,25000; break; + case 10120: set .@name$,"Hunt Rideword"; set .@exp,25000; break; + case 10121: set .@name$,"Hunt Kikimora"; set .@exp,30000; break; + case 10122: set .@name$,"Hunt Miyabi Doll"; set .@exp,30000; break; + case 10123: set .@name$,"Hunt Mi Gao"; set .@exp,30000; break; + case 5055: set .@name$,"Hunt Headless Mule"; set .@exp,30000; break; + case 5056: set .@name$,"Hunt Tamruan"; set .@exp,30000; break; + case 5057: set .@name$,"Gather Festival Masks for the Festival"; set .@exp,30000; break; + } + if (getargcount() == 1) { + mes "'"+.@name$+"' completed. Do you want to turn it in and receive your reward?"; + next; + if(select("Turn in quest.:Cancel.") == 1) { + if (.@quest == 5057) delitem 7187,30; //Festival_Mask + erasequest .@quest; + getexp .@exp,0; + mes "You've received EXP for finishing the quest."; next; - completequest 10121+.@i; - getexp 48000,0; - mes "[Funfi]"; - mes "Please hunt the others as well."; - mes "I have faith in you!"; - close; + return; } - mes "[Funfi]"; - mes "Oh~ No no~!!"; - mes "Listen carefully! Hunt 15 "+.@monsters$[.@i]+"."; close; - } - if (slv_quest == 6) { - mes "[Funfi]"; - mes "Moscovia's Kikimore,"; - mes "Miyabi Dolls from Amatsu"; - mes "and Mi Gaos from Louyang."; - mes "Please hunt 15 of each of those monsters."; - close; - } - mes "[Funfi]"; - mes "I am a man who wants to experience adventures. But for some reason I can't..."; - next; - mes "[Funfi]"; - mes "There are a lot of funny things in the world... Wooo!"; - if (slv_quest == 5) { - next; - mes "[Funfi]"; - mes "Anyway are you from the Eden Group?"; - mes "You are? Cool! I've been waiting for you~!"; - next; - mes "[Funfi]"; - mes "No questions! Just do it now!"; - mes "Hunt Kikimora in Moscovia,"; - mes "Miyabi Dolls in Amatsu"; - mes "and Mi Gaos in Louyang!"; - mes "Hunt 15 each of those monsters!"; - next; - mes "[Funfi]"; - mes "Please~!! haha."; - mes "Hurry up!"; - next; - switch (select("Accept mission.:Decline mission.")) { - case 1: - completequest 10106; - setquest 10121; - setquest 10122; - setquest 10123; - set slv_quest,6; - getitem 7167,10; //Mystery_Iron_Bit - mes "[Funfi]"; - mes "Ok! Good! Hurry up."; - mes "Hunt the monsters on each of those 3 islands."; + } else { + if (.@quest == 5057) { + // Quest 5057 is the only collection quest, so separate conditions are unnecessary. + if (checkquest(5057) == -1) + set .@hunting,-1; + else if (countitem(7187) >= 30) + set .@hunting,2; + } else + set .@hunting, checkquest(.@quest,HUNTING); + if (.@hunting == 0 || .@hunting == 1) { + mes getarg(1); + mes getarg(2); next; - mes "[Funfi]"; - mes "I will give you some materials for use in Moscovia."; - mes "Go as soon as you can!"; - close; - case 2: - set slv_quest,0; - erasequest 10106; - mes "[Funfi]"; - mes "What? You don't want to work?! Gosh!"; - mes "I will inform the Eden Group of this!"; - close; + mes "Return here when you've finished the quest."; + } else if (.@hunting == 2) { + mes "You have completed the quest."; + next; + if(select("Turn in quest.:Cancel.") == 1) { + if (.@quest == 5057) delitem 7187,30; //Festival_Mask + erasequest .@quest; + getexp .@exp,0; + mes "You've received EXP for finishing the quest."; + } + }/* else if (.@hunting == 3) { +// recall_completequest .@quest + erasequest .@quest; + mes "You have re-accepted the quest '"+.@name$+"'."; + }*/ else { + mes getarg(1); + mes getarg(2); + next; + mes "Do you want to accept the quest?"; + next; + if(select("Yes.:No.") == 1) { + mes "You've received the quest '"+.@name$+"'. View your quest info for more details."; + setquest .@quest; + } } + close; } - close; } |