techage/solar/solarcell.lua

--[[

	TechAge
	=======

	Copyright (C) 2019 Joachim Stolberg

	GPL v3
	See LICENSE.txt for more information

	TA4 Solar Module and Carriers
	
]]--

-- for lazy programmers
local P = minetest.string_to_pos
local M = minetest.get_meta
local S = techage.S

local PWR_PERF = 3

local Cable = techage.TA4_Cable
local power = techage.power

local function temperature(pos)
	local data = minetest.get_biome_data(pos)
	if data then
		return math.floor(data.heat) or 0
	end
	return 0
end

-- return the required param2 for solar modules
local function get_param2(pos, side)
	local node = minetest.get_node(pos)
	local dir = power.side_to_dir(node.param2, side)
	return (dir + 1) % 4
end

-- do we have enough light?
local function light(pos)
	pos.y = pos.y + 1
	local light = minetest.get_node_light(pos) or 0
	pos.y = pos.y - 1
	return light >= (minetest.LIGHT_MAX - 1)
end	
	
-- check if solar module is available and has the correct orientation
local function is_solar_module(base_pos, pos, side)
	local pos1 = techage.get_pos(pos, side)
	if pos1 then
		local node = minetest.get_node(pos1)
		if node and node.name == "techage:ta4_solar_module" and light(pos1) then
			if side == "L" and node.param2 == M(base_pos):get_int("left_param2") then
				return true
			elseif side == "R" and node.param2 == M(base_pos):get_int("right_param2") then
				return true
			end
		end
	end
	return false
end

-- provide the available power, which is temperature dependent
local function on_getpower1(pos, mem)
	local pos1 = {x = pos.x, y = pos.y, z = pos.z}
	if is_solar_module(pos, pos1, "L") and is_solar_module(pos, pos1, "R") then
		return PWR_PERF * M(pos):get_int("temperature") / 100.0
	end
	return 0
end

local function on_getpower2(pos, mem)
	local pos1 = {x = pos.x, y = pos.y+1, z = pos.z}
	if is_solar_module(pos, pos1, "L") and is_solar_module(pos, pos1, "R") then
		return PWR_PERF * M(pos):get_int("temperature") / 100.0
	end
	return 0
end


minetest.register_node("techage:ta4_solar_module", {
	description = S("TA4 Solar Module"),
	inventory_image = "techage_solar_module_top.png",
	tiles = {
		-- up, down, right, left, back, front
		"techage_solar_module_top.png",
		"techage_solar_module_bottom.png",
	},
	drawtype = "nodebox",
	node_box = {
		type = "fixed",
		fixed = {
			{-1/2, 7/16, -1/2,  1/2, 8/16, 16/16},
		},
	},
	
	paramtype = "light",
	paramtype2 = "facedir",
	groups = {cracky=2, crumbly=2, choppy=2},
	is_ground_content = false,
})

minetest.register_node("techage:ta4_solar_carrier", {
	description = S("TA4 Solar Carrier Module"),
	tiles = {
		-- up, down, right, left, back, front
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten^techage_appl_ta4_cable.png",
		"techage_concrete.png^[brighten^techage_appl_ta4_cable.png",
	},
	drawtype = "nodebox",
	node_box = {
		type = "fixed",
		fixed = {
			{-3/8, -8/16, -1/2,  3/8, -6/16, 1/2},
			{-1/8, -6/16, -1/2,  1/8,  6/16, 1/2},
			{-3/8,  5/16, -1/2,  3/8,  7/16, 1/2},
		},
	},
	paramtype = "light",
	paramtype2 = "facedir",
	groups = {cracky=2, crumbly=2, choppy=2},
	is_ground_content = false,
})

minetest.register_node("techage:ta4_solar_carrierB", {
	description = S("TA4 Solar Carrier Module B"),
	tiles = {
		-- up, down, right, left, back, front
		"techage_concrete.png^[brighten^techage_appl_ta4_cable.png",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten^techage_appl_ta4_cable.png",
		"techage_concrete.png^[brighten^techage_appl_ta4_cable.png",
	},
	drawtype = "nodebox",
	node_box = {
		type = "fixed",
		fixed = {
			{-3/8, -8/16, -1/2,  3/8, -6/16, 1/2},
			{-1/8, -6/16, -1/2,  1/8,  8/16, 1/2},
		},
	},
	paramtype = "light",
	paramtype2 = "facedir",
	groups = {cracky=2, crumbly=2, choppy=2},
	is_ground_content = false,
})

minetest.register_node("techage:ta4_solar_carrierT", {
	description = S("TA4 Solar Carrier Module T"),
	tiles = {
		-- up, down, right, left, back, front
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
		"techage_concrete.png^[brighten",
	},
	drawtype = "nodebox",
	node_box = {
		type = "fixed",
		fixed = {
			{-1/8, -8/16, -1/2,  1/8,  6/16, 1/2},
			{-3/8,  5/16, -1/2,  3/8,  7/16, 1/2},
		},
	},
	
	paramtype = "light",
	paramtype2 = "facedir",
	groups = {cracky=2, crumbly=2, choppy=2},
	is_ground_content = false,
})

techage.power.register_node({"techage:ta4_solar_carrier"}, {
	power_network  = Cable,
	on_getpower = on_getpower1,
	conn_sides ={"F", "B"},
	after_place_node = function(pos)
		M(pos):set_int("temperature", temperature(pos))
		M(pos):set_int("left_param2", get_param2(pos, "L"))
		M(pos):set_int("right_param2", get_param2(pos, "R"))
	end,
})

techage.power.register_node({"techage:ta4_solar_carrierB"}, {
	power_network  = Cable,
	on_getpower = on_getpower2,
	conn_sides ={"F", "B"},
	after_place_node = function(pos)
		M(pos):set_int("temperature", temperature(pos))
		M(pos):set_int("left_param2", get_param2(pos, "L"))
		M(pos):set_int("right_param2", get_param2(pos, "R"))
	end,
})

minetest.register_craft({
	output = "techage:ta4_solar_module",
	recipe = {
		{"techage:ta4_silicon_wafer", "techage:ta4_silicon_wafer", "techage:ta4_silicon_wafer"},
		{"default:tin_ingot", "default:copper_ingot", "default:tin_ingot"},
		{"", "", ""},
	},
})

minetest.register_craft({
	output = "techage:ta4_solar_carrierB 2",
	recipe = {
		{"", "default:steel_ingot", ""},
		{"", "techage:ta4_power_cableS", ""},
		{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
	},
})

minetest.register_craft({
	output = "techage:ta4_solar_carrierT 2",
	recipe = {
		{"default:steel_ingot", "default:steel_ingot", "default:steel_ingot"},
		{"", "default:steel_ingot", ""},
		{"", "techage:ta4_power_cableS", ""},
	},
})

minetest.register_craft({
	output = "techage:ta4_solar_carrier",
	recipe = {
		{"", "techage:ta4_solar_carrierT", ""},
		{"", "techage:ta4_solar_carrierB", ""},
		{"", "", ""},
	},
})