62 lines
2.5 KiB
Lua
62 lines
2.5 KiB
Lua
forestry_bees.bee_mutations = {}
|
|
|
|
local function fun_true(pos) return true end
|
|
|
|
local function check_biome(biome)
|
|
return function(pos)
|
|
return (minetest.get_biome_name(minetest.get_biome_data(pos)["biome"]) == biome)
|
|
end
|
|
end
|
|
|
|
local function register_mutation(bee_type_in1,bee_type_in2,bee_type_out,chance,check_fun)
|
|
--bee_type_in are string of the gene ex. "forest" or "meadows"
|
|
--bee_type_out is a string of the gene
|
|
--chance is the base probability of the mutation
|
|
|
|
--the function appends in the table at position "bee_type_in1","bee_type_in2"
|
|
--of the matrix forestry_bees.mutations "bee_type_out"=chance
|
|
--and does so simmetrically
|
|
|
|
--populate table if nil
|
|
if forestry_bees.bee_mutations[bee_type_in1] == nil or not next(forestry_bees.bee_mutations[bee_type_in1]) then
|
|
forestry_bees.bee_mutations[bee_type_in1] = {}
|
|
end
|
|
if forestry_bees.bee_mutations[bee_type_in2] == nil or not next(forestry_bees.bee_mutations[bee_type_in2]) then
|
|
forestry_bees.bee_mutations[bee_type_in2] = {}
|
|
end
|
|
if forestry_bees.bee_mutations[bee_type_in1][bee_type_in2] == nil or not next(forestry_bees.bee_mutations[bee_type_in1][bee_type_in2]) then
|
|
forestry_bees.bee_mutations[bee_type_in1][bee_type_in2] = {}
|
|
end
|
|
if forestry_bees.bee_mutations[bee_type_in2][bee_type_in1] == nil or not next(forestry_bees.bee_mutations[bee_type_in2][bee_type_in1]) then
|
|
forestry_bees.bee_mutations[bee_type_in2][bee_type_in1] = {}
|
|
end
|
|
|
|
forestry_bees.bee_mutations[bee_type_in1][bee_type_in2][bee_type_out] = {chance = chance, check_fun = check_fun}
|
|
forestry_bees.bee_mutations[bee_type_in2][bee_type_in1][bee_type_out] = {chance = chance, check_fun = check_fun}
|
|
end
|
|
|
|
--common branch
|
|
register_mutation("forest","meadows","common",0.15,fun_true)
|
|
register_mutation("forest","common","cultivated",0.12,fun_true)
|
|
register_mutation("meadows","common","cultivated",0.12,fun_true)
|
|
--noble branch
|
|
register_mutation("common","cultivated","noble",0.10,fun_true)
|
|
register_mutation("noble","cultivated","majestic",0.08,fun_true)
|
|
register_mutation("noble","majestic","imperial",0.08,fun_true)
|
|
--industrious branch
|
|
register_mutation("common","cultivated","diligent",0.10,fun_true)
|
|
register_mutation("diligent","cultivated","unweary",0.08,fun_true)
|
|
register_mutation("diligent","unweary","industrious",0.08,fun_true)
|
|
---heroic branch
|
|
---infernal branch
|
|
--- austere branch
|
|
---end branch
|
|
---tropical branch
|
|
---frozen branch
|
|
---festive branch
|
|
--agrarian branch
|
|
register_mutation("diligent","meadows","rural",0.12,check_biome("grassland"))
|
|
|
|
|
|
--print(forestry_bees.mutations["meadows"]["forest"]["common"])
|