summaryrefslogtreecommitdiff
path: root/npc
diff options
context:
space:
mode:
Diffstat (limited to 'npc')
-rw-r--r--npc/008-0/master.txt1
-rw-r--r--npc/008-1/master.txt36
-rw-r--r--npc/008-2/_import.txt3
-rw-r--r--npc/008-2/master.txt153
-rw-r--r--npc/_import.txt1
5 files changed, 177 insertions, 17 deletions
diff --git a/npc/008-0/master.txt b/npc/008-0/master.txt
index 7a7f3ed8c..4c6fecea4 100644
--- a/npc/008-0/master.txt
+++ b/npc/008-0/master.txt
@@ -3,6 +3,7 @@
// Jesusalva
// Description:
// This NPC is a work on progress. It measures all players equal.
+// Controls the whole dungeon feature.
008-0,47,63,0 script Party Master NPC_BRGUARD_SWORD,{
mesn;
diff --git a/npc/008-1/master.txt b/npc/008-1/master.txt
index a3394581f..ad9f1d53b 100644
--- a/npc/008-1/master.txt
+++ b/npc/008-1/master.txt
@@ -3,8 +3,9 @@
// Jesusalva
// Description:
// This NPC is a work on progress. It measures all players equal.
+// Controls the first floor, but not many things to control.
-008-1,48,117,0 script #FPDM1 NPC_HIDDEN,0,0,{
+008-1,48,117,0 script #FPDM12 NPC_HIDDEN,0,0,{
end;
OnTouch:
// IMPORTANT: Prevent party master from returning here
@@ -16,13 +17,14 @@ OnTouch:
mobcount("008-1", "First Dungeon Master::OnBossDeath") == 0 &&
@pmloop) {
dispbottom l("Go and follow @@, your party leader!", getpartyleader(getcharid(1)));
- warp "008-1", 176, 20; // 008-2
+ warp "008-2", 135, 20;
} else if (BaseLevel > 20) {
dispbottom l("If I bring @@, my party leader, and the boss is defeated, I can go you in.", getpartyleader(getcharid(1)));
} else {
mesc l("I cannot pass, because I am only level @@.", BaseLevel);
mesc l("Newbies can only get past their limits once, with their party leader level help! If they die, they can't rejoin!");
- // I thought it would be better this way. There was at least three different ways to prevent that.
+ // I thought it would be better to allow first passage based on leader level.
+ // Parties are not meant to be permanent, and this helps a lot.
}
end;
}
@@ -47,6 +49,7 @@ OnTouch:
mesq l("I can summon the BOSS for the level 0~20 area.");
next;
if (strcharinfo(0) != getpartyleader(getcharid(1))) goto L_NotYou;
+ if (BaseLevel < 20) goto L_TooWeak;
mesn;
mesq l("He is strong though, so keep your party togheter!");
next;
@@ -106,35 +109,34 @@ L_TooSmall:
mesq l("However, I need to see at least three volunteers here, to allow you in.");
close;
-// Second Floor special monsters
-OnMobTime:
- getmapxy(.@m$, .@x, .@y, 0);
- areatimer(.@m$, .@x-4, .@y-4, .@x+4, .@y+4, 10, "Party Master::OnAddTime");
- end;
+// Must have level to face boss
+L_TooWeak:
+ mesn;
+ mesq l("This is the end for your party, as the leader doesn't have sufficient level.");
+ close;
+// Second Floor special monsters
OnReward:
Zeny=Zeny+200;
getexp 200, 20;
dispbottom l("Reward: 200 GP, 200 XP");
-OnAddTime:
- @pmloop=60;
- end;
+// Boss death causes 008-2 to be set
OnBossDeath:
// Give every party member in map a reward
partytimer("008-1", 200, "First Dungeon Master::OnReward", getcharid(1));
// Warp everyone and add timers
- warpparty("008-1", 176, 20, getcharid(1), "008-1", true);
+ warpparty("008-2", 135, 20, getcharid(1), "008-1", true);
// Bonus Monsters
- monster("008-1", 90, 69, "Time Bonus", Scorpion, 1, "Party Master::OnMobTime");
+ monster("008-2", 90, 69, "Time Bonus", Scorpion, 1, "Party Master::OnMobTime");
// Four Chests
- monster("008-1", 38, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
- monster("008-1", 41, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
- monster("008-1", 44, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
- monster("008-1", 47, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ monster("008-2", 38, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ monster("008-2", 41, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ monster("008-2", 44, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ monster("008-2", 47, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
end;
OnInit:
diff --git a/npc/008-2/_import.txt b/npc/008-2/_import.txt
new file mode 100644
index 000000000..f5787ded6
--- /dev/null
+++ b/npc/008-2/_import.txt
@@ -0,0 +1,3 @@
+// Map 008-2: 2nd Floor - Party Dungeon
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+"npc/008-2/master.txt",
diff --git a/npc/008-2/master.txt b/npc/008-2/master.txt
new file mode 100644
index 000000000..89044832b
--- /dev/null
+++ b/npc/008-2/master.txt
@@ -0,0 +1,153 @@
+// TMW-2 Script
+// Author:
+// Jesusalva
+// Description:
+// This NPC is a work on progress. It measures all players equal.
+// Controls the second floor
+
+// 21: From 2 to 1
+008-2,135,19,0 script #FPDM21 NPC_HIDDEN,0,0,{
+ end;
+OnTouch:
+ // Party leader cannot retreat
+ if (strcharinfo(0) == getpartyleader(getcharid(1)))
+ dispbottom l("As the leader of your party, you can only go forward.");
+ else
+ warp "008-1", 43, 104;
+ end;
+}
+
+008-2,135,19,0 script #FPDM23 NPC_HIDDEN,0,0,{
+ end;
+OnTouch:
+ // IMPORTANT: Prevent party master from returning here
+ getmapxy(.@m$, .@x, .@y, 0, getpartyleader(getcharid(1)));
+ if (.@m$ ~= "008-*" &&
+ .@m$ != "008-0" &&
+ .@m$ != "008-1" &&
+ BaseLevel > 20 &&
+ mobcount("008-1", "First Dungeon Master::OnBossDeath") == 0 &&
+ @pmloop) {
+ dispbottom l("Go and follow @@, your party leader!", getpartyleader(getcharid(1)));
+ warp "008-1", 176, 20; // 008-2
+ } else if (BaseLevel > 20) {
+ dispbottom l("If I bring @@, my party leader, and the boss is defeated, I can go you in.", getpartyleader(getcharid(1)));
+ } else {
+ mesc l("I cannot pass, because I am only level @@.", BaseLevel);
+ mesc l("Newbies can only get past their limits once, with their party leader level help! If they die, they can't rejoin!");
+ // I thought it would be better this way. There was at least three different ways to prevent that.
+ }
+ end;
+}
+
+008-2,0,0,0 script Second Dungeon Master NPC_BRGUARD_SWORD,{
+ // Double-check, you should have been flung out long ago.
+ if (getcharid(1) <= 0) {
+ mesn;
+ mesq l("Leaving your party? LAME.");
+ warp "SavePoint",0,0;
+ }
+ if (mobcount("008-1", "First Dungeon Master::OnBossDeath") > 0) {
+ npctalk3 l("What are you doing? Fight!");
+ end;
+ }
+
+ mesn;
+ mesq l("Compliments reaching this far, @@ from the @@ party!", strcharinfo(0), getpartyname(getcharid(1)));
+ next;
+
+ mesn;
+ mesq l("I can summon the BOSS for the level 0~20 area.");
+ next;
+ if (strcharinfo(0) != getpartyleader(getcharid(1))) goto L_NotYou;
+ mesn;
+ mesq l("He is strong though, so keep your party togheter!");
+ next;
+ // Get info about your party, and backup it
+ getpartymember(getcharid(1));
+ .@count = $@partymembercount;
+ copyarray(.@name$[0], $@partymembername$[0], $@partymembercount);
+ copyarray(.@aid[0], $@partymemberaid[0], $@partymembercount);
+ copyarray(.@cid[0], $@partymembercid[0], $@partymembercount);
+ .@count_online=0;
+
+ if (.@count < 3 && !$@GM_OVERRIDE) goto L_TooSmall;
+ mesn;
+ mesc l("Are you and your party ready?"), 1;
+ if (askyesno() != ASK_YES)
+ close;
+
+ // Loop though party to see if you can start
+ for (.@i = 0; .@i < .@count; ++.@i) {
+ // Online?
+ if (isloggedin(.@aid[.@i], .@cid[.@i])) {
+ getmapxy(.@m$, .@x, .@y, 0, .@name$[.@i]);
+ // Here?
+ if (.@m$ == .map$)
+ .@count_online++;
+ }
+ }
+
+ // How many are logged in and here?
+ if (.@count_online < 3 && !$@GM_OVERRIDE) goto L_TooSmall;
+
+ // TODO: Query if exp sharing is enabled
+ // TODO: Instance for party
+ // TODO: Second Floor
+ npctalk l("@@: Fight!", getpartyname(getcharid(1)));
+ monster "008-1", rand(37,54), rand(109,122), "First Dungeon Boss", Sarracenus, 1, "First Dungeon Master::OnBossDeath";
+ close;
+
+
+
+
+
+
+
+
+
+
+// Only the party leader can start this.
+L_NotYou:
+ mesn;
+ dispbottom l("Go and fetch @@, the party leader!", getpartyleader(getcharid(1)));
+ close;
+
+// Minimum 3 players
+L_TooSmall:
+ mesn;
+ mesq l("However, I need to see at least three volunteers here, to allow you in.");
+ close;
+
+// Second Floor special monsters
+OnReward:
+ Zeny=Zeny+200;
+ getexp 200, 20;
+ dispbottom l("Reward: 200 GP, 200 XP");
+OnAddTime:
+ @pmloop=60;
+ end;
+
+OnBossDeath:
+ // Give every party member in map a reward
+ partytimer("008-1", 200, "First Dungeon Master::OnReward", getcharid(1));
+
+ // Warp everyone and add timers
+ warpparty("008-1", 176, 20, getcharid(1), "008-1", true);
+
+ // Bonus Monsters
+ monster("008-1", 90, 69, "Time Bonus", Scorpion, 1, "Party Master::OnMobTime");
+
+ // Four Chests
+ monster("008-1", 38, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ monster("008-1", 41, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ monster("008-1", 44, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ monster("008-1", 47, 104, "Mysterious Chest", any(BronzeChest, BronzeMimic), 1);
+ end;
+
+OnInit:
+ .sex = G_MALE;
+ .distance = 5;
+ end;
+}
+
diff --git a/npc/_import.txt b/npc/_import.txt
index 52dca225c..a95cc10b9 100644
--- a/npc/_import.txt
+++ b/npc/_import.txt
@@ -48,6 +48,7 @@
@include "npc/007-1/_import.txt"
@include "npc/008-0/_import.txt"
@include "npc/008-1/_import.txt"
+@include "npc/008-2/_import.txt"
@include "npc/009-1/_import.txt"
@include "npc/009-2/_import.txt"
@include "npc/009-3/_import.txt"