1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
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;
}
|
