summaryrefslogtreecommitdiff
path: root/world/map/npc/functions/doomsday.txt
diff options
context:
space:
mode:
Diffstat (limited to 'world/map/npc/functions/doomsday.txt')
-rw-r--r--world/map/npc/functions/doomsday.txt140
1 files changed, 140 insertions, 0 deletions
diff --git a/world/map/npc/functions/doomsday.txt b/world/map/npc/functions/doomsday.txt
new file mode 100644
index 00000000..db8eca50
--- /dev/null
+++ b/world/map/npc/functions/doomsday.txt
@@ -0,0 +1,140 @@
+// Evol script
+// Controls Doomsday Event
+//
+// A really long event (months), controlling and being written by
+// every event which happens since doomsday program officialy started
+// in Halloween 2019 with Tormenta's release.
+//
+// This file history is written by GMs and players as the events happen
+// and therefore it is not possible to predict or add code for things which
+// are too far away from happening.
+//
+// Please keep Doomsday System simple.
+// Revert it to anything to stage once it is over.
+// It can be epic. But it doesn't needs to be.
+// But above all, this should NOT affect the merge.
+// The event purpose is to give players background history.
+
+function|script|DoomsdayDebug
+{
+ mes "$DOOMSDAY: "+$DOOMSDAY; // Event Status
+ mes "$DOOMSDAY_CNT: "+$DOOMSDAY_CNT; // Meaning Varies
+ next;
+ // Only GM 80 and above can modify Doomsday
+ // ...Yes, G_ADMIN is 80 while G_SYSOP is 99.
+ if (GM < G_ADMIN) goto L_Close;
+ mes "Setting $DOOMSDAY event state";
+ menu
+ "[0] Tormenta's Seal",L_Seal,
+ "[1] Jande's Army",L_Army,
+ "[-] Close",L_Close;
+
+L_Close:
+ return;
+
+L_Seal:
+ set $DOOMSDAY, 0;
+ donpcevent "Doomsday::OnJanitor";
+ gmlog strcharinfo(0) + " changed doomsday to Act 1: Tormenta's Seal.";
+ return;
+
+L_Army:
+ set $DOOMSDAY, 1;
+ donpcevent "Doomsday::OnJanitor";
+ gmlog strcharinfo(0) + " changed doomsday to Act 2: Jande's Army.";
+ return;
+}
+
+// Doomsday script controller
+-|script|Doomsday|32767
+{
+ close;
+
+// Destroy any artifact as doomsday mode changes
+OnJanitor:
+ // TODO: Kill monsters?
+ setnpctimer 0;
+ stopnpctimer;
+ goto OnInit;
+
+// Check for our current doomsday state
+OnInit:
+ if ($DOOMSDAY == 1)
+ goto L_Doomsday1;
+ // goto L_Check2;
+ end;
+
+L_Doomsday1:
+ // 1138 - Mana Guardian
+ // Argaes Invasion (1)
+ areamonster "017-1", 169, 49, 198, 77, "", 1138, 1, "Doomsday::OnDeathMapname";
+ // Argaes Invasion (2)
+ areamonster "012-1", 20, 47, 74, 77, "", 1138, 3, "Doomsday::OnDeathMapname";
+ // Argaes Invasion (3)
+ areamonster "057-1", 115, 50, 140, 75, "", 1138, 4, "Doomsday::OnDeathMapname";
+ // Kaizei Invasion (I)
+ areamonster "046-1", 58, 49, 92, 70, "", 1138, 2, "Doomsday::OnDeathMapname";
+ // Kaizei Invasion (II)
+ areamonster "034-1", 83, 51, 121, 98, "", 1138, 6, "Doomsday::OnDeathMapname";
+ // Tonori Invasion
+ areamonster "003-4", 20, 20, 85, 60, "", 1138, 7, "Doomsday::OnDeathMapname";
+ end;
+
+L_Doomsday1Respawn:
+ // Argaes Invasion (1)
+ set $@DoomsdayMc, mobcount("017-1", "Doomsday::OnDeathMapname")+1;
+ if ($@DoomsdayMc < 1)
+ areamonster "017-1", 169, 49, 198, 77, "", 1138, 1-$@DoomsdayMc, "Doomsday::OnDeathMapname";
+
+ // Argaes Invasion (2)
+ set $@DoomsdayMc, mobcount("012-1", "Doomsday::OnDeathMapname")+1;
+ if ($@DoomsdayMc < 3)
+ areamonster "012-1", 20, 47, 74, 77, "", 1138, 3-$@DoomsdayMc, "Doomsday::OnDeathMapname";
+
+ // Argaes Invasion (3)
+ set $@DoomsdayMc, mobcount("012-1", "Doomsday::OnDeathMapname")+1;
+ if ($@DoomsdayMc < 4)
+ areamonster "057-1", 115, 50, 140, 75, "", 1138, 4-$@DoomsdayMc, "Doomsday::OnDeathMapname";
+
+ // Kaizei Invasion (I)
+ set $@DoomsdayMc, mobcount("046-1", "Doomsday::OnDeathMapname")+1;
+ if ($@DoomsdayMc < 2)
+ areamonster "046-1", 58, 49, 92, 70, "", 1138, 2-$@DoomsdayMc, "Doomsday::OnDeathMapname";
+
+ // Kaizei Invasion (II)
+ set $@DoomsdayMc, mobcount("034-1", "Doomsday::OnDeathMapname")+1;
+ if ($@DoomsdayMc < 6)
+ areamonster "034-1", 83, 51, 121, 98, "", 1138, 6-$@DoomsdayMc, "Doomsday::OnDeathMapname";
+
+ // Tonori Invasion
+ set $@DoomsdayMc, mobcount("003-4", "Doomsday::OnDeathMapname")+1;
+ if ($@DoomsdayMc < 7)
+ areamonster "003-4", 20, 20, 85, 60, "", 1138, 7-$@DoomsdayMc, "Doomsday::OnDeathMapname";
+ // goto L_TimerCheck2;
+ goto L_TimerFinish;
+
+// Respawn logic (5 minutes)
+OnTimer300000:
+ if ($DOOMSDAY == 1)
+ goto L_Doomsday1Respawn;
+ // goto L_TimerCheck2;
+ goto L_TimerFinish;
+
+// Once all timer checks are over
+L_TimerFinish:
+ set $@DoomsdayMc, 0;
+ setnpctimer 0;
+ stopnpctimer;
+ end;
+
+// Puppet labels
+OnDeathMapname:
+ if ($DOOMSDAY == 1)
+ set $DOOMSDAY_CNT, $DOOMSDAY_CNT+1;
+ startnpctimer;
+ end;
+
+}
+
+
+