summaryrefslogtreecommitdiff
path: root/npc/003-1/lieutenantdausen.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/003-1/lieutenantdausen.txt')
-rw-r--r--npc/003-1/lieutenantdausen.txt57
1 files changed, 50 insertions, 7 deletions
diff --git a/npc/003-1/lieutenantdausen.txt b/npc/003-1/lieutenantdausen.txt
index 6426e9bf7..02ae0f7ad 100644
--- a/npc/003-1/lieutenantdausen.txt
+++ b/npc/003-1/lieutenantdausen.txt
@@ -91,10 +91,13 @@ L_MKControl:
mes l("Oh noes! You've found the Tulimshar control panel!");
menu
l("Initiate small siege (lv. 20)"), L_MKSmall,
+ l("Initiate medium siege (lv. 30)"), L_MKMedium,
+ l("Initiate huge siege (lv. 40)"), L_MKHuge,
l("Abort"), -;
close;
L_MKSmall:
+ $@SIEGE_TULIM=0; // factor zero
pvpon("003-1");
pvpon("004-1");
announce(l("##1WARNING! WARNING! Siege starting at Tulimshar!!"), bc_all);
@@ -102,6 +105,24 @@ L_MKSmall:
initnpctimer;
close;
+L_MKMedium:
+ $@SIEGE_TULIM=1; // factor one
+ pvpon("003-1");
+ pvpon("004-1");
+ announce(l("##1WARNING! WARNING! Siege starting at Tulimshar!!"), bc_all);
+ areamonster("004-1", 0, 0, 79, 81, l("Black Scorpion"), 1074, 15, "Lieutenant Dausen::OnBlackScorpionDeath");
+ initnpctimer;
+ close;
+
+L_MKHuge:
+ $@SIEGE_TULIM=5; // factor five
+ pvpon("003-1");
+ pvpon("004-1");
+ announce(l("##1WARNING! WARNING! Siege starting at Tulimshar!!"), bc_all);
+ areamonster("004-1", 0, 0, 79, 81, l("Black Scorpion"), 1074, 30, "Lieutenant Dausen::OnBlackScorpionDeath");
+ initnpctimer;
+ close;
+
OnBlackScorpionDeath:
areamonster("004-1", 0, 0, 79, 81, l("Black Scorpion"), 1074, 1, "Lieutenant Dausen::OnBlackScorpionDeath");
if (rand(10000) <= 100)
@@ -132,9 +153,22 @@ OnManaGhostDeath:
getitem StrangeCoin, 1;
end;
+OnLieutenantDeath:
+ getitem StrangeCoin, 1;
+ Karma=Karma+1;
+ mapannounce("003-1", l("##2The Monster Lieutenant was defeated by @@!", strcharinfo(0)), bc_map);
+ end;
+
+OnColonelDeath:
+ getitem StrangeCoin, 1;
+ Karma=Karma+1;
+ set $MOST_HEROIC$=strcharinfo(0);
+ mapannounce("003-1", l("##2The Monster Colonel was defeated by @@!", strcharinfo(0)), bc_map);
+ end;
+
OnTimer5000:
- areamonster("004-1", 0, 0, 79, 81, "Black Scorpion", 1074, 5, "Lieutenant Dausen::OnBlackScorpionDeath");
- areamonster("003-1", 0, 0, 120, 155, "Black Scorpion", 1074, 5, "Lieutenant Dausen::OnBlackScorpion2Death");
+ areamonster("004-1", 0, 0, 79, 81, "Black Scorpion", 1074, 5+$@SIEGE_TULIM, "Lieutenant Dausen::OnBlackScorpionDeath");
+ areamonster("003-1", 0, 0, 120, 155, "Black Scorpion", 1074, 5+$@SIEGE_TULIM, "Lieutenant Dausen::OnBlackScorpion2Death");
mapannounce("003-1", "##2Message to all Tulimshar NPCs: Take shelter!", bc_map);
disablenpc "Ched";
disablenpc "Aahna";
@@ -173,12 +207,20 @@ OnTimer15000:
end;
OnTimer60000:
+ if ($@SIEGE_TULIM == 1) {
+ mapannounce("003-1", "##1The Monster Lieutenant arrived!", bc_map);
+ areamonster("003-1", 0, 0, 120, 155, ("Monster Lieutenant"), 1077, 1, "Lieutenant Dausen::OnLieutenantDeath");
+ }
areamonster("003-1", 0, 0, 120, 155, ("Black Scorpion"), 1074, 3, "Lieutenant Dausen::OnBlackScorpion2Death");
- areamonster("003-1", 0, 0, 120, 155, ("Green Slime"), 1085, 10, "Lieutenant Dausen::OnGreenSlimeDeath");
- areamonster("003-1", 0, 0, 120, 155, ("Candied Slime"), 1089, 1, "Lieutenant Dausen::OnCandiedSlimeDeath");
+ areamonster("003-1", 0, 0, 120, 155, ("Green Slime"), 1085, 10+$@SIEGE_TULIM, "Lieutenant Dausen::OnGreenSlimeDeath");
+ areamonster("003-1", 0, 0, 120, 155, ("Candied Slime"), 1089, 1+$@SIEGE_TULIM, "Lieutenant Dausen::OnCandiedSlimeDeath");
end;
OnTimer120000:
+ if ($@SIEGE_TULIM == 5) {
+ mapannounce("003-1", "##1The Monster Colonel arrived!", bc_map);
+ areamonster("003-1", 0, 0, 120, 155, ("Monster Colonel"), 1036, 1, "Lieutenant Dausen::OnColonelDeath");
+ }
areamonster("003-1", 0, 0, 120, 155, ("Slime Blast"), 1090, 15);
areamonster("003-1", 0, 0, 120, 155, ("Black Scorpion"), 1074, 1, "Lieutenant Dausen::OnBlackScorpion2Death");
areamonster("003-1", 0, 0, 120, 155, ("Green Slime"), 1085, 10, "Lieutenant Dausen::OnGreenSlimeDeath");
@@ -207,13 +249,13 @@ OnTimer300000:
OnTimer360000:
OnTimer420000:
OnTimer480000:
- areamonster("003-1", 0, 0, 120, 155, ("Slime Blast"), 1090, 5);
- areamonster("003-1", 0, 0, 120, 155, ("Red Slime"), 1092, 1);
+ areamonster("003-1", 0, 0, 120, 155, ("Slime Blast"), 1090, 5+$@SIEGE_TULIM);
+ areamonster("003-1", 0, 0, 120, 155, ("Red Slime"), 1092, 1+$@SIEGE_TULIM);
end;
OnTimer540000:
mapannounce("003-1", "##1The Monster Army is getting tired of resistance!", bc_map);
- areamonster("003-1", 0, 0, 120, 155, ("Slime Blast"), 1090, 5);
+ areamonster("003-1", 0, 0, 120, 155, ("Slime Blast"), 1090, 5+$@SIEGE_TULIM);
areamonster("003-1", 0, 0, 120, 155, ("Mana Ghost"), 1068, 1, "Lieutenant Dausen::OnManaGhostDeath");
end;
@@ -222,6 +264,7 @@ OnTimer600000:
end;
OnTimer630000:
+ $@SIEGE_TULIM$=0;
killmonsterall("003-1", 0);
killmonsterall("004-1", 0);
pvpoff("003-1");