102 lines
2.9 KiB
Lua
102 lines
2.9 KiB
Lua
|
digilines = {}
|
||
|
|
digilines.S = minetest.get_translator("digilines")
|
||
|
|
|
||
|
|
digilines.mcl = minetest.get_modpath("mcl_core")
|
||
|
|
|
||
|
|
-- sounds check
|
||
|
|
if minetest.get_modpath("default") then digilines.sounds = default end
|
||
|
|
if digilines.mcl then digilines.sounds = mcl_sounds end
|
||
|
|
|
||
|
|
|
||
|
|
-- Backwards compatibility code.
|
||
|
|
-- We define a proxy table whose methods can be called with the
|
||
|
|
-- `foo:bar` notation, and it will redirect the call to the
|
||
|
|
-- real function, dropping the first implicit argument.
|
||
|
|
local digiline; digiline = setmetatable({}, {
|
||
|
|
__index = function(_, k)
|
||
|
|
-- Get method from real table.
|
||
|
|
local v = digilines[k]
|
||
|
|
if type(v) == "function" then
|
||
|
|
-- We need to wrap functions in order to ignore
|
||
|
|
-- the implicit `self` argument.
|
||
|
|
local f = v
|
||
|
|
return function(self, ...)
|
||
|
|
-- Trap invalid calls of the form `digiline.foo(...)`.
|
||
|
|
assert(self == digiline)
|
||
|
|
return f(...)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
return v
|
||
|
|
end,
|
||
|
|
})
|
||
|
|
rawset(_G, "digiline", digiline)
|
||
|
|
|
||
|
|
-- Let's test our proxy table.
|
||
|
|
function digilines._testproxy(x)
|
||
|
|
return x
|
||
|
|
end
|
||
|
|
|
||
|
|
-- Test using old `digiline:foobar` form.
|
||
|
|
assert(digiline:_testproxy("foobar") == "foobar")
|
||
|
|
|
||
|
|
-- Test using new `digilines.foobar` form.
|
||
|
|
assert(digilines._testproxy("foobar") == "foobar")
|
||
|
|
|
||
|
|
-- Test calling incorrect form raises an error.
|
||
|
|
assert(not pcall(function() digiline._testproxy("foobar") end))
|
||
|
|
|
||
|
|
local modpath = minetest.get_modpath("digilines")
|
||
|
|
dofile(modpath .. "/presetrules.lua")
|
||
|
|
dofile(modpath .. "/util.lua")
|
||
|
|
dofile(modpath .. "/internal.lua")
|
||
|
|
dofile(modpath .. "/wires_common.lua")
|
||
|
|
dofile(modpath .. "/wire_std.lua")
|
||
|
|
|
||
|
|
function digilines.receptor_send(pos, rules, channel, msg)
|
||
|
|
local checked = {}
|
||
|
|
checked[minetest.hash_node_position(pos)] = true -- exclude itself
|
||
|
|
for _,rule in ipairs(rules) do
|
||
|
|
if digilines.rules_link(pos, digilines.addPosRule(pos, rule)) then
|
||
|
|
digilines.transmit(digilines.addPosRule(pos, rule), channel, msg, checked)
|
||
|
|
end
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
local fiber = "mesecons_materials:fiber"
|
||
|
|
local insulated = "mesecons_insulated:insulated_off"
|
||
|
|
local gold_ingot = "default:gold_ingot"
|
||
|
|
|
||
|
|
if digilines.mcl then
|
||
|
|
gold_ingot = "mcl_core:gold_ingot"
|
||
|
|
-- MCL dont support mesecons insulated
|
||
|
|
if not minetest.get_modpath("mesecons_insulated") then
|
||
|
|
insulated = "mesecons:redstone"
|
||
|
|
end
|
||
|
|
end
|
||
|
|
|
||
|
|
minetest.register_craft({
|
||
|
|
output = 'digilines:wire_std_00000000 2',
|
||
|
|
recipe = {
|
||
|
|
{fiber, fiber, fiber},
|
||
|
|
{insulated, insulated, gold_ingot},
|
||
|
|
{fiber, fiber, fiber},
|
||
|
|
}
|
||
|
|
})
|
||
|
|
|
||
|
|
-- For minetest 0.4 support returned nil are also tested: ~= false
|
||
|
|
if minetest.settings:get_bool("digilines_enable_inventory", true) ~= false then
|
||
|
|
dofile(modpath .. "/inventory.lua")
|
||
|
|
end
|
||
|
|
|
||
|
|
if minetest.settings:get_bool("digilines_enable_lcd", true) ~= false then
|
||
|
|
dofile(modpath .. "/lcd.lua")
|
||
|
|
end
|
||
|
|
|
||
|
|
if minetest.settings:get_bool("digilines_enable_lightsensor", true) ~= false then
|
||
|
|
dofile(modpath .. "/lightsensor.lua")
|
||
|
|
end
|
||
|
|
|
||
|
|
if minetest.settings:get_bool("digilines_enable_rtc", true) ~= false then
|
||
|
|
dofile(modpath .. "/rtc.lua")
|
||
|
|
end
|