summaryrefslogtreecommitdiff
path: root/npc/re/quests/eden/91-99.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/re/quests/eden/91-99.txt')
-rw-r--r--npc/re/quests/eden/91-99.txt249
1 files changed, 173 insertions, 76 deletions
diff --git a/npc/re/quests/eden/91-99.txt b/npc/re/quests/eden/91-99.txt
index bf80c2a7c..21ae3cfe1 100644
--- a/npc/re/quests/eden/91-99.txt
+++ b/npc/re/quests/eden/91-99.txt
@@ -3,114 +3,211 @@
//===== By: ==================================================
//= Chilly
//===== Current Version: =====================================
-//= 1.2
+//= 1.3
//===== Description: =========================================
//= Repetable Quests for Players between Baselevel 91 - 99.
//===== Additional Comments: =================================
//= 1.0 First Version. [Chilly]
//= 1.1 Some little improvements here and there. [Masao]
//= 1.2 Optimized. [Euphy]
+//= 1.3 Updated to match the official script. [Euphy]
//============================================================
-moc_para01,48,177,3 script Mission [91 - 99] 857,{
+moc_para01,48,177,3 script 91-99 Mission Board 857,{
if (countitem(6219) < 1) {
- mes "- Only members of the -";
- mes "- Eden Group can read -";
- mes "- this bulletin board. -";
- close;
- }
- if (BaseLevel < 91) {
- mes "- This missions can only be -";
- mes "- read by those who are -";
- mes "- of the correct level. -";
- mes "- There might be another -";
- mes "- board somewhere for -";
- mes "- my level. -";
- close;
+ mes "Wait a minute!";
+ mes "-You need to have an-";
+ mes "-^4d4dff'Eden Group Mark'^000000-";
+ mes "-to receive these missions.-";
+ next;
+ switch(select("Just walk away.:^0000FFEden Group^000000 missions?:How can I be a member of the ^0000FFEden Group^000000?")) {
+ case 1:
+ close;
+ case 2:
+ mes "::The Eden Group Missions";
+ mes "::are basically missions";
+ mes "::requested by";
+ mes "::people from all around the kingdom.";
+ mes "::We just categorize them.";
+ next;
+ mes "::In the Eden Group,";
+ mes "::we sorted out the missions";
+ mes "::according to the level of difficulty.";
+ mes "::According to this level,";
+ mes "::you can find";
+ mes "::missions that";
+ mes "::suit you.";
+ next;
+ mes "::When you are done,";
+ mes "::you can come back";
+ mes "::to the mission board.";
+ next;
+ mes "::Then you will be";
+ mes "::rewarded!!";
+ mes "::Simple, isn't it!!";
+ mes "::No commission required!!";
+ close;
+ case 3:
+ mes "::You can become a member";
+ mes "::of the Eden Group";
+ mes "::to ^0000FFLaime Evenor^000000,";
+ mes "::who is waiting on the 1st floor.";
+ next;
+ mes "::If you become a member,";
+ mes "::you will get an";
+ mes "::\"^006400Eden Group Mark^000000\".";
+ mes "::Then you will be able";
+ mes "::to see the mission board.";
+ close;
+ }
}
- if (BaseLevel > 99) {
- setarray .@Exp[0],90000,94000,114000,96000,96000,146000,96000,102000,110000,102000,108000,110000,138000,118000,96000,134000;
- setarray .@Mob$[0],"Solider","Freezer","Heater","Injustice","Rybio","Dark Priest","Stapo","Roween","Siroma","Shinobi","Evil Nymph","Deviruchi","Mineral","Kaho","Neraid","Disguise";
- for(set .@i,0; .@i<16; set .@i,.@i+1)
- if (checkquest(4181+.@i,HUNTING) == 2) {
- mes "You hunted all 30 "+.@Mob$[.@i]+".";
- mes "Thank you very much.";
+ if (BaseLevel < 91 || BaseLevel > 99) {
+ // Quest IDs: 4181-4196
+ // Quest cooldown IDs: 4212-4227
+ setarray .@names$[0],
+ "Solider","Freezer","Heater",
+ "Injustice","Rybio","Dark Priest",
+ "Stapo","Roween","Siroma",
+ "Shinobi","Evil Nymph",
+ "Deviruchi","Mineral","Kaho","Neraid","Disguise";
+ setarray .@exp[0],
+ 90000,94000,114000,
+ 96000,96000,146000,
+ 96000,102000,110000,
+ 102000,108000,
+ 110000,138000,118000,96000,134000;
+ mes "You must be within level 91-99 to accept these missions.";
+ for(set .@quest,4181; .@quest<=4196; set .@quest,.@quest+1) {
+ set .@hunting, checkquest(.@quest,HUNTING);
+ if (.@hunting == 0 || .@hunting == 1) {
next;
- mes "I know it isn't much but here's a small gift.";
- mes "I hope that it helps you at least a little bit.";
+ mes ":: You cannot proceed in";
+ mes ":: ^0000FF"+.@names$[.@quest-4181]+" Hunting^000000.";
+ mes ":: The registration to the mission";
+ mes ":: is cancelled.";
+ erasequest .@quest;
+ close;
+ } else if (.@hunting == 2) {
next;
- erasequest 4181+.@i;
- getexp .@Exp[.@i],311000;
- mes "Wooohoo!";
- mes "Good luck.";
+ mes ":: You added information";
+ mes ":: about the mission";
+ mes ":: ^0000FF"+.@names$[.@quest-4181]+" Hunting^000000";
+ mes ":: on the mission board.";
+ mes ":: You've got a";
+ mes ":: salutary experience.";
+ erasequest .@quest;
+ getexp .@exp[.@quest-4181],0;
close;
}
- mes "- This missions can only be -";
- mes "- read by those who are -";
- mes "- of the correct level. -";
- mes "- There might be another -";
- mes "- board somewhere for -";
- mes "- my level. -";
+ }
close;
}
- mes "- Many hunting missions -";
- mes "- are on the bulletin board. -";
+ mes "[91-99 Mission Board]";
+ mes "There are several requests on this board.";
next;
- switch(select("Turtle Dungeon Area:Glast Heim Area:Rachel Area:Local Area:Other Area")) {
+ switch(select("^8B4513Turtle Island^000000:^8B4513Glast Heim^000000:^8B4513Rachel / Veins^000000:^8B4513Expansion Cities^000000:^8B4513Other regions^000000")) {
case 1:
- switch(select("Solider:Freezer:Heater")) {
- case 1: callsub L_Quest,4181,"Solider",90000;
- case 2: callsub L_Quest,4182,"Freezer",94000;
- case 3: callsub L_Quest,4183,"Heater",114000;
+ mes "^8B4513Turtle Island^000000.";
+ mes "Which monster will you hunt or have you finished hunting?";
+ next;
+ switch(select("^0000FFSolider^000000:^0000FFFreezer^000000:^0000FFHeater^000000")) {
+ case 1: callsub L_Quest,4181,"Solider",90000,"¼Ö¸®´õÄ«µå","There is a monster that only can be found on ^8B4513Turtle Island^000000.";
+ case 2: callsub L_Quest,4182,"Freezer",94000,"ÇÁ¸®ÀúÄ«µå","There is a monster that only can be found on ^8B4513Turtle Island^000000.";
+ case 3: callsub L_Quest,4183,"Heater",114000,"È÷ÅÍÄ«µå","There is a monster that only can be found on ^8B4513Turtle Island^000000.";
}
case 2:
- switch(select("Injustice:Rybio:Dark Priest")) {
- case 1: callsub L_Quest,4184,"Injustice",96000;
- case 2: callsub L_Quest,4185,"Rybio",96000;
- case 3: callsub L_Quest,4186,"Dark Priest",146000;
+ mes "^8B4513Glast Heim^000000.";
+ mes "Which monster will you hunt or have you finished hunting?";
+ next;
+ switch(select("^0000FFInjustice^000000:^0000FFRybio^000000:^0000FFDark Priest^000000")) {
+ case 1: callsub L_Quest,4184,"Injustice",96000,"ÀÎÀú½ºÆ¼½ºÄ«µå","There is a monster only found in ^8B4513Glast Heim prison^000000.";
+ case 2: callsub L_Quest,4185,"Rybio",96000,"¸®ºñ¿ÀÄ«µå","There is a monster only found in ^8B4513Glast Heim prison^000000.";
+ case 3: callsub L_Quest,4186,"Dark Priest",146000,"´ÙÅ©ÇÁ¸®½ºÆ®Ä«µå","There is a monster only found in ^8B4513Glast Heim prison^000000.";
}
case 3:
- switch(select("Stapo:Roween:Siroma")) {
- case 1: callsub L_Quest,4187,"Stapo",96000;
- case 2: callsub L_Quest,4188,"Roween",102000;
- case 3: callsub L_Quest,4189,"Siroma",110000;
+ mes "^8B4513Rachel / Veins^000000.";
+ mes "Which monster will you hunt or have you finished hunting?";
+ next;
+ switch(select("^0000FFStapo^000000:^0000FFRoween^000000:^0000FFSiroma^000000")) {
+ case 1: callsub L_Quest,4187,"Stapo",96000,"½ºÅÂÆ÷Ä«µå","There is a monster only found in ^8B4513Veins^000000.";
+ case 2: callsub L_Quest,4188,"Roween",102000,"·Î¿ìÀ©Ä«µå","There is a monster only found in ^8B4513Rachel^000000.";
+ case 3: callsub L_Quest,4189,"Siroma",110000,"½Ã·Î¸¶Ä«µå","There is a monster only found in ^8B4513Ice Dungeon^000000.";
}
case 4:
- switch(select("Shinobi:Evil Nymph")) {
- case 1: callsub L_Quest,4190,"Shinobi",102000;
- case 2: callsub L_Quest,4191,"Evil Nymph",108000;
+ mes "^8B4513Expansion Cities^000000.";
+ mes "Which monster will you hunt or have you finished hunting?";
+ next;
+ switch(select("^0000FFShinobi^000000:^0000FFEvil Nymph^000000")) {
+ case 1: callsub L_Quest,4190,"Shinobi",102000,"½Ã³ëºñÄ«µå","There is a monster only found in ^8B4513Amatsu Dungeon^000000.";
+ case 2: callsub L_Quest,4191,"Evil Nymph",108000,"¿ä¼±³àÄ«µå","There is a monster only found in ^8B4513Kunlun Dungeon^000000.";
}
case 5:
- switch(select("Deviruchi:Mineral:Kaho:Neraid:Disguise")) {
- case 1: callsub L_Quest,4192,"Deviruchi",110000;
- case 2: callsub L_Quest,4193,"Mineral",138000;
- case 3: callsub L_Quest,4194,"Kaho",118000;
- case 4: callsub L_Quest,4195,"Neraid",96000;
- case 5: callsub L_Quest,4196,"Disguise",134000;
+ mes "Other Regions.";
+ mes "Which monster will you hunt or have you finished hunting?";
+ next;
+ switch(select("^0000FFDeviruchi^000000:^0000FFMineral^000000:^0000FFKaho^000000:^0000FFNeraid^000000:^0000FFDisguise^000000")) {
+ case 1: callsub L_Quest,4192,"Deviruchi",110000,"µ¥ºñ·çÄ¡Ä«µå","There is a monster only found in ^8B4513Geffen Dungeon^000000.";
+ case 2: callsub L_Quest,4193,"Mineral",138000,"¹Ì³×¶ö","There is a monster only found in ^8B4513Einbech Dungeon^000000.";
+ case 3: callsub L_Quest,4194,"Kaho",118000,"īȣīµå","There is a monster found in ^8B4513Nogg Road Magma 1^000000.";
+ case 4: callsub L_Quest,4195,"Neraid",96000,"³×·¹À̵åÄ«µå","There is a monster only found in ^8B4513Comodo Dungeon^000000.";
+ case 5: callsub L_Quest,4196,"Disguise",134000,"µð½º°¡ÀÌÁîÄ«µå","There is a monster only found in ^8B4513Nifflheim^000000.";
}
}
end;
+
+//callsub L_Quest,<quest ID>,"<monster name>",<reward EXP>,"<cutin image>","<description>"{,"s"};
L_Quest:
- if (checkquest(getarg(0),HUNTING) == 2) {
- mes "You hunted all 30 "+getarg(1)+".";
- mes "Thank you very much.";
- next;
- mes "I know it isn't much but here's a small gift.";
- mes "I hope that it helps you at least a little bit.";
- next;
- erasequest getarg(0);
- getexp getarg(2),311000;
- mes "Wooohoo!";
- mes "Good luck.";
+ set .@quest1, getarg(0);
+ set .@quest2, .@quest1+31;
+ set .@playtime, checkquest(.@quest2,PLAYTIME);
+ if (.@playtime == 0 || .@playtime == 1) {
+ mes "[91-99 Mission Board]";
+ mes "You need to wait 3 hours before you can take this mission again.";
close;
}
- if (checkquest(getarg(0)) == -1) {
- setquest getarg(0);
- mes "Please hunt 30 "+getarg(1)+" and return here.";
+ set .@hunting, checkquest(.@quest1,HUNTING);
+ if (.@hunting == 0 || .@hunting == 1) {
+ mes "[91-99 Mission Board]";
+ mes "Have you finished hunting all 30 "+getarg(1)+getarg(5,"")+" yet?";
+ close;
+ } else if (.@hunting == 2) {
+ mes "[91-99 Mission Board]";
+ mes "You have completed the hunting.";
+ mes "Please accept this reward as a compensation.";
+ erasequest .@quest1;
+ if (.@playtime > -1) erasequest .@quest2;
+ setquest .@quest2;
+
+ // Job Experience calculation.
+ if (JobLevel > 50 && JobLevel < 56) set .@jexp,67000;
+ else if (JobLevel > 55 && JobLevel < 61) set .@jexp,94000;
+ else if (JobLevel > 60 && JobLevel < 66) set .@jexp,141000;
+ else if (JobLevel > 65 && JobLevel < 69) set .@jexp,212000;
+ else if (JobLevel == 69) set .@jexp,311000;
+
+ getexp getarg(2),.@jexp;
+ close;
+ }/* else if (.@hunting == 3) {
+// recall_completequest .@quest1
+ erasequest .@quest1;
+ mes "[91-99 Mission Board]";
+ mes "You have re-accepted the "+getarg(1)+" Hunting mission.";
+ close;
+ }*/ else {
+ mes "[91-99 Mission Board]";
+ mes getarg(4);
+ next;
+ if (getarg(3) != "") cutin getarg(3),3;
+ mes "[91-99 Mission Board]";
+ mes "Hunt 30 "+getarg(1)+" monsters there and post your success on this board.";
+ next;
+ if (getarg(3) != "") cutin getarg(3),255;
+ if(select("I'll hunt them.:No thanks.") == 1) {
+ mes "[91-99 Mission Board]";
+ mes "When you have completed the mission, post it on this board and collect your reward.";
+ if (.@playtime > -1) erasequest .@quest2;
+ setquest .@quest1;
+ }
close;
}
- mes "Umm? You didn't hunt";
- mes "all 30 "+getarg(1)+" yet...";
- mes "Will you check again?";
- close;
}