mods/ENTITIES/mobs_mc/villager.lua

   1 --MCmobs v0.4
   2 --maikerumine
   3 --made for MC like Survival game
   4 --License for code WTFPL and otherwise stated in readmes
   5
   6 -- intllib
   7 local MP = minetest.get_modpath(minetest.get_current_modname())
   8 local S, NS = dofile(MP.."/intllib.lua")
   9
  10 --###################
  11 --################### VILLAGER
  12 --###################
  13
  14 local E1 = { "mcl_core:emerald", 1, 1 } -- one emerald
  15 local professions = {
  16         {
  17                 name = "Farmer",
  18                 trades = {
  19                         {
  20                         { { "mcl_farming:wheat_item", 18, 22, }, E1 },
  21                         { { "mcl_farming:potato_item", 15, 15, }, E1 },
  22                         { { "mcl_farming:carrot_item", 15, 19, }, E1 },
  23                         { E1, { "mcl_core:bread", 2, 4 } },
  24                         },
  25
  26                         {
  27                         { { "mcl_farming:pumpkin_face", 8, 13 }, E1 },
  28                         { E1, { "mcl_farming:pumpkin_pie", 2, 3} },
  29                         },
  30
  31                         {
  32                         { { "mcl_farming:melon", 7, 12 }, E1 },
  33                         { E1, { "mcl_core:apple", 5, 7 }, },
  34                         },
  35
  36                         {
  37                         { E1, { "mcl_farming:cookie", 6, 10 } },
  38                         { E1, { "mcl_cake:cake", 1, 1 } },
  39                         },
  40                 }
  41         },
  42         {
  43                 name = "Fisherman",
  44                 trades = {
  45                         {
  46                         { { "mcl_fishing:fish_raw", 6, 6, "mcl_core:emerald", 1, 1 }, { "mcl_fishing:fish_cooked", 6, 6 } },
  47                         { { "mcl_mobitems:string", 15, 20 }, E1 },
  48                         { { "mcl_core:coal_lump", 16, 24 }, E1 },
  49                         },
  50                         -- TODO: enchanted fishing rod
  51                 },
  52         },
  53         {
  54                 name = "Fletcher",
  55                 trades = {
  56                         {
  57                         { { "mcl_mobitems:string", 15, 20 }, E1 },
  58                         { E1, { "mcl_bows:arrow", 8, 12 } },
  59                         },
  60
  61                         {
  62                         { { "mcl_core:gravel", 10, 10, "mcl_core:emerald", 1, 1 }, { "mcl_core:flint", 6, 10 } },
  63                         { { "mcl_core:emerald", 2, 3 }, { "mcl_bows:bow", 1, 1 } },
  64                         },
  65                 }
  66         },
  67         {
  68                 name = "Shepherd",
  69                 trades = {
  70                         {
  71                         { { "mcl_wool:white", 16, 22 }, E1 },
  72                         { { "mcl_core:emerald", 3, 4 }, { "mcl_tools:shears", 1, 1 } },
  73                         },
  74
  75                         {
  76                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:white", 1, 1 } },
  77                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:grey", 1, 1 } },
  78                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:silver", 1, 1 } },
  79                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:yellow", 1, 1 } },
  80                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:red", 1, 1 } },
  81                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:purple", 1, 1 } },
  82                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:blue", 1, 1 } },
  83                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:light_blue", 1, 1 } },
  84                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:brown", 1, 1 } },
  85                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:lime", 1, 1 } },
  86                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:green", 1, 1 } },
  87                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:magenta", 1, 1 } },
  88                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:black", 1, 1 } },
  89                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:cyan", 1, 1 } },
  90                         { { "mcl_core:emerald", 1, 2 }, { "mcl_wool:pink", 1, 1 } },
  91                         },
  92                 },
  93         },
  94         {
  95                 name = "Librarian",
  96                 trades = {
  97                         {
  98                         { { "mcl_core:paper", 24, 36 }, E1 },
  99                         -- TODO: enchanted book
 100                         { { "mcl_books:book", 8, 10 }, E1 },
 101                         { { "mcl_core:emerald", 10, 12 }, { "mcl_compass:compass", 1 ,1 }},
 102                         { { "mcl_core:emerald", 3, 4 }, { "mcl_books:bookshelf", 1 ,1 }},
 103                         },
 104
 105                         {
 106                         { { "mcl_books:written_book", 2, 2 }, E1 },
 107                         { { "mcl_core:emerald", 10, 12 }, { "mcl_clock:clock", 1, 1 } },
 108                         { E1, { "mcl_core:glass", 3, 5 } },
 109                         },
 110
 111                         {
 112                         { E1, { "mcl_core:glass", 3, 5 } },
 113                         },
 114
 115                         -- TODO: 2 enchanted book tiers
 116
 117                         {
 118                         { { "mcl_core:emerald", 20, 22 }, { "mcl_mobs:nametag", 1, 1 } },
 119                         }
 120                 },
 121         },
 122         {
 123                 name = "Cartographer",
 124                 trades = {
 125                         {
 126                         { { "mcl_core:paper", 24, 36 }, E1 },
 127                         },
 128
 129                         {
 130                         { { "mcl_compass:compass", 1, 1 }, E1 },
 131                         },
 132
 133                         {
 134                         -- TODO: replace with empty map
 135                         { { "mcl_core:emerald", 7, 11}, { "mcl_maps:filled_map", 1, 1 } },
 136                         },
 137
 138                         -- TODO: special maps
 139                 },
 140         },
 141         {
 142                 name = "Armorer",
 143                 trades = {
 144                         {
 145                         { { "mcl_core:coal_lump", 16, 24 }, E1 },
 146                         { { "mcl_core:emerald", 6, 8 }, { "3d_armor:helmet_iron", 1, 1 } },
 147                         },
 148
 149                         {
 150                         { { "mcl_core:iron_ingot", 7, 9 }, E1 },
 151                         { { "mcl_core:emerald", 10, 14 }, { "3d_armor:chestplate_iron", 1, 1 } },
 152                         },
 153
 154                         {
 155                         { { "mcl_core:diamond", 3, 4 }, E1 },
 156                         -- TODO: enchant
 157                         { { "mcl_core:emerald", 16, 19 }, { "3d_armor:chestplate_diamond", 1, 1 } },
 158                         },
 159
 160                         {
 161                         { { "mcl_core:emerald", 5, 7 }, { "3d_armor:boots_chain", 1, 1 } },
 162                         { { "mcl_core:emerald", 9, 11 }, { "3d_armor:leggings_chain", 1, 1 } },
 163                         { { "mcl_core:emerald", 5, 7 }, { "3d_armor:helmet_chain", 1, 1 } },
 164                         { { "mcl_core:emerald", 11, 15 }, { "3d_armor:chestplate_chain", 1, 1 } },
 165                         },
 166                 },
 167         },
 168         {
 169                 name = "Leatherworker",
 170                 trades = {
 171                         {
 172                         { { "mcl_mobitems:leather", 9, 12 }, E1 },
 173                         { { "mcl_core:emerald", 2, 4 }, { "3d_armor:leggings_leather", 2, 4 } },
 174                         },
 175
 176                         {
 177                         -- TODO: enchant
 178                         { { "mcl_core:emerald", 7, 12 }, { "3d_armor:chestplate_leather", 1, 1 } },
 179                         },
 180
 181                         {
 182                         { { "mcl_core:emerald", 8, 10 }, { "mcl_mobitems:saddle", 1, 1 } },
 183                         },
 184                 },
 185         },
 186         {
 187                 name = "Butcher",
 188                 trades = {
 189                         {
 190                         { { "mcl_mobitems:beef", 14, 18 }, E1 },
 191                         { { "mcl_mobitems:chicken", 14, 18 }, E1 },
 192                         },
 193
 194                         {
 195                         { { "mcl_core:coal_lump", 16, 24 }, E1 },
 196                         { E1, { "mcl_mobitems:cooked_beef", 5, 7 } },
 197                         { E1, { "mcl_mobitems:cooked_chicken", 6, 8 } },
 198                         },
 199                 },
 200         },
 201         {
 202                 name = "Weapon Smith",
 203                 trades = {
 204                         {
 205                         { { "mcl_core:coal_lump", 16, 24 }, E1 },
 206                         { { "mcl_core:emerald", 6, 8 }, { "mcl_tools:axe_iron", 1, 1 } },
 207                         },
 208
 209                         {
 210                         { { "mcl_core:iron_ingot", 7, 9 }, E1 },
 211                         -- TODO: enchant
 212                         { { "mcl_core:emerald", 9, 10 }, { "mcl_tools:sword_iron", 1, 1 } },
 213                         },
 214
 215                         {
 216                         { { "mcl_core:diamond", 3, 4 }, E1 },
 217                         -- TODO: enchant
 218                         { { "mcl_core:emerald", 12, 15 }, { "mcl_tools:sword_diamond", 1, 1 } },
 219                         -- TODO: enchant
 220                         { { "mcl_core:emerald", 9, 12 }, { "mcl_tools:axe_diamond", 1, 1 } },
 221                         },
 222                 },
 223         },
 224         {
 225                 name = "Tool Smith",
 226                 trades = {
 227                         {
 228                         { { "mcl_core:coal_lump", 16, 24 }, E1 },
 229                         -- TODO: enchant
 230                         { { "mcl_core:emerald", 5, 7 }, { "mcl_tools:shovel_iron", 1, 1 } },
 231                         },
 232
 233                         {
 234                         { { "mcl_core:iron_ingot", 7, 9 }, E1 },
 235                         -- TODO: enchant
 236                         { { "mcl_core:emerald", 9, 11 }, { "mcl_tools:pick_iron", 1, 1 } },
 237                         },
 238
 239                         {
 240                         { { "mcl_core:diamond", 3, 4 }, E1 },
 241                         -- TODO: enchant
 242                         { { "mcl_core:emerald", 12, 15 }, { "mcl_tools:pick_diamond", 1, 1 } },
 243                         },
 244                 },
 245         },
 246         {
 247                 name = "Cleric",
 248                 trades = {
 249                         {
 250                         { { "mcl_mobitems:rotten_flesh", 36, 40 }, E1 },
 251                         { { "mcl_core:gold_ingot", 8, 10 }, E1 },
 252                         },
 253
 254                         {
 255                         { E1, { "mesecons:redstone", 1, 4  } },
 256                         { E1, { "mcl_dye:blue", 1, 2 } },
 257                         },
 258
 259                         {
 260                         { E1, { "mcl_nether:glowstone", 1, 3 } },
 261                         { { "mcl_core:emerald", 4, 7 }, { "mcl_throwing:ender_pearl", 1, 1 } },
 262                         },
 263
 264                         -- TODO: Bottle 'o enchanting
 265                 },
 266         },
 267         -- TODO: Nitwit
 268 }
 269
 270
 271 mobs:register_mob("mobs_mc:villager", {
 272         type = "npc",
 273         hp_min = 20,
 274         hp_max = 20,
 275         collisionbox = {-0.3, -0.01, -0.3, 0.3, 1.94, 0.3},
 276         visual = "mesh",
 277         mesh = "mobs_mc_villager.b3d",
 278         textures = {
 279         {
 280                 "mobs_mc_villager.png",
 281                 "mobs_mc_villager.png", --hat
 282         },
 283         {
 284                 "mobs_mc_villager_farmer.png",
 285                 "mobs_mc_villager_farmer.png", --hat
 286         },
 287         {
 288                 "mobs_mc_villager_priest.png",
 289                 "mobs_mc_villager_priest.png", --hat
 290         },
 291         {
 292                 "mobs_mc_villager_librarian.png",
 293                 "mobs_mc_villager_librarian.png", --hat
 294         },
 295         {
 296                 "mobs_mc_villager_butcher.png",
 297                 "mobs_mc_villager_butcher.png", --hat
 298         },
 299         {
 300                 "mobs_mc_villager_smith.png",
 301                 "mobs_mc_villager_smith.png", --hat
 302         },
 303         },
 304         visual_size = {x=3, y=3},
 305         makes_footstep_sound = true,
 306         walk_velocity = 1.2,
 307         run_velocity = 2.4,
 308         drops = {},
 309         sounds = {
 310                 random = "mobs_mc_villager_noise",
 311                 death = "mobs_mc_villager_death",
 312                 damage = "mobs_mc_villager_damage",
 313                 distance = 16,
 314         },
 315         animation = {
 316                 stand_speed = 25,
 317                 stand_start = 40,
 318                 stand_end = 59,
 319                 walk_speed = 25,
 320                 walk_start = 0,
 321                 walk_end = 40,
 322                 run_speed = 25,
 323                 run_start = 0,
 324                 run_end = 40,
 325                 die_speed = 15,
 326                 die_start = 210,
 327                 die_end = 220,
 328                 die_loop = false,
 329         },
 330         water_damage = 0,
 331         lava_damage = 4,
 332         light_damage = 0,
 333         view_range = 16,
 334         fear_height = 4,
 335         on_rightclick = function(self, clicker)
 336                 local inv
 337                 inv = minetest.get_inventory({type="detached", name="mobs_mc:trade"})
 338
 339                 if not inv then
 340                         inv = minetest.create_detached_inventory("mobs_mc:trade", {
 341                                 allow_take = function(inv, listname, index, stack, player)
 342                                         if listname == "input" or listname == "output" then
 343                                                 return stack:get_count()
 344                                         else
 345                                                 return 0
 346                                         end
 347                                 end,
 348                                 allow_move = function(inv, from_list, from_index, to_list, to_index, count, player)
 349                                         if from_list == "wanted" or from_list == "offered" or to_list == "wanted" or to_list == "offered" then
 350                                                 return 0
 351                                         elseif from_list == "output" and inv:get_stack(to_list, to_index):is_empty() then
 352                                                 return count
 353                                         elseif from_list == "input" then
 354                                                 return count
 355                                         else
 356                                                 return 0
 357                                         end
 358                                 end,
 359                                 allow_put = function(inv, listname, index, stack, player)
 360                                         if listname == "input" then
 361                                                 return stack:get_count()
 362                                         else
 363                                                 return 0
 364                                         end
 365                                 end,
 366                                 on_put = function(inv, listname, index, stack, player)
 367                                         if inv:contains_item("input", inv:get_stack("wanted", 1)) then
 368                                                 inv:set_stack("output", 1, inv:get_stack("offered", 1))
 369                                                 minetest.sound_play("mobs_mc_villager_accept", {to_player = player:get_player_name()})
 370                                         else
 371                                                 inv:set_stack("output", 1, ItemStack(""))
 372                                                 minetest.sound_play("mobs_mc_villager_deny", {to_player = player:get_player_name()})
 373                                         end
 374                                 end,
 375                                 on_move = function(inv, from_list, from_index, to_list, to_index, count, player)
 376                                         if inv:contains_item("input", inv:get_stack("wanted", 1)) then
 377                                                 inv:set_stack("output", 1, inv:get_stack("offered", 1))
 378                                                 minetest.sound_play("mobs_mc_villager_accept", {to_player = player:get_player_name()})
 379                                         else
 380                                                 inv:set_stack("output", 1, ItemStack(""))
 381                                                 minetest.sound_play("mobs_mc_villager_deny", {to_player = player:get_player_name()})
 382                                         end
 383                                 end,
 384                                 on_take = function(inv, listname, index, stack, player)
 385                                         local accept
 386                                         if listname == "output" then
 387                                                 inv:remove_item("input", inv:get_stack("wanted", 1))
 388                                                 accept = true
 389                                         end
 390                                         if inv:contains_item("input", inv:get_stack("wanted", 1)) then
 391                                                 inv:set_stack("output", 1, inv:get_stack("offered", 1))
 392                                                 accept = true
 393                                         else
 394                                                 inv:set_stack("output", 1, ItemStack(""))
 395                                                 accept = false
 396                                         end
 397                                         if accept then
 398                                                 minetest.sound_play("mobs_mc_villager_accept", {to_player = player:get_player_name()})
 399                                         else
 400                                                 minetest.sound_play("mobs_mc_villager_deny", {to_player = player:get_player_name()})
 401                                         end
 402                                 end,
 403                         })
 404                 end
 405                 inv:set_size("input", 2)
 406                 inv:set_size("output", 1)
 407                 inv:set_size("wanted", 2)
 408                 inv:set_size("offered", 1)
 409
 410                 for i=1, inv:get_size("wanted") do
 411                         inv:set_stack("wanted", i, "")
 412                 end
 413                 for i=1, inv:get_size("offered") do
 414                         inv:set_stack("offered", i, "")
 415                 end
 416
 417                 local profession = professions[math.random(1, #professions)]
 418                 local trade_tiers = profession.trades
 419                 if trade_tiers == nil then
 420                         return
 421                 end
 422                 local tier = trade_tiers[math.random(1, #trade_tiers)]
 423                 local tradenum = math.random(1, #tier)
 424                 local trade = tier[tradenum]
 425                 local wanted = ItemStack(trade[1][1])
 426                 wanted:set_count(math.random(trade[1][2], trade[1][3]))
 427                 local offered = ItemStack(trade[2][1])
 428                 offered:set_count(math.random(trade[2][2], trade[2][3]))
 429                 inv:set_stack("wanted", 1, wanted)
 430                 inv:set_stack("offered", 1, offered)
 431                 -- Second wanted item
 432                 if trade[1][4] then
 433                         local wanted2 = ItemStack(trade[1][4])
 434                         wanted2:set_count(math.random(trade[1][5], trade[1][6]))
 435                         inv:set_stack("wanted", 2, wanted2)
 436                 end
 437
 438                 local formspec =
 439                 "size[9,8.75]"..
 440                 "background[-0.19,-0.25;9.41,9.49;mobs_mc_trading_formspec_bg.png]"..
 441                 mcl_vars.inventory_header..
 442                 "list[current_player;main;0,4.5;9,3;9]"..
 443                 "list[current_player;main;0,7.74;9,1;]"
 444                 .."list[detached:mobs_mc:trade;wanted;2,1;2,1;]"
 445                 .."list[detached:mobs_mc:trade;offered;5.76,1;1,1;]"
 446                 .."list[detached:mobs_mc:trade;input;2,2.5;2,1;]"
 447                 .."list[detached:mobs_mc:trade;output;5.76,2.55;1,1;]"
 448                 .."listring[detached:mobs_mc:trade;output]"
 449                 .."listring[current_player;main]"
 450                 .."listring[detached:mobs_mc:trade;input]"
 451                 .."listring[current_player;main]"
 452                 minetest.sound_play("mobs_mc_villager_trade", {to_player = clicker:get_player_name()})
 453                 minetest.show_formspec(clicker:get_player_name(), "mobs_mc:trade", formspec)
 454         end,
 455 })
 456
 457 -- Returns a single itemstack in the given inventory to the player's main inventory, or drop it when there's no space left
 458 local function return_item(itemstack, dropper, pos, inv_p)
 459         if dropper:is_player() then
 460                 -- Return to main inventory
 461                 if inv_p:room_for_item("main", itemstack) then
 462                         inv_p:add_item("main", itemstack)
 463                 else
 464                         -- Drop item on the ground
 465                         local v = dropper:get_look_dir()
 466                         local p = {x=pos.x, y=pos.y+1.2, z=pos.z}
 467                         p.x = p.x+(math.random(1,3)*0.2)
 468                         p.z = p.z+(math.random(1,3)*0.2)
 469                         local obj = minetest.add_item(p, itemstack)
 470                         if obj then
 471                                 v.x = v.x*4
 472                                 v.y = v.y*4 + 2
 473                                 v.z = v.z*4
 474                                 obj:setvelocity(v)
 475                                 obj:get_luaentity()._insta_collect = false
 476                         end
 477                 end
 478         else
 479                 -- Fallback for unexpected cases
 480                 minetest.add_item(pos, itemstack)
 481         end
 482         return itemstack
 483 end
 484
 485 local return_fields = function(player)
 486         local inv_t = minetest.get_inventory({type="detached", name = "mobs_mc:trade"})
 487         local inv_p = player:get_inventory()
 488         for i=1, inv_t:get_size("input") do
 489                 local stack = inv_t:get_stack("input", i)
 490                 return_item(stack, player, player:get_pos(), inv_p)
 491                 stack:clear()
 492                 inv_t:set_stack("input", i, stack)
 493         end
 494         inv_t:set_stack("output", 1, "")
 495 end
 496
 497 minetest.register_on_player_receive_fields(function(player, formname, fields)
 498         if formname == "mobs_mc:trade" then
 499                 if fields.quit then
 500                         return_fields(player)
 501                 end
 502         end
 503 end)
 504
 505 minetest.register_on_leaveplayer(function(player)
 506         return_fields(player)
 507 end)
 508
 509 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)
 510
 511 -- compatibility
 512 mobs:alias_mob("mobs:villager", "mobs_mc:villager")
 513
 514 -- spawn eggs
 515 mobs:register_egg("mobs_mc:villager", S("Villager"), "mobs_mc_spawn_icon_villager.png", 0)
 516
 517 if minetest.settings:get_bool("log_mods") then
 518         minetest.log("action", "MC mobs loaded")
 519 end