16 files changed, 80 insertions, 0 deletions
diff --git a/auto_yards/nodes/(-1933,16,806).lua b/auto_yards/nodes/(-1932,16,807).lua
index 4503e25..4503e25 100644
--- a/auto_yards/nodes/(-1933,16,806).lua
+++ b/auto_yards/nodes/(-1932,16,807).lua
diff --git a/auto_yards/nodes/(-1938,16,805).lua b/auto_yards/nodes/(-1937,16,806).lua
index 4503e25..4503e25 100644
--- a/auto_yards/nodes/(-1938,16,805).lua
+++ b/auto_yards/nodes/(-1937,16,806).lua
diff --git a/auto_yards/nodes/(-1946,16,801).lua b/auto_yards/nodes/(-1945,16,802).lua
index 4503e25..4503e25 100644
--- a/auto_yards/nodes/(-1946,16,801).lua
+++ b/auto_yards/nodes/(-1945,16,802).lua
diff --git a/auto_yards/nodes/(-1954,16,797).lua b/auto_yards/nodes/(-1953,16,798).lua
index 4503e25..4503e25 100644
--- a/auto_yards/nodes/(-1954,16,797).lua
+++ b/auto_yards/nodes/(-1953,16,798).lua
diff --git a/auto_yards/nodes/(-2029,19,733).lua b/auto_yards/nodes/(-2029,19,733).lua
index f88c9f0..58ed28c 100644
--- a/auto_yards/nodes/(-2029,19,733).lua
+++ b/auto_yards/nodes/(-2029,19,733).lua
@@ -1,5 +1,7 @@
 local yard_id = "ARC"
 if event.train then
+
+	-- direct train to the headshunt to reenter the yard
     if F.has_rc("ARC_YARD_REENTRY") then
         -- loco will use S23-S approach track as headshunt and re-enter yard
         -- RC will be removed by the headshunt controller (req to trigger it)
@@ -9,6 +11,19 @@ if event.train then
         atc_send("S4D1A1")
         return
     end
+
+	-- deal with ARC_2nd_EXIT_rc
+	local rc = F.get_rc_safe():match("ARC_2ND_EXIT_(%S+)")
+	print(rc)
+	if rc then
+		F.remove_rc_match("ARC_2ND_EXIT_%S+")
+		F.add_rc(rc)
+		print(F.get_rc_safe())
+        atc_set_ars_disable(false)
+        atc_send("SM")
+		return
+	end
+	-- disregard light exit locos
     if F.has_rc(yard_id.."_LIGHT_EXIT") then
         F.remove_rc(yard_id.."_LIGHT_EXIT")
         atc_set_ars_disable(false)
