blob: 898b8564b1c9d1b8aaf2b6eff54073b467b1f880 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
|
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
|
