From 77a8522b9a7a7125447b059af90debc7c5c506e6 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Wed, 13 Jan 2021 19:19:23 -0300
Subject: Conditional connection between 025-1 and 025-2 Blacklist check
 included, but no name is written on it... Yet.

---
 npc/025-1/_import.txt |  1 +
 npc/025-1/_warps.txt  |  3 +++
 npc/025-1/ctrl.c      | 20 ++++++++++++++++++++
 3 files changed, 24 insertions(+)
 create mode 100644 npc/025-1/_warps.txt

(limited to 'npc/025-1')

diff --git a/npc/025-1/_import.txt b/npc/025-1/_import.txt
index 50631a93c..348924636 100644
--- a/npc/025-1/_import.txt
+++ b/npc/025-1/_import.txt
@@ -2,6 +2,7 @@
 // This file is generated automatically. All manually added changes will be removed when running the Converter.
 "npc/025-1/_config.txt",
 "npc/025-1/_mobs.txt",
+"npc/025-1/_warps.txt",
 "npc/025-1/ctrl.c",
 "npc/025-1/ihclot.txt",
 "npc/025-1/phoenix.txt",
diff --git a/npc/025-1/_warps.txt b/npc/025-1/_warps.txt
new file mode 100644
index 000000000..b2ec269ec
--- /dev/null
+++ b/npc/025-1/_warps.txt
@@ -0,0 +1,3 @@
+// This file is generated automatically. All manually added changes will be removed when running the Converter.
+// Map 025-1: Fortress Town - Holy Land warps
+025-1,100,123,0	warp	#025-1_100_123	7,0,025-2,99,25
diff --git a/npc/025-1/ctrl.c b/npc/025-1/ctrl.c
index 483f70c5f..44cba78e8 100644
--- a/npc/025-1/ctrl.c
+++ b/npc/025-1/ctrl.c
@@ -13,6 +13,8 @@
 //      $@FORTRESS_STATUE = bitmask
 //          1,2,4,8,16 - broken statues
 //          1024 - Fortress Gate
+//      $@FORT_BLACKLIST = int array
+//          Char ID which already raided this week
 // TODO: Use bg() - maybe with dummysd? What will increase allies count?
 // TODO: Gate control during siege (not $FORTRESS_STATE). Gate monster.
 // TODO: Spawn the monster general for each statue. Count their deaths.
@@ -57,6 +59,7 @@ function	script	FTCleanup	{
         donpcevent "#025-1_99_112::OnEnable";
         mapwarp("025-1", "025-2", 100, 27);
     }
+    deletearray $@FORT_BLACKLIST;
     return;
 }
 
@@ -136,6 +139,7 @@ function	script	FTStatue	{
     // TODO: Initial defending waves
     // TODO: Enable the statues
     // TODO: Summon reinforcements
+    // TODO: Player blacklist (unable to use 025-2 warp)
     close;
 
 /////////////////////////////////////////////////////////
@@ -185,4 +189,20 @@ OnTouch:
 
 
 
+/////////////////////////////////////////////////////////
+// Real access to 025-1 map
+025-2,96,24,0	script	Fortress Town Access	NPC_HIDDEN,8,0,{
+    end;
+OnTouch:
+    // Disabled
+    if ($GAME_STORYLINE < 3 && !$@GM_OVERRIDE && !is_gm())
+        end;
+    // Blacklisted
+    if (array_find($@FORT_BLACKLIST, getcharid(0)) != -1)
+        end;
+    // Not blacklisted
+    warp "025-1", 99, 122;
+    end;
+}
+
 
-- 
cgit v1.2.3-60-g2f50