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
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
gates = {"diode", "not", "nand", "and", "xor"}
out = {x=1, y=0, z=0}
inonerules = {{x=-1, y=0, z=0}}
intworules = {{x=0, y=0, z=1},{x=0, y=0, z=-1}}
onerules = inonerules
table.insert(onerules, out)
tworules = intworules
table.insert(tworules, out)
outrules = {}
outrules = table.insert(outrules, out)
for g in ipairs(gates) do gate = gates[g]
if g < 3 then
inrules = inonerules
rules = onerules
else
inrules = intworules
rules = tworules
end
for on=0,1 do
if on == 1 then
onoff = "on"
groups = {dig_immediate=2, not_in_creative_inventory=1, mesecon = 3}
drop = "mesecons_gates:"..gate.."_off"
else
onoff = "off"
groups = {dig_immediate=2, mesecon = 3}
drop = nodename
end
nodename = "mesecons_gates:"..gate.."_"..onoff
node_box = {
type = "fixed",
fixed = { -8/16, -8/16, -8/16, 8/16, -7/16, 8/16 },
}
minetest.register_node(nodename, {
description = gate.." Gate",
paramtype = "light",
drawtype = "nodebox",
tiles = {
"jeija_microcontroller_bottom.png^"..
"jeija_gate_"..onoff..".png^"..
"jeija_gate_"..gate..".png",
},
selection_box = node_box,
node_box = node_box,
walkable = true,
on_construct = function(pos)
update_gate(pos)
end,
groups = groups,
drop = drop,
})
mesecon:register_effector(nodename, nodename, inrules)
end
end
function get_gate(pos)
string = minetest.env:get_node(pos).name
string = string.gsub(string, "mesecons_gates:", "")
--gate
string = string.gsub(string, "_on", "")
string = string.gsub(string, "_off", "")
return string
end
function gate_state(pos)
name = minetest.env:get_node(pos).name
if string.find(name, "off")~=nil then
return false
else
return true
end
end
function set_gate(pos, on)
gate = get_gate(pos)
local rules = {{x=1, y=0, z=0}}
if on then
if not gate_state(pos) then
minetest.env:add_node(pos, {name="mesecons_gates:"..gate.."_on"})
mesecon:receptor_on(pos, rules)
end
else
if gate_state(pos) then
minetest.env:add_node(pos, {name="mesecons_gates:"..gate.."_off"})
mesecon:receptor_off(pos, rules)
end
end
end
function update_gate(pos)
gate = get_gate(pos)
L = yc_get_real_portstates(pos)
if gate == "diode" then
set_gate(pos, L.a)
elseif gate == "not" then
set_gate(pos, not L.a)
elseif gate == "nand" then
set_gate(pos, not(L.b and L.d))
elseif gate == "and" then
set_gate(pos, L.b and L.d)
else--if gate == "xor" then
set_gate(pos, (L.b and not L.d) or (not L.b and L.d))
end
end
mesecon:register_on_signal_change(function(pos,node)
if string.find(node.name, "mesecons_gates:")~=nil then
update_gate(pos)
end
end)
|
