techage/iron_age/charcoalpile.lua

235 lines
6.7 KiB
Lua

--[[
TechAge
=======
Copyright (C) 2019 Joachim Stolberg
LGPLv2.1+
See LICENSE.txt for more information
Charcoalpile to produce charcoal
]]--
-- Load support for intllib.
local MP = minetest.get_modpath("techage")
local S, NS = dofile(MP.."/intllib.lua")
local PILE_BURN_TIME = 1200
local COAL_BURN_TIME = 700
-- determine the number of wood nodes
local function num_wood(pos)
local pos1 = {x=pos.x-1, y=pos.y, z=pos.z-1}
local pos2 = {x=pos.x+1, y=pos.y+2, z=pos.z+1}
local nodes = minetest.find_nodes_in_area(pos1, pos2, "group:wood")
return #nodes
end
-- determine the number of nodes nodes (around wood)
local function num_dirt(pos)
local pos1 = {x=pos.x-2, y=pos.y-1, z=pos.z-2}
local pos2 = {x=pos.x+2, y=pos.y+3, z=pos.z+2}
local nodes = minetest.find_nodes_in_area(pos1, pos2, {"default:dirt", "default:dirt_with_grass",
"default:dirt_with_dry_grass", "default:dirt_with_snow", "techage:dirt_with_ash"})
return #nodes
end
-- replace pile top nodes
local function make_dirt_with_dry_grass(pos)
local pos1 = {x=pos.x-2, y=pos.y+3, z=pos.z-2}
local pos2 = {x=pos.x+2, y=pos.y+3, z=pos.z+2}
for _,p in ipairs(minetest.find_nodes_in_area(pos1, pos2, "default:dirt_with_grass")) do
minetest.swap_node(p, {name = "default:dirt_with_dry_grass"})
end
end
-- replace pile bottom nodes
local function make_dirt_with_ash(pos)
local pos1 = {x=pos.x-1, y=pos.y-1, z=pos.z-1}
local pos2 = {x=pos.x+1, y=pos.y-1, z=pos.z+1}
for _,p in ipairs(minetest.find_nodes_in_area(pos1, pos2, "default:dirt")) do
minetest.swap_node(p, {name = "techage:dirt_with_ash"})
end
end
local function start_smoke(pos)
local meta = minetest.get_meta(pos)
pos = {x=pos.x, y=pos.y+3.6, z=pos.z}
local id = meta:get_int("smoke")
local above = minetest.get_node(pos).name
if id ~= 0 then
minetest.delete_particlespawner(id)
meta:set_int("smoke", 0)
end
if above == "air" then
id = minetest.add_particlespawner({
amount = 4, time = 0, collisiondetection = true,
minpos = {x=pos.x-0.25, y=pos.y+0.1, z=pos.z-0.25},
maxpos = {x=pos.x+0.25, y=pos.y+5, z=pos.z+0.25},
minvel = {x=-0.2, y=0.3, z=-0.2}, maxvel = {x=0.2, y=1, z=0.2},
minacc = {x=0,y=0,z=0}, maxacc = {x=0,y=0.5,z=0},
minexptime = 1, maxexptime = 3,
minsize = 6, maxsize = 12,
texture = "techage_smoke.png",
})
meta:set_int("smoke", id)
end
end
local function stop_smoke(pos)
local meta = minetest.get_meta(pos)
local id = meta:get_int("smoke")
if id ~= 0 then
minetest.delete_particlespawner(id)
end
meta:set_int("smoke", 0)
end
-- replace wood by burning coal
local function collapse_pile(pos)
local pos1 = {x=pos.x-1, y=pos.y, z=pos.z-1}
local pos2 = {x=pos.x+1, y=pos.y+2, z=pos.z+1}
techage.ironage_swap_nodes(pos1, pos2, "group:wood", "techage:charcoal_burn")
stop_smoke(pos)
make_dirt_with_ash(pos)
end
-- replace wood by coal
local function convert_to_coal(pos)
local pos1 = {x=pos.x-1, y=pos.y+1, z=pos.z-1}
local pos2 = {x=pos.x+1, y=pos.y+2, z=pos.z+1}
techage.ironage_swap_nodes(pos1, pos2, "group:wood", "air")
pos1 = {x=pos.x-1, y=pos.y+0, z=pos.z-1}
pos2 = {x=pos.x+1, y=pos.y+1, z=pos.z+1}
techage.ironage_swap_nodes(pos1, pos2, "group:wood", "techage:charcoal")
stop_smoke(pos)
minetest.swap_node(pos, {name = "techage:charcoal"})
make_dirt_with_ash(pos)
make_dirt_with_dry_grass(pos)
end
function techage.start_pile(pos)
local meta = minetest.get_meta(pos)
meta:set_int("ignite", minetest.get_gametime())
minetest.get_node_timer(pos):start(20)
end
-- node timer function
function techage.keep_running_pile(pos)
local meta = minetest.get_meta(pos)
if meta:get_int("running") == 0 then
if num_wood(pos) == 26 and num_dirt(pos) == 98 then
meta:set_int("running", 1)
start_smoke(pos)
elseif minetest.get_gametime() > (meta:get_int("ignite") + 10) then
collapse_pile(pos)
minetest.remove_node(pos)
return false
end
else
if num_wood(pos) ~= 26 or num_dirt(pos) ~= 98 then
collapse_pile(pos)
minetest.remove_node(pos)
return false
elseif minetest.get_gametime() > (meta:get_int("ignite") + PILE_BURN_TIME) then
convert_to_coal(pos)
return false
end
end
return true
end
function techage.stop_pile(pos)
collapse_pile(pos)
end
minetest.register_node("techage:dirt_with_ash", {
description = S("Dirt with Ash"),
tiles = {
"techage_ash.png",
"default_dirt.png",
{name = "default_dirt.png^techage_ash_side.png",
tileable_vertical = false}},
groups = {crumbly = 3, soil = 1, spreading_dirt_type = 1, not_in_creative_inventory=1},
drop = 'default:dirt',
sounds = default.node_sound_dirt_defaults({
footstep = {name = "default_grass_footstep", gain = 0.4},
}),
})
minetest.register_node("techage:charcoal_burn", {
tiles = {"techage_charcoal_burn.png"},
after_place_node = function(pos)
minetest.get_node_timer(pos):start(math.random(COAL_BURN_TIME, COAL_BURN_TIME*1.2))
end,
on_timer = function(pos)
minetest.remove_node(pos)
return false
end,
drop = "",
light_source = 10,
is_ground_content = false,
groups = {crumbly = 2, falling_node = 1, not_in_creative_inventory=1},
sounds = default.node_sound_dirt_defaults(),
})
minetest.register_node("techage:charcoal", {
description = S("TA1 Charcoal"),
tiles = {"techage_charcoal.png"},
on_ignite = function(pos, igniter)
minetest.after(2, minetest.swap_node, pos, {name = "techage:charcoal_burn"})
minetest.after(COAL_BURN_TIME/2, minetest.remove_node, pos)
end,
is_ground_content = false,
groups = {crumbly = 2, falling_node = 1},
sounds = default.node_sound_dirt_defaults(),
})
minetest.register_craft({
type = "fuel",
recipe = "techage:charcoal",
burntime = 370,
})
minetest.register_lbm({
label = "[techage] Lighter update",
name = "techage:update",
nodenames = {"techage:lighter_burn"},
run_at_every_load = true,
action = function(pos, node)
local meta = minetest.get_meta(pos)
if meta:get_int("running") == 1 then
start_smoke(pos)
end
end
})
local PileHelp = S([[Coal Pile to produce charcoal:
- build a 5x5 block dirt base
- place a lighter in the centre
- build a 3x3x3 wood cube around
- cover all with dirt to a 5x5x5 cube
- keep a hole to the lighter
- ignite the lighter and immediately
- close the pile with one wood and one dirt
- open the pile after the smoke disappeared
(see plan)]])
local PileImages = {
{"default_dirt", "default_dirt", "default_dirt", "default_dirt", "default_dirt"},
{"default_dirt", "default_wood", "default_wood", "default_wood", "default_dirt"},
{"default_dirt", "default_wood", "default_wood", "default_wood", "default_dirt"},
{"default_dirt", "default_wood", "techage_lighter", "default_wood", "default_dirt"},
{"default_dirt", "default_dirt", "default_dirt", "default_dirt", "default_dirt"},
}
techage.register_help_page("Coal Pile", PileHelp, nil, PileImages)