Mineclonia/mods/ENTITIES/mobs_mc/sheep.lua

--MCmobs v0.2
--maikerumine
--made for MC like Survival game
--License for code WTFPL and otherwise stated in readmes


-- This is a trick to force spawn probabilities
-- FIXME: Remove this hack, improve the API instead
local texture_hack = {}
for i=1,81836 do
	-- 81.836%
	table.insert(texture_hack, {"mobs_sheep.png"})
end
for i=1,5000 do
	-- 5%
	table.insert(texture_hack, {"mobs_sheep_grey.png"})
end
for i=1,5000 do
	-- 5%
	table.insert(texture_hack, {"mobs_sheep_dark_grey.png"})
end
for i=1,5000 do
	-- 5%
	table.insert(texture_hack, {"mobs_sheep_black.png"})
end
for i=1,3000 do
	-- 3%
	table.insert(texture_hack, {"mobs_sheep_brown.png"})
end
for i=1,164 do
	-- 0.164%
	table.insert(texture_hack, {"mobs_sheep_pink.png"})
end

-- Sheep
mobs:register_mob("mobs_mc:sheep", {
	type = "animal",
	hp_min = 8,
	hp_max = 8,
	-- FIXME: Should be 1.3 blocks high
	collisionbox = {-0.45, -0.01, -0.45, 0.45, 1.09, 0.45},
	
	visual = "mesh",
	visual_size = {x=0.6, y=0.6},
	mesh = "mobs_sheep.x",
	textures = texture_hack,
	makes_footstep_sound = true,
	walk_velocity = 1,
	armor = 100,
	drops = {
		{name = "mcl_mobitems:mutton",
		chance = 1,
		min = 1,
		max = 2,},
		{name = "mcl_wool:white",
		chance = 1,
		min = 1,
		max = 1,},
	},
	drawtype = "front",
	lava_damage = minetest.registered_nodes["mcl_core:lava_source"].damage_per_second,
	light_damage = 0,
	fear_height = 4,
	jump_height = 4.5,
	sounds = {
		random = "mobs_sheep",
		death = "mobs_sheep",
--		damage = "mobs_sheep",
	},
	animation = {
		speed_normal = 24,
		stand_start = 0,
		stand_end = 23,
		walk_start = 24,
		walk_end = 49,
		hurt_start = 118,
		hurt_end = 154,
		death_start = 154,
		death_end = 179,
		eat_start = 49,
		eat_end = 78,
		look_start = 78,
		look_end = 108,
	},
	follow = {"mcl_farming:wheat_item"},
	view_range = 5,

	replace_rate = 10,
	replace_what = {"mcl_core:dirt_with_grass", "mcl_core:tallgrass"},
	replace_with = "air",
	
	on_rightclick = function(self, clicker)

		if mobs:feed_tame(self, clicker, 1, true, true) then
			return
		end

		local item = clicker:get_wielded_item()
		if item:get_name() == "mcl_core:shears" and not self.gotten and not self.child then
			self.gotten = true
			local pos = self.object:getpos()
			minetest.sound_play("shears", {pos = pos})
			pos.y = pos.y + 0.5
			if not self.color then
				minetest.add_item(pos, ItemStack("mcl_wool:white "..math.random(1,3)))
			else
				minetest.add_item(pos, ItemStack("mcl_wool:"..self.color.." "..math.random(1,3)))
			end
			self.object:set_properties({
				textures = {"mobs_sheep_sheared.png"},
			})
			if not minetest.setting_getbool("creative_mode") then
				item:add_wear(65535/238)
				clicker:get_inventory():set_stack("main", clicker:get_wield_index(), item)
			end
		end
		if minetest.get_item_group(item:get_name(), "dye") == 1 and not self.gotten then
print(item:get_name(), minetest.get_item_group(item:get_name(), "dye"))
			local name = item:get_name()
			local pname = name:split(":")[2]

			self.object:set_properties({
				textures = {"mobs_sheep_"..pname..".png"},
			})
			self.color = pname
			self.drops = {
				{name = "mcl_mobitems:mutton",
				chance = 1,
				min = 1,
				max = 2,},
				{name = "mcl_wool:"..self.color,
				chance = 1,
				min = 1,
				max = 1,},
			}
		end
	end,
})
mobs:register_spawn("mobs_mc:sheep", {"mcl_core:dirt_with_grass"}, 20, 9, 5000, 2, 31000)


-- compatibility
mobs:alias_mob("mobs:sheep", "mobs_mc:sheep")

-- spawn eggs
mobs:register_egg("mobs_mc:sheep", "Spawn Sheep", "spawn_egg_sheep.png")


if minetest.setting_get("log_mods") then
	minetest.log("action", "MC Sheep loaded")
end