Initial working version

README.md

@@ -1,2 +1,4 @@
 # powerbanks
- A Minetest mod
+ A Minetest mod that adds portable powerbanks that can be used to recharge technic tools
+ 
+ Dependencies: default, technic

depends.txt

@@ -0,0 +1 @@
+technic

init.lua

@@ -0,0 +1,262 @@
+local charge_time = 1
+
+local function is_owner(pos, player)
+	local name = ""
+	if player then
+		name = player:get_player_name()
+	end
+	local owner = minetest.get_meta(pos):get_string("owner")
+	if owner == "" or owner == name or minetest.check_player_privs(name, "protection_bypass") then
+		return true
+	end
+	return false
+end
+
+local function is_chargeable(stack)
+	local item_name = stack:get_name()
+	if not technic.power_tools[item_name] then
+		return false
+	end
+	if item_name:find("powerbanks:powerbank") then
+		return false
+	end
+	return true
+end
+
+local function register_powerbank(data)
+
+	local formspec =
+		"size[8,6]" ..
+		"list[current_name;main;0,0.25;4,1;]" ..
+		"list[current_player;main;0,2;8,4;]" ..
+		"listring[current_name;main]" ..
+		"listring[current_player;main]"
+
+	local function update_infotext(pos, is_charging)
+		local meta = minetest.get_meta(pos)
+		local current_charge = technic.EU_string(meta:get_int("EU_charge"))
+		local max_charge = technic.EU_string(data.max_charge)
+		local status = "Idle"
+		if is_charging then
+			status = "Charging"
+		end
+		local infotext = "Powerbank Mk"..data.mark..": "..current_charge.." / "..max_charge.." "..status
+		meta:set_string("infotext", infotext)
+	end
+
+	local function charge_item(item, powerbank_charge, charge_step)
+		local item_meta = minetest.deserialize(item:get_metadata()) or {}
+		if not item_meta.charge then
+			item_meta.charge = 0
+		end
+		local item_max_charge = technic.power_tools[item:get_name()]
+		local item_charge = item_meta.charge
+
+		charge_step = math.min(charge_step, powerbank_charge)
+		charge_step = math.min(charge_step, item_max_charge - item_charge)
+		item_charge = item_charge + charge_step
+		powerbank_charge = powerbank_charge - charge_step
+
+		technic.set_RE_wear(item, item_charge, item_max_charge)
+		item_meta.charge = item_charge
+		item:set_metadata(minetest.serialize(item_meta))
+
+		return item, powerbank_charge, (item_charge == item_max_charge)
+	end
+
+	local function do_charging(pos, charge_step)
+		local meta = minetest.get_meta(pos)
+		local current_charge = meta:get_int("EU_charge")
+		local inv = meta:get_inventory()
+		local still_charging = false
+
+		for i = 1, inv:get_size("main") do
+			local stack = inv:get_stack("main", i)
+			local item_fully_charged = false
+			if (not stack:is_empty()) and (current_charge > 0) then
+				stack, current_charge, item_fully_charged = charge_item(stack, current_charge, charge_step)
+				inv:set_stack("main", i, stack)
+
+				if not item_fully_charged then
+					still_charging = true
+				end
+			end
+		end
+
+		meta:set_int("EU_charge", current_charge)
+		update_infotext(pos, still_charging)
+
+		return still_charging and (current_charge > 0)
+	end
+
+	minetest.register_node("powerbanks:powerbank_mk"..data.mark.."_node", {
+		description = "Powerbank Mk"..data.mark.." Node",
+		tiles = {
+			"powerbanks_base.png", -- y+ top
+			"powerbanks_base.png", -- y- bottom
+			"powerbanks_base.png^powerbanks_overlay_mk"..data.mark..".png", -- x+ right
+			"powerbanks_base.png^powerbanks_overlay_mk"..data.mark..".png", -- x- left
+			"powerbanks_base.png^powerbanks_overlay_mk"..data.mark..".png", -- z+ back
+			"powerbanks_base.png^powerbanks_overlay_mk"..data.mark..".png" -- z- front
+		},
+		groups = {oddly_breakable_by_hand = 1, not_in_creative_inventory = 1},
+		is_ground_content = false,
+		drop = {},
+
+		can_dig = function(pos, player)
+			if not player then
+				return false
+			end
+
+			local meta = minetest.get_meta(pos)
+			local node_inv = meta:get_inventory()
+
+			if not is_owner(pos, player) then
+				minetest.chat_send_player(player:get_player_name(), "Powerbank is owned by "..meta:get_string("owner"))
+				return false
+			end
+
+			if not node_inv:is_empty("main") then
+				minetest.chat_send_player(player:get_player_name(), "Powerbank cannot be removed because it is not empty")
+				return false
+			end
+
+			return true
+		end,
+		
+		allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+			if is_owner(pos, player) then
+				return count
+			end
+			return 0
+		end,
+		allow_metadata_inventory_put = function(pos, listname, index, stack, player)
+			if is_owner(pos, player) and is_chargeable(stack) then
+				return stack:get_count()
+			end
+			return 0
+		end,
+		allow_metadata_inventory_take = function(pos, listname, index, stack, player)
+			if is_owner(pos, player) then
+				return stack:get_count()
+			end
+			return 0
+		end,
+
+		on_metadata_inventory_put = function(pos, listname, index, stack, player)
+			local timer = minetest.get_node_timer(pos)
+			if not timer:is_started() then
+				timer:start(charge_time)
+			end
+		end,
+
+		on_timer = function(pos, elapsed)
+			return do_charging(pos, data.charge_step)
+		end,
+
+		on_punch = function(pos, node, player)
+			local node_meta = minetest.get_meta(pos)
+
+			if not (is_owner(pos, player) and node_meta:get_inventory():is_empty("main")) then
+				return
+			end
+
+			local item_meta = {charge = node_meta:get_int("EU_charge")}
+			local item = ItemStack({name="powerbanks:powerbank_mk"..data.mark, metadata = minetest.serialize(item_meta)})
+			technic.set_RE_wear(item, item_meta.charge, data.max_charge)
+
+			local player_inv = player:get_inventory()
+			if player_inv:room_for_item("main", item) then
+				player_inv:add_item("main", item)
+			else
+				minetest.add_item(pos, item)
+			end
+
+			minetest.remove_node(pos)
+		end
+	})
+
+	minetest.register_tool("powerbanks:powerbank_mk"..data.mark, {
+		description = "Powerbank Mk"..data.mark,
+		inventory_image = minetest.inventorycube(
+			"powerbanks_base.png",
+			"powerbanks_base.png^powerbanks_overlay_mk"..data.mark..".png",
+			"powerbanks_base.png^powerbanks_overlay_mk"..data.mark..".png"
+		),
+		stack_max = 1,
+		wear_represents = "technic_RE_charge",
+		on_refill = technic.refill_RE_charge,
+
+		on_place = function(itemstack, placer, pointed_thing)
+			local pos = pointed_thing.above
+			local placer_name = placer:get_player_name()
+
+			if minetest.is_protected(pos, placer_name) then
+				return itemstack
+			end
+			
+			local fake_itemstack = ItemStack({name = "powerbanks:powerbank_mk"..data.mark.."_node", count = 1})
+			local placed = false
+			
+			fake_itemstack, placed = minetest.item_place_node(fake_itemstack, placer, pointed_thing)
+			
+			if not placed then
+				return itemstack
+			end
+
+			local node_meta = minetest.get_meta(pos)
+			local item_meta = minetest.deserialize(itemstack:get_metadata()) or {}
+			if not item_meta.charge then
+				item_meta.charge = 0
+			end
+
+			node_meta:get_inventory():set_size("main", data.charging_slots)
+			node_meta:set_string("owner", placer_name)
+			node_meta:set_string("formspec", formspec)
+			node_meta:set_int("EU_charge", item_meta.charge)
+			
+			update_infotext(pos, false)
+
+			itemstack:clear()
+			return itemstack
+		end
+	})
+
+	technic.register_power_tool("powerbanks:powerbank_mk"..data.mark, data.max_charge)
+
+	minetest.register_craft({
+		output = "powerbanks:powerbank_mk"..data.mark,
+		recipe = {
+			{"technic:battery", "technic:battery", "technic:battery"},
+			{"technic:stainless_steel_ingot", data.craft_base, "technic:stainless_steel_ingot"},
+			{"", data.craft_crystal, ""},
+		}
+	})
+end
+
+register_powerbank({ -- Powerbank Mk1
+	mark = 1,
+	max_charge = 300000,
+	charge_step = 3000,
+	charging_slots = 1,
+	craft_base = "technic:machine_casing",
+	craft_crystal = "technic:red_energy_crystal",
+})
+
+register_powerbank({ -- Powerbank Mk2
+	mark = 2,
+	max_charge = 600000,
+	charge_step = 6000,
+	charging_slots = 2,
+	craft_base = "powerbanks:powerbank_mk1",
+	craft_crystal = "technic:green_energy_crystal"
+})
+
+register_powerbank({ -- Powerbank Mk3
+	mark = 3,
+	max_charge = 1200000,
+	charge_step = 12000,
+	charging_slots = 3,
+	craft_base = "powerbanks:powerbank_mk2",
+	craft_crystal = "technic:blue_energy_crystal"
+})

mod.conf

@@ -0,0 +1,3 @@
+name = powerbanks
+description = Adds portable powerbanks that can be used to recharge technic tools
+depends = technic