summaryrefslogtreecommitdiff
path: root/ers_mtn
diff options
context:
space:
mode:
Diffstat (limited to 'ers_mtn')
-rw-r--r--ers_mtn/init_code.lua39
-rw-r--r--ers_mtn/nodes/(1779,10,1235).lua91
-rw-r--r--ers_mtn/nodes/(1787,3,1264).lua16
-rw-r--r--ers_mtn/nodes/(1793,3,1264).lua16
-rw-r--r--ers_mtn/nodes/(1793,3,1280).lua8
-rw-r--r--ers_mtn/nodes/(1820,15,1223).lua3
-rw-r--r--ers_mtn/nodes/(1878,119,1237).lua4
-rw-r--r--ers_mtn/nodes/(1896,137,1246).lua6
8 files changed, 183 insertions, 0 deletions
diff --git a/ers_mtn/init_code.lua b/ers_mtn/init_code.lua
new file mode 100644
index 0000000..6e52905
--- /dev/null
+++ b/ers_mtn/init_code.lua
@@ -0,0 +1,39 @@
+
+
+-- Gleis A
+-- 1787,3,1264
+
+-- Gleis B
+-- 1793,3,1264
+
+-- erste Brücke
+-- 1820,15,1223
+
+
+local gleisliste = {
+{ "gleisa", "Gleis A",{1787,3,1264} },
+{ "gleisb", "Gleis B", {1793,3,1264} },
+{ "erstebruecke", "erste Bruecke", {1820,15,1223 } },
+{ "kniebeuge", "Kniebeugebahnhof", { 1896, 137, 1246 } },
+}
+
+
+
+
+
+S.atctracks = {}
+
+
+for _,e in ipairs(gleisliste) do
+ S.atctracks[e[1]] = e[2]
+end
+
+
+S.daten = {}
+
+S.section = {}
+
+
+F.update = function()
+return
+end \ No newline at end of file
diff --git a/ers_mtn/nodes/(1779,10,1235).lua b/ers_mtn/nodes/(1779,10,1235).lua
new file mode 100644
index 0000000..3de7f76
--- /dev/null
+++ b/ers_mtn/nodes/(1779,10,1235).lua
@@ -0,0 +1,91 @@
+--
+--
+-- 1779,10,1235
+
+
+
+local einblendung = {
+{ " Bergbahn Zugpositionen", "", "", "" },
+{ "", "", "", "" },
+{ "", "", "", "" },
+{ "", "Tal:", "Gleis A/B: %-6s %-6s", "Gleis A Gleis B" },
+}
+
+-- ------------------------------
+
+
+
+local function disp_update()
+
+ for t=1,4 do
+ local tl = ""
+ for z=1,4 do
+ if z>1 then tl = tl.."\n" end
+ local h = einblendung[t][z]
+ if #h < 1 then h = " " end
+ tl = tl .. h
+ end
+ digiline_send("txt"..t,tl)
+ end
+ return
+end
+
+-- ------------------------------
+
+
+if event.type == "punch" then
+ local text = " AUA!!!"
+ for i=1,4 do
+ digiline_send("txt"..i," "..i.."\n"..text)
+ end
+
+ interrupt(10,"clear")
+ return
+end
+
+
+if event.type == "int" then
+ if event.message == "clear" then
+ disp_update()
+-- for i=1,4 do
+-- digiline_send("txt"..i,i)
+-- end
+ end
+ return
+end
+
+
+
+
+local zeilen = {"gleisa","gleisb","tal" }
+
+
+if event.type == "ext_int" then
+ local nachricht = event.message
+ if nachricht == nil then return end
+ if type(nachricht) == "string" then
+ if nachricht == "update" then
+ local t
+ local z
+ local e=1
+ for t = 1,4 do
+ local ausgabe = ""
+ for z = 1,4 do
+ if z>1 then ausgabe = ausgabe.."\n" end
+ ausgabe = ausgabe .. S.daten[e]
+ e = e+1
+ end
+ digiline_send("txt"..t,ausgabe)
+ end
+ return
+ end
+ return
+ end
+ if type(nachricht) == "table" then
+ if not nachricht.von_pos then return end
+
+ return
+ end
+ return
+end
+
diff --git a/ers_mtn/nodes/(1787,3,1264).lua b/ers_mtn/nodes/(1787,3,1264).lua
new file mode 100644
index 0000000..aa971c6
--- /dev/null
+++ b/ers_mtn/nodes/(1787,3,1264).lua
@@ -0,0 +1,16 @@
+--
+--
+-- 1787,3,1264
+
+
+if event.type == "train" then
+ if atc_arrow then
+ S.section.gleis_a = nil
+ S.section.tal = event.id
+ else
+ S.section.gleis_a = event.id
+ S.section.tal = nil
+ end
+ F.update()
+ return
+end \ No newline at end of file
diff --git a/ers_mtn/nodes/(1793,3,1264).lua b/ers_mtn/nodes/(1793,3,1264).lua
new file mode 100644
index 0000000..084819f
--- /dev/null
+++ b/ers_mtn/nodes/(1793,3,1264).lua
@@ -0,0 +1,16 @@
+-- erstazi mountain
+--
+-- 1793,3,1264
+
+
+if event.type == "train" then
+ if atc_arrow then
+ S.section.gleis_b = nil
+ S.section.tal = event.id
+ else
+ S.section.gleis_b = event.id
+ S.section.tal = nil
+ end
+ F.update()
+ return
+end \ No newline at end of file
diff --git a/ers_mtn/nodes/(1793,3,1280).lua b/ers_mtn/nodes/(1793,3,1280).lua
new file mode 100644
index 0000000..dd48338
--- /dev/null
+++ b/ers_mtn/nodes/(1793,3,1280).lua
@@ -0,0 +1,8 @@
+--
+--
+--
+-- stop for trains which should not run
+--
+-- 1793,3,1280
+--
+--
diff --git a/ers_mtn/nodes/(1820,15,1223).lua b/ers_mtn/nodes/(1820,15,1223).lua
new file mode 100644
index 0000000..6e759ad
--- /dev/null
+++ b/ers_mtn/nodes/(1820,15,1223).lua
@@ -0,0 +1,3 @@
+--
+--
+-- 1820,15,1223 \ No newline at end of file
diff --git a/ers_mtn/nodes/(1878,119,1237).lua b/ers_mtn/nodes/(1878,119,1237).lua
new file mode 100644
index 0000000..812195b
--- /dev/null
+++ b/ers_mtn/nodes/(1878,119,1237).lua
@@ -0,0 +1,4 @@
+--
+--
+-- 1878,119,1237
+--
diff --git a/ers_mtn/nodes/(1896,137,1246).lua b/ers_mtn/nodes/(1896,137,1246).lua
new file mode 100644
index 0000000..d0cf0ba
--- /dev/null
+++ b/ers_mtn/nodes/(1896,137,1246).lua
@@ -0,0 +1,6 @@
+--
+--
+-- 1896, 137, 1246
+--
+
+-- "kniebeuge", { 1896, 137, 1246 } \ No newline at end of file