State at 2020-06-24

17 files changed, 49 insertions, 5 deletions

diff --git a/nlvcross/init_code.lua b/nlvcross/init_code.lua
index 6b18d77..73dabbd 100644
--- a/nlvcross/init_code.lua
+++ b/nlvcross/init_code.lua
@@ -1,4 +1,7 @@
 F.crossings={
+  BeethvV = 3,
+  EldersValley = 4,
+  AckLvcross=2,
   ML1_unnamed=2,
   ML1_Scl1=4,
   freightrwa = 2,
@@ -49,4 +52,27 @@ if atc_arrow~=inv then
     setstate(cross..i, "off")
   end
 end
+end
+
+function F.on_nt(cross, inst, inv)
+if atc_arrow~=inv then
+  if not S.crossst[cross] then S.crossst[cross]={} end
+  S.crossst[cross][inst]=true
+  local i=1
+  while is_passive(cross..i) do
+    setstate(cross..i, "on")
+    i=i+1
+  end
+end
+end
+function F.off_nt(cross, inst, inv)
+if atc_arrow~=inv then
+  S.crossst[cross][inst]=nil
+  for _,_ in pairs(S.crossst[cross]) do return end
+  local i=1
+  while is_passive(cross..i) do
+    setstate(cross..i, "off")
+    i=i+1
+  end
+end
 end
\ No newline at end of file
diff --git a/nlvcross/nodes/(-2426,18,-1963).lua b/nlvcross/nodes/(-2426,18,-1963).lua
new file mode 100644
index 0000000..99eb919
--- /dev/null
+++ b/nlvcross/nodes/(-2426,18,-1963).lua
@@ -0,0 +1 @@
+F.on("BeethvV",1)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-2470,18,-1912).lua b/nlvcross/nodes/(-2470,18,-1912).lua
new file mode 100644
index 0000000..bec6204
--- /dev/null
+++ b/nlvcross/nodes/(-2470,18,-1912).lua
@@ -0,0 +1 @@
+F.off("BeethvV",2)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-2487,18,-1899).lua b/nlvcross/nodes/(-2487,18,-1899).lua
new file mode 100644
index 0000000..b1a2339
--- /dev/null
+++ b/nlvcross/nodes/(-2487,18,-1899).lua
@@ -0,0 +1 @@
+F.off("BeethvV",1)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-2490,18,-1902).lua b/nlvcross/nodes/(-2490,18,-1902).lua
new file mode 100644
index 0000000..c0f0262
--- /dev/null
+++ b/nlvcross/nodes/(-2490,18,-1902).lua
@@ -0,0 +1 @@
+F.on("BeethvV",2)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-333,19,-342).lua b/nlvcross/nodes/(-333,19,-342).lua
index feadc46..cdf78c1 100644
--- a/nlvcross/nodes/(-333,19,-342).lua
+++ b/nlvcross/nodes/(-333,19,-342).lua
@@ -1 +1,2 @@
-F.off("MOriStn", "R2")
\ No newline at end of file
+F.off("MOriStn", "R2")
+F.off("MOriStn", "R2_ug")
\ No newline at end of file
diff --git a/nlvcross/nodes/(-3806,8,-3238).lua b/nlvcross/nodes/(-3806,8,-3238).lua
new file mode 100644
index 0000000..26b3530
--- /dev/null
+++ b/nlvcross/nodes/(-3806,8,-3238).lua
@@ -0,0 +1 @@
+F.on("EldersValley",1)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-3834,8,-3181).lua b/nlvcross/nodes/(-3834,8,-3181).lua
new file mode 100644
index 0000000..74b67e9
--- /dev/null
+++ b/nlvcross/nodes/(-3834,8,-3181).lua
@@ -0,0 +1 @@
+F.off("EldersValley",1)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-3836,8,-3208).lua b/nlvcross/nodes/(-3836,8,-3208).lua
new file mode 100644
index 0000000..86d3cca
--- /dev/null
+++ b/nlvcross/nodes/(-3836,8,-3208).lua
@@ -0,0 +1 @@
+F.off("EldersValley",2)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-3837,8,-3179).lua b/nlvcross/nodes/(-3837,8,-3179).lua
new file mode 100644
index 0000000..7325fdd
--- /dev/null
+++ b/nlvcross/nodes/(-3837,8,-3179).lua
@@ -0,0 +1 @@
+F.on("EldersValley",2)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-404,12,-117).lua b/nlvcross/nodes/(-404,12,-117).lua
new file mode 100644
index 0000000..088589d
--- /dev/null
+++ b/nlvcross/nodes/(-404,12,-117).lua
@@ -0,0 +1 @@
+F.on("AckLvcross", 1)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-404,12,-93).lua b/nlvcross/nodes/(-404,12,-93).lua
new file mode 100644
index 0000000..082f7cb
--- /dev/null
+++ b/nlvcross/nodes/(-404,12,-93).lua
@@ -0,0 +1 @@
+F.off("AckLvcross", 1)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-408,12,-112).lua b/nlvcross/nodes/(-408,12,-112).lua
new file mode 100644
index 0000000..d9b22d7
--- /dev/null
+++ b/nlvcross/nodes/(-408,12,-112).lua
@@ -0,0 +1 @@
+F.off("AckLvcross", 2)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-408,12,-69).lua b/nlvcross/nodes/(-408,12,-69).lua
new file mode 100644
index 0000000..5194a17
--- /dev/null
+++ b/nlvcross/nodes/(-408,12,-69).lua
@@ -0,0 +1 @@
+F.on("AckLvcross", 2)
\ No newline at end of file
diff --git a/nlvcross/nodes/(-447,5,-329).lua b/nlvcross/nodes/(-447,5,-329).lua
new file mode 100644
index 0000000..f1b944b
--- /dev/null
+++ b/nlvcross/nodes/(-447,5,-329).lua
@@ -0,0 +1 @@
+F.on("MOriStn", "R2_ug")
\ No newline at end of file
diff --git a/nlvcross/nodes/(572,14,1011).lua b/nlvcross/nodes/(572,14,1011).lua
index a736db4..5b08d92 100644
--- a/nlvcross/nodes/(572,14,1011).lua
+++ b/nlvcross/nodes/(572,14,1011).lua
@@ -1,3 +1,5 @@
-if get_line()=="E1" and get_aspect("gardonst_lvc_sig1").main.free then
-  F.on("gardonst","1")
+if atc_id then
+  if get_line()=="E1" and get_aspect("gardonst_lvc_sig1").main.free then
+    F.on("gardonst","1")
+  end
 end
\ No newline at end of file
diff --git a/nlvcross/nodes/(613,14,1011).lua b/nlvcross/nodes/(613,14,1011).lua
index 019ebcd..7468080 100644
--- a/nlvcross/nodes/(613,14,1011).lua
+++ b/nlvcross/nodes/(613,14,1011).lua
@@ -1,3 +1,5 @@
-if get_line()=="E1" then
-  F.on("gardonst","1")
+if atc_id then
+  if get_line()=="E1" then
+    F.on("gardonst","1")
+  end
 end
\ No newline at end of file