function digiline:getspec(node) if not minetest.registered_nodes[node.name] then return false end return minetest.registered_nodes[node.name].digiline end function digiline:importrules(spec, node) if type(spec) == 'function' then return spec(node) elseif spec then return spec else return digiline.rules.default end end function digiline:getAnyInputRules(pos) local node = minetest.get_node(pos) local spec = digiline:getspec(node) if not spec then return end if spec.wire then return digiline:importrules(spec.wire.rules, node) end if spec.effector then return digiline:importrules(spec.effector.rules, node) end end function digiline:getAnyOutputRules(pos) local node = minetest.get_node(pos) local spec = digiline:getspec(node) if not spec then return end if spec.wire then return digiline:importrules(spec.wire.rules, node) end if spec.receptor then return digiline:importrules(spec.receptor.rules, node) end end function digiline:rules_link(output, input) local outputrules = digiline:getAnyOutputRules(output) local inputrules = digiline:getAnyInputRules (input) if not outputrules or not inputrules then return false end for _, orule in ipairs(outputrules) do if digiline:cmpPos(digiline:addPosRule(output, orule), input) then for _, irule in ipairs(inputrules) do if digiline:cmpPos(digiline:addPosRule(input, irule), output) then return true end end end end return false end function digiline:rules_link_anydir(output, input) return digiline:rules_link(output, input) or digiline:rules_link(input, output) end local function queue_new() return {nextRead = 1, nextWrite = 1} end local function queue_empty(queue) return queue.nextRead == queue.nextWrite end local function queue_enqueue(queue, object) local nextWrite = queue.nextWrite queue[nextWrite] = object queue.nextWrite = nextWrite + 1 end local function queue_dequeue(queue) local nextRead = queue.nextRead local object = queue[nextRead] queue[nextRead] = nil queue.nextRead = nextRead + 1 return object end function digiline:transmit(pos, channel, msg, checked) local queue = queue_new() queue_enqueue(queue, pos) while not queue_empty(queue) do local curPos = queue_dequeue(queue) local node = minetest.get_node(curPos) local spec = digiline:getspec(node) if spec then -- Effector actions --> Receive if spec.effector then spec.effector.action(curPos, node, channel, msg) end -- Cable actions --> Transmit if spec.wire then local rules = digiline:importrules(spec.wire.rules, node) for _, rule in ipairs(rules) do local nextPos = digiline:addPosRule(curPos, rule) if digiline:rules_link(curPos, nextPos) then local checkedID = tostring(nextPos.x) .. "_" .. tostring(nextPos.y) .. "_" .. tostring(nextPos.z) if not checked[checkedID] then checked[checkedID] = true queue_enqueue(queue, nextPos) end end end end end end end