419 lines
18 KiB
Lua
419 lines
18 KiB
Lua
local exchangeclone = exchangeclone
|
|
|
|
-- Calculates the cheapest recipe given an itemstring.
|
|
-- Would probably benefit from another function, since there's quite a bit
|
|
-- of duplicate code.
|
|
local function get_cheapest_recipe(itemstring, log)
|
|
itemstring = ItemStack(itemstring):get_name()
|
|
local recipes = exchangeclone.recipes[itemstring]
|
|
if not recipes then return end
|
|
local cheapest
|
|
for _, recipe in pairs(recipes) do
|
|
local ingredient_cost = 0
|
|
local output_count = ItemStack(recipe.output):get_count()
|
|
local skip = false
|
|
local identical_replacements = {}
|
|
if recipe.replacements then
|
|
for _, replacement in pairs(recipe.replacements) do
|
|
if replacement[1] == replacement[2] then
|
|
identical_replacements[replacement[1]] = (identical_replacements[replacement[1]] or 0) + 1
|
|
end
|
|
end
|
|
end
|
|
if not recipe.type or exchangeclone.craft_types[recipe.type].type == "shaped" then
|
|
for _, row in pairs(recipe.recipe) do
|
|
for _, item in pairs(row) do
|
|
if item ~= "" then
|
|
if item == itemstring then
|
|
output_count = math.max(0, output_count - 1)
|
|
else
|
|
local replaced = identical_replacements[item]
|
|
if replaced and replaced > 0 then
|
|
identical_replacements[item] = replaced - 1
|
|
else
|
|
local cost = exchangeclone.get_item_emc(item)
|
|
if (not cost) or cost == 0 then
|
|
skip = item
|
|
else
|
|
ingredient_cost = ingredient_cost + cost
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
elseif exchangeclone.craft_types[recipe.type].type == "shapeless" then
|
|
for _, item in pairs(recipe.recipe) do
|
|
if item ~= "" then
|
|
if item == itemstring then
|
|
output_count = math.max(0, output_count - 1)
|
|
else
|
|
local replaced = identical_replacements[item]
|
|
if replaced and replaced > 0 then
|
|
identical_replacements[item] = replaced - 1
|
|
else
|
|
local cost = exchangeclone.get_item_emc(item)
|
|
if (not cost) or cost == 0 then
|
|
skip = item
|
|
else
|
|
ingredient_cost = ingredient_cost + cost
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
elseif exchangeclone.craft_types[recipe.type].type == "cooking" then
|
|
local item = recipe.recipe
|
|
if item ~= "" then
|
|
if item == itemstring then
|
|
output_count = math.max(0, output_count - 1)
|
|
else
|
|
local replaced = identical_replacements[item]
|
|
if replaced and replaced > 0 then
|
|
identical_replacements[item] = replaced - 1
|
|
else
|
|
local cost = exchangeclone.get_item_emc(item)
|
|
if (not cost) or cost == 0 then
|
|
skip = item
|
|
else
|
|
ingredient_cost = ingredient_cost + cost
|
|
end
|
|
end
|
|
end
|
|
end
|
|
elseif exchangeclone.craft_types[recipe.type].type == "emc" then
|
|
ingredient_cost = recipe.recipe
|
|
end
|
|
if recipe.replacements and not skip then
|
|
for _, item in pairs(recipe.replacements) do
|
|
if item[1] ~= item[2] then
|
|
local cost = exchangeclone.get_item_emc(item[2])
|
|
if (not cost) or cost == 0 then
|
|
skip = item[2]
|
|
else
|
|
ingredient_cost = ingredient_cost - cost
|
|
end
|
|
end
|
|
end
|
|
end
|
|
if output_count < 1 then skip = true end
|
|
if not skip then
|
|
local total_cost = math.floor(ingredient_cost*20/math.max(1, output_count))/20 -- allow .05, won't work with huge numbers
|
|
if (not cheapest) or (cheapest[1] > total_cost) then
|
|
cheapest = {total_cost, recipe}
|
|
end
|
|
end
|
|
if log then minetest.log("action", dump({
|
|
recipe = recipe,
|
|
ingredient_cost = ingredient_cost,
|
|
output_count = output_count
|
|
})) end
|
|
end
|
|
return cheapest and cheapest[1]
|
|
end
|
|
|
|
exchangeclone.emc_values = {}
|
|
|
|
-- Sets the EMC value of an item, must be called during load time.
|
|
local function register_emc(itemstring, emc_value)
|
|
if not (emc_value and itemstring) then return end
|
|
emc_value = math.floor(emc_value*20)/20 -- floor to nearest .05
|
|
if emc_value < 0 then return end
|
|
local def = minetest.registered_items[itemstring]
|
|
if not def then return end
|
|
local description = def.description or ""
|
|
|
|
-- Override EMC value if it already exists
|
|
local existing_emc_value = description:find("EMC: ([%d%.,]+)")
|
|
if existing_emc_value then
|
|
description = description:gsub("EMC: ([%d%.,]+)", "EMC: "..exchangeclone.format_number(emc_value))
|
|
else
|
|
if description[#description] ~= "\n" then
|
|
description = description.."\n"
|
|
end
|
|
description = description.."EMC: "..exchangeclone.format_number(emc_value)
|
|
end
|
|
minetest.override_item(itemstring, {
|
|
description = description,
|
|
emc_value = emc_value,
|
|
})
|
|
if emc_value > 0 then
|
|
exchangeclone.emc_values[itemstring] = emc_value
|
|
else
|
|
exchangeclone.emc_values[itemstring] = nil
|
|
end
|
|
end
|
|
|
|
local auto = {}
|
|
|
|
-- Handle stonecutter recipes and decaychains in Mineclonia
|
|
if exchangeclone.mcla then
|
|
exchangeclone.register_craft_type("stonecutting", "cooking")
|
|
-- TODO: Check recipe_yield for every Mineclonia update
|
|
local recipe_yield = { --maps itemgroup to the respective recipe yield, default is 1
|
|
["slab"] = 2,
|
|
["cut_copper"] = 4,
|
|
}
|
|
for result, def in pairs(minetest.registered_items) do
|
|
if minetest.get_item_group(result,"not_in_creative_inventory") == 0 then
|
|
if def._mcl_stonecutter_recipes then
|
|
for _, source in pairs(def._mcl_stonecutter_recipes) do
|
|
local yield = 1
|
|
for k,v in pairs(recipe_yield) do if minetest.get_item_group(result,k) > 0 then yield = v end end
|
|
exchangeclone.register_craft({output = result.." "..yield, type = "stonecutting", recipe = source})
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
if mcl_copper then
|
|
exchangeclone.register_craft_type("decaychain", "cooking")
|
|
exchangeclone.register_craft_type("preserving", "cooking")
|
|
local decaychains = mcl_copper.registered_decaychains
|
|
for name, data in pairs(decaychains) do
|
|
for i, itemstring in ipairs(data.nodes) do
|
|
if minetest.get_item_group(name,"not_in_creative_inventory") == 0 then
|
|
local preserved_itemstring = itemstring.."_preserved"
|
|
exchangeclone.register_craft({output = preserved_itemstring, type = "preserving", recipe = {itemstring, "group:"..data.preserve_group}})
|
|
if i > 1 then
|
|
exchangeclone.register_craft({output = itemstring, type = "decaychain", recipe = data.nodes[i-1]})
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
-- Register clock/compass aliases, handle enchanted/netherite stuff, potions, and concrete, and register coral EMC values
|
|
if exchangeclone.mcl then
|
|
for i = 0, 31 do
|
|
exchangeclone.register_alias("mcl_compass:18", "mcl_compass:"..i)
|
|
exchangeclone.register_alias("mcl_compass:18", "mcl_compass:"..i.."_lodestone")
|
|
end
|
|
for i = 0, 63 do
|
|
exchangeclone.register_alias("mcl_clock:clock", "mcl_clock:clock_"..i)
|
|
end
|
|
exchangeclone.register_alias("doc_identifier:identifier_solid", "doc_identifier:identifier_liquid")
|
|
exchangeclone.register_alias("mcl_books:writable_book", "mcl_books:written_book")
|
|
exchangeclone.register_craft({output = "mcl_bamboo:bamboo_block_stripped", type = "cooking", recipe = "mcl_bamboo:bamboo_block"})
|
|
|
|
-- Potions
|
|
exchangeclone.register_craft_type("brewing", "shapeless")
|
|
local function add_potion_recipe(info)
|
|
if not info.bases then info.bases = {"mcl_potions:awkward"} end
|
|
for _, base in pairs(info.bases) do
|
|
local ingredient = info.ingredient
|
|
local normal = "mcl_potions:"..info.name
|
|
local splash = normal.."_splash"
|
|
local lingering = normal.."_lingering"
|
|
exchangeclone.register_craft({output = normal.." 3", type = "brewing", recipe = {base, base, base, ingredient}})
|
|
exchangeclone.register_craft({output = normal.."_splash 3", type = "brewing", recipe = {normal, normal, normal, "mcl_mobitems:gunpowder"}})
|
|
exchangeclone.register_craft({output = normal.."_lingering 3", type = "brewing", recipe = {normal, normal, normal, "mcl_potions:dragon_breath"}})
|
|
if info.plus then
|
|
exchangeclone.register_craft({output = normal.."_plus 3", type = "brewing", recipe = {normal, normal, normal, "mcl_nether:glowstone_dust"}})
|
|
exchangeclone.register_craft({output = normal.."_plus_splash 3", type = "brewing", recipe = {splash, splash, splash, "mcl_nether:glowstone_dust"}})
|
|
exchangeclone.register_craft({output = normal.."_plus_lingering 3", type = "brewing", recipe = {lingering, lingering, lingering, "mcl_nether:glowstone_dust"}})
|
|
end
|
|
if info.two then
|
|
exchangeclone.register_craft({output = normal.."_2 3", type = "brewing", recipe = {normal, normal, normal, "mesecons:redstone"}})
|
|
exchangeclone.register_craft({output = normal.."_2_splash 3", type = "brewing", recipe = {splash, splash, splash, "mesecons:redstone"}})
|
|
exchangeclone.register_craft({output = normal.."_2_lingering 3", type = "brewing", recipe = {lingering, lingering, lingering, "mesecons:redstone"}})
|
|
end
|
|
end
|
|
end
|
|
for _, info in pairs(exchangeclone.mcl_potion_data) do
|
|
add_potion_recipe(info)
|
|
end
|
|
|
|
-- Enchanted/netherite tools
|
|
exchangeclone.register_craft_type("upgrading", "shapeless")
|
|
for name, def in pairs(minetest.registered_items) do
|
|
if def._mcl_enchanting_enchanted_tool then
|
|
exchangeclone.register_alias(name, def._mcl_enchanting_enchanted_tool)
|
|
end
|
|
if def._mcl_upgrade_item then
|
|
if not name:find("enchanted") then
|
|
exchangeclone.register_craft({output = def._mcl_upgrade_item, type = "upgrading", recipe = {name, "mcl_nether:netherite_ingot"}})
|
|
end
|
|
end
|
|
end
|
|
|
|
exchangeclone.register_craft_type("hardening", "cooking")
|
|
-- Concrete and banners/shields (don't remember why the shields don't work)
|
|
for color, color_data in pairs(exchangeclone.colors) do
|
|
exchangeclone.register_craft({output = "mcl_colorblocks:concrete_"..color, type = "hardening", recipe = "mcl_colorblocks:concrete_powder_"..color})
|
|
--exchangeclone.register_craft({output = "mcl_shields:shield_"..color, type = "shapeless", recipe = {"mcl_banners:banner_item_"..color, "mcl_shields:shield"}})
|
|
end
|
|
|
|
-- Maps
|
|
exchangeclone.register_alias("mcl_maps:empty_map", "mcl_maps:filled_map")
|
|
local mcl_skins_enabled = minetest.global_exists("mcl_skins")
|
|
if mcl_skins_enabled then
|
|
-- Generate a node for every skin
|
|
local list = mcl_skins.get_skin_list()
|
|
for _, skin in pairs(list) do
|
|
exchangeclone.register_alias("mcl_maps:empty_map", "mcl_maps:filled_map_" .. skin.id)
|
|
end
|
|
else
|
|
exchangeclone.register_alias("mcl_maps:empty_map", "mcl_maps:filled_map_hand")
|
|
end
|
|
|
|
-- Sponges
|
|
exchangeclone.register_alias("mcl_sponges:sponge", "mcl_sponges:sponge_wet")
|
|
exchangeclone.register_alias("mcl_sponges:sponge", "mcl_sponges:sponge_wet_river_water")
|
|
end
|
|
|
|
-- Register copper block/stonecutting EMC recipes in MineClone2
|
|
if exchangeclone.mcl2 then
|
|
exchangeclone.register_craft_type("oxidation", "cooking")
|
|
local states = {"", "_exposed", "_weathered", "_oxidized"}
|
|
for i = 2, #states do
|
|
exchangeclone.register_craft({output = "mcl_copper:block"..states[i], type = "oxidation", recipe = "mcl_copper:block"..states[i-1]})
|
|
end
|
|
exchangeclone.register_craft_type("stonecutting", "cooking")
|
|
for input, outputs in pairs(mcl_stonecutter.registered_recipes) do
|
|
for output, amount in pairs(outputs) do
|
|
exchangeclone.register_craft({output = output.." "..amount, type = "stonecutting", recipe = input})
|
|
end
|
|
end
|
|
end
|
|
|
|
if exchangeclone.mtg then
|
|
exchangeclone.register_alias("default:book", "default:book_written")
|
|
end
|
|
|
|
|
|
|
|
|
|
-- Up to this point, no EMC values have actually been set.
|
|
|
|
|
|
|
|
-- Register group EMC values
|
|
local groupnames = {}
|
|
for index, group in ipairs(exchangeclone.group_values) do
|
|
groupnames[#groupnames + 1] = group[1] --Get list of group names
|
|
end
|
|
local grouped_items = exchangeclone.get_group_items(groupnames, true, true)
|
|
for index, group in ipairs(exchangeclone.group_values) do
|
|
for i, item in pairs(grouped_items[group[1]]) do
|
|
register_emc(item, group[2])
|
|
end
|
|
end
|
|
|
|
-- Register base EMC values
|
|
for itemstring, emc_value in pairs(exchangeclone.base_emc_values) do
|
|
register_emc(itemstring, emc_value)
|
|
end
|
|
|
|
-- Register `exchangeclone_custom_emc` values and decide whether to automatically register EMC values
|
|
for itemstring, def in pairs(minetest.registered_items) do
|
|
if def.exchangeclone_custom_emc then
|
|
register_emc(itemstring, def.exchangeclone_custom_emc)
|
|
else
|
|
itemstring = exchangeclone.handle_alias(itemstring) or itemstring
|
|
def = minetest.registered_items[itemstring] -- in case itemstring changed
|
|
local _, _, mod_name, item_name = itemstring:find("([%d_%l]+):([%d_%l]+)")
|
|
if (
|
|
def
|
|
and item_name
|
|
and mod_name
|
|
and def.description
|
|
and def.description ~= ""
|
|
and ((minetest.get_item_group(item_name, "not_in_creative_inventory") < 1) or mod_name == "mcl_compass")
|
|
and (not exchangeclone.get_item_emc(itemstring))
|
|
and exchangeclone.recipes[itemstring]
|
|
) then
|
|
auto[itemstring] = true
|
|
end
|
|
end
|
|
end
|
|
|
|
-- handle aliases in exchangeclone.recipes
|
|
for itemstring, recipes in pairs(exchangeclone.recipes) do
|
|
local new_name = ItemStack(itemstring):get_name()
|
|
if new_name and new_name ~= "" and new_name ~= itemstring then
|
|
exchangeclone.recipes[new_name] = exchangeclone.recipes[new_name] or {}
|
|
for _, recipe in pairs(recipes) do
|
|
table.insert(exchangeclone.recipes[new_name], recipe)
|
|
end
|
|
end
|
|
end
|
|
|
|
local old_auto
|
|
local same = false
|
|
local i = 1
|
|
-- Automatically register EMC values
|
|
while not same do
|
|
minetest.log("action", "[ExchangeClone] \tIteration #"..i)
|
|
if auto == {} then break end
|
|
if old_auto then
|
|
same = true
|
|
for itemstring, _ in pairs(old_auto) do
|
|
if itemstring ~= "" and not auto[itemstring] then
|
|
same = false
|
|
break
|
|
end
|
|
end
|
|
end
|
|
if same then
|
|
minetest.log("action", "[ExchangeClone]\tNo change, stopping.")
|
|
break
|
|
end
|
|
old_auto = table.copy(auto)
|
|
for itemstring, _ in pairs(auto) do
|
|
local cheapest = get_cheapest_recipe(itemstring)
|
|
if cheapest then
|
|
register_emc(itemstring, cheapest)
|
|
auto[itemstring] = nil
|
|
end
|
|
end
|
|
i = i + 1
|
|
end
|
|
|
|
if exchangeclone.mcl then
|
|
register_emc("mcl_campfires:campfire", exchangeclone.get_item_emc("mcl_campfires:campfire_lit"))
|
|
register_emc("mcl_campfires:soul_campfire", exchangeclone.get_item_emc("mcl_campfires:soul_campfire_lit"))
|
|
-- Recovery compasses use a random compass frame for the crafting recipe... Incredibly irritating.
|
|
for i = 0, 31 do
|
|
if exchangeclone.get_item_emc("mcl_compass:"..i.."_recovery") then
|
|
for j = 0, 31 do
|
|
exchangeclone.register_alias("mcl_compass:"..i.."_recovery", "mcl_compass:"..j.."_recovery")
|
|
end
|
|
break
|
|
end
|
|
end
|
|
end
|
|
|
|
local cheapest_color = {""}
|
|
|
|
for color, color_data in pairs(exchangeclone.colors) do
|
|
local dye_itemstring = (exchangeclone.mcl and "mcl_dye:" or "dye:")..color
|
|
local dye_emc = exchangeclone.get_item_emc(dye_itemstring)
|
|
if dye_emc then
|
|
if (not cheapest_color[2]) or (dye_emc < cheapest_color[2]) then
|
|
cheapest_color[1] = color
|
|
cheapest_color[2] = dye_emc
|
|
end
|
|
end
|
|
end
|
|
|
|
cheapest_color = cheapest_color[1] -- No idea why I'm doing it this way.
|
|
|
|
local cheapest_advanced_itemstring = "exchangeclone:advanced_alchemical_chest_"..cheapest_color
|
|
|
|
for color, color_data in pairs(exchangeclone.colors) do
|
|
local advanced_itemstring = "exchangeclone:advanced_alchemical_chest_"..color
|
|
register_emc(advanced_itemstring, exchangeclone.get_item_emc(cheapest_advanced_itemstring))
|
|
end
|
|
|
|
-- Adds EMC values to aliased items, even though they're not used (just so it's displayed)
|
|
for alias, itemstring in pairs(exchangeclone.emc_aliases) do
|
|
register_emc(itemstring, exchangeclone.get_item_emc(alias))
|
|
end
|
|
|
|
-- Delete unnecessary data (waste of memory)
|
|
if not exchangeclone.keep_data then
|
|
exchangeclone.recipes = nil
|
|
exchangeclone.base_emc_values = nil
|
|
end |