From 5f72b7ec62a6f2fb8ce6b9d5379f03a3e4126971 Mon Sep 17 00:00:00 2001
From: autocommitter <autocommitter@linux-forks.de>
Date: Mon, 22 Apr 2024 14:52:14 +0200
Subject: State at 2020-08-29

---
 Tyard/nodes/(-4027,12,-2731).lua | 1 +
 1 file changed, 1 insertion(+)
 create mode 100644 Tyard/nodes/(-4027,12,-2731).lua

(limited to 'Tyard/nodes/(-4027,12,-2731).lua')

diff --git a/Tyard/nodes/(-4027,12,-2731).lua b/Tyard/nodes/(-4027,12,-2731).lua
new file mode 100644
index 0000000..b04ffad
--- /dev/null
+++ b/Tyard/nodes/(-4027,12,-2731).lua
@@ -0,0 +1 @@
+--South pickup splitter
local dir = "S"
local lane = 0
--nothing below this line should indicate a hard direction
--should be able to convert to function using only above args
--------------------------------------------------
if S.yard_active then
	if atc_arrow then
		if S.dir == dir then
			set_route("TY"..dir.."_"..lane, "HEADSHUNT")
			local plen = train_length()
			local rc = split_at_fc("B0")
			local trc = "TY"..dir.."_"..rc
			if plen == train_length() and (rc == "" or S.rc:match(trc)) then
				S.exiting = true
			end
			if rc and rc ~= "" then
				set_rc("TY"..dir.."_"..rc)
			else
				set_rc(S.rc)
				S.exiting = true
			end
		else -- if S.dir ~= dir
			if S.RTS then -- loop around to other HS
				S.RTS = nil
				set_route("TY"..dir.."_"..lane,"AROUND")
				split_off_locomotive("B0")
				set_rc("AROUND_"..S.dir)
				return
			else
				atc_send("B0WRS4")
			end
		end
	end -- nothing to do if train goes against arrow
end
\ No newline at end of file
-- 
cgit v1.2.3