--MCmobs v0.4 --maikerumine --made for MC like Survival game --License for code WTFPL and otherwise stated in readmes -- intllib local MP = minetest.get_modpath(minetest.get_current_modname()) local S, NS = dofile(MP.."/intllib.lua") --################### --################### VILLAGER --################### mobs:register_mob("mobs_mc:villager", { type = "npc", hp_min = 20, hp_max = 20, collisionbox = {-0.3, -0.01, -0.3, 0.3, 1.94, 0.3}, visual = "mesh", mesh = "mobs_mc_villager.b3d", textures = { { "mobs_mc_villager.png", "mobs_mc_villager.png", --hat }, { "mobs_mc_villager_farmer.png", "mobs_mc_villager_farmer.png", --hat }, { "mobs_mc_villager_priest.png", "mobs_mc_villager_priest.png", --hat }, { "mobs_mc_villager_librarian.png", "mobs_mc_villager_librarian.png", --hat }, { "mobs_mc_villager_butcher.png", "mobs_mc_villager_butcher.png", --hat }, { "mobs_mc_villager_smith.png", "mobs_mc_villager_smith.png", --hat }, }, visual_size = {x=3, y=3}, makes_footstep_sound = true, walk_velocity = 1.2, run_velocity = 2.4, drops = {}, sounds = { random = "mobs_mc_villager_noise", death = "mobs_mc_villager_death", damage = "mobs_mc_villager_damage", distance = 16, }, animation = { stand_speed = 25, stand_start = 40, stand_end = 59, walk_speed = 25, walk_start = 0, walk_end = 40, run_speed = 25, run_start = 0, run_end = 40, die_speed = 15, die_start = 210, die_end = 220, die_loop = false, }, water_damage = 0, lava_damage = 4, light_damage = 0, view_range = 16, fear_height = 4, on_rightclick = function(self, clicker) local inv inv = minetest.get_inventory({type="detached", name="mobs_mc:trade"}) if not inv then inv = minetest.create_detached_inventory("mobs_mc:trade", { allow_take = function(inv, listname, index, stack, player) if listname == "input" or listname == "output" then return stack:get_count() else return 0 end end, allow_move = function(inv, from_list, from_index, to_list, to_index, count, player) if from_list == "wanted" or from_list == "offered" or to_list == "wanted" or to_list == "offered" then return 0 elseif from_list == "output" and inv:get_stack(to_list, to_index):is_empty() then return count elseif from_list == "input" then return count else return 0 end end, allow_put = function(inv, listname, index, stack, player) if listname == "input" then return stack:get_count() else return 0 end end, on_put = function(inv, listname, index, stack, player) if inv:contains_item("input", inv:get_stack("wanted", 1)) then inv:set_stack("output", 1, inv:get_stack("offered", 1)) minetest.sound_play("mobs_mc_villager_accept", {to_player = player:get_player_name()}) else inv:set_stack("output", 1, ItemStack("")) minetest.sound_play("mobs_mc_villager_deny", {to_player = player:get_player_name()}) end end, on_move = function(inv, from_list, from_index, to_list, to_index, count, player) if inv:contains_item("input", inv:get_stack("wanted", 1)) then inv:set_stack("output", 1, inv:get_stack("offered", 1)) minetest.sound_play("mobs_mc_villager_accept", {to_player = player:get_player_name()}) else inv:set_stack("output", 1, ItemStack("")) minetest.sound_play("mobs_mc_villager_deny", {to_player = player:get_player_name()}) end end, on_take = function(inv, listname, index, stack, player) local accept if listname == "output" then inv:remove_item("input", inv:get_stack("wanted", 1)) accept = true end if inv:contains_item("input", inv:get_stack("wanted", 1)) then inv:set_stack("output", 1, inv:get_stack("offered", 1)) accept = true else inv:set_stack("output", 1, ItemStack("")) accept = false end if accept then minetest.sound_play("mobs_mc_villager_accept", {to_player = player:get_player_name()}) else minetest.sound_play("mobs_mc_villager_deny", {to_player = player:get_player_name()}) end end, }) end inv:set_size("input", 2) inv:set_size("output", 1) inv:set_size("wanted", 2) inv:set_size("offered", 1) local trades = { {"mcl_core:apple 12", "mcl_core:emerald 1"}, {"mcl_core:coal_lump 20", "mcl_core:emerald 1"}, {"mcl_core:paper 30", "mcl_core:emerald 1"}, {"mcl_mobitems:leather 10", "mcl_core:emerald 1"}, {"mcl_books:book 2", "mcl_core:emerald 1"}, {"mcl_farming:potato_item 15", "mcl_core:emerald 1"}, {"mcl_farming:wheat_item 20", "mcl_core:emerald 1"}, {"mcl_farming:carrot_item 15", "mcl_core:emerald 1"}, {"mcl_farming:melon_item 8", "mcl_core:emerald 1"}, {"mcl_mobitems:rotten_flesh 40","mcl_core:emerald 1"}, {"mcl_core:gold_ingot 10", "mcl_core:emerald 1"}, {"mcl_wool:white 15", "mcl_core:emerald 1"}, {"mcl_farming:pumpkin_face 8", "mcl_core:emerald 1"}, {"mcl_core:emerald 1", "mcl_mobitems:cooked_beef 5"}, {"mcl_core:emerald 1", "mcl_mobitems:cooked_chicken 7"}, {"mcl_core:emerald 1", "mcl_farming:cookie 6"}, {"mcl_core:emerald 1", "mcl_bows:arrow 10"}, {"mcl_core:emerald 3", "mcl_bows:bow 1"}, {"mcl_core:emerald 1", "mcl_cake:cake 1"}, {"mcl_core:emerald 10", "mcl_mobitems:saddle 1"}, {"mcl_core:emerald 10", "mcl_clock:clock 1"}, {"mcl_core:emerald 10", "mcl_compass:compass 1"}, {"mcl_core:emerald 1", "mcl_core:glass 5"}, {"mcl_core:emerald 1", "mcl_nether:glowstone 3"}, {"mcl_core:emerald 3", "mcl_tools:shears 1"}, {"mcl_core:emerald 10", "mcl_tools:sword_diamond 1"}, {"mcl_core:emerald 20", "3d_armor:chestplate_diamond 1"}, } local tradenum = math.random(#trades) inv:set_stack("wanted", 1, ItemStack(trades[tradenum][1])) inv:set_stack("offered", 1, ItemStack(trades[tradenum][2])) local formspec = "size[9,8.75]".. "background[-0.19,-0.25;9.41,9.49;mobs_mc_trading_formspec_bg.png]".. mcl_vars.inventory_header.. "list[current_player;main;0,4.5;9,3;9]".. "list[current_player;main;0,7.74;9,1;]" .."list[detached:mobs_mc:trade;wanted;2,1;2,1;]" .."list[detached:mobs_mc:trade;offered;5.76,1;1,1;]" .."list[detached:mobs_mc:trade;input;2,2.5;2,1;]" .."list[detached:mobs_mc:trade;output;5.76,2.55;1,1;]" .."listring[detached:mobs_mc:trade;output]" .."listring[current_player;main]" .."listring[detached:mobs_mc:trade;input]" .."listring[current_player;main]" minetest.sound_play("mobs_mc_villager_trade", {to_player = clicker:get_player_name()}) minetest.show_formspec(clicker:get_player_name(), "mobs_mc:trade", formspec) end, }) -- Returns a single itemstack in the given inventory to the player's main inventory, or drop it when there's no space left local function return_item(itemstack, dropper, pos, inv_p) if dropper:is_player() then -- Return to main inventory if inv_p:room_for_item("main", itemstack) then inv_p:add_item("main", itemstack) else -- Drop item on the ground local v = dropper:get_look_dir() local p = {x=pos.x, y=pos.y+1.2, z=pos.z} p.x = p.x+(math.random(1,3)*0.2) p.z = p.z+(math.random(1,3)*0.2) local obj = minetest.add_item(p, itemstack) if obj then v.x = v.x*4 v.y = v.y*4 + 2 v.z = v.z*4 obj:setvelocity(v) obj:get_luaentity()._insta_collect = false end end else -- Fallback for unexpected cases minetest.add_item(pos, itemstack) end return itemstack end local return_fields = function(player) local inv_t = minetest.get_inventory({type="detached", name = "mobs_mc:trade"}) local inv_p = player:get_inventory() for i, stack in ipairs(inv_t:get_list("input")) do return_item(stack, player, player:get_pos(), inv_p) stack:clear() inv_t:set_stack("input", i, stack) end for i, stack in ipairs(inv_t:get_list("output")) do stack:clear() inv_t:set_stack("output", i, stack) end end minetest.register_on_player_receive_fields(function(player, formname, fields) if formname == "mobs_mc:trade" then if fields.quit then return_fields(player) end end end) minetest.register_on_leaveplayer(function(player) return_fields(player) end) mobs:spawn_specific("mobs_mc:villager", mobs_mc.spawn.village, {"air"}, 0, minetest.LIGHT_MAX+1, 30, 8000, 4, mobs_mc.spawn_height.water+1, mobs_mc.spawn_height.overworld_max) -- compatibility mobs:alias_mob("mobs:villager", "mobs_mc:villager") -- spawn eggs mobs:register_egg("mobs_mc:villager", S("Villager"), "mobs_mc_spawn_icon_villager.png", 0) if minetest.settings:get_bool("log_mods") then minetest.log("action", "MC mobs loaded") end