diff --git a/auto_yards/nodes/(771,14,-16).lua b/auto_yards/nodes/(771,14,-16).lua
new file mode 100644
index 0000000..447dce1
--- /dev/null
+++ b/auto_yards/nodes/(771,14,-16).lua
@@ -0,0 +1,55 @@
+--leekston collection controller
+local up_dir = "North"
+local down_dir = "South"
+local up_dir_indicator = POS(771,13,-14)
+local down_dir_indicator = POS(771,13,-15)
+local exit_indicator_pos = POS(771,13,-18)
+
+local userlist = {
+	"Maverick2797", 
+	"mary4"
+}
+
+if event.ext_int then --to be pinged by the departing LHF train only
+	local dir
+	if F.indicator(exit_indicator_pos) then
+		F.indicator(up_dir_indicator, false)
+		dir = up_dir
+	else
+		F.indicator(down_dir_indicator, false)
+		dir = down_dir
+	end
+	digiline_send("lcd",string.format("%s | Train collected and departed %sbound",rwt.to_string(rwt.now()), dir))
+	return
+end
+
+--confirm user is actually allowed to use this system
+local permitted_user = false
+for _,name in pairs(userlist) do
+	if name == event.name then
+		permitted_user = name
+		break
+	end
+end
+if not permitted_user then
+	digiline_send("lcd","User is not permitted to use this. Contact a moderator")
+	return
+end
+
+local dir = ""
+--cycle through the departure options
+if F.indicator(up_dir_indicator) then
+	F.indicator(up_dir_indicator, false)
+	F.indicator(down_dir_indicator, true)
+	dir = down_dir.."bound"
+elseif F.indicator(down_dir_indicator) then
+	F.indicator(up_dir_indicator, false)
+	F.indicator(down_dir_indicator, false)
+	dir = "Disabled"
+else
+	F.indicator(up_dir_indicator, true)
+	F.indicator(down_dir_indicator, false)
+	dir = up_dir.."bound"
+end
+
+digiline_send("lcd",string.format("%s\nCollection %s.\nUser %s", rwt.to_string(rwt.now()), dir, event.name))
+\ No newline at end of file
diff --git a/auto_yards/nodes/(775,13,-20).lua b/auto_yards/nodes/(775,13,-20).lua
new file mode 100644
index 0000000..8cd2bb9
--- /dev/null
+++ b/auto_yards/nodes/(775,13,-20).lua
@@ -0,0 +1 @@
+interrupt_pos(POS(771,14,-16))
+\ No newline at end of file
diff --git a/auto_yards/nodes/(789,10,-31).lua b/auto_yards/nodes/(789,10,-31).lua
new file mode 100644
index 0000000..e877483
--- /dev/null
+++ b/auto_yards/nodes/(789,10,-31).lua
@@ -0,0 +1 @@
+-- arrival, dir = false
+\ No newline at end of file
diff --git a/auto_yards/nodes/(789,10,13).lua b/auto_yards/nodes/(789,10,13).lua
new file mode 100644
index 0000000..4d16159
--- /dev/null
+++ b/auto_yards/nodes/(789,10,13).lua
@@ -0,0 +1 @@
+-- arrival, dir = true
+\ No newline at end of file
diff --git a/auto_yards/nodes/(792,10,-31).lua b/auto_yards/nodes/(792,10,-31).lua
new file mode 100644
index 0000000..fa98cc9
--- /dev/null
+++ b/auto_yards/nodes/(792,10,-31).lua
@@ -0,0 +1 @@
+-- continue onwards
+\ No newline at end of file
diff --git a/auto_yards/nodes/(792,10,11).lua b/auto_yards/nodes/(792,10,11).lua
new file mode 100644
index 0000000..ece3c16
--- /dev/null
+++ b/auto_yards/nodes/(792,10,11).lua
@@ -0,0 +1 @@
+-- continue northwards
+\ No newline at end of file
diff --git a/auto_yards/nodes/(796,10,-39).lua b/auto_yards/nodes/(796,10,-39).lua
new file mode 100644
index 0000000..265c211
--- /dev/null
+++ b/auto_yards/nodes/(796,10,-39).lua
@@ -0,0 +1 @@
+-- collection track (controlled by tower UI)
+\ No newline at end of file
diff --git a/auto_yards/nodes/(796,10,-54).lua b/auto_yards/nodes/(796,10,-54).lua
new file mode 100644
index 0000000..7bf58f6
--- /dev/null
+++ b/auto_yards/nodes/(796,10,-54).lua
@@ -0,0 +1 @@
+-- headshunt
+\ No newline at end of file
diff --git a/auto_yards/nodes/(796,10,3).lua b/auto_yards/nodes/(796,10,3).lua
new file mode 100644
index 0000000..265c211
--- /dev/null
+++ b/auto_yards/nodes/(796,10,3).lua
@@ -0,0 +1 @@
+-- collection track (controlled by tower UI)
+\ No newline at end of file
diff --git a/auto_yards/nodes/(799,10,-37).lua b/auto_yards/nodes/(799,10,-37).lua
new file mode 100644
index 0000000..1db4581
--- /dev/null
+++ b/auto_yards/nodes/(799,10,-37).lua
@@ -0,0 +1 @@
+-- drop off here from LFH
+\ No newline at end of file
diff --git a/auto_yards/nodes/(799,10,3).lua b/auto_yards/nodes/(799,10,3).lua
new file mode 100644
index 0000000..1db4581
--- /dev/null
+++ b/auto_yards/nodes/(799,10,3).lua
@@ -0,0 +1 @@
+-- drop off here from LFH
+\ No newline at end of file