aboutsummaryrefslogtreecommitdiff
path: root/advtrains_signals_ks/init.lua
diff options
context:
space:
mode:
Diffstat (limited to 'advtrains_signals_ks/init.lua')
-rwxr-xr-xadvtrains_signals_ks/init.lua184
1 files changed, 144 insertions, 40 deletions
diff --git a/advtrains_signals_ks/init.lua b/advtrains_signals_ks/init.lua
index 0ed03bb..d0ba6cd 100755
--- a/advtrains_signals_ks/init.lua
+++ b/advtrains_signals_ks/init.lua
@@ -50,15 +50,19 @@ end
local applyaspectf_main = function(rot)
return function(pos, node, main_aspect, dst_aspect, dst_aspect_info)
+ if main_aspect.halt then
+ -- halt aspect, set red and don't do anything further
+ advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:hs_danger_"..rot, param2 = node.param2})
+ setzs3(pos, "off", rot)
+ setzs3v(pos, nil, rot)
+ return
+ end
-- set zs3 signal to show speed according to main_aspect
setzs3(pos, main_aspect.zs3, rot)
-- select appropriate lamps based on mainaspect and dst
if main_aspect.shunt then
advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:hs_shunt_"..rot, param2 = node.param2})
setzs3v(pos, nil, rot)
- elseif main_aspect.halt then
- advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:hs_danger_"..rot, param2 = node.param2})
- setzs3v(pos, nil, rot)
else
if not dst_aspect_info
or not dst_aspect_info.main
@@ -116,19 +120,38 @@ local mainaspects_main = {
description = "Proceed (speed 4)",
zs3 = "4",
},
- {
- name = "halt",
- description = "Halt",
- zs3 = "off",
- halt = true,
- },
}
+local applyaspectf_distant = function(rot)
+ return function(pos, node, main_aspect, dst_aspect, dst_aspect_info)
+ if main_aspect.halt then
+ -- halt aspect, set red and don't do anything further
+ advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:vs_slow_"..rot, param2 = node.param2})
+ setzs3v(pos, nil, rot)
+ return
+ end
+ -- select appropriate lamps based on mainaspect and dst
+ if not dst_aspect_info
+ or not dst_aspect_info.main
+ or dst_aspect_info.main == -1 then
+ advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:vs_free_"..rot, param2 = node.param2})
+ setzs3v(pos, nil, rot)
+ elseif dst_aspect_info.main == 0 then
+ advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:vs_slow_"..rot, param2 = node.param2})
+ setzs3v(pos, nil, rot)
+ else
+ advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:vs_nextslow_"..rot, param2 = node.param2})
+ setzs3v(pos, dst_aspect_info.main, rot)
+ end
+ end
+end
+
--Rangiersignal
local applyaspectf_ra = function(rot)
-- we get here the full main_aspect table
return function(pos, node, main_aspect, dst_aspect, dst_aspect_info)
- if main_aspect.shunt then
+ if not main_aspect.halt then
+ -- any non-halt main aspect is fine, there's only one anyway
advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:ra_shuntd_"..rot, param2 = node.param2})
else
advtrains.ndb.swap_node(pos, {name="advtrains_signals_ks:ra_danger_"..rot, param2 = node.param2})
@@ -144,29 +167,17 @@ local mainaspects_shunt = {
description = "Shunt",
shunt = true,
},
- {
- name = "halt",
- description = "Halt",
- halt = true,
- },
}
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:hs")
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:ra")
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:sign")
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:sign_lf")
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:sign_lf7")
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:zs3")
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:zs3v")
-advtrains.trackplacer.register_tracktype("advtrains_signals_ks:mast")
-
for _, rtab in ipairs({
- {rot = "0", sbox = {-1/8, -1/2, -1/2, 1/8, 1/2, -1/4}, ici=true},
- {rot = "30", sbox = {-3/8, -1/2, -1/2, -1/8, 1/2, -1/4},},
- {rot = "45", sbox = {-1/2, -1/2, -1/2, -1/4, 1/2, -1/4},},
- {rot = "60", sbox = {-1/2, -1/2, -3/8, -1/4, 1/2, -1/8},},
+ {rot = "0", sbox = {-1/8, -1/2, -1/2, 1/8, 1/2, -1/4}, ici=true, nextrot = "30"},
+ {rot = "30", sbox = {-3/8, -1/2, -1/2, -1/8, 1/2, -1/4}, nextrot = "45"},
+ {rot = "45", sbox = {-1/2, -1/2, -1/2, -1/4, 1/2, -1/4}, nextrot = "60"},
+ {rot = "60", sbox = {-1/2, -1/2, -3/8, -1/4, 1/2, -1/8}, nextrot = "0"},
}) do
local rot = rtab.rot
+
+ -- Hauptsignal
for typ, prts in pairs({
danger = {asp = advtrains.interlocking.signal.ASPI_HALT, n = "slow", ici=true},
slow = {
@@ -233,13 +244,87 @@ for _, rtab in ipairs({
main_aspects = mainaspects_main,
apply_aspect = applyaspectf_main(rot),
get_aspect_info = afunc,
+ route_role = "main_distant",
+ trackworker_next_rot = "advtrains_signals_ks:hs_"..typ.."_"..rtab.nextrot,
+ trackworker_rot_incr_param2 = (rot=="60")
},
- on_rightclick = advtrains.interlocking.signal_rc_handler,
- can_dig = advtrains.interlocking.signal_can_dig,
- after_dig_node = advtrains.interlocking.signal_after_dig,
+ on_rightclick = advtrains.interlocking.signal.on_rightclick,
+ can_dig = advtrains.interlocking.signal.can_dig,
+ after_dig_node = advtrains.interlocking.signal.after_dig,
+ })
+ -- rotatable by trackworker
+ end
+
+ -- Vorsignal (NEU!)
+ for typ, prts in pairs({
+ -- note: the names are taken from the main signal equivalent so that the same names for the lamp images can be used
+ slow = {asp = advtrains.interlocking.signal.ASPI_HALT, n = "nextslow", ici=true},
+ nextslow = {
+ asp = function(pos)
+ return { dst = getzs3v(pos) or 6 }
+ end,
+ n = "free"
+ },
+ free = {
+ asp = function(pos)
+ return { dst = -1 }
+ end,
+ n = "slow"
+ },
+ }) do
+ local tile = "advtrains_signals_ks_ltm_"..typ..".png"
+ local afunc = prts.asp
+ if type(afunc) == "table" then
+ afunc = function() return prts.asp end
+ end
+ if typ == "nextslow" then
+ tile = {
+ name = tile,
+ animation = {
+ type = "vertical_frames",
+ aspect_w = 32,
+ aspect_h = 32,
+ length = 1,
+ }
+ }
+ end
+ minetest.register_node("advtrains_signals_ks:vs_"..typ.."_"..rot, {
+ description = "Ks Distant Signal",
+ drawtype = "mesh",
+ mesh = "advtrains_signals_ks_distant_smr"..rot..".obj",
+ tiles = {"advtrains_signals_ks_mast.png", "advtrains_signals_ks_head.png", "advtrains_signals_ks_head.png", tile},
+
+ paramtype="light",
+ sunlight_propagates=true,
+ light_source = 4,
+
+ paramtype2 = "facedir",
+ selection_box = {
+ type = "fixed",
+ fixed = {rtab.sbox, {-1/4, -1/2, -1/4, 1/4, -7/16, 1/4}}
+ },
+ groups = {
+ cracky = 2,
+ advtrains_signal = 2,
+ not_blocking_trains = 1,
+ save_in_at_nodedb = 1,
+ not_in_creative_inventory = (rtab.ici and prts.ici) and 0 or 1,
+ },
+ drop = "advtrains_signals_ks:vs_slow_0",
+ inventory_image = "advtrains_signals_ks_vs_inv.png",
+ advtrains = {
+ -- no mainaspect
+ apply_aspect = applyaspectf_distant(rot),
+ get_aspect_info = afunc,
+ route_role = "distant",
+ trackworker_next_rot = "advtrains_signals_ks:vs_"..typ.."_"..rtab.nextrot,
+ trackworker_rot_incr_param2 = (rot=="60")
+ },
+ on_rightclick = advtrains.interlocking.signal.on_rightclick,
+ can_dig = advtrains.interlocking.signal.can_dig,
+ after_dig_node = advtrains.interlocking.signal.after_dig,
})
-- rotatable by trackworker
- advtrains.trackplacer.add_worked("advtrains_signals_ks:hs", typ, "_"..rot)
end
@@ -276,13 +361,15 @@ for _, rtab in ipairs({
main_aspects = mainaspects_ra,
apply_aspect = applyaspectf_ra(rot),
get_aspect_info = prts.asp,
+ route_role = "shunt",
+ trackworker_next_rot = "advtrains_signals_ks:ra_"..typ.."_"..rtab.nextrot,
+ trackworker_rot_incr_param2 = (rot=="60")
},
- on_rightclick = advtrains.interlocking.signal_rc_handler,
- can_dig = advtrains.interlocking.signal_can_dig,
- after_dig_node = advtrains.interlocking.signal_after_dig,
+ on_rightclick = advtrains.interlocking.signal.on_rightclick,
+ can_dig = advtrains.interlocking.signal.can_dig,
+ after_dig_node = advtrains.interlocking.signal.after_dig,
})
-- rotatable by trackworker
- advtrains.trackplacer.add_worked("advtrains_signals_ks:ra", typ, "_"..rot)
end
-- Schilder:
@@ -319,7 +406,7 @@ for _, rtab in ipairs({
after_dig_node = advtrains.interlocking.signal_after_dig,
})
-- rotatable by trackworker
- advtrains.trackplacer.add_worked("advtrains_signals_ks:"..prefix, typ, "_"..rot, nxt)
+ --TODO add rotation using trackworker
end
for typ, prts in pairs {
@@ -420,7 +507,7 @@ for _, rtab in ipairs({
t.drop = "advtrains_signals_ks:zs3_off_0"
t.selection_box.fixed[1][5] = 0
minetest.register_node("advtrains_signals_ks:zs3_"..typ.."_"..rot, t)
- advtrains.trackplacer.add_worked("advtrains_signals_ks:zs3", typ, "_"..rot)
+ --TODO add rotation using trackworker
-- Zs 3v
local t = table.copy(def)
@@ -429,7 +516,7 @@ for _, rtab in ipairs({
t.drop = "advtrains_signals_ks:zs3v_off_0"
t.tiles[3] = t.tiles[3] .. "^[multiply:yellow"
minetest.register_node("advtrains_signals_ks:zs3v_"..typ.."_"..rot, t)
- advtrains.trackplacer.add_worked("advtrains_signals_ks:zs3v", typ, "_"..rot)
+ --TODO add rotation using trackworker
end
minetest.register_node("advtrains_signals_ks:mast_mast_"..rot, {
@@ -454,7 +541,7 @@ for _, rtab in ipairs({
},
drop = "advtrains_signals_ks:mast_mast_0",
})
- advtrains.trackplacer.add_worked("advtrains_signals_ks:mast","mast", "_"..rot)
+ --TODO add rotation using trackworker
end
-- Crafting
@@ -486,6 +573,23 @@ minetest.register_craft({
},
})
+minetest.register_craft({
+ output = "advtrains_signals_ks:zs3_off_0 2",
+ recipe = {
+ {"","default:steel_ingot",""},
+ {"default:steel_ingot","dye:white","default:steel_ingot"},
+ {"","advtrains_signals_ks:mast_mast_0",""}
+ },
+})
+minetest.register_craft({
+ output = "advtrains_signals_ks:zs3v_off_0 2",
+ recipe = {
+ {"","default:steel_ingot",""},
+ {"default:steel_ingot","dye:yellow","default:steel_ingot"},
+ {"","advtrains_signals_ks:mast_mast_0",""}
+ },
+})
+
local sign_material = "default:sign_wall_steel" --fallback
if minetest.get_modpath("basic_materials") then
sign_material = "basic_materials:plastic_sheet"