219 lines
7.3 KiB
Lua
219 lines
7.3 KiB
Lua
fsg_craft=true --is craftable
|
|
fsg_to_process=500 --before it done
|
|
fsg_to_pro=5 --shows in % example: (5/500 = 1) (10/1000 = 1) ...
|
|
--to add an item: "mod:item",
|
|
fsg_not_generatable={ -- not will be generated
|
|
"fsg:gen",
|
|
"default:diamondblock",
|
|
"default:lava_source",
|
|
"bucket:bucket_lava",
|
|
}
|
|
|
|
fsg_generatable={} -- will be generated but nothing else (leave to accept all)
|
|
|
|
|
|
|
|
fsg_update=function (pos, elapsed)
|
|
local meta=minetest.get_meta(pos)
|
|
local inv=meta:get_inventory()
|
|
local gen=inv:get_stack("gen",1):get_name()
|
|
local process=meta:get_int("proc")
|
|
|
|
if inv:is_empty("gen") or inv:room_for_item("done",gen)==false or inv:is_empty("burn") then
|
|
minetest.get_node_timer(pos):stop()
|
|
meta:set_int("proc",0)
|
|
if inv:room_for_item("done",gen)==false then meta:set_string("infotext", "Free stuff generator [the generator is full (right corner)] (" .. meta:get_string("owner") .. ")") end
|
|
if inv:is_empty("gen") then meta:set_string("infotext", "Free stuff generator [Failed: add something to generate (in left cornter)] (" .. meta:get_string("owner") .. ")") end
|
|
if inv:is_empty("burn") then meta:set_string("infotext", "Free stuff generator [Failed: add stuff to burn] (" .. meta:get_string("owner") .. ")") end
|
|
|
|
|
|
minetest.swap_node(pos, {name ="fsg:gen"})
|
|
return false
|
|
end
|
|
for i=1,32,1 do
|
|
local t=inv:get_stack("burn",i):get_name()
|
|
if t~="" then
|
|
local p=0
|
|
if p==0 and t=="default:coalblock" then p=40 end
|
|
if p==0 and t=="default:coal_lump" then p=10 end
|
|
if p==0 and t=="bucket:bucket_lava" then p=40 end
|
|
if p==0 then p=minetest.get_node_group(t, "tree")*5 end
|
|
if p==0 then p=minetest.get_node_group(t, "snappy")*3 end
|
|
if p==0 then p=minetest.get_node_group(t, "flammable")*3 end
|
|
if p==0 then p=minetest.get_node_group(t, "choppy")*3 end
|
|
if p==0 then p=minetest.get_node_group(t, "hot")*10 end
|
|
if p==0 then p=minetest.get_node_group(t, "igniter")*4 end
|
|
if p==0 then p=1 end
|
|
inv:remove_item("burn",t)
|
|
process=process+p
|
|
if process>=fsg_to_process then
|
|
process=process-fsg_to_process
|
|
inv:add_item("done",gen)
|
|
end
|
|
meta:set_int("proc",process)
|
|
meta:set_string("infotext", "Free stuff generator " .. (process/fsg_to_pro) .."% (" .. meta:get_string("owner") .. ")")
|
|
break
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
|
|
|
|
|
|
function fsg_inv(placer,pos)
|
|
local meta=minetest.get_meta(pos)
|
|
local names=meta:get_string("names")
|
|
local op=meta:get_int("open")
|
|
local open=""
|
|
if op==0 then
|
|
open="Locked"
|
|
elseif op==1 then
|
|
open="Members"
|
|
else
|
|
open="Generally"
|
|
end
|
|
meta:set_string("formspec",
|
|
"size[8,11]" ..
|
|
"list[context;gen;0,0;1,1;]" ..
|
|
"list[context;done;2,0;6,1;]" ..
|
|
"button[0,1; 1.5,1;save;Save]" ..
|
|
"button[0,2; 1.5,1;open;" .. open .."]" ..
|
|
"textarea[2.2,1.3;6,1.8;names;Members list (allow members to take and add);" .. names .."]"..
|
|
"list[context;burn;0,2.9;8,4;]" ..
|
|
"list[current_player;main;0,7;8,4;]" ..
|
|
"listring[current_player;main]" ..
|
|
"listring[current_name;burn]" ..
|
|
"listring[current_player;main]" ..
|
|
"listring[current_name;done]"
|
|
)
|
|
meta:set_string("infotext", "Free stuff generator (" .. placer:get_player_name() .. ")")
|
|
end
|
|
|
|
local fsg_for={{7,"_active",1,"default_meselamp.png^default_obsidian_glass.png"},{0,"",0,"default_steel_block.png^default_obsidian_glass.png"}}
|
|
for i = 1, #fsg_for, 1 do
|
|
minetest.register_node("fsg:gen" .. fsg_for[i][2], {
|
|
description = "Generator",
|
|
tiles = {"default_steel_block.png^default_obsidian_glass.png",fsg_for[i][4]},
|
|
groups = {dig_immediate = 3,not_in_creative_inventory = fsg_for[i][3]},
|
|
paramtype2 = "facedir",
|
|
light_source=fsg_for[i][1],
|
|
sounds=default.node_sound_stone_defaults(),
|
|
after_place_node = function(pos, placer, itemstack)
|
|
local meta = minetest.get_meta(pos)
|
|
meta:set_string("owner", placer:get_player_name())
|
|
meta:set_int("burning", 0)
|
|
meta:set_int("open", 0)
|
|
meta:set_string("names", "")
|
|
meta:set_int("proc", 0)
|
|
meta:set_int("state", 0)
|
|
meta:set_int("type", fsg_for[i][3])
|
|
local inv = meta:get_inventory()
|
|
inv:set_size("burn", 32)
|
|
inv:set_size("gen", 1)
|
|
inv:set_size("done", 6)
|
|
fsg_inv(placer,pos)
|
|
end,
|
|
allow_metadata_inventory_put = function(pos, listname, index, stack, player)
|
|
if fsg_generatable[1]~=nil and listname=="gen" then --accepted things (if somehing is added)
|
|
local cbg=0
|
|
local item=stack:get_name()
|
|
for i, it in pairs(fsg_generatable) do
|
|
if it==item then
|
|
cbg=1
|
|
break
|
|
end
|
|
end
|
|
if cbg==0 then return 0 end
|
|
end
|
|
if listname=="gen" then
|
|
local item=stack:get_name()
|
|
for i, it in pairs(fsg_not_generatable) do ---not accepted things
|
|
if it==item then return 0 end
|
|
end
|
|
end
|
|
local meta=minetest.get_meta(pos)
|
|
local open=meta:get_int("open")
|
|
local name=player:get_player_name()
|
|
local owner=meta:get_string("owner")
|
|
local count=0
|
|
if name==owner and listname~="done" then count=stack:get_count() end
|
|
if open>0 and listname=="burn" then count=stack:get_count() end
|
|
if count>0 and meta:get_int("type")==0 then
|
|
minetest.get_node_timer(pos):start(1)
|
|
minetest.swap_node(pos, {name ="fsg:gen_active"})
|
|
end
|
|
return count
|
|
end,
|
|
allow_metadata_inventory_take = function(pos, listname, index, stack, player)
|
|
local meta=minetest.get_meta(pos)
|
|
local open=meta:get_int("open")
|
|
local name=player:get_player_name()
|
|
local owner=meta:get_string("owner")
|
|
|
|
if name==owner then return stack:get_count() end
|
|
if open==2 and (listname=="burn" or listname=="done") then return stack:get_count() end
|
|
|
|
if open==1 and (listname=="burn" or listname=="done") then
|
|
local names=meta:get_string("names")
|
|
local txt=names.split(names,"\n")
|
|
for i in pairs(txt) do
|
|
if name==txt[i] then
|
|
return stack:get_count()
|
|
end
|
|
|
|
end
|
|
end
|
|
return 0
|
|
end,
|
|
can_dig = function(pos, player)
|
|
local meta=minetest.get_meta(pos)
|
|
local owner=meta:get_string("owner")
|
|
local inv=meta:get_inventory()
|
|
return (player:get_player_name()==owner and owner~="" and inv:is_empty("gen") and inv:is_empty("done") and inv:is_empty("burn"))
|
|
end,
|
|
allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
|
|
local meta = minetest.get_meta(pos)
|
|
if meta:get_int("open")==0 and player:get_player_name()~=minetest.get_meta(pos):get_string("owner") then
|
|
return 0
|
|
end
|
|
if (from_list=="burn" and to_list=="burn") or
|
|
(from_list=="done" and to_list=="done" and player:get_player_name()==minetest.get_meta(pos):get_string("owner")) then
|
|
return count
|
|
end
|
|
return 0
|
|
end,
|
|
on_receive_fields = function(pos, formname, fields, sender)
|
|
local meta = minetest.get_meta(pos)
|
|
if sender:get_player_name() ~= meta:get_string("owner") then
|
|
return false
|
|
end
|
|
|
|
if fields.save then
|
|
meta:set_string("names", fields.names)
|
|
fsg_inv(sender,pos)
|
|
end
|
|
|
|
if fields.open then
|
|
local open=meta:get_int("open")
|
|
open=open+1
|
|
if open>2 then open=0 end
|
|
meta:set_int("open",open)
|
|
fsg_inv(sender,pos)
|
|
end
|
|
end,
|
|
on_timer = fsg_update,
|
|
})
|
|
|
|
end
|
|
|
|
if fsg_craft~=false then
|
|
minetest.register_craft({
|
|
output = "fsg:gen",
|
|
recipe = {
|
|
{"default:steelblock", "default:steelblock", "default:steelblock"},
|
|
{"default:steelblock", "default:mese", "default:steelblock"},
|
|
{"default:steelblock", "default:steelblock", "default:steelblock"},
|
|
}
|
|
})
|
|
end
|
|
fsg_craft=nil |