By popular demand: Sieges are back

4 files changed, 49 insertions, 4 deletions

diff --git a/npc/functions/aurora.txt b/npc/functions/aurora.txt
index d754f8e5d..fbad772e7 100644
--- a/npc/functions/aurora.txt
+++ b/npc/functions/aurora.txt
@@ -136,8 +136,13 @@ function	script	FYNewEvent	{
         kamibroadcast("Magic Olympics are now open!", "Aurora Events");
         break;
     case 9:
-        $EVENT$="Rebirth";
-        kamibroadcast("Rebirth Season has begun!", "Aurora Events");
+        if ($GAME_STORYLINE < 5) {
+            $EVENT$="Rebirth";
+            kamibroadcast("Rebirth Season has begun!", "Aurora Events");
+        } else {
+            $EVENT$="Siege";
+            kamibroadcast("Siege Season has begun!", "Aurora Events");
+        }
         break;
     case 10:
         $EVENT$="Fishing";
@@ -729,7 +734,7 @@ function	script	FYE_Submit	{
 
 // Stops any Aurora Event
 function	script	FYStopEvent	{
-    setarray .@av$, "Kamelot", "Regnum", "Expo", "Fishing", "Candor", "Mining", "Tower", "Raid", "Olympics", "Celestia", "Rebirth", "Gemini";
+    setarray .@av$, "Kamelot", "Regnum", "Expo", "Fishing", "Candor", "Mining", "Tower", "Raid", "Olympics", "Celestia", "Rebirth", "Siege", "Gemini";
     if (array_find(.@av$, $EVENT$) >= 0) {
         sClear();
         $EVENT$="";
diff --git a/npc/functions/event.txt b/npc/functions/event.txt
index 96525148a..37832a316 100644
--- a/npc/functions/event.txt
+++ b/npc/functions/event.txt
@@ -190,6 +190,34 @@ OnTimer90000:
         channelmes("#world", "An event is happening on Aeros! Hurry up!");
     }
 
+    // Handle Siege season
+    if ($EVENT$ == "Siege" && (.users >= 3 || $@GM_OVERRIDE) && !$@MK_SCENE && !$@GM_EVENT && rand2(99999) < .users) {
+        $@SIEGE_ABORTED = false;
+        .@towns = rand2(1, 15);
+        kamibroadcast("Monster King! Seize and destroy some towns!", "Moubootaur");
+        // Tulimshar
+        if (.@towns & 1) {
+            $@MK_SCENE=MK_SIEGE_TULIM;
+            donpcevent("Lieutenant Dausen::OnMKSiege");
+        }
+        // Halinarzo
+        if (.@towns & 2) {
+            $@MK_SCENE=MK_SIEGE_HALIN;
+            donpcevent("Lieutenant Jacob::OnMKSiege");
+        }
+        // Hurnscald
+        if (.@towns & 4) {
+            $@MK_SCENE=MK_SIEGE_HURNS;
+            donpcevent("#HurnscaldSiege::OnMKSiege");
+        }
+        // Nivalis
+        if (.@towns & 8) {
+            $@MK_SCENE=MK_SIEGE_NIVAL;
+            donpcevent("Lieutenant Joshua::OnMKSiege");
+        }
+
+    }
+
     initnpctimer;
     end;
 
diff --git a/npc/functions/mobpoint.txt b/npc/functions/mobpoint.txt
index 3e52930a9..f7793fbd5 100644
--- a/npc/functions/mobpoint.txt
+++ b/npc/functions/mobpoint.txt
@@ -43,7 +43,7 @@ function	script	mobpoint	{
     .@addval=max(0, .@addval);
 
     // Events (+10% Mob Points)
-    if ($EVENT$ == "Rebirth")
+    if ($EVENT$ == "Rebirth" || $EVENT$ == "Siege")
         .@addval = .@addval * 11 / 10;
 
     // Hardcore Server special rules (3× Monster Points)
diff --git a/npc/functions/news.txt b/npc/functions/news.txt
index b5840ae49..1d99318d2 100644
--- a/npc/functions/news.txt
+++ b/npc/functions/news.txt
@@ -312,6 +312,18 @@ function	script	EventHelp	{
         mes l("Also: You'll be able to rebirth at Tulimshar with Jakod. What are you waiting for?!");
         mesc l("Location: Not applicable"), 3;
         /////////////////////////////////////////////////////////////////////////
+    } else if ($EVENT$ == "Siege") {
+        mesc ".:: " + l("Siege Season") + " ::.", 2;
+        mes "";
+        mes l("During this season, monster point gain is increased in %d%%!", 10);
+        mes l("Warp Crystals will also break much less, and Time Flasks will recharge faster!");
+        if (getq(LoFQuest_COD))
+         mes l("Call of Dusty event, in Land of Fire, also outputs more rewards.");
+        mes "";
+        mes l("The Monster King puppet and the Moubootaur army will randomly siege towns, so be always ready for the random sieges.");
+        mes "";
+        mesc l("Location: Not applicable"), 3;
+        /////////////////////////////////////////////////////////////////////////
     } else if ($EVENT$ == "Tower") {
         mesc ".:: " + l("Dream Tower Appears") + " ::.", 2;
         mes "";