--MCmobs v0.4 --maikerumine --made for MC like Survival game --License for code WTFPL and otherwise stated in readmes --################### --################### VILLAGER --################### -- Summary: Villagers are complex NPCs, their main feature allows players to trade with them. -- TODO: Particles -- TODO: 4s Regeneration I after trade unlock -- TODO: Behaviour: -- TODO: Run into house on rain or danger, open doors -- TODO: Internal inventory, trade with other villagers -- TODO: Schedule stuff (work,sleep,father) local S = minetest.get_translator("mobs_mc") local N = function(s) return s end local F = minetest.formspec_escape -- playername-indexed table containing the previously used tradenum local player_tradenum = {} -- playername-indexed table containing the objectref of trader, if trading formspec is open local player_trading_with = {} local DEFAULT_WALK_CHANCE = 33 -- chance to walk in percent, if no player nearby local PLAYER_SCAN_INTERVAL = 5 -- every X seconds, villager looks for players nearby local PLAYER_SCAN_RADIUS = 4 -- scan radius for looking for nearby players --[=======[ TRADING ]=======] -- LIST OF VILLAGER PROFESSIONS AND TRADES -- TECHNICAL RESTRICTIONS (FIXME): -- * You can't use a clock as requested item -- * You can't use a compass as requested item if its stack size > 1 -- * You can't use a compass in the second requested slot -- This is a problem in the mcl_compass and mcl_clock mods, -- these items should be implemented as single items, then everything -- will be much easier. local COMPASS = "mcl_compass:compass" if minetest.registered_aliases[COMPASS] then COMPASS = minetest.registered_aliases[COMPASS] end local E1 = { "mcl_core:emerald", 1, 1 } -- one emerald -- Special trades for v6 only -- NOTE: These symbols MUST only be added at the end of a tier local TRADE_V6_RED_SANDSTONE, TRADE_V6_DARK_OAK_SAPLING, TRADE_V6_ACACIA_SAPLING, TRADE_V6_BIRCH_SAPLING if minetest.get_mapgen_setting("mg_name") == "v6" then TRADE_V6_RED_SANDSTONE = { E1, { "mcl_core:redsandstone", 12, 16 } } TRADE_V6_DARK_OAK_SAPLING = { { "mcl_core:emerald", 6, 9 }, { "mcl_core:darksapling", 1, 1 } } TRADE_V6_ACACIA_SAPLING = { { "mcl_core:emerald", 14, 17 }, { "mcl_core:acaciasapling", 1, 1 } } TRADE_V6_BIRCH_SAPLING = { { "mcl_core:emerald", 8, 11 }, { "mcl_core:birchsapling", 1, 1 } } end local tiernames = { "Novice", "Apprentice", "Journeyman", "Expert", "Master", } local badges = { "default_wood.png", "default_steel_block.png", "default_gold_block.png", "mcl_core_emerald_block.png", "default_diamond_block.png", } local professions = { unemployed = { name = N("Unemployed"), textures = { "mobs_mc_villager.png", "mobs_mc_villager.png", }, trades = nil, }, farmer = { name = N("Farmer"), textures = { "mobs_mc_villager_farmer.png", "mobs_mc_villager_farmer.png", }, jobsite = "mcl_composters:composter", trades = { { { { "mcl_farming:wheat_item", 18, 22, }, E1 }, { { "mcl_farming:potato_item", 15, 19, }, E1 }, { { "mcl_farming:carrot_item", 15, 19, }, E1 }, { E1, { "mcl_farming:bread", 2, 4 } }, }, { { { "mcl_farming:pumpkin", 8, 13 }, E1 }, { E1, { "mcl_farming:pumpkin_pie", 2, 3} }, { E1, { "mcl_core:apple", 2, 3} }, }, { { { "mcl_farming:melon", 7, 12 }, E1 }, { E1, {"mcl_farming:cookie", 5, 7 }, }, }, { { E1, { "mcl_mushrooms:mushroom_stew", 6, 10 } }, --FIXME: expert level farmer is supposed to sell sus stews. }, { { E1, { "mcl_farming:carrot_item_gold", 3, 10 } }, { E1, { "mcl_potions:speckled_melon", 4, 1 } }, TRADE_V6_BIRCH_SAPLING, TRADE_V6_DARK_OAK_SAPLING, TRADE_V6_ACACIA_SAPLING, }, } }, fisherman = { name = N("Fisherman"), textures = { "mobs_mc_villager_fisherman.png", "mobs_mc_villager_fisherman.png", }, jobsite = "mcl_barrels:barrel_closed", trades = { { { { "mcl_fishing:fish_raw", 6, 6, "mcl_core:emerald", 1, 1 },{ "mcl_fishing:fish_cooked", 6, 6 } }, { { "mcl_mobitems:string", 15, 20 }, E1 }, { { "mcl_core:coal_lump", 15, 10 }, E1 }, -- FIXME missing: bucket of cod + fish should be cod. }, { { { "mcl_fishing:fish_raw", 6, 15,}, E1 }, { { "mcl_fishing:salmon_raw", 6, 6, "mcl_core:emerald", 1, 1 },{ "mcl_fishing:salmon_cooked", 6, 6 } }, -- FIXME missing campfire -- {{ "mcl_core:emerald", 1, 2 },{"mcl_campfires:campfire",1,1} }, }, { { { "mcl_fishing:salmon_raw", 6, 13,}, E1 }, { { "mcl_core:emerald", 7, 22 }, { "mcl_fishing:fishing_rod_enchanted", 1, 1} }, }, { { { "mcl_fishing:clownfish_raw", 6, 6,}, E1 }, }, { { { "mcl_fishing:pufferfish_raw", 4, 4,}, E1 }, { { "mcl_boats:boat", 1, 1,}, E1 }, { { "mcl_boats:boat_acacia", 1, 1,}, E1 }, { { "mcl_boats:boat_spruce", 1, 1,}, E1 }, { { "mcl_boats:boat_dark_oak", 1, 1,}, E1 }, { { "mcl_boats:boat_birch", 1, 1,}, E1 }, }, }, }, fletcher = { name = N("Fletcher"), textures = { "mobs_mc_villager_fletcher.png", "mobs_mc_villager_fletcher.png", }, jobsite = "mcl_fletching_table:fletching_table", trades = { { { { "mcl_mobitems:string", 15, 20 }, E1 }, { E1, { "mcl_bows:arrow", 8, 12 } }, { { "mcl_core:gravel", 10, 10, "mcl_core:emerald", 1, 1 }, { "mcl_core:flint", 6, 10 } }, }, { { { "mcl_core:flint", 26, 26 }, E1 }, { { "mcl_core:emerald", 2, 3 }, { "mcl_bows:bow", 1, 1 } }, }, { { { "mcl_mobitems:string", 14, 14 }, E1 }, { { "mcl_core:emerald", 3, 3 }, { "mcl_bows:crossbow", 1, 1 } }, }, { { { "mcl_mobitems:string", 24, 24 }, E1 }, { { "mcl_core:emerald", 7, 21 } , { "mcl_bows:bow_enchanted", 1, 1 } }, }, { --FIXME: supposed to be tripwire hook{ { "tripwirehook", 24, 24 }, E1 }, { { "mcl_core:emerald", 8, 22 } , { "mcl_bows:crossbow_enchanted", 1, 1 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:healing_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:harming_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:night_vision_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:swiftness_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:slowness_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:leaping_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:poison_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:regeneration_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:invisibility_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:water_breathing_arrow", 5, 5 } }, { { "mcl_core:emerald", 2, 2, "mcl_bows:arrow", 5, 5 }, { "mcl_potions:fire_resistance_arrow", 5, 5 } }, }, } }, shepherd ={ name = N("Shepherd"), textures = { "mobs_mc_villager_sheperd.png", "mobs_mc_villager_sheperd.png", }, jobsite = "mcl_loom:loom", trades = { { { { "mcl_wool:white", 16, 22 }, E1 }, { { "mcl_core:emerald", 3, 4 }, { "mcl_tools:shears", 1, 1 } }, }, { { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:white", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:grey", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:silver", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:black", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:yellow", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:orange", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:red", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:magenta", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:purple", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:blue", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:cyan", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:lime", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:green", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:pink", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:light_blue", 1, 1 } }, { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:brown", 1, 1 } }, }, }, }, librarian = { name = N("Librarian"), textures = { "mobs_mc_villager_librarian.png", "mobs_mc_villager_librarian.png", }, jobsite = "mcl_books:bookshelf", --FIXME: lectern trades = { { { { "mcl_core:paper", 24, 36 }, E1 }, { { "mcl_books:book", 8, 10 }, E1 }, { { "mcl_core:emerald", 9, 9 }, { "mcl_books:bookshelf", 1 ,1 }}, { { "mcl_core:emerald", 5, 64, "mcl_books:book", 1, 1 }, { "mcl_enchanting:book_enchanted", 1 ,1 }}, }, { { { "mcl_books:written_book", 2, 2 }, E1 }, { { "mcl_core:emerald", 5, 64, "mcl_books:book", 1, 1 }, { "mcl_enchanting:book_enchanted", 1 ,1 }}, { E1, { "mcl_lanterns:lantern_floor", 1, 1 } }, }, { { { "mcl_dye:black", 5, 5 }, E1 }, { { "mcl_core:emerald", 5, 64, "mcl_books:book", 1, 1 }, { "mcl_enchanting:book_enchanted", 1 ,1 }}, { E1, { "mcl_core:glass", 4, 4 } }, }, { { E1, { "mcl_books:writable_book", 1, 1 } }, { { "mcl_core:emerald", 5, 64, "mcl_books:book", 1, 1 }, { "mcl_enchanting:book_enchanted", 1 ,1 }}, { { "mcl_core:emerald", 4, 4 }, { "mcl_compass:compass", 1 ,1 }}, { { "mcl_core:emerald", 5, 5 }, { "mcl_clock:clock", 1, 1 } }, }, { { { "mcl_core:emerald", 20, 20 }, { "mcl_mobs:nametag", 1, 1 } }, } }, }, cartographer = { name = N("Cartographer"), textures = { "mobs_mc_villager_cartographer.png", "mobs_mc_villager_cartographer.png", }, jobsite = "mcl_cartography_table:cartography_table", trades = { { { { "mcl_core:paper", 24, 24 }, E1 }, { { "mcl_core:emerald", 7, 7}, { "mcl_maps:empty_map", 1, 1 } }, }, { -- compass subject to special checks { { "xpanes:pane_natural_flat", 1, 1 }, E1 }, --{ { "mcl_core:emerald", 13, 13, "mcl_compass:compass", 1, 1 }, { "FIXME:ocean explorer map" 1, 1} }, }, { { { "mcl_compass:compass", 1, 1 }, E1 }, --{ { "mcl_core:emerald", 13, 13, "mcl_compass:compass", 1, 1 }, { "FIXME:woodland explorer map" 1, 1} }, }, { { { "mcl_core:emerald", 7, 7}, { "mcl_itemframes:item_frame", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_white", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_grey", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_silver", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_black", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_red", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_green", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_cyan", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_blue", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_magenta", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_orange", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_purple", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_brown", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_pink", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_lime", 1, 1 }}, { { "mcl_core:emerald", 7, 7}, { "mcl_banners:banner_item_light_blue", 1, 1 }}, }, { --{ { "mcl_core:emerald", 8, 8}, { "FIXME: globe banner pattern", 1, 1 } }, }, -- TODO: special maps }, }, armorer = { name = N("Armorer"), textures = { "mobs_mc_villager_armorer.png", "mobs_mc_villager_armorer.png", }, jobsite = "mcl_blast_furnace:blast_furnace", trades = { { { { "mcl_core:coal_lump", 15, 15 }, E1 }, { { "mcl_core:emerald", 5, 5 }, { "mcl_armor:helmet_iron", 1, 1 } }, { { "mcl_core:emerald", 9, 9 }, { "mcl_armor:chestplate_iron", 1, 1 } }, { { "mcl_core:emerald", 7, 7 }, { "mcl_armor:leggings_iron", 1, 1 } }, { { "mcl_core:emerald", 4, 4 }, { "mcl_armor:boots_iron", 1, 1 } }, }, { { { "mcl_core:iron_ingot", 4, 4 }, E1 }, { { "mcl_core:emerald", 36, 36 }, { "mcl_bells:bell", 1, 1 } }, { { "mcl_core:emerald", 3, 3 }, { "mcl_armor:leggings_chain", 1, 1 } }, { { "mcl_core:emerald", 1, 1 }, { "mcl_armor:boots_chain", 1, 1 } }, }, { { { "mcl_buckets:bucket_lava", 1, 1 }, E1 }, { { "mcl_core:diamond", 1, 1 }, E1 }, { { "mcl_core:emerald", 1, 1 }, { "mcl_armor:helmet_chain", 1, 1 } }, { { "mcl_core:emerald", 4, 4 }, { "mcl_armor:chestplate_chain", 1, 1 } }, { { "mcl_core:emerald", 5, 5 }, { "mcl_shields:shield", 1, 1 } }, }, { { { "mcl_core:emerald", 19, 33 }, { "mcl_armor:leggings_diamond_enchanted", 1, 1 } }, { { "mcl_core:emerald", 13, 27 }, { "mcl_armor:boots_diamond_enchanted", 1, 1 } }, }, { { { "mcl_core:emerald", 13, 27 }, { "mcl_armor:helmet_diamond_enchanted", 1, 1 } }, { { "mcl_core:emerald", 21, 35 }, { "mcl_armor:chestplate_diamond_enchanted", 1, 1 } }, }, }, }, leatherworker = { name = N("Leatherworker"), textures = { "mobs_mc_villager_leatherworker.png", "mobs_mc_villager_leatherworker.png", }, jobsite = "mcl_cauldrons:cauldron", trades = { { { { "mcl_mobitems:leather", 9, 12 }, E1 }, { { "mcl_core:emerald", 3, 3 }, { "mcl_armor:leggings_leather", 2, 4 } }, { { "mcl_core:emerald", 7, 7 }, { "mcl_armor:chestplate_leather", 2, 4 } }, }, { { { "mcl_core:flint", 26, 26 }, E1 }, { { "mcl_core:emerald", 5, 5 }, { "mcl_armor:helmet_leather", 2, 4 } }, { { "mcl_core:emerald", 4, 4 }, { "mcl_armor:boots_leather", 2, 4 } }, }, { { { "mcl_mobitems:rabbit_hide", 9, 9 }, E1 }, { { "mcl_core:emerald", 7, 7 }, { "mcl_armor:chestplate_leather", 1, 1 } }, }, { --{ { "FIXME: scute", 4, 4 }, E1 }, { { "mcl_core:emerald", 8, 10 }, { "mcl_mobitems:saddle", 1, 1 } }, }, { { { "mcl_core:emerald", 6, 6 }, { "mcl_mobitems:saddle", 1, 1 } }, { { "mcl_core:emerald", 5, 5 }, { "mcl_armor:helmet_leather", 2, 4 } }, }, }, }, butcher = { name = N("Butcher"), textures = { "mobs_mc_villager_butcher.png", "mobs_mc_villager_butcher.png", }, jobsite = "mcl_smoker:smoker", trades = { { { { "mcl_mobitems:beef", 14, 14 }, E1 }, { { "mcl_mobitems:chicken", 7, 7 }, E1 }, { { "mcl_mobitems:rabbit", 4, 4 }, E1 }, { E1, { "mcl_mobitems:rabbit_stew", 1, 1 } }, }, { { { "mcl_core:coal_lump", 15, 15 }, E1 }, { E1, { "mcl_mobitems:cooked_porkchop", 5, 5 } }, { E1, { "mcl_mobitems:cooked_chicken", 8, 8 } }, }, { { { "mcl_mobitems:mutton", 7, 7 }, E1 }, { { "mcl_mobitems:beef", 10, 10 }, E1 }, }, { { { "mcl_mobitems:mutton", 7, 7 }, E1 }, { { "mcl_mobitems:beef", 10, 10 }, E1 }, }, { --{ { "FIXME: Sweet Berries", 10, 10 }, E1 }, }, }, }, weapon_smith = { name = N("Weapon Smith"), textures = { "mobs_mc_villager_weaponsmith.png", "mobs_mc_villager_weaponsmith.png", }, jobsite = "mcl_furnaces:furnace", --FIXME: grindstone trades = { { { { "mcl_core:coal_lump", 15, 15 }, E1 }, { { "mcl_core:emerald", 3, 3 }, { "mcl_tools:axe_iron", 1, 1 } }, { { "mcl_core:emerald", 7, 21 }, { "mcl_tools:sword_iron_enchanted", 1, 1 } }, }, { { { "mcl_core:iron_ingot", 4, 4 }, E1 }, { { "mcl_core:emerald", 36, 36 }, { "mcl_bells:bell", 1, 1 } }, }, { { { "mcl_core:flint", 7, 9 }, E1 }, }, { { { "mcl_core:diamond", 7, 9 }, E1 }, { { "mcl_core:emerald", 17, 31 }, { "mcl_tools:axe_diamond_enchanted", 1, 1 } }, }, { { { "mcl_core:emerald", 13, 27 }, { "mcl_tools:sword_diamond_enchanted", 1, 1 } }, }, }, }, tool_smith = { name = N("Tool Smith"), textures = { "mobs_mc_villager_toolsmith.png", "mobs_mc_villager_toolsmith.png", }, jobsite = "mcl_anvils:anvil", --FIXME: smithing table trades = { { { { "mcl_core:coal_lump", 15, 15 }, E1 }, { E1, { "mcl_tools:axe_stone", 1, 1 } }, { E1, { "mcl_tools:shovel_stone", 1, 1 } }, { E1, { "mcl_tools:pick_stone", 1, 1 } }, { E1, { "mcl_farming:hoe_stone", 1, 1 } }, }, { { { "mcl_core:iron_ingot", 4, 4 }, E1 }, { { "mcl_core:emerald", 36, 36 }, { "mcl_bells:bell", 1, 1 } }, }, { { { "mcl_core:flint", 30, 30 }, E1 }, { { "mcl_core:emerald", 6, 20 }, { "mcl_tools:axe_iron_enchanted", 1, 1 } }, { { "mcl_core:emerald", 7, 21 }, { "mcl_tools:shovel_iron_enchanted", 1, 1 } }, { { "mcl_core:emerald", 8, 22 }, { "mcl_tools:pick_iron_enchanted", 1, 1 } }, { { "mcl_core:emerald", 4, 4 }, { "mcl_farming:hoe_diamond", 1, 1 } }, }, { { { "mcl_core:diamond", 1, 1 }, E1 }, { { "mcl_core:emerald", 17, 31 }, { "mcl_tools:axe_diamond_enchanted", 1, 1 } }, { { "mcl_core:emerald", 10, 24 }, { "mcl_tools:shovel_diamond_enchanted", 1, 1 } }, }, { { { "mcl_core:emerald", 18, 32 }, { "mcl_tools:pick_diamond_enchanted", 1, 1 } }, }, }, }, cleric = { name = N("Cleric"), textures = { "mobs_mc_villager_priest.png", "mobs_mc_villager_priest.png", }, jobsite = "mcl_brewing:stand_000", trades = { { { { "mcl_mobitems:rotten_flesh", 32, 32 }, E1 }, { E1, { "mesecons:redstone", 2, 2 } }, }, { { { "mcl_core:gold_ingot", 3, 3 }, E1 }, { E1, { "mcl_dye:blue", 1, 1 } }, }, { { { "mcl_mobitems:rabbit_foot", 2, 2 }, E1 }, { E1, { "mcl_nether:glowstone", 4, 4 } }, }, { --{ { "FIXME: scute", 4, 4 }, E1 }, { { "mcl_potions:glass_bottle", 9, 9 }, E1 }, { { "mcl_core:emerald", 5, 5 }, { "mcl_throwing:ender_pearl", 1, 1 } }, TRADE_V6_RED_SANDSTONE, }, { { { "mcl_nether:nether_wart_item", 22, 22 }, E1 }, { { "mcl_core:emerald", 3, 3 }, { "mcl_experience:bottle", 1, 1 } }, }, }, }, nitwit = { name = N("Nitwit"), textures = { "mobs_mc_villager_nitwit.png", "mobs_mc_villager_nitwit.png", }, -- No trades for nitwit trades = nil, } } local profession_names = {} for id, _ in pairs(professions) do table.insert(profession_names, id) end local jobsites={} for _,n in pairs(profession_names) do table.insert(jobsites,professions[n].jobsite) end local function stand_still(self) self.walk_chance = 0 self.jump = false end local function init_trader_vars(self) if not self._max_trade_tier then self._max_trade_tier = 1 end if not self._locked_trades then self._locked_trades = 0 end if not self._trading_players then self._trading_players = {} end end local function get_badge_textures(self) local t = professions[self._profession].textures if self._profession == "unemployed" or self._profession == "nitwit" then return t end local tier = self._max_trade_tier or 1 return { "[combine:64x64:0,0="..t[1]..":11,55=".. badges[tier].."\\^[resize\\:2x2", t[2] } end local function set_textures(self) self.object:set_properties({textures=get_badge_textures(self)}) end local function go_home(entity) entity.state = "go_home" local b=entity._bed if not b then return end mcl_mobs:gopath(entity,b,function(entity,b) if vector.distance(entity.object:get_pos(),b) < 2 then entity.state = "stand" set_velocity(entity,0) entity.object:set_pos(b) local n=minetest.get_node(b) if n and n.name ~= "mcl_beds:bed_red_bottom" then entity._bed=nil --the stormtroopers have killed uncle owen return false end return true end end) end ----- JOBSITE LOGIC local function get_profession_by_jobsite(js) for k,v in pairs(professions) do if v.jobsite == js then return k end end end local function employ(self,jobsite_pos) local n = minetest.get_node(jobsite_pos) local m = minetest.get_meta(jobsite_pos) local p = get_profession_by_jobsite(n.name) if p and m:get_string("villager") == "" then self._profession=p m:set_string("villager",self._id) self._jobsite = jobsite_pos set_textures(self) return true end end local function look_for_job(self) local p = self.object:get_pos() local nn = minetest.find_nodes_in_area(vector.offset(p,-48,-48,-48),vector.offset(p,48,48,48),jobsites) for _,n in pairs(nn) do local m=minetest.get_meta(n) if m:get_string("villager") == "" then --minetest.log("goingt to jobsite "..minetest.pos_to_string(n) ) local gp = mcl_mobs:gopath(self,n,function() --minetest.log("arrived jobsite "..minetest.pos_to_string(n) ) end) if gp then return end end end end local function get_a_job(self) local p = self.object:get_pos() local nn = minetest.find_nodes_in_area(vector.offset(p,-8,-8,-8),vector.offset(p,8,8,8),jobsites) for _,n in pairs(nn) do if n and employ(self,n) then return true end end if self.state ~= "gowp" then look_for_job(self) end end local function update_max_tradenum(self) if not self._trades then return end local trades = minetest.deserialize(self._trades) for t=1, #trades do local trade = trades[t] if trade.tier > self._max_trade_tier then self._max_tradenum = t - 1 return end end self._max_tradenum = #trades end local function init_trades(self, inv) local profession = professions[self._profession] local trade_tiers = profession.trades if trade_tiers == nil then -- Empty trades self._trades = false return end local max_tier = #trade_tiers local trades = {} for tiernum=1, max_tier do local tier = trade_tiers[tiernum] for tradenum=1, #tier do local trade = tier[tradenum] local wanted1_item = trade[1][1] local wanted1_count = math.random(trade[1][2], trade[1][3]) local offered_item = trade[2][1] local offered_count = math.random(trade[2][2], trade[2][3]) local offered_stack = ItemStack({name = offered_item, count = offered_count}) if mcl_enchanting.is_enchanted(offered_item) then if mcl_enchanting.is_book(offered_item) then offered_stack = mcl_enchanting.enchant_uniform_randomly(offered_stack, {"soul_speed"}) else mcl_enchanting.enchant_randomly(offered_stack, math.random(5, 19), false, false, true) mcl_enchanting.unload_enchantments(offered_stack) end end local wanted = { wanted1_item .. " " ..wanted1_count } if trade[1][4] then local wanted2_item = trade[1][4] local wanted2_count = math.random(trade[1][5], trade[1][6]) table.insert(wanted, wanted2_item .. " " ..wanted2_count) end table.insert(trades, { wanted = wanted, offered = offered_stack:to_table(), tier = tiernum, -- tier of this trade traded_once = false, -- true if trade was traded at least once trade_counter = 0, -- how often the this trade was mate after the last time it got unlocked locked = false, -- if this trade is locked. Locked trades can't be used }) end end self._trades = minetest.serialize(trades) minetest.deserialize(self._trades) end local function set_trade(trader, player, inv, concrete_tradenum) local trades = minetest.deserialize(trader._trades) if not trades then init_trades(trader) trades = minetest.deserialize(trader._trades) if not trades then minetest.log("error", "[mobs_mc] Failed to select villager trade!") return end end local name = player:get_player_name() -- Stop tradenum from advancing into locked tiers or out-of-range areas if concrete_tradenum > trader._max_tradenum then concrete_tradenum = trader._max_tradenum elseif concrete_tradenum < 1 then concrete_tradenum = 1 end player_tradenum[name] = concrete_tradenum local trade = trades[concrete_tradenum] inv:set_stack("wanted", 1, ItemStack(trade.wanted[1])) local offered = ItemStack(trade.offered) -- Only load enchantments for enchanted items; fixes unnecessary metadata being applied to regular items from villagers. if mcl_enchanting.is_enchanted(offered:get_name()) then mcl_enchanting.load_enchantments(offered) end inv:set_stack("offered", 1, offered) if trade.wanted[2] then local wanted2 = ItemStack(trade.wanted[2]) inv:set_stack("wanted", 2, wanted2) else inv:set_stack("wanted", 2, "") end end local function show_trade_formspec(playername, trader, tradenum) if not trader._trades then return end if not tradenum then tradenum = 1 end local trades = minetest.deserialize(trader._trades) local trade = trades[tradenum] local profession = professions[trader._profession].name local disabled_img = "" if trade.locked then disabled_img = "image[4.3,2.52;1,1;mobs_mc_trading_formspec_disabled.png]".. "image[4.3,1.1;1,1;mobs_mc_trading_formspec_disabled.png]" end local tradeinv_name = "mobs_mc:trade_"..playername local tradeinv = F("detached:"..tradeinv_name) local b_prev, b_next = "", "" if #trades > 1 then if tradenum > 1 then b_prev = "button[1,1;0.5,1;prev_trade;<]" end if tradenum < trader._max_tradenum then b_next = "button[7.26,1;0.5,1;next_trade;>]" end end local inv = minetest.get_inventory({type="detached", name="mobs_mc:trade_"..playername}) if not inv then return end local wanted1 = inv:get_stack("wanted", 1) local wanted2 = inv:get_stack("wanted", 2) local offered = inv:get_stack("offered", 1) local w2_formspec = "" if not wanted2:is_empty() then w2_formspec = "item_image[3,1;1,1;"..wanted2:to_string().."]" .."tooltip[3,1;0.8,0.8;"..F(wanted2:get_description()).."]" end local tiername = tiernames[trader._max_trade_tier] if tiername then tiername = S(tiername) else tiername = S("Master") end local formspec = "size[9,8.75]" .."background[-0.19,-0.25;9.41,9.49;mobs_mc_trading_formspec_bg.png]" ..disabled_img .."label[3,0;"..F(minetest.colorize("#313131", S(profession).." - "..tiername)) .."]" .."list[current_player;main;0,4.5;9,3;9]" .."list[current_player;main;0,7.74;9,1;]" ..b_prev..b_next .."["..tradeinv..";wanted;2,1;2,1;]" .."item_image[2,1;1,1;"..wanted1:to_string().."]" .."tooltip[2,1;0.8,0.8;"..F(wanted1:get_description()).."]" ..w2_formspec .."item_image[5.76,1;1,1;"..offered:get_name().." "..offered:get_count().."]" .."tooltip[5.76,1;0.8,0.8;"..F(offered:get_description()).."]" .."list["..tradeinv..";input;2,2.5;2,1;]" .."list["..tradeinv..";output;5.76,2.55;1,1;]" .."listring["..tradeinv..";output]" .."listring[current_player;main]" .."listring["..tradeinv..";input]" .."listring[current_player;main]" minetest.sound_play("mobs_mc_villager_trade", {to_player = playername}, true) minetest.show_formspec(playername, tradeinv_name, formspec) end local function update_offer(inv, player, sound) local name = player:get_player_name() local trader = player_trading_with[name] local tradenum = player_tradenum[name] if not trader or not tradenum then return false end local trades = minetest.deserialize(trader._trades) if not trades then return false end local trade = trades[tradenum] if not trade then return false end local wanted1, wanted2 = inv:get_stack("wanted", 1), inv:get_stack("wanted", 2) local input1, input2 = inv:get_stack("input", 1), inv:get_stack("input", 2) -- BEGIN OF SPECIAL HANDLING OF COMPASS -- These 2 functions are a complicated check to check if the input contains a -- special item which we cannot check directly against their name, like -- compass. -- TODO: Remove these check functions when compass and clock are implemented -- as single items. local function check_special(special_item, group, wanted1, wanted2, input1, input2) if minetest.registered_aliases[special_item] then special_item = minetest.registered_aliases[special_item] end if wanted1:get_name() == special_item then local function check_input(input, wanted, group) return minetest.get_item_group(input:get_name(), group) ~= 0 and input:get_count() >= wanted:get_count() end if check_input(input1, wanted1, group) then return true elseif check_input(input2, wanted1, group) then return true else return false end end return false end -- Apply above function to all items which we consider special. -- This function succeeds if ANY item check succeeds. local function check_specials(wanted1, wanted2, input1, input2) return check_special(COMPASS, "compass", wanted1, wanted2, input1, input2) end -- END OF SPECIAL HANDLING OF COMPASS if ( ((inv:contains_item("input", wanted1) and (wanted2:is_empty() or inv:contains_item("input", wanted2))) or -- BEGIN OF SPECIAL HANDLING OF COMPASS check_specials(wanted1, wanted2, input1, input2)) and -- END OF SPECIAL HANDLING OF COMPASS (trade.locked == false)) then inv:set_stack("output", 1, inv:get_stack("offered", 1)) if sound then minetest.sound_play("mobs_mc_villager_accept", {to_player = name}, true) end return true else inv:set_stack("output", 1, ItemStack("")) if sound then minetest.sound_play("mobs_mc_villager_deny", {to_player = name}, true) end return false end 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:set_velocity(v) obj:get_luaentity()._insta_collect = false end end else -- Fallback for unexpected cases minetest.add_item(pos, itemstack) end return itemstack end local function return_fields(player) local name = player:get_player_name() local inv_t = minetest.get_inventory({type="detached", name = "mobs_mc:trade_"..name}) local inv_p = player:get_inventory() if not inv_t or not inv_p then return end for i=1, inv_t:get_size("input") do local stack = inv_t:get_stack("input", i) return_item(stack, player, player:get_pos(), inv_p) stack:clear() inv_t:set_stack("input", i, stack) end inv_t:set_stack("output", 1, "") end minetest.register_on_player_receive_fields(function(player, formname, fields) if string.sub(formname, 1, 14) == "mobs_mc:trade_" then local name = player:get_player_name() if fields.quit then -- Get input items back return_fields(player) -- Reset internal "trading with" state local trader = player_trading_with[name] if trader then trader._trading_players[name] = nil end player_trading_with[name] = nil elseif fields.next_trade or fields.prev_trade then local trader = player_trading_with[name] if not trader or not trader.object:get_luaentity() then return end local trades = trader._trades if not trades then return end local dir = 1 if fields.prev_trade then dir = -1 end local tradenum = player_tradenum[name] + dir local inv = minetest.get_inventory({type="detached", name="mobs_mc:trade_"..name}) if not inv then return end set_trade(trader, player, inv, tradenum) update_offer(inv, player, false) show_trade_formspec(name, trader, player_tradenum[name]) end end end) minetest.register_on_leaveplayer(function(player) local name = player:get_player_name() return_fields(player) player_tradenum[name] = nil local trader = player_trading_with[name] if trader then trader._trading_players[name] = nil end player_trading_with[name] = nil end) -- Return true if player is trading with villager, and the villager entity exists local function trader_exists(playername) local trader = player_trading_with[playername] return trader ~= nil and trader.object:get_luaentity() ~= nil end local trade_inventory = { allow_take = function(inv, listname, index, stack, player) if listname == "input" then return stack:get_count() elseif listname == "output" then if not trader_exists(player:get_player_name()) then return 0 end -- Only allow taking full stack local count = stack:get_count() if count == inv:get_stack(listname, index):get_count() then -- Also update output stack again. -- If input has double the wanted items, the -- output will stay because there will be still -- enough items in input after the trade local wanted1 = inv:get_stack("wanted", 1) local wanted2 = inv:get_stack("wanted", 2) local input1 = inv:get_stack("input", 1) local input2 = inv:get_stack("input", 2) wanted1:set_count(wanted1:get_count()*2) wanted2:set_count(wanted2:get_count()*2) -- BEGIN OF SPECIAL HANDLING FOR COMPASS local function special_checks(wanted1, input1, input2) if wanted1:get_name() == COMPASS then local compasses = 0 if (minetest.get_item_group(input1:get_name(), "compass") ~= 0) then compasses = compasses + input1:get_count() end if (minetest.get_item_group(input2:get_name(), "compass") ~= 0) then compasses = compasses + input2:get_count() end return compasses >= wanted1:get_count() end return false end -- END OF SPECIAL HANDLING FOR COMPASS if (inv:contains_item("input", wanted1) and (wanted2:is_empty() or inv:contains_item("input", wanted2))) -- BEGIN OF SPECIAL HANDLING FOR COMPASS or special_checks(wanted1, input1, input2) then -- END OF SPECIAL HANDLING FOR COMPASS return -1 else -- If less than double the wanted items, -- remove items from output (final trade, -- input runs empty) return count end else return 0 end else return 0 end end, allow_move = function(inv, from_list, from_index, to_list, to_index, count, player) if from_list == "input" and to_list == "input" then return count elseif from_list == "output" and to_list == "input" then if not trader_exists(player:get_player_name()) then return 0 end local move_stack = inv:get_stack(from_list, from_index) if inv:get_stack(to_list, to_index):item_fits(move_stack) then return count end end return 0 end, allow_put = function(inv, listname, index, stack, player) if listname == "input" then if not trader_exists(player:get_player_name()) then return 0 else return stack:get_count() end else return 0 end end, on_put = function(inv, listname, index, stack, player) update_offer(inv, player, true) end, on_move = function(inv, from_list, from_index, to_list, to_index, count, player) if from_list == "output" and to_list == "input" then inv:remove_item("input", inv:get_stack("wanted", 1)) local wanted2 = inv:get_stack("wanted", 2) if not wanted2:is_empty() then inv:remove_item("input", inv:get_stack("wanted", 2)) end minetest.sound_play("mobs_mc_villager_accept", {to_player = player:get_player_name()}, true) end update_offer(inv, player, true) end, on_take = function(inv, listname, index, stack, player) local accept local name = player:get_player_name() if listname == "output" then local wanted1 = inv:get_stack("wanted", 1) inv:remove_item("input", wanted1) local wanted2 = inv:get_stack("wanted", 2) if not wanted2:is_empty() then inv:remove_item("input", inv:get_stack("wanted", 2)) end -- BEGIN OF SPECIAL HANDLING FOR COMPASS if wanted1:get_name() == COMPASS then for n=1, 2 do local input = inv:get_stack("input", n) if minetest.get_item_group(input:get_name(), "compass") ~= 0 then input:set_count(input:get_count() - wanted1:get_count()) inv:set_stack("input", n, input) break end end end -- END OF SPECIAL HANDLING FOR COMPASS local trader = player_trading_with[name] local tradenum = player_tradenum[name] local trades if trader and trader._trades then trades = minetest.deserialize(trader._trades) end if trades then local trade = trades[tradenum] local unlock_stuff = false if not trade.traded_once then -- Unlock all the things if something was traded -- for the first time ever unlock_stuff = true trade.traded_once = true elseif trade.trade_counter == 0 and math.random(1,5) == 1 then -- Otherwise, 20% chance to unlock if used freshly reset trade unlock_stuff = true end local update_formspec = false if unlock_stuff then -- First-time trade unlock all trades and unlock next trade tier if trade.tier + 1 > trader._max_trade_tier then trader._max_trade_tier = trader._max_trade_tier + 1 if trader._max_trade_tier > 5 then trader._max_trade_tier = 5 end set_textures(trader) update_max_tradenum(trader) update_formspec = true end for t=1, #trades do trades[t].locked = false trades[t].trade_counter = 0 end trader._locked_trades = 0 -- Also heal trader for unlocking stuff -- TODO: Replace by Regeneration I trader.health = math.min(trader.hp_max, trader.health + 4) end trade.trade_counter = trade.trade_counter + 1 -- Semi-randomly lock trade for repeated trade (not if there's only 1 trade) if trader._max_tradenum > 1 then if trade.trade_counter >= 12 then trade.locked = true elseif trade.trade_counter >= 2 then local r = math.random(1, math.random(4, 10)) if r == 1 then trade.locked = true end end end if trade.locked then inv:set_stack("output", 1, "") update_formspec = true trader._locked_trades = trader._locked_trades + 1 -- Check if we managed to lock ALL available trades. Rare but possible. if trader._locked_trades >= trader._max_tradenum then -- Emergency unlock! Unlock all other trades except the current one for t=1, #trades do if t ~= tradenum then trades[t].locked = false trades[t].trade_counter = 0 end end trader._locked_trades = 1 -- Also heal trader for unlocking stuff -- TODO: Replace by Regeneration I trader.health = math.min(trader.hp_max, trader.health + 4) end end trader._trades = minetest.serialize(trades) if update_formspec then show_trade_formspec(name, trader, tradenum) end else minetest.log("error", "[mobs_mc] Player took item from trader output but player_trading_with or player_tradenum is nil!") end accept = true elseif listname == "input" then update_offer(inv, player, false) end if accept then minetest.sound_play("mobs_mc_villager_accept", {to_player = name}, true) else minetest.sound_play("mobs_mc_villager_deny", {to_player = name}, true) end end, } minetest.register_on_joinplayer(function(player) local name = player:get_player_name() player_tradenum[name] = 1 player_trading_with[name] = nil -- Create or get player-specific trading inventory local inv = minetest.get_inventory({type="detached", name="mobs_mc:trade_"..name}) if not inv then inv = minetest.create_detached_inventory("mobs_mc:trade_"..name, trade_inventory, name) end inv:set_size("input", 2) inv:set_size("output", 1) inv:set_size("wanted", 2) inv:set_size("offered", 1) end) --[=======[ MOB REGISTRATION AND SPAWNING ]=======] local pick_up = { "mcl_farming:bread", "mcl_farming:carrot_item", "mcl_farming:beetroot_item" , "mcl_farming:potato_item" } mcl_mobs:register_mob("mobs_mc:villager", { description = S("Villager"), type = "npc", spawn_class = "passive", 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 }, --EXPERIMENTAL head_swivel = "Head_Control", bone_eye_height = 2.35, ------------------------------- visual_size = {x=2.75, y=2.75}, makes_footstep_sound = true, walk_velocity = 1.2, run_velocity = 2.4, drops = {}, can_despawn = false, -- TODO: sounds sounds = { random = "mobs_mc_villager", damage = "mobs_mc_villager_hurt", distance = 10, }, 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, head_shake_start = 210, head_shake_end = 220, head_shake_loop = false, head_nod_start = 210, head_nod_end = 220, head_nod_loop = false, }, follow = pick_up, nofollow = true, view_range = 16, fear_height = 4, jump = true, walk_chance = DEFAULT_WALK_CHANCE, _bed = nil, _id = nil, _profession = "unemployed", look_at_player = true, pick_up = pick_up, can_open_doors = true, on_pick_up = function(self,itementity) local clicker for _,p in pairs(minetest.get_connected_players()) do if vector.distance(p:get_pos(),self.object:get_pos()) < 10 then clicker = p end end if clicker then mcl_mobs:feed_tame(self, clicker, 1, true, false) return end return true --do not pick up end, on_rightclick = function(self, clicker) local trg=vector.new(0,9,0) if self._jobsite then mcl_mobs:gopath(self,self._jobsite,function() --minetest.log("arrived at jobsite") end) end if self.child or self._profession == "unemployed" then return end -- Initiate trading init_trader_vars(self) local name = clicker:get_player_name() self._trading_players[name] = true if self._trades == nil then init_trades(self) end update_max_tradenum(self) if self._trades == false then -- Villager has no trades, rightclick is a no-op return end player_trading_with[name] = self local inv = minetest.get_inventory({type="detached", name="mobs_mc:trade_"..name}) if not inv then return end set_trade(self, clicker, inv, 1) show_trade_formspec(name, self) -- Behaviour stuff: -- Make villager look at player and stand still local selfpos = self.object:get_pos() local clickerpos = clicker:get_pos() local dir = vector.direction(selfpos, clickerpos) self.object:set_yaw(minetest.dir_to_yaw(dir)) stand_still(self) end, _player_scan_timer = 0, _trading_players = {}, -- list of playernames currently trading with villager (open formspec) do_custom = function(self, dtime) -- Stand still if player is nearby. if not self._player_scan_timer then self._player_scan_timer = 0 end self._player_scan_timer = self._player_scan_timer + dtime -- Check infrequently to keep CPU load low if self._player_scan_timer > PLAYER_SCAN_INTERVAL then self._player_scan_timer = 0 local selfpos = self.object:get_pos() local objects = minetest.get_objects_inside_radius(selfpos, PLAYER_SCAN_RADIUS) local has_player = false for o, obj in pairs(objects) do if obj:is_player() then has_player = true break end end if has_player then minetest.log("verbose", "[mobs_mc] Player near villager found!") stand_still(self) else minetest.log("verbose", "[mobs_mc] No player near villager found!") self.walk_chance = DEFAULT_WALK_CHANCE self.jump = true end if self._bed and ( self.state ~= "go_home" and vector.distance(self.object:get_pos(),self._bed) > 50 ) then go_home(self) end if self._profession == "unemployed" then get_a_job(self) end end end, on_spawn = function(self) if self._id then set_textures(self) return end self._id=minetest.sha1(minetest.get_gametime()..minetest.pos_to_string(self.object:get_pos())..tostring(math.random())) self._profession = "unemployed" if math.random(100) == 1 then self._profession = "nitwit" end set_textures(self) end, on_die = function(self, pos) -- Close open trade formspecs and give input back to players local trading_players = self._trading_players if trading_players then for name, _ in pairs(trading_players) do minetest.close_formspec(name, "mobs_mc:trade_"..name) local player = minetest.get_player_by_name(name) if player then return_fields(player) end end end end, }) mcl_mobs:spawn_specific( "mobs_mc:villager", "overworld", "ground", { "FlowerForest", "Swampland", "Taiga", "ExtremeHills", "BirchForest", "MegaSpruceTaiga", "MegaTaiga", "ExtremeHills+", "Forest", "Plains", "ColdTaiga", "SunflowerPlains", "RoofedForest", "MesaPlateauFM_grasstop", "ExtremeHillsM", "BirchForestM", }, 0, minetest.LIGHT_MAX+1, 30, 20, 4, mobs_mc.water_level+1, mcl_vars.mg_overworld_max) -- spawn eggs mcl_mobs:register_egg("mobs_mc:villager", S("Villager"), "mobs_mc_spawn_icon_villager.png", 0)