diff options
-rw-r--r-- | durt/nodes/(-1403,11,-2533).lua | 61 | ||||
-rw-r--r-- | subway/nodes/(124,14,-12).lua | 4 |
2 files changed, 64 insertions, 1 deletions
diff --git a/durt/nodes/(-1403,11,-2533).lua b/durt/nodes/(-1403,11,-2533).lua index 7489acc..898b856 100644 --- a/durt/nodes/(-1403,11,-2533).lua +++ b/durt/nodes/(-1403,11,-2533).lua @@ -1 +1,60 @@ ---
\ No newline at end of file +local rev_rc = "S27_REV_East" +local rm_rc = false + + +__approach_callback_mode = 1 + +if event.approach and not event.has_entered then + atc_set_lzb_tsr(3) + atc_set_ars_disable(true) + return +end + +if event.train and atc_arrow then + if not F.has_rc(rev_rc) then + atc_set_ars_disable(false) + return + end + if rm_rc then F.remove_rc({rev_rc}) end + + if F.has_rc("S27_SHUNTER") then + local stages = { + "S27_EXP_PICKUP", + "S27_EXP_LOAD", + "S27_EXP_DEPART" + } + + for i,v in ipairs(stages) do + if F.has_rc(v) then + unset_autocouple() + F.remove_rc(v) + local next_stage = stages[i == #stages and 1 or i+1] + if next_stage == "S27_EXP_PICKUP" and not section_occupancy("254098")[1] then -- no wagons left to load. store loco + F.add_rc("S27_LOCOSTORE") + break + end + if next_stage ~= "S27_EXP_DEPART" then + set_autocouple() + end + F.add_rc(next_stage) + + break + end + end + end + schedule_in(";01",atc_id) + return +end + +if event.schedule then + if not atc_id then --bounce the train that just passed + atc_send_to_train(event.msg,"B0WRD1A1S3") + else + if atc_id == event.msg then --train hasn't fully passed yet, wait a bit longer + schedule_in(";01",atc_id) + else -- somehow another train crossed the controller before the first one returned. Unlikely but possible + atc_send_to_train(event.msg,"BBOL") + atc_send("BBOL") + end + end +end
\ No newline at end of file diff --git a/subway/nodes/(124,14,-12).lua b/subway/nodes/(124,14,-12).lua new file mode 100644 index 0000000..27f4a4c --- /dev/null +++ b/subway/nodes/(124,14,-12).lua @@ -0,0 +1,4 @@ +if event.type == "ext_int" then + digiline_send("orhb","toggle") + return +end
\ No newline at end of file |