From 1192c4575ea7afdf38e3fa0df4587a08620af11e Mon Sep 17 00:00:00 2001
From: root <root@dc13.lemmi>
Date: Tue, 21 Jul 2020 10:00:46 +0200
Subject: SZS v2.18a

---
 project/scripts/kcl/minimap.txt | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 project/scripts/kcl/minimap.txt

(limited to 'project/scripts/kcl/minimap.txt')

diff --git a/project/scripts/kcl/minimap.txt b/project/scripts/kcl/minimap.txt
new file mode 100644
index 0000000..a79ac08
--- /dev/null
+++ b/project/scripts/kcl/minimap.txt
@@ -0,0 +1,17 @@
+
+@def start	= mSec()	# start time
+@def mod_count	= 0		# modification counter
+
+@function isRoad # flag
+    @pdef t = $1 & 0x1f
+    @return t <= 0x05 || t == 0x17 || t == 0x1d
+@endfunction
+
+@for t=0;tri$n()-1
+    @if !isRoad(tri$flag(t,2))
+	@def status = tri$remove(t)
+    @endif
+@endfor
+
+@echo "  - " mod_count " of " tri$n() " triangles lowered in " (mSec()-start) " msec."
+
-- 
cgit v1.3.1