BRACE YOURSELVES! PIRATE ATTACK!!

1 files changed, 47 insertions, 0 deletions

diff --git a/npc/016-7/main.txt b/npc/016-7/main.txt
new file mode 100644
index 000000000..05bf32b35
--- /dev/null
+++ b/npc/016-7/main.txt
@@ -0,0 +1,47 @@
+// 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!");
+    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/10);
+    areamonster "016-7", 23, 25, 52, 35, strmobinfo(1, OceanPirate), OceanPirate, .@c, "#MarineShipAttack::OnPirateDie";
+    end;
+
+OnPirateDie:
+    if (!mobcount("016-7", "#MarineShipAttack::OnPirateDie")) {
+        mapannounce l("The pirate ship captain appear! TAKE CARE!!"), bc_map;
+        monster "016-7", 38, 27, "Pirate Captain", OceanPirate, "#MarineShipAttack::OnVictory";
+    }
+    end;
+
+OnVictory:
+    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;
+
+    // Lv 40 rewards: 400 exp, 40 jxp, 200~600 GP
+    getexp BaseLevel*10, BaseLevel;
+    Zeny=Zeny+BaseLevel*rand(5,15);
+    dispbottom l("Congratulations!");
+    if (isin("016-7", 23, 25, 52, 35))
+        warp "016-6", 31, 33;
+    end;
+}
+