Camas/mods/jewels/init.lua

284 lines
7.7 KiB
Lua
Raw Normal View History

2015-09-02 04:11:29 +02:00
--
-- Jewels mod
-- By Kaadmy
--
jewels = {}
-- Array of registered jeweled tools
2015-09-02 04:11:29 +02:00
jewels.registered_jewels = {}
-- Formspec
local form_bench = default.ui.get_page("default:2part")
form_bench = form_bench .. "list[current_name;main;2.25,1.75;1,1;]"
form_bench = form_bench .. "listring[current_name;main]"
form_bench = form_bench .. default.ui.get_itemslot_bg(2.25, 1.75, 1, 1)
form_bench = form_bench .. "label[3.25,1.75;1. Place unjeweled tool here]"
form_bench = form_bench .. "label[3.25,2.25;2. Hold a jewel and punch the bench]"
form_bench = form_bench .. "list[current_player;main;0.25,4.75;8,4;]"
form_bench = form_bench .. "listring[current_player;main]"
form_bench = form_bench .. default.ui.get_hotbar_itemslot_bg(0.25, 4.75, 8, 1)
form_bench = form_bench .. default.ui.get_itemslot_bg(0.25, 5.75, 8, 3)
default.ui.register_page("jewels_bench", form_bench)
local function plus_power(i)
if i >= 0 then
i = "+" .. i
end
2015-09-02 04:11:29 +02:00
return i
end
function jewels.register_jewel(toolname, new_toolname, def)
-- registers a new tool with different stats
local data = {
2015-09-02 19:44:07 +02:00
name = new_toolname, -- the new name of the tool
2015-09-02 04:11:29 +02:00
overlay = def.overlay or "jewels_jeweled_handle.png", -- overlay image
2015-10-19 20:46:45 +02:00
description = def.description or nil,
2015-09-02 04:11:29 +02:00
stats = {
digspeed = def.stats.digspeed, -- negative digs faster
maxlevel = def.stats.maxlevel, -- positive digs higher levels
maxdrop = def.stats.maxdrop, -- positive increases max drop level
2015-09-02 04:11:29 +02:00
uses = def.stats.uses, -- positive increases uses
fleshy = def.stats.fleshy, -- positive increases fleshy damage
range = def.stats.range, -- positive increases reach distance with tool
}
}
2015-09-02 19:44:07 +02:00
if not jewels.registered_jewels[toolname] then
jewels.registered_jewels[toolname] = {}
end
2015-09-02 19:44:07 +02:00
table.insert(jewels.registered_jewels[toolname], data)
2015-09-02 04:11:29 +02:00
local tooldef = minetest.deserialize(
minetest.serialize(minetest.registered_tools[toolname]))
if not tooldef then
minetest.log("warning",
"Trying to register jewel " .. new_toolname
.. " that has an unknown output item " .. toolname)
return
end
2015-09-02 04:11:29 +02:00
local new_tool_invimage = ""
if tooldef.inventory_image then
new_tool_invimage = tooldef.inventory_image .. "^" .. data.overlay
end
local new_tool_wieldimage = ""
if tooldef.wield_image then
new_tool_wieldimage = tooldef.wield_image .. "^" .. data.overlay
end
2015-09-02 19:44:07 +02:00
local new_tooldef = tooldef
2015-09-02 04:11:29 +02:00
local desc = new_tooldef.description or ""
desc = "Jeweled " .. desc
2015-10-19 20:46:45 +02:00
if data.description ~= nil then
desc = data.description
end
2015-09-02 04:11:29 +02:00
new_tooldef.inventory_image = new_tool_invimage
new_tooldef.wield_image = new_tool_wieldimage
if data.stats.range and new_tooldef.range then
new_tooldef.range = new_tooldef.range + data.stats.range
desc = desc .. "\nRange: " .. plus_power(data.stats.range)
2015-09-02 04:11:29 +02:00
end
if new_tooldef.tool_capabilities then
if data.stats.maxdrop and new_tooldef.tool_capabilities.max_drop_level then
new_tooldef.tool_capabilities.max_drop_level =
new_tooldef.tool_capabilities.max_drop_level + data.stats.maxdrop
desc = desc .. "\nDrop level: " .. plus_power(data.stats.maxdrop)
2015-09-02 04:11:29 +02:00
end
if data.stats.digspeed then
for group, cap in pairs(new_tooldef.tool_capabilities.groupcaps) do
for i, _ in ipairs(cap.times) do
cap.times[i] = cap.times[i] + data.stats.digspeed
end
if data.stats.maxlevel and cap.maxlevel then
cap.maxlevel = cap.maxlevel + data.stats.maxlevel
end
if data.stats.uses and cap.uses then
cap.uses = cap.uses + data.stats.uses
end
end
desc = desc .. "\nDig time: " .. plus_power(data.stats.digspeed) .. " seconds"
end
if data.stats.uses then
desc = desc .. "\nUses: " .. plus_power(data.stats.uses)
end
if data.stats.maxlevel then
desc = desc .. "\nDig level: " .. plus_power(data.stats.maxlevel)
2015-09-02 04:11:29 +02:00
end
if data.stats.fleshy and new_tooldef.tool_capabilities.damage_groups
and new_tooldef.tool_capabilities.damage_groups.fleshy then
new_tooldef.tool_capabilities.damage_groups.fleshy =
new_tooldef.tool_capabilities.damage_groups.fleshy + data.stats.fleshy
desc = desc .. "\nDamage: " .. plus_power(data.stats.fleshy)
2015-09-02 04:11:29 +02:00
end
end
new_tooldef.description = desc
2015-09-02 04:11:29 +02:00
minetest.register_tool(new_toolname, new_tooldef)
2015-09-02 04:11:29 +02:00
end
function jewels.can_jewel(toolname)
for name, _ in pairs(jewels.registered_jewels) do
if name == toolname then
return true
end
end
return false
end
2015-09-02 19:44:07 +02:00
function jewels.get_jeweled(toolname)
for name, jables in pairs(jewels.registered_jewels) do
if name == toolname then
return util.choice_element(jables)
end
end
end
-- Items
minetest.register_craftitem(
2015-09-02 04:11:29 +02:00
"jewels:jewel",
{
description = "Jewel",
inventory_image = "jewels_jewel.png",
stack_max = 10
})
2015-09-02 04:11:29 +02:00
-- Nodes
minetest.register_node(
2015-09-02 18:37:01 +02:00
"jewels:bench",
{
description = "Jewelers Workbench",
tiles ={"jewels_bench_top.png", "jewels_bench_bottom.png", "jewels_bench_sides.png"},
paramtype2 = "facedir",
groups = {snappy=2,choppy=2,oddly_breakable_by_hand=2},
legacy_facedir_simple = true,
is_ground_content = false,
sounds = default.node_sound_wood_defaults(),
2015-09-02 18:37:01 +02:00
on_construct = function(pos)
local meta = minetest.get_meta(pos)
meta:set_string("formspec", default.ui.get_page("jewels_bench"))
meta:set_string("infotext", "Jewelers Workbench")
2015-09-02 18:37:01 +02:00
local inv = meta:get_inventory()
inv:set_size("main", 1)
end,
2015-09-02 18:37:01 +02:00
can_dig = function(pos, player)
local meta = minetest.get_meta(pos)
local inv = meta:get_inventory()
2015-09-02 19:44:07 +02:00
return inv:is_empty("main")
end,
2015-09-02 19:44:07 +02:00
on_punch = function(pos, node, player, pointed_thing)
local itemstack = player:get_wielded_item()
if itemstack:get_name() == "jewels:jewel" then
local meta = minetest.get_meta(pos)
local inv = meta:get_inventory()
2015-09-02 19:44:07 +02:00
local itemname = inv:get_stack("main", 1):get_name()
2015-09-02 19:44:07 +02:00
if jewels.can_jewel(itemname) then
inv:set_stack("main", 1, ItemStack(jewels.get_jeweled(itemname)))
2015-09-02 19:44:07 +02:00
itemstack:take_item()
achievements.trigger_achievement(player, "jeweler")
achievements.trigger_achievement(player, "master_jeweler")
end
end
2015-09-02 19:44:07 +02:00
player:set_wielded_item(itemstack)
end,
})
2015-09-02 19:44:07 +02:00
minetest.register_node(
2015-09-24 02:15:02 +02:00
"jewels:jewel_ore",
{
description = "Jewel Ore",
tiles = {
"default_tree_birch_top.png",
"default_tree_birch_top.png",
"default_tree_birch.png^jewels_ore.png"
},
2015-09-24 02:15:02 +02:00
drop = "jewels:jewel",
groups = {snappy=1, choppy=1, tree=1},
sounds = default.node_sound_wood_defaults(),
})
2015-09-24 02:15:02 +02:00
-- Ore
minetest.register_ore(
2015-09-24 02:15:02 +02:00
{
ore_type = "scatter",
ore = "jewels:jewel_ore",
wherein = "default:tree_birch",
clust_scarcity = 11*11*11,
2015-09-24 02:15:02 +02:00
clust_num_ores = 3,
clust_size = 6,
y_min = 0,
y_max = 31000,
})
2015-09-02 18:37:01 +02:00
crafting.register_craft(
{
output = "jewels:bench",
items = {
"group:planks 5",
"default:ingot_carbon_steel 2",
"jewels:jewel",
}
})
-- Achievements
achievements.register_achievement(
"jeweler",
{
title = "Jeweler",
description = "Jewel a tool",
times = 1,
})
achievements.register_achievement(
"master_jeweler",
{
title = "Master Jeweler",
description = "Jewel 10 tools",
times = 10,
})
-- The tool jewel definitions
dofile(minetest.get_modpath("jewels").."/jewels.lua")
default.log("mod:jewels", "loaded")