From 8ea6f01d7499110bddc730cd1916c3c63a1a8a7b Mon Sep 17 00:00:00 2001 From: autocommitter Date: Mon, 22 Apr 2024 14:55:01 +0200 Subject: State at 2021-11-07 --- durt/nodes/(-4126,6,-5691).lua | 20 ++++++++++++++++++++ durt/nodes/(-4127,5,-5624).lua | 24 ++++++++++++++++++++++++ 2 files changed, 44 insertions(+) create mode 100644 durt/nodes/(-4126,6,-5691).lua create mode 100644 durt/nodes/(-4127,5,-5624).lua (limited to 'durt') diff --git a/durt/nodes/(-4126,6,-5691).lua b/durt/nodes/(-4126,6,-5691).lua new file mode 100644 index 0000000..19d83df --- /dev/null +++ b/durt/nodes/(-4126,6,-5691).lua @@ -0,0 +1,20 @@ +if atc_arrow then + if get_rc():match("DLG_shunt") then + atc_send("BBWRSM") + F.remove_rc({"DLG_shunt"},true) + else + atc_send("BB") + end +end + +if event.channel=="train_ctl" and event.msg=="send" then + if not atc_id or not atc_arrow then + digiline_send("error","Error "..os.time().."\nArrow:"..tostring(atc_arrow).."\nID:"..tostring(atc_id)) + return + end + atc_send("S3") + set_rc((get_rc() or "").." DLG_shunt") + split_at_index(2,"BB") + set_autocouple() + return +end \ No newline at end of file diff --git a/durt/nodes/(-4127,5,-5624).lua b/durt/nodes/(-4127,5,-5624).lua new file mode 100644 index 0000000..d30218f --- /dev/null +++ b/durt/nodes/(-4127,5,-5624).lua @@ -0,0 +1,24 @@ +local lights = { + POS(-4131,5,-5623), + POS(-4127,5,-5623), + POS(-4127,5,-5617), + POS(-4131,5,-5617) +} + +if event.train then + if atc_arrow then + schedule_in(";05",true) + return + end +end + +if event.schedule then + if atc_id then + schedule_in(";05",true) + return + else + for _,v in pairs(lights) do + setstate(v,"off") + end + end +end \ No newline at end of file -- cgit v1.2.3