mirror of
https://gitlab.com/deetmit/mesecons_x.git
synced 2024-07-15 12:19:40 +02:00
89 lines
2.6 KiB
Lua
89 lines
2.6 KiB
Lua
local esc = minetest.formspec_escape
|
|
|
|
function fs_all(db)
|
|
local info = fs_info(db.title,db.text,db)
|
|
local stats = fs_stats(db.nodes, db.direction)
|
|
local circuit = fs_circuit(db.view)
|
|
|
|
local spec = info .. stats .. circuit
|
|
return spec
|
|
end
|
|
|
|
|
|
|
|
function fs_info(title,text)
|
|
local formspec =
|
|
"formspec_version[3]"..
|
|
"size[32,25]"..
|
|
"field[0.5,1;8,1;title;".."Name"..";"..esc(title).."]"..
|
|
"label[15,0.7;Circuit Preview]"..
|
|
"textarea[0.5,3;8,15;text;" .. "Description:" .. ";" ..
|
|
esc(text) .. "]" ..
|
|
"button_exit[2.5,18;3,1;save;" .. "Save" .. "]"
|
|
|
|
return formspec
|
|
end
|
|
|
|
|
|
function fs_circuit(mx_view)
|
|
local W = 20
|
|
local H = 20
|
|
local startx = 10
|
|
local starty = 2
|
|
|
|
local imagew = W/(mx_view.w)
|
|
local imageh = H/(mx_view.h)
|
|
|
|
if imageh > 1 then imageh = 1 end
|
|
if imagew > 1 then imagew = 1 end
|
|
|
|
local minsize = math.min(imageh,imagew)
|
|
imageh = minsize
|
|
imagew = minsize
|
|
|
|
local epsilon = 0.07
|
|
|
|
|
|
local spec = ""
|
|
for ix=1,mx_view.w do
|
|
for iy=1,mx_view.h do
|
|
local n = mx_get(mx_view,ix,iy)
|
|
if n == nil then n = {name="air",param2=0} end
|
|
local img = node_to_image( n )
|
|
|
|
|
|
spec = spec .. "image["..
|
|
startx+ix*imagew .. "," ..
|
|
starty+(mx_view.h-iy+1)*imageh .. ";" ..
|
|
imagew +epsilon .. "," ..
|
|
imageh +epsilon .. ";" ..
|
|
img .. "]"
|
|
|
|
end
|
|
end
|
|
|
|
return spec
|
|
|
|
end
|
|
|
|
function fs_stats(nodes,direction)
|
|
local block, gate, wire = get_stats(nodes)
|
|
|
|
|
|
|
|
|
|
local sx = nodes.sx
|
|
local sy = nodes.sy
|
|
local sz = nodes.sz
|
|
|
|
local stats = "size : " .. sx .. "x"..sy .. "x"..sz .. "(=".. sx*sy*sz .. ")\n" ..
|
|
"wires : " .. wire .. "\n" ..
|
|
"gates : " .. gate .. "\n" ..
|
|
"others : ".. block - wire - gate .. "\n" ..
|
|
"blocks: " .. block
|
|
local spec = "textarea[0.5,19;8,5;;;" .. esc(stats) .. "]"
|
|
return spec
|
|
end
|
|
|
|
|