summaryrefslogtreecommitdiff
path: root/durt/nodes
diff options
context:
space:
mode:
Diffstat (limited to 'durt/nodes')
-rw-r--r--durt/nodes/(-4129,13,-5726).lua28
-rw-r--r--durt/nodes/(-4129,16,-5802).lua4
-rw-r--r--durt/nodes/(-4135,16,-5809).lua27
-rw-r--r--durt/nodes/(-4142,17,-5841).lua17
-rw-r--r--durt/nodes/(-4144,16,-5792).lua5
-rw-r--r--durt/nodes/(-4147,19,-5792).lua3
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