summaryrefslogtreecommitdiff
path: root/npc/re/instances/MalangdoCulvert.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/re/instances/MalangdoCulvert.txt')
-rw-r--r--npc/re/instances/MalangdoCulvert.txt1122
1 files changed, 0 insertions, 1122 deletions
diff --git a/npc/re/instances/MalangdoCulvert.txt b/npc/re/instances/MalangdoCulvert.txt
deleted file mode 100644
index d61509511..000000000
--- a/npc/re/instances/MalangdoCulvert.txt
+++ /dev/null
@@ -1,1122 +0,0 @@
-//================= Hercules Script =======================================
-//= _ _ _
-//= | | | | | |
-//= | |_| | ___ _ __ ___ _ _| | ___ ___
-//= | _ |/ _ \ '__/ __| | | | |/ _ \/ __|
-//= | | | | __/ | | (__| |_| | | __/\__ \
-//= \_| |_/\___|_| \___|\__,_|_|\___||___/
-//================= License ===============================================
-//= This file is part of Hercules.
-//= http://herc.ws - http://github.com/HerculesWS/Hercules
-//=
-//= Copyright (C) 2013-2015 Hercules Dev Team
-//= Copyright (C) Joseph
-//= Copyright (C) Euphy
-//=
-//= 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/>.
-//=========================================================================
-//= Malangdo Culvert
-//================= Description ===========================================
-//= Clean the culverts and defeat the Coelacanth.
-//= Daily and weekly quests are available.
-//= Contains a normal mode and hard mode.
-//================= Current Version =======================================
-//= 1.1
-//=========================================================================
-
-//== Quest NPCs ============================================
-mal_in01,172,28,2 script Albo#mal 4_CAT_SAILOR5,{
- if (checkweight(Knife, 1) == 0) {
- mes("You have too many kinds of objects. Try to continue after reducing those objects.");
- close();
- }
- if (MaxWeight - Weight < 1000) {
- mes("You have too many heavy objects. Try to continue after reducing your weight.");
- close();
- }
- if (BaseLevel < 90) {
- mes("[Albo]");
- mes("Who are you?");
- mes("We don't need a weaking!!");
- close();
- }
- setarray(.@quests[0], 12271, 12272, 12273, 12274);
- setarray(.@names$[0],
- _("General Culvert Daily Service"), _("^990000Hard Culvert Daily Service^000000"),
- _("General Culvert Weekly Service"), _("^990000Hard Culvert Weekly Service^000000"));
- .@menu$ = _("Why are doing this job?:");
- for(.@i = 0; .@i<4; ++.@i) {
- if (questprogress(.@quests[.@i], PLAYTIME)) {
- .@status[.@i] = 2;
- .@menu$ += _("^aaaaaa- There is no new task -^000000:");
- } else if (.@i%2 && BaseLevel < 140) {
- .@status[.@i] = 0;
- .@menu$ += _("^aaaaaaCan't take this job because level is too low^000000:");
- } else {
- .@status[.@i] = 1;
- .@menu$ += .@names$[.@i]+":";
- }
- }
- mes("[Albo]");
- mes("We crossed the sea!");
- mes("We are great heroes of Culvert! We do not forgive the seafood that aims at Culvert!");
- next();
- .@i = select(.@menu$) - 1;
- if (.@i == 0) {
- mes("[Albo]");
- mes("We used to be the henchmen of Mr. Missing! We almost became guards of such a historic site.");
- next();
- mes("[Albo]");
- mes("However, when sea water flooded all precious the resources, my dream... all my dreams melted away...");
- next();
- mes("[Albo]");
- mes("We do not forgive the seafood that invaded our territory. I'll eat them with spicy paste!!!");
- next();
- mes("^0000ffAlbo's voice shakes with anger. He smacked his lips when he mentioned spicy paste.^000000");
- close();
- }
- switch (.@status[.@i - 1]) {
- case 0:
- mes("[Albo]");
- mes("That task is really hard for you, so I can't tell you about it. Why don't you find another one?");
- close();
- case 1:
- break;
- case 2:
- mes("[Albo]");
- mes("I'm sorry. There is no new task yet! If I find any work, I'll tell you so!");
- close();
- }
- switch (.@i) {
- case 1: // General Culvert Daily Service
- switch (rand(1, 6)) {
- case 1:
- callsub(L_GiveQuest, .@i, 12255, 12271, _("Deep Sea Crab"));
- case 2:
- callsub(L_GiveQuest, .@i, 12256, 12271, _("Deep Sea Marse"));
- case 3:
- callsub(L_GiveQuest, .@i, 12257, 12271, _("Deep Sea Vadon"));
- case 4:
- callsub(L_GiveQuest, .@i, 12258, 12271, _("Deep Sea Shellfish"));
- case 5:
- callsub(L_GiveQuest, .@i, 12259, 12271, _("Deep Sea Kukre"));
- case 6:
- callsub(L_GiveQuest, .@i, 12260, 12271, _("Deep Sea Cornutus"));
- }
- case 2: // Hard Culvert Daily Service
- switch (rand(1, 6)) {
- case 1:
- callsub(L_GiveQuest, .@i, 12261, 12272, _("Deep Sea Marc"));
- case 2:
- callsub(L_GiveQuest, .@i, 12262, 12272, _("Deep Sea Sword Fish"));
- case 3:
- callsub(L_GiveQuest, .@i, 12263, 12272, _("Deep Sea Strouf"));
- case 4:
- callsub(L_GiveQuest, .@i, 12264, 12272, _("Deep Sea Anolian"));
- case 5:
- callsub(L_GiveQuest, .@i, 12265, 12272, _("Deep Sea Obeanue"));
- case 6:
- callsub(L_GiveQuest, .@i, 12266, 12272, _("Deep Sea Kapha"));
- }
- case 3: // General Culvert Weekly Service
- switch (rand(1, 2)) {
- case 1:
- callsub(L_GiveQuest, .@i, 12267, 12273, _("Weird Coelacanth"));
- case 2:
- callsub(L_GiveQuest, .@i, 12268, 12273, _("Gloomy Coelacanth"));
- }
- case 4: // Hard Culvert Weekly Service
- switch (rand(1, 2)) {
- case 1:
- callsub(L_GiveQuest, .@i, 12269, 12274, _("Violent Coelacanth"));
- case 2:
- callsub(L_GiveQuest, .@i, 12270, 12274, _("Mutant Coelacanth"));
- }
- default:
- mes("[Albo]");
- mes("Uh!? Where is the task? Let me find that quickly. You must speak with Madeca!");
- close();
- }
- end;
-
-// callsub(L_GiveQuest, .@i, <quest 1>, <quest 2>, <monster>);
-L_GiveQuest:
- setquest(getarg(1));
- setquest(getarg(2));
- mes("[Albo]");
- mes("Today, the heroes of Culvert!");
- mesf("We raise our voices and set a date for the extermination of ^0000ff%s^000000!", getarg(3));
- next();
- mes("[Albo]");
- switch (getarg(0)) {
- case 1:
- case 2:
- mes("Come on, heroes! Don't be afraid of them! Just go on, since it's a one-day mission!");
- break;
- case 3:
- mes("I'll give you one week to finish this job! Terminate all of them in Culvert Dungeon, Normal Mode!");
- break;
- case 4:
- mes("I'll give you one week to finish this job! Terminate all of them in Culvert Dungeon, Hard Mode!");
- break;
- }
- next();
- mesf("You received a request for the Extermination of ^005500%s^000000. If you need more details, please check the quest window.", getarg(3));
- close();
-}
-
-mal_in01,172,26,2 script Madeca#mal 4_CAT_SAILOR1,{
- if (checkweight(Knife, 1) == 0) {
- mes("You have too many kinds of objects. Try to continue after reducing those objects.");
- close();
- }
- if (MaxWeight - Weight < 1000) {
- mes("You have too many heavy objects. Try to continue after reducing your weight.");
- close();
- }
- if (BaseLevel < 90) {
- mes("[Madeca]");
- mes("Karrrrrrr!!");
- mes("Let's have some bad seafood that can be boiled or grilled!");
- next();
- mes("[Madeca]");
- mes("Who are you? You are such a totterer. Even seaweed could kill you!");
- close();
- }
- mes("[Madeca]");
- mes("Oh?");
- mes("You're the one who took care of my big brother Albo's request. It was a hard job!");
- next();
- .@i = select("What are you doing here?", "General Culvert Daily Service Compensation", "Hard Culvert Daily Service Compensation", "General Culvert Weekly Service Compensation", "Hard Culvert Weekly Service Compensation") - 1;
- if (.@i == 0) {
- mes("[Madeca]");
- mes("I'm here to help my big brother Albo!");
- next();
- mes("[Madeca]");
- mes("We provide precious materials to humans who make sludge out of the bad seafood in the Culverts!");
- next();
- mes("[Madeca]");
- mes("We provide A~B Grade Coins as compensation for daily service, and the precious Sea God's Wrath as compensation for weekly service.");
- next();
- mes("[Madeca]");
- mes("If you take care of big brother Albo's request, I will see you very often. So, let's stay close!");
- close();
- }
- mes("[Madeca]");
- mes("I can't give you compensation for an expired request, so let me check if any of yours have expired.");
- next();
- specialeffect(EF_SPHERE, AREA, playerattached());
- progressbar(sprintf("0x%x", C_YELLOW), 3);
- specialeffect(EF_STEAL, AREA, playerattached());
- switch (.@i) {
- case 1: // General Culvert Daily Service
- if (questprogress(12271, PLAYTIME) == 2) {
- callsub(L_EraseQuest, 12255, 12256, 12257, 12258, 12259, 12260, 12271);
- } else {
- // Reward: 2x B Grade Coin
- callsub(L_CheckQuest, 12255, _("Deep Sea Crab"), Bgrade_Coin, 2);
- callsub(L_CheckQuest, 12256, _("Deep Sea Marse"), Bgrade_Coin, 2);
- callsub(L_CheckQuest, 12257, _("Deep Sea Vadon"), Bgrade_Coin, 2);
- callsub(L_CheckQuest, 12258, _("Deep Sea Shellfish"), Bgrade_Coin, 2);
- callsub(L_CheckQuest, 12259, _("Deep Sea Kukre"), Bgrade_Coin, 2);
- callsub(L_CheckQuest, 12260, _("Deep Sea Cornutus"), Bgrade_Coin, 2);
- }
- break;
- case 2: // Hard Culvert Daily Service
- if (questprogress(12272, PLAYTIME) == 2) {
- callsub(L_EraseQuest, 12261, 12262, 12263, 12264, 12265, 12266, 12272);
- } else {
- // Reward: 1x A Grade Coin
- callsub(L_CheckQuest, 12261, _("Deep Sea Marc"), Agrade_Coin, 1);
- callsub(L_CheckQuest, 12262, _("Deep Sea Sword Fish"), Agrade_Coin, 1);
- callsub(L_CheckQuest, 12263, _("Deep Sea Strouf"), Agrade_Coin, 1);
- callsub(L_CheckQuest, 12264, _("Deep Sea Anolian"), Agrade_Coin, 1);
- callsub(L_CheckQuest, 12265, _("Deep Sea Obeaune"), Agrade_Coin, 1);
- callsub(L_CheckQuest, 12266, _("Deep Sea Kapha"), Agrade_Coin, 1);
- }
- break;
- case 3: // General Culvert Weekly Service
- if (questprogress(12273, PLAYTIME) == 2) {
- callsub(L_EraseQuest, 12267, 12268, 12273);
- } else {
- // Reward: 1x Sea God's Wrath
- callsub(L_CheckQuest, 12267, _("Weird Coelacanth"), Anger_Seagod, 1);
- callsub(L_CheckQuest, 12268, _("Gloomy Coelacanth"), Anger_Seagod, 1);
- }
- break;
- case 4: // Hard Culvert Weekly Service
- if (questprogress(12274, PLAYTIME) == 2) {
- callsub(L_EraseQuest, 12269, 12270, 12274);
- } else {
- // Reward: 5x Sea God's Wrath
- callsub(L_CheckQuest, 12269, _("Violent Coelacanth"), Anger_Seagod, 5);
- callsub(L_CheckQuest, 12270, _("Mutant Coelacanth"), Anger_Seagod, 5);
- }
- break;
- default:
- mes("[Madeca]");
- mes("Something is wrong. Please check this again!");
- close();
- }
- mes("[Madeca]");
- mes("I don't see any completed mission!");
- close();
-
-L_EraseQuest:
- for(.@j = 0; .@j<getargcount(); ++.@j) {
- if (questprogress(getarg(.@j)))
- erasequest(getarg(.@j));
- }
- mes("[Madeca]");
- mes("Um, I'm sorry. You exceeded the time limit, so I can't give you any payment.");
- close();
-
-// callsub(L_CheckQuest, <quest ID>, <monster>, <reward item ID>, <reward item amount>);
-L_CheckQuest:
- if (questprogress(getarg(0), HUNTING) == 2) {
- mes("[Madeca]");
- mesf("You've punished ^0000ff%s^000000!", getarg(1));
- mes("Here's your pay!");
- erasequest(getarg(0));
- specialeffect(EF_STEAL, AREA, playerattached());
- getitem(getarg(2), getarg(3));
- close();
- }
- return;
-}
-
-//== Instance Creation =====================================
-mal_in01,160,34,4 script Missing, the Cleaner 4_CAT_SAILOR2,{
- if (BaseLevel < 90) {
- mes("[Missing, the Cleaner]");
- mes("Are you talking to me?!");
- next();
- mes("[Missing, the Cleaner]");
- mes("I'm not sure what made you come here but you can't enter!");
- mes("Tomas' orders...");
- next();
- mes("^770099You must be Base level 90 to enter.^000000");
- close();
- }
- if (in_canal_n == 0) {
- mes("[Missing, the Cleaner]");
- mes("(trembling)");
- next();
- mes("^660066This cat looks like it's in bad shape. It is slightly trembling.^000000");
- next();
- if (select("Pet the cat", "Are you ok?") == 1) {
- mes("[Missing, the Cleaner]");
- mes("Are you talking to me?!");
- next();
- mes("^660066A trembling cat is looking up at you.^000000");
- close();
- }
- mes("[Missing, the Cleaner]");
- mes("Achoo!");
- next();
- mes("[Missing, the Cleaner]");
- mes("We have had many issues during the");
- mes("cleaning of the culverts. But a");
- mes("cat's gotta do it...");
- next();
- select("What culvert are you cleaning?");
- mes("[Missing, the Cleaner]");
- mes("It might look unfamiliar for an");
- mes("outsider, but actually this place");
- mes("is made to keep souvenirs and");
- mes("luxurious things.");
- next();
- mes("[Missing, the Cleaner]");
- mes("After there was a big trembling on");
- mes("this island, things started leaking");
- mes("around here. So that's why I became");
- mes("a cleaner here, though I used");
- mes("to be a manager.");
- next();
- mes("^660066The cat looks like it's been crying...^000000");
- next();
- mes("[Missing, the Cleaner]");
- mes("There is a culvert along this way");
- mes("to the basement. There are many bad");
- mes("guys who hurt me. I am tired of");
- mes("fighting with them so many times a");
- mes("day!");
- next();
- mes("[Missing, the Cleaner]");
- mes("Ohh! You touched my fur!");
- mes("My fur is falling out... it's all");
- mes("those guys' fault~");
- next();
- mes("^660066You just now notice that the cat's fur is missing in some places.^000000");
- next();
- select("Why don't you just quit!");
- mes("[Missing, the Cleaner]");
- mes("I still have to make a living, don't I?");
- next();
- mes("[Missing, the Cleaner]");
- mes("Sometimes I can get a lucky box,");
- mes("or even better, I can get cans...");
- next();
- if (select("Okay, cheers!", "I will help if possible...") == 1) {
- mes("[Missing, the Cleaner]");
- mes("Thank you. I am going back to pour the water!");
- close();
- }
- mes("[Missing, the Cleaner]");
- mes("(turns down his voice)");
- mes("If you really want to help, come closer!");
- next();
- select("(get in closer)");
- mes("[Missing, the Cleaner]");
- mes("Not everyone can be an assistant");
- mes("here. But I can't help choosing");
- mes("anyone at the moment...");
- next();
- mes("[Missing, the Cleaner]");
- mes("If you want to go down here, let me get this code.");
- next();
- mes("^660066The cat scribbles a memo for code to you.^000000");
- next();
- select("Open the memo.");
- mes("^660000Aragam insulted me.^000000");
- next();
- mes("[Missing, the Cleaner]");
- mes("You must be here with friends");
- mes("because you can't go in alone! And");
- mes("the password code will be from the");
- mes("party leader!");
- next();
- mes("[Missing, the Cleaner]");
- mes("What is also important is you must");
- mes("have a Seagod Protection with you.");
- next();
- mes("[Missing, the Cleaner]");
- mes("Don't forget! I will not open the");
- mes("door if you do not have Seagod Protection!");
- in_canal_n = 1;
- close();
- }
- if (countitem(Ptotection_Seagod) == 0) {
- mes("[Missing, the Cleaner]");
- mes("You don't look like you have Seagod Protection. I can't open door at the moment!");
- close();
- }
- .@party_id = getcharid(CHAR_ID_PARTY);
- .@md_name$ = _("Culvert");
- if (!.@party_id) {
- mes("^0000ffYou have to organize a party of");
- mes("more than 1 member or be a member");
- mes("of the party and come back.^000000");
- close();
- }
- .@playtime = questprogress(12254, PLAYTIME);
- if (!.@playtime) {
- if (getcharid(CHAR_ID_CHAR) == getpartyleader(.@party_id, 2)) {
- mes("[Missing, the Cleaner]");
- mes("Ummm? What's up? Tell me the password if you're the leader!");
- next();
- switch (select("No... nothing.", "Aragam insulted me.", "Enter the Culvert.")) {
- case 1:
- mes("[Missing, the Cleaner]");
- mes("What a rookie.");
- close();
- case 2:
- .@instance = instance_create(.@md_name$, .@party_id);
- if (.@instance >= 0) {
- for (.@i = 1; .@i <= 2; .@i++) {
- if (instance_attachmap(.@i + "@pump", .@instance) == "") {
- mesf("Party name: %s", getpartyname(.@party_id));
- mesf("Party leader: %s", strcharinfo(PC_NAME));
- mesf("^0000ff%s^000000 - Reservation Failed!", .@md_name$);
- instance_destroy(.@instance);
- close();
- }
- }
- instance_set_timeout(3600, 300, .@instance);
- instance_init(.@instance);
- }
- mesf("^3333FF%s^000000 - Reserving", .@md_name$);
- mes("After making the reservation, you");
- mes("have to select Enter the Culvert.");
- close();
- case 3:
- callsub(L_Enter, 0);
- }
- }
- if (select("Enter Culvert", "Cancel") == 2)
- end;
- callsub(L_Enter, 1);
- } else if (.@playtime == 1) {
- mes("You can enter the Culvert if the gate is open.");
- next();
- if (select("Enter Culvert", "Cancel") == 2)
- close();
- callsub(L_Enter, 0);
- } else if (.@playtime == 2) {
- mes("^0000ffThe gate to the Culvert is open again.^000000");
- erasequest(12254);
- close();
- }
- end;
-L_Enter:
- if (has_instance("1@pump") == "") {
- if (questprogress(12254, PLAYTIME) == 1) {
- mes("The gate to the Culvert is still closed.");
- mes("You must wait until you are able to enter or find a party leader who can create the instance.");
- close();
- }
- mes("The memorial dungeon Culvert does not exist.");
- mes("The party leader has not reserved entrance to the dungeon yet.");
- close();
- }
- mapannounce("mal_in01", sprintf(_$("%s of the party %s is entering the Culvert."), strcharinfo(PC_NAME), getpartyname(.@party_id)), bc_map, C_SPRINGGREEN);
- if (!questprogress(12254))
- setquest(12254);
- warp("1@pump", 63, 98);
- end;
-}
-
-//== Instance: Common Scripts ==============================
-1@pump,63,100,4 script Missing, the Cleaner#0 4_CAT_SAILOR2,{
- if (getcharid(CHAR_ID_CHAR) != getpartyleader(getcharid(CHAR_ID_PARTY), 2)) {
- mes("[Missing, the Cleaner]");
- mes("I am trying to have a conversation with your leader now. Please don't disturb and wait!");
- close();
- }
- mes("[Missing, the Cleaner]");
- mes("This is the underground culvert where you will clean with your friends!");
- next();
- mes("[Missing, the Cleaner]");
- mes("I'll open the door first. By the way, do you know how to fight?");
- next();
- switch (select("I'm pretty good at delivering bread.", "I know how to fight.", "^ffffffGive me the diamond.^000000")) {
- case 1:
- mes("[Missing, the Cleaner]");
- mes("Ok then, I'll let you clean the culverts here as usual! I will prepare at the right-hand corner, please follow me!");
- next();
- if (select("Wait! I changed my mind!", "As you wish~") == 1) {
- mes("[Missing, the Cleaner]");
- mes("Huh? Not ready yet? Talk to me again when you're ready.");
- close();
- }
- 'party_id = getcharid(CHAR_ID_PARTY);
- mapannounce(instance_mapname("1@pump"), _("Missing: Move toward the 3 o'clock direction and wait for my next order!"), bc_map, "0xff88ff", FW_NORMAL, 15);
- disablenpc(instance_npcname("Missing, the Cleaner#0"));
- enablenpc(instance_npcname("Missing, the Cleaner#n"));
- close();
- case 2:
- if (BaseLevel < 140) {
- mes("[Missing, the Cleaner]");
- mes("Hmmm... Missing thinks you're weak! Tell me the truth!!");
- close();
- }
- mes("[Missing, the Cleaner]");
- mes("Huh? You have some fighting skills? Well, then, there is one place I wasn't able to clean... why don't you go there?!");
- next();
- mes("[Missing, the Cleaner]");
- mes("I must tell you that it's been such a long~~ time since we've cleaned that place, so anyone under level 140 cannot even enter! Are you sure you still want to go?");
- next();
- if (select("Wait! I changed my mind!", "Sure, I'm prepared already~") == 1) {
- mes("[Missing, the Cleaner]");
- mes("Hmm? Talk to me again when you're ready.");
- close();
- }
- 'party_id = getcharid(CHAR_ID_PARTY);
- mapannounce(instance_mapname("1@pump"), _("Missing: I'll go in first, so follow me! I'll open up a gate at the 3 o'clock direction!"), bc_map, "0xff88ff", FW_NORMAL, 15);
- disablenpc(instance_npcname("Missing, the Cleaner#0"));
- enablenpc(instance_npcname("Culvert Entrance#i"));
- close();
- case 3:
- mes("[Missing, the Cleaner]");
- mes("I told you not to play with me~!");
- close();
- }
- end;
-}
-
-1@pump,84,105,0 script Culvert Entrance#i WARPNPC,3,3,{
- end;
-OnInstanceInit:
- disablenpc(instance_npcname("Culvert Entrance#i"));
- end;
-OnTouch:
- if (BaseLevel >= 140)
- warp(instance_mapname("2@pump"), 38, 88);
- else
- warp(instance_mapname("1@pump"), 74, 105);
- end;
-}
-
-function script F_mal_missing {
- mes("[Missing, the Cleaner]");
- mes("I will tell you how to clean shortly. Can you see the culverts around you?");
- next();
- if (select("What culverts??", "Yes, I see them.") == 1) {
- mes("[Missing, the Cleaner]");
- mes("Huh? Is this your first time seeing culverts? You'll see many buried machines in the ground. You may look around and come back!");
- close();
- }
- mes("[Missing, the Cleaner]");
- mes("That's right! Those culverts are very important! We must clean the culverts to prevent seaweed from blocking them. This is what we, cleaners, do!");
- next();
- mes("[Missing, the Cleaner]");
- mes("Watch out! Some monsters will be after you while you're cleaning the culverts! But do not yield to them!");
- next();
- mes("[Missing, the Cleaner]");
- mes("And... NEVER let 6 seaweeds stack! Up to 5 is acceptable! If there are 6, I'll drag you out of here!!");
- next();
- mes("[Missing, the Cleaner]");
- mes("I don't care if you get help from your friends or not. I want you to clean up all culverts! Don't forget! I will watch you and give you instructions. Just do what I said!!");
- next();
- if (getcharid(CHAR_ID_CHAR) != getpartyleader(getcharid(CHAR_ID_PARTY), 2)) {
- mes("[Missing, the Cleaner]");
- mes("Once your leader finishes preparing, it will begin, so get your hearts ready for it!!");
- close();
- }
- mes("[Missing, the Cleaner]");
- mes("So, are you ready to clean now?");
- next();
- switch (select("Wait! Not yet!", "Let's start!")) {
- case 1:
- mes("[Missing, the Cleaner]");
- mes("Huh? Not ready yet? Then talk to me when you're ready.");
- close();
- case 2:
- mes("[Missing, the Cleaner]");
- mes("OK! Now it begins!");
- return;
- }
-}
-
-//== Instance: Normal Mode =================================
-1@pump,84,105,4 script Missing, the Cleaner#nf 4_CAT_SAILOR2,{
- mes("[Missing, the Cleaner]");
- mes("I have the cleaning job for 40 years and I've never seen such a terrible team!!");
- next();
- mes("[Missing, the Cleaner]");
- mes("I see seaweed everywhere because you're wiggling! All the culverts will be blocked with seaweed!");
- next();
- if (getcharid(CHAR_ID_CHAR) != getpartyleader(getcharid(CHAR_ID_PARTY), 2)) {
- mes("[Missing, the Cleaner]");
- mes("Once your leader finishes preparing, settlement will be decided so get your hearts ready for it!!");
- close();
- }
- mes("[Missing, the Cleaner]");
- mes("If you got some guts to challenge again, I'll give you another chance! What's your choice going to be!?");
- next();
- switch (select("Wait! Not yet!", "Okay, let's start again!")) {
- case 1:
- mes("[Missing, the Cleaner]");
- mes("You're still slow! Talk to me again whenever your're ready.");
- close();
- case 2:
- mes("[Missing, the Cleaner]");
- mes("Ok! Let's start now!");
- .@i$ = charat(strnpcinfo(NPC_NAME_HIDDEN), 0);
- enablenpc(instance_npcname("Missing, the Cleaner#"+.@i$));
- donpcevent(instance_npcname("Missing, the Cleaner#"+.@i$)+"::OnStart");
- disablenpc(instance_npcname("Culvert Entrance#"+.@i$));
- disablenpc(instance_npcname("Missing, the Cleaner#"+.@i$+"o"));
- donpcevent(instance_npcname("Monster Hole#"+.@i$)+"::OnClear");
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- close();
- }
- close();
-OnInstanceInit:
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-}
-
-1@pump,84,105,4 script Missing, the Cleaner#n 4_CAT_SAILOR2,{
- callfunc("F_mal_missing");
- donpcevent(instance_npcname("Missing, the Cleaner#n")+"::OnStart");
- close();
-OnInstanceInit:
- disablenpc(instance_npcname("Missing, the Cleaner#n"));
- end;
-OnStart:
- killmonster(instance_mapname("1@pump"), instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
- disablenpc(instance_npcname("Missing, the Cleaner#n"));
- initnpctimer();
- end;
-OnAddSeaweed:
- .@map$ = instance_mapname("1@pump");
- areamonster(.@map$, 55, 99, 61, 105, _("Contaminated Seaweed"), MD_SEAWEED, 1, instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
- .@mob_dead_num = mobcount(.@map$, instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
- if (.@mob_dead_num >= 6)
- donpcevent(instance_npcname("Missing, the Cleaner#n")+"::OnFail");
- else
- mapannounce(.@map$, sprintf(_$("Contaminated Seaweed: %s stem"), .@mob_dead_num), bc_map, "0xff3333", FW_NORMAL, 20);
- end;
-OnMyMobDead:
- end;
-OnFail:
- stopnpctimer();
- donpcevent(instance_npcname("Monster Hole#n")+"::OnClear");
- .@map$ = instance_mapname("1@pump");
- killmonster(.@map$, instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
- enablenpc(instance_npcname("Missing, the Cleaner#nf"));
- mapannounce(.@map$, _("What is this!! Seaweed is all over the culverts! You're done with cleaning! Get out!!"), bc_map, "0xff88ff", FW_NORMAL, 15);
- disablenpc(instance_npcname("Missing, the Cleaner#n"));
- end;
-OnTimer100:
- mapannounce(instance_mapname("1@pump"), _("First culvert will be opened in 5 sec. Cleaner can find the opened drain and click to start cleaning."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- end;
-OnTimer5500:
- mapannounce(instance_mapname("1@pump"), _("The one who's in charge of cleaning the culvert cannot move or be attacked until the casting is over."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- donpcevent(instance_npcname("Monster Hole#n")+"::OnSpawn");
- end;
-OnTimer45000:
-OnTimer95000:
-OnTimer145000:
-OnTimer195000:
-OnTimer245000:
-OnTimer295000:
-OnTimer345000:
-OnTimer395000:
-OnTimer445000:
- mapannounce(instance_mapname("1@pump"), _("Next culvert will be opened in 5 sec. Please hurry up and find the position of the next culvert."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- end;
-OnTimer50000:
-OnTimer100000:
-OnTimer150000:
- donpcevent(instance_npcname("Monster Hole#n")+"::OnSpawn");
- end;
-OnTimer200000:
-OnTimer250000:
-OnTimer300000:
-OnTimer350000:
-OnTimer400000:
-OnTimer450000:
- .@mob_dead_num = mobcount(instance_mapname("1@pump"), instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
- if (.@mob_dead_num >= 6)
- donpcevent(instance_npcname("Missing, the Cleaner#n")+"::OnFail");
- else
- donpcevent(instance_npcname("Monster Hole#n")+"::OnSpawn");
- end;
-OnTimer515000:
- .@map$ = instance_mapname("1@pump");
- .@mob_dead_num = mobcount(.@map$, instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
- mapannounce(.@map$, sprintf(_$("Contaminated Seaweed: %s stem. Missing will come and inspect the results of the cleaning soon."), .@mob_dead_num), bc_map, "0xff3333", FW_NORMAL, 20);
- end;
-OnTimer520000:
- stopnpctimer();
- .@mob_dead_num = mobcount(instance_mapname("1@pump"), instance_npcname("Missing, the Cleaner#n")+"::OnMyMobDead");
- if (.@mob_dead_num >= 6)
- donpcevent(instance_npcname("Missing, the Cleaner#n")+"::OnFail");
- else
- donpcevent(instance_npcname("Boss Creation#n")+"::OnEnable");
- end;
-}
-
-1@pump,1,1,4 script Monster Hole#n FAKE_NPC,{
- end;
-OnSpawn:
- .@i$ = charat(strnpcinfo(NPC_NAME_HIDDEN), 0);
- if (.@i$ == "n")
- .@n = 6;
- else if (.@i$ == "h")
- .@n = 10;
- donpcevent(instance_npcname("#Culvert_"+.@i$+rand(1, .@n))+"::OnEnable");
- end;
-OnClear:
- .@i$ = charat(strnpcinfo(NPC_NAME_HIDDEN), 0);
- if (.@i$ == "n")
- .@n = 6;
- else if (.@i$ == "h")
- .@n = 10;
- for(.@i = 1; .@i <= .@n; ++.@i)
- donpcevent(instance_npcname("#Culvert_"+.@i$+.@n)+"::OnClear");
- end;
-}
-
-1@pump,36,111,4 script #Culvert_n1 CLEAR_NPC,14,14,{ //temporary workaround for ALL_SAMEMAP
- progressbar(sprintf("0x%x", C_YELLOW), 10);
- stopnpctimer();
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnInstanceInit:
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnEnable:
- enablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- .@label$ = instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead";
- .@map$ = instance_mapname("1@pump");
- .@index = atoi(charat(strnpcinfo(NPC_NAME_HIDDEN), 9));
- switch (.@index) {
- case 1:
- setarray(.@c[0], 32, 107, 40, 115);
- break;
- case 2:
- setarray(.@c[0], 64, 120, 72, 128);
- break;
- case 3:
- setarray(.@c[0], 76, 110, 84, 118);
- break;
- case 4:
- setarray(.@c[0], 36, 76, 44, 84);
- break;
- case 5:
- setarray(.@c[0], 71, 76, 79, 84);
- break;
- case 6:
- setarray(.@c[0], 54, 97, 62, 105);
- break;
- }
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Abysmal Crab"), MD_CRAB, rand(1, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Abysmal Marse"), MD_MARSE, rand(1, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Ancient Vadon"), MD_VADON, rand(1, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Abysmal Shellfish"), MD_SHELLFISH, rand(1, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Ancient Kukre"), MD_KUKRE, rand(1, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Abysmal Cornutus"), MD_CORNUTUS, rand(1, 3), .@label$);
- specialeffect(EF_MAPPILLAR2, ALL_SAMEMAP); //currently broken
- getmapxy(.@map$, .@x, .@y, UNITTYPE_NPC);
- getpartymember('party_id, 2);
- copyarray(.@partymemberaid[0], $@partymemberaid[0], $@partymembercount);
- for(.@i = 0; .@i<$@partymembercount; ++.@i) {
- if (attachrid(.@partymemberaid[.@i])) {
- if (strcharinfo(PC_MAP) == .@map$)
- viewpoint(0, .@x, .@y, .@index, C_YELLOW);
- detachrid();
- }
- }
- initnpctimer();
- end;
-OnMyMobDead:
- end;
-OnClear:
- stopnpctimer();
- killmonster(instance_mapname("1@pump"), instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead");
- end;
-OnTimer49500: //OnTimer50000 clashes with the timer in "Missing, the Cleaner#h".
- donpcevent(instance_npcname("Missing, the Cleaner#n")+"::OnAddSeaweed");
- donpcevent(instance_npcname(strnpcinfo(NPC_NAME))+"::OnClear");
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnTouch:
- specialeffect(EF_MAPPILLAR2);
- end;
-}
-
-1@pump,68,124,4 duplicate(#Culvert_n1) #Culvert_n2 CLEAR_NPC,14,14
-1@pump,80,114,4 duplicate(#Culvert_n1) #Culvert_n3 CLEAR_NPC,14,14
-1@pump,40,80,4 duplicate(#Culvert_n1) #Culvert_n4 CLEAR_NPC,14,14
-1@pump,75,80,4 duplicate(#Culvert_n1) #Culvert_n5 CLEAR_NPC,14,14
-1@pump,58,101,4 duplicate(#Culvert_n1) #Culvert_n6 CLEAR_NPC,14,14
-
-1@pump,1,1,4 script Boss Creation#n FAKE_NPC,{
- end;
-OnInstanceInit:
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnEnable:
- enablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- initnpctimer();
- end;
-OnTimer100:
- .@i$ = charat(strnpcinfo(NPC_NAME_HIDDEN), 0);
- if (.@i$ == "n")
- mapannounce(instance_mapname("1@pump"), _("Hmm! That wasn't so bad!"), bc_map, "0xff88ff", FW_NORMAL, 15);
- else if (.@i$ == "h")
- mapannounce(instance_mapname("2@pump"), _("Hmm! You guys are pretty good!!"), bc_map, "0xff88ff", FW_NORMAL, 15);
- end;
-OnTimer5000:
- mapannounce(strnpcinfo(NPC_MAP), _("Let's pack up and go... WHAT!!?"), bc_map, "0xff88ff", FW_NORMAL, 15);
- end;
-OnTimer10000:
- mapannounce(strnpcinfo(NPC_MAP), _("I sense something strange!! Don't loosen up-- prepare for a fight!!"), bc_map, "0xff88ff", FW_NORMAL, 15);
- end;
-OnTimer20000:
- stopnpctimer();
- .@i$ = charat(strnpcinfo(NPC_NAME_HIDDEN), 0);
- .@label$ = instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead";
- if (rand(1, 100) > 50) {
- if (.@i$ == "n")
- monster(instance_mapname("1@pump"), 0, 0, _("Weird Coelacanth"), COELACANTH_N_M, 1, .@label$);
- else if (.@i$ == "h")
- monster(instance_mapname("2@pump"), 0, 0, _("Mutant Coelacanth"), COELACANTH_H_M, 1, .@label$);
- mapannounce(strnpcinfo(NPC_MAP), _("Something big inside the abyss appears with a huge noise."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- } else {
- if (.@i$ == "n")
- monster(instance_mapname("1@pump"), 0, 0, _("Gloomy Coelacanth"), COELACANTH_N_A, 1, .@label$);
- else if (.@i$ == "h")
- monster(instance_mapname("2@pump"), 0, 0, _("Violent Coelacanth"), COELACANTH_H_A, 1, .@label$);
- mapannounce(strnpcinfo(NPC_MAP), _("Something savage inside the abyss appears with a huge noise."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- }
- end;
-OnMyMobDead:
- if (mobcount(strnpcinfo(NPC_MAP), instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead") < 1) {
- mapannounce(strnpcinfo(NPC_MAP), _("You've destroyed all monsters in the culverts. There are trophies lying on the ground, please look for them."), bc_map, C_YELLOW, FW_NORMAL, 15);
- .@i$ = charat(strnpcinfo(NPC_NAME_HIDDEN), 0);
- .@map$ = strnpcinfo(NPC_MAP);
- enablenpc(instance_npcname("Culvert Entrance#"+.@i$));
- enablenpc(instance_npcname("Missing, the Cleaner#"+.@i$+"o"));
- if (.@i$ == "n") {
- for(.@i = 0; .@i < 10; ++.@i) {
- .@j = rand(1, 6401);
- if (.@j < 5001)
- .@item = Malang_Sp_Can;
- else if (.@j < 5501)
- .@item = Low_Coin_Pocket;
- else if (.@j < 6001)
- .@item = Egrade_Pocket;
- else if (.@j < 6201)
- .@item = Dgrade_Pocket;
- else if (.@j < 6401)
- .@item = High_Weapon_Box;
- else
- continue;
- makeitem(.@item, 1, .@map$, rand(40, 77), rand(87, 120));
- }
- } else if (.@i$ == "h") {
- for(.@i = 0; .@i < 10; ++.@i) {
- .@j = rand(1, 5001);
- if (.@j < 2001)
- .@item = Low_Coin_Pocket;
- else if (.@j < 3001)
- .@item = Egrade_Pocket;
- else if (.@j < 4001)
- .@item = Dgrade_Pocket;
- else if (.@j < 4501)
- .@item = Cgrade_Pocket;
- else if (.@j < 5001)
- .@item = High_Weapon_Box;
- else
- continue;
- makeitem(.@item, 1, .@map$, rand(40, 77), rand(87, 120));
- }
- }
- } else {
- mapannounce(strnpcinfo(NPC_MAP), _("There are still monsters alive."), bc_map, C_SPRINGGREEN, FW_NORMAL, 20);
- }
- end;
-}
-
-1@pump,84,105,4 script Missing, the Cleaner#no 4_CAT_SAILOR2,{
- .@i$ = charat(strnpcinfo(NPC_NAME_HIDDEN), 0);
- if (.@i$ == "n") {
- mes("[Missing, the Cleaner]");
- mes("I was very surprised!!");
- next();
- mes("[Missing, the Cleaner]");
- mes("That funny-looking fish seems to be one of Coelacanths living around here. This is my first time seeing one coming here alone!");
- next();
- mes("[Missing, the Cleaner]");
- mes("I'll clean up the remains. Go pack and leave! Enterance is located on the other side, look for it!");
- next();
- } else if (.@i$ == "h") {
- mes("[Missing, the Cleaner]");
- mes("You've destroyed an immense monster!");
- next();
- mes("[Missing, the Cleaner]");
- mes("The one you destroyed was among the variety of Coelacanths. Others have tried to destroy them but failed.");
- next();
- mes("[Missing, the Cleaner]");
- mes("I'll clean up the remains. You go ahead to get trophies and leave!");
- next();
- }
- mes("[Missing, the Cleaner]");
- mes("One more thing! DO NOT TALK to ANYONE about what you've seen here today!!");
- next();
- mes("[Missing, the Cleaner]");
- mes("If Tomas closes this down, we will lose our jobs!");
- close();
-OnInstanceInit:
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-}
-
-1@pump,32,100,0 script Culvert Entrance#n WARPNPC,3,3,{
- end;
-OnInstanceInit:
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnTouch:
- warp("mal_in01", 161, 32);
- end;
-}
-
-//MD_Putmob "1@pump" 0 0 0 0 20 HYDRA 0 0 2
-1@pump,1,1,4 script Hydra#n FAKE_NPC,{
-OnInstanceInit:
- monster(strnpcinfo(NPC_MAP), 0, 0, _("Hydra"), HYDRA, 20);
- end;
-}
-
-//== Instance: Hard Mode ===================================
-2@pump,39,88,4 duplicate(Missing, the Cleaner#nf) Missing, the Cleaner#hf 4_CAT_SAILOR2
-
-2@pump,39,88,4 script Missing, the Cleaner#h 4_CAT_SAILOR2,{
- callfunc("F_mal_missing");
- donpcevent(instance_npcname("Missing, the Cleaner#h")+"::OnStart");
- close();
-OnStart:
- killmonster(instance_mapname("2@pump"), instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
- disablenpc(instance_npcname("Missing, the Cleaner#h"));
- initnpctimer();
- end;
-OnAddSeaweed:
- .@map$ = instance_mapname("2@pump");
- areamonster(.@map$, 75, 78, 85, 88, _("Contaminated Seaweed"), MD_SEAWEED, 1, instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
- .@mob_dead_num = mobcount(.@map$, instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
- if (.@mob_dead_num >= 6)
- donpcevent(instance_npcname("Missing, the Cleaner#h")+"::OnFail");
- else
- mapannounce(.@map$, sprintf(_$("Proliferous Contaminated Seaweed: %s stem"), .@mob_dead_num), bc_map, "0xff3333", FW_NORMAL, 20);
- end;
-OnMyMobDead:
- end;
-OnFail:
- stopnpctimer();
- donpcevent(instance_npcname("Monster Hole#h")+"::OnClear");
- .@map$ = instance_mapname("2@pump");
- killmonster(.@map$, instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
- enablenpc(instance_npcname("Missing, the Cleaner#hf"));
- mapannounce(.@map$, _("What is this!! Seaweed is all over the culverts! You're done with cleaning! Get out!!"), bc_map, "0xff88ff", FW_NORMAL, 15);
- disablenpc(instance_npcname("Missing, the Cleaner#h"));
- end;
-OnTimer100:
- mapannounce(instance_mapname("2@pump"), _("First culvert will be opened in 5 sec. Cleaner can find the opened drain and click to start cleaning."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- end;
-OnTimer5500:
- mapannounce(instance_mapname("2@pump"), _("The one who's in charge of cleaning the culvert cannot move or be attacked until the casting is over."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- donpcevent(instance_npcname("Monster Hole#h")+"::OnSpawn");
- end;
-OnTimer35000:
-OnTimer75000:
-OnTimer115000:
-OnTimer155000:
-OnTimer195000:
-OnTimer235000:
-OnTimer275000:
-OnTimer315000:
-OnTimer355000:
- mapannounce(instance_mapname("2@pump"), _("Next culvert will be opened in 5 sec. Please hurry up and find the position of the next culvert."), bc_map, "0x00ffcc", FW_NORMAL, 15);
- end;
-OnTimer40000:
-OnTimer80000:
-OnTimer120000:
- donpcevent(instance_npcname("Monster Hole#h")+"::OnSpawn");
- end;
-OnTimer160000:
-OnTimer200000:
-OnTimer240000:
-OnTimer280000:
-OnTimer320000:
-OnTimer360000:
- .@mob_dead_num = mobcount(instance_mapname("2@pump"), instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
- if (.@mob_dead_num >= 6)
- donpcevent(instance_npcname("Missing, the Cleaner#h")+"::OnFail");
- else
- donpcevent(instance_npcname("Monster Hole#h")+"::OnSpawn");
- end;
-OnTimer420000:
- mapannounce(instance_mapname("2@pump"), _("It seems Missing will come and inspect the results of the cleaning soon. Shall we clean up the mess around here?"), bc_map, "0xff3333", FW_NORMAL, 20);
- end;
-OnTimer425000:
- stopnpctimer();
- .@mob_dead_num = mobcount(instance_mapname("2@pump"), instance_npcname("Missing, the Cleaner#h")+"::OnMyMobDead");
- if (.@mob_dead_num >= 6)
- donpcevent(instance_npcname("Missing, the Cleaner#h")+"::OnFail");
- else
- donpcevent(instance_npcname("Boss Creation#h")+"::OnEnable");
- end;
-}
-
-2@pump,53,114,4 script #Culvert_h1 CLEAR_NPC,14,14,{ //temporary workaround for ALL_SAMEMAP
- progressbar(sprintf("0x%x", C_YELLOW), 15);
- stopnpctimer();
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnInstanceInit:
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnEnable:
- enablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- .@label$ = instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead";
- .@map$ = instance_mapname("2@pump");
- .@index = atoi(substr(strnpcinfo(NPC_NAME_HIDDEN), 9, getstrlen(strnpcinfo(NPC_NAME_HIDDEN))-1));
- switch (.@index) {
- case 1:
- setarray(.@c[0], 49, 110, 57, 118);
- break;
- case 2:
- setarray(.@c[0], 75, 105, 83, 113);
- break;
- case 3:
- setarray(.@c[0], 110, 110, 118, 118);
- break;
- case 4:
- setarray(.@c[0], 94, 94, 102, 102);
- break;
- case 5:
- setarray(.@c[0], 58, 92, 66, 100);
- break;
- case 6:
- setarray(.@c[0], 53, 66, 61, 74);
- break;
- case 7:
- setarray(.@c[0], 43, 45, 51, 53);
- break;
- case 8:
- setarray(.@c[0], 77, 59, 85, 67);
- break;
- case 9:
- setarray(.@c[0], 96, 70, 104, 78);
- break;
- case 10:
- setarray(.@c[0], 111, 46, 119, 54);
- break;
- }
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Ancient Marc"), MD_MARC, rand(2, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Ancient Sword Fish"), MD_SWORD_FISH, rand(2, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Ancient Strouf"), MD_STROUF, rand(2, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Mutant Anolian"), MD_ANOLIAN, rand(2, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Abysmal Obeaune"), MD_OBEAUNE, rand(2, 3), .@label$);
- areamonster(.@map$, .@c[0], .@c[1], .@c[2], .@c[3], _("Metamorphous Kapha"), MD_KAPHA, rand(2, 3), .@label$);
- specialeffect(EF_MAPPILLAR2, ALL_SAMEMAP); //currently broken
- initnpctimer();
- end;
-OnMyMobDead:
- end;
-OnClear:
- stopnpctimer();
- killmonster(instance_mapname("2@pump"), instance_npcname(strnpcinfo(NPC_NAME))+"::OnMyMobDead");
- end;
-OnTimer39500: //OnTimer40000 clashes with the timer in "Missing, the Cleaner#h".
- donpcevent(instance_npcname("Missing, the Cleaner#h")+"::OnAddSeaweed");
- donpcevent(instance_npcname(strnpcinfo(NPC_NAME))+"::OnClear");
- disablenpc(instance_npcname(strnpcinfo(NPC_NAME)));
- end;
-OnTouch:
- specialeffect(EF_MAPPILLAR2);
- end;
-}
-2@pump,79,109,4 duplicate(#Culvert_h1) #Culvert_h2 CLEAR_NPC,14,14
-2@pump,114,114,4 duplicate(#Culvert_h1) #Culvert_h3 CLEAR_NPC,14,14
-2@pump,98,98,4 duplicate(#Culvert_h1) #Culvert_h4 CLEAR_NPC,14,14
-2@pump,62,96,4 duplicate(#Culvert_h1) #Culvert_h5 CLEAR_NPC,14,14
-2@pump,57,70,4 duplicate(#Culvert_h1) #Culvert_h6 CLEAR_NPC,14,14
-2@pump,47,49,4 duplicate(#Culvert_h1) #Culvert_h7 CLEAR_NPC,14,14
-2@pump,81,63,4 duplicate(#Culvert_h1) #Culvert_h8 CLEAR_NPC,14,14
-2@pump,100,74,4 duplicate(#Culvert_h1) #Culvert_h9 CLEAR_NPC,14,14
-2@pump,115,50,4 duplicate(#Culvert_h1) #Culvert_h10 CLEAR_NPC,14,14
-
-2@pump,1,1,4 duplicate(Monster Hole#n) Monster Hole#h FAKE_NPC
-2@pump,1,1,4 duplicate(Boss Creation#n) Boss Creation#h FAKE_NPC
-2@pump,39,88,4 duplicate(Missing, the Cleaner#no) Missing, the Cleaner#ho 4_CAT_SAILOR2
-2@pump,38,100,0 duplicate(Culvert Entrance#n) Culvert Entrance#h WARPNPC,3,3
-
-//MD_Putmob "2@pump" 0 0 0 0 20 HYDRA 0 0 2
-2@pump,1,1,4 duplicate(Hydra#n) Hydra#h FAKE_NPC