State at 2022-03-28

6 files changed, 77 insertions, 7 deletions

diff --git a/durt/nodes/(-4129,13,-5726).lua b/durt/nodes/(-4129,13,-5726).lua
new file mode 100644
index 0000000..2f179db
--- /dev/null
+++ b/durt/nodes/(-4129,13,-5726).lua
@@ -0,0 +1,28 @@
+if event.train then
+	if atc_arrow then
+		if F.has_rc("DLG_exit_north") then
+			F.remove_rc({"DLG_exit_north"})
+			return
+		end
+		if F.has_rc("DLG_north_reverse") then
+			schedule_in(";01",atc_id)
+			return
+		end
+	else
+		if F.has_rc("DLG_north_reverse_couple") then
+			atc_send("CplD1S2")
+			return
+		end
+	end
+end
+
+
+if event.schedule then
+	if event.msg == atc_id then
+		schedule_in(";01",event.msg)
+		return
+	else
+		atc_send_to_train(event.msg,"S0WRS3")
+		return
+	end
+end
\ No newline at end of file
diff --git a/durt/nodes/(-4129,16,-5802).lua b/durt/nodes/(-4129,16,-5802).lua
index e0cacb0..2e1142d 100644
--- a/durt/nodes/(-4129,16,-5802).lua
+++ b/durt/nodes/(-4129,16,-5802).lua
@@ -17,10 +17,10 @@ if event.train then
 		atc_send("S3")
 		atc_set_ars_disable(false)
 		setstate(split_indicator,"green")
-		set_rc((get_rc() or "").." DLG_headshunt_south DLG_around_short DLG_shunt_platforms DLG_shunt_Platform2")
+		set_rc((get_rc() or "").." DLG_south_reverse DLG_around_short DLG_north_reverse DLG_shunt_platforms DLG_shunt_Platform2")
 	elseif state == "green" then
 		atc_send("B0WROCA1D2S4D10SM")
 		setstate(split_indicator,"red")
-		F.remove_rc({"DLG_headshunt_south","DLG_around_short","DLG_shunt_platforms","DLG_shunt_Platform2"})
+		F.remove_rc({"DLG_south_reverse","DLG_around_long","DLG_north_reverse","DLG_shunt_platforms","DLG_shunt_Platform2"})
 	end
 end
\ No newline at end of file
diff --git a/durt/nodes/(-4135,16,-5809).lua b/durt/nodes/(-4135,16,-5809).lua
new file mode 100644
index 0000000..28ae5f2
--- /dev/null
+++ b/durt/nodes/(-4135,16,-5809).lua
@@ -0,0 +1,27 @@
+local split_indicator = POS(-4134,17,-5811)
+__approach_callback_mode = 1
+
+if event.approach and not event.has_entered then
+	if not F.has_rc("DLG_ArcRun") then return end
+	
+	atc_set_ars_disable(true)
+	atc_set_lzb_tsr(1)
+end
+
+if event.train then
+	if not F.has_rc("DLG_ArcRun") then return end
+	if not atc_arrow then return end
+	local state = getstate(split_indicator)
+	if state == "red" then
+		split_off_locomotive("A0B0OL",1)
+		atc_send("S3")
+		atc_set_ars_disable(false)
+		setstate(split_indicator,"green")
+		set_rc(F.get_rc_safe().." DLG_south_reverse DLG_around_long DLG_north_reverse DLG_north_reverse_couple DLG_shunt_platforms DLG_shunt_Freight2")
+	elseif state == "green" then
+		atc_send("B0WROCA1D2S4")
+		setstate(split_indicator,"red")
+		F.remove_rc({"DLG_south_reverse","DLG_around_long","DLG_north_reverse_couple","DLG_shunt_Freight2"})
+		set_rc(F.get_rc_safe().." DLG_shunt_Freight4")
+	end
+end
\ No newline at end of file
diff --git a/durt/nodes/(-4142,17,-5841).lua b/durt/nodes/(-4142,17,-5841).lua
index 8d26b0c..24270e4 100644
--- a/durt/nodes/(-4142,17,-5841).lua
+++ b/durt/nodes/(-4142,17,-5841).lua
@@ -1,11 +1,18 @@
-if event.train and atc_arrow then
-	local rc = get_rc() or ""
-	if rc:match("DLG_headshunt_south") then
-		schedule_in(";01",atc_id)
-		return
+if event.train then
+	if atc_arrow then
+		if F.has_rc("DLG_south_reverse") then
+			schedule_in(";01",atc_id)
+			return
+		end
+	else
+		if F.has_rc("DLG_south_reverse_couple") then
+			atc_send("CplD1S2")
+			return
+		end
 	end
 end
 
+
 if event.schedule then
 	if event.msg == atc_id then
 		schedule_in(";01",event.msg)
diff --git a/durt/nodes/(-4144,16,-5792).lua b/durt/nodes/(-4144,16,-5792).lua
new file mode 100644
index 0000000..5bfe7a1
--- /dev/null
+++ b/durt/nodes/(-4144,16,-5792).lua
@@ -0,0 +1,5 @@
+if event.ext_int then
+	F.remove_rc({"DLG_north_reverse","DLG_shunt_platforms","DLG_shunt_Freight4"})
+	F.add_rc("DLG_exit_north")
+	atc_send("I-S0WR;S4D10SM")
+end
diff --git a/durt/nodes/(-4147,19,-5792).lua b/durt/nodes/(-4147,19,-5792).lua
new file mode 100644
index 0000000..c53ad9d
--- /dev/null
+++ b/durt/nodes/(-4147,19,-5792).lua
@@ -0,0 +1,3 @@
+local track = POS(-4144,16,-5792)
+local message = "ArcRun"
+if event.punch then interrupt_pos(track,message) end
\ No newline at end of file