From e3afdc2af4c5e50c79237ee092e25f39b7428e47 Mon Sep 17 00:00:00 2001 From: Michieru Date: Thu, 24 Oct 2013 12:10:43 +0200 Subject: Update to last rAthena npc. Fix some typos change sc_bleeding to -> sc_blooding Updated RE EXP for quests_brasilis.txt --- npc/re/quests/eden/71-85.txt | 738 +++++++++++-------------------------------- 1 file changed, 179 insertions(+), 559 deletions(-) (limited to 'npc/re/quests/eden/71-85.txt') 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 -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{,"",""}; +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; } -- cgit v1.2.3-70-g09d2