From 7c33d9f46270227afdc29c2203b47495463429f2 Mon Sep 17 00:00:00 2001
From: Jesusaves <cpntb1@ymail.com>
Date: Sat, 26 Jan 2019 15:33:44 -0200
Subject: Ok, random treasure chests works, scatter them on the major dungeons.

---
 npc/018-3/_import.txt  |  1 +
 npc/018-3/treasure.txt | 65 ++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 66 insertions(+)
 create mode 100644 npc/018-3/treasure.txt

(limited to 'npc/018-3')

diff --git a/npc/018-3/_import.txt b/npc/018-3/_import.txt
index 97be42bc6..54aa6695c 100644
--- a/npc/018-3/_import.txt
+++ b/npc/018-3/_import.txt
@@ -2,3 +2,4 @@
 // This file is generated automatically. All manually added changes will be removed when running the Converter.
 "npc/018-3/_mobs.txt",
 "npc/018-3/_warps.txt",
+"npc/018-3/treasure.txt",
diff --git a/npc/018-3/treasure.txt b/npc/018-3/treasure.txt
new file mode 100644
index 000000000..002f16b67
--- /dev/null
+++ b/npc/018-3/treasure.txt
@@ -0,0 +1,65 @@
+// TMW2 Script
+
+// (Random) Treasure Chest
+//  Authored by Jesusalva
+// Regenerates every 6 hours
+
+018-3,0,0,0	script	#chest_01830	NPC_CHEST,{
+
+   if (!.busy && !.empty) {
+        TreasureBox();
+
+        .empty=true;
+        specialeffect(.dir == 0 ? 24 : 25, AREA, getnpcid()); // closed ? opening : closing
+        .dir = .dir == 0 ? 2 : 6; // closed ? opening : closing
+        .busy = true; // lock until available again
+        initnpctimer;
+    } else if (!.busy) {
+        mesc l("Someone looted this treasure box already...");
+    } else {
+        end;
+    }
+    close;
+
+OnTimer160:
+    .dir = .dir == 6 ? 0 : 4; // closing ? closed : open
+    end;
+
+OnTimer500:
+    .busy = false; // unlock
+    if (.dir == 0 || .dir == 4)
+        stopnpctimer; // stop here if the chest is closed
+    end;
+
+OnInit:
+    .busy = false;
+    .distance = 2;
+    .empty = false;
+
+OnClock0156:
+OnClock0756:
+OnClock1356:
+OnClock1956:
+    // Try to warp randomly to a walkable spot, up to 20 attempts
+    // Otherwise, it'll stay where it already is (but will close and refill).
+    .@e=0; .@x=0; .@y=0;
+   while (!checkcell(.map$, .@x, .@y, cell_chkpass))
+    {
+        if (.@e == 20) {
+            .@x=.x;
+            .@y=.y;
+            break;
+        }
+        // Remember the +20 -20 margin adjustment
+        .@x = rand(20, 130);
+        .@y = rand(20, 130);
+        ++.@e;
+    }
+    .busy=false;
+    .empty=false;
+    movenpc .name$, .@x, .@y, 0;
+    end;
+}
+
+018-3,0,0,0	duplicate(#chest_01830)	#chest_01831	NPC_CHEST
+
-- 
cgit v1.2.3-70-g09d2