Initial commit (Moubootaur Legends fork)

4 files changed, 74 insertions, 0 deletions

diff --git a/npc/016-7/_import.txt b/npc/016-7/_import.txt
new file mode 100644
index 0000000..45f28ee
--- /dev/null
+++ b/npc/016-7/_import.txt
@@ -0,0 +1,5 @@
+// Map 016-7: Pirate Attack
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+"npc/016-7/_mobs.txt",
+"npc/016-7/main.txt",
+"npc/016-7/mapflags.txt",
diff --git a/npc/016-7/_mobs.txt b/npc/016-7/_mobs.txt
new file mode 100644
index 0000000..b5b9691
--- /dev/null
+++ b/npc/016-7/_mobs.txt
@@ -0,0 +1,3 @@
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+// Map 016-7: Pirate Attack mobs
+016-7,37,29,14,4	monster	Ocean Croc	1133,6,36000,30000
diff --git a/npc/016-7/main.txt b/npc/016-7/main.txt
new file mode 100644
index 0000000..7dcf563
--- /dev/null
+++ b/npc/016-7/main.txt
@@ -0,0 +1,65 @@
+// TMW2 script
+// Author:
+//   Saulc
+//   Jesusalva
+// Description:
+//    Handles pirate attacks
+
+016-7,0,0,0	script	#MarineShipAttack	NPC_HIDDEN,117,29,{
+    end;
+
+OnEvent:
+    warp "016-7", 31, 33;
+    dispbottom l("##1The ship is under a pirate's attack! ##BKill all or survive!");
+    addtimercount "#MarineShip::OnEvent", 10000;
+    addtimer 2000, "#MarineShipAttack::OnStart";
+    end;
+
+OnStart:
+    // Define number of pirates based on player level.
+    // Player count is not important here, as this is run for every player.
+    .@c=(BaseLevel/15);
+    areamonster "016-7", 23, 25, 51, 30, strmobinfo(1, OceanPirate), OceanPirate, .@c, "#MarineShipAttack::OnPirateDie";
+    end;
+
+OnPirateDie:
+    addtimercount "#MarineShip::OnEvent", 5000;
+    if (!mobcount("016-7", "#MarineShipAttack::OnPirateDie")) {
+        addtimercount "#MarineShip::OnEvent", 15000;
+        mapannounce "016-7", l("The pirate ship captain appear! TAKE CARE!!"), bc_map;
+        .@pirate=monster("016-7", 38, 27, "Pirate Captain", OceanPirate, 1, "#MarineShipAttack::OnVictory");
+        sc_start SC_INCMHP, 900000, 1000, 10000, SCFLAG_FIXEDTICK|SCFLAG_NOAVOID|SCFLAG_NOICON, .@pirate;
+        sc_start SC_ATTHASTE_POTION1, 900000, 40, 10000, SCFLAG_FIXEDTICK|SCFLAG_NOAVOID|SCFLAG_NOICON, .@pirate;
+        sc_start SC_INCHIT, 900000, 1000, 10000, SCFLAG_FIXEDTICK|SCFLAG_NOAVOID|SCFLAG_NOICON, .@pirate;
+    }
+    end;
+
+OnVictory:
+    if (rand2(10000) < REBIRTH+((readparam2(bLuk) + readparam2(bVit)) / 2))
+        getitem PirateBandana, 1;
+    areatimer("016-7", 23, 25, 52, 35, 10, "#MarineShipAttack::OnReward");
+    end;
+
+OnReward:
+    // That would give 10% from missing exp, but I didn't like it.
+    //getexp ((NextBaseExp-BaseExp)/10), 0;
+    addtimercount "#MarineShip::OnEvent", 3500;
+
+    // Lv 40 rewards: 400 exp, 40 jxp, 200~600 GP
+    getexp BaseLevel*10, BaseLevel;
+    Zeny=Zeny+BaseLevel*rand2(5,15);
+    //getitem SailorShirt, 1; // I already tried to do this before...?
+    // 7% chance to get Crazy Rum
+    if (rand2(10000) < 700+(readparam2(bLuk)*3))
+        getitem CrazyRum, 1;
+    dispbottom l("Congratulations!");
+    if (isin("016-7", 23, 25, 52, 35))
+        addtimer(3000, "#MarineShipAttack::OnResumeTravel");
+    end;
+
+OnResumeTravel:
+    if (@timer_navio_running)
+        warp "016-6", 31, 33;
+    end;
+}
+
diff --git a/npc/016-7/mapflags.txt b/npc/016-7/mapflags.txt
new file mode 100644
index 0000000..ddc0c01
--- /dev/null
+++ b/npc/016-7/mapflags.txt
@@ -0,0 +1 @@
+016-7	mapflag	nosave	000-1,22,22