server-nalc/mods/mobs/sheep.lua

local all_colours = {
	"grey", "black", "red", "yellow", "green", "cyan", "blue", "magenta",
	"white", "orange", "violet", "brown", "pink", "dark_grey", "dark_green"
}

-- Sheep by PilzAdam

for _, col in ipairs(all_colours) do

	mobs:register_mob("mobs:sheep_"..col, {
		-- animal, monster, npc, barbarian
		type = "animal",
		-- not aggressive
		passive = true,
		-- health & armor
		hp_min = 10,
		hp_max = 15,
		armor = 200,
		-- textures and model
		collisionbox = {-0.4, -1, -0.4, 0.4, 0.3, 0.4},
		visual = "mesh",
		mesh = "mobs_sheep.b3d",
		textures = {
			{"mobs_sheep_"..col..".png"},
		},
		-- specific texture and mesh for gotten
		gotten_texture = {"mobs_sheep_shaved.png"},
		gotten_mesh = "mobs_sheep_shaved.b3d",
		-- sounds
		makes_footstep_sound = true,
		sounds = {
			random = "mobs_sheep",
		},
		-- speed and jump
		walk_velocity = 1,
		run_velocity = 2,
		jump = true,
		-- drops raw meat and woll of its color when dead
		drops = {
			{name = "mobs:meat_raw",
			chance = 1, min = 2, max = 3},
			{name = "wool:"..col,
			chance = 1, min = 1, max = 1},
		},
		-- damaged by
		water_damage = 1,
		lava_damage = 5,
		light_damage = 0,
		-- model animation
		animation = {
			speed_normal = 15,		speed_run = 15,
			stand_start = 0,		stand_end = 80,
			walk_start = 81,		walk_end = 100,
		},
		follow = {"farming:wheat", "default:grass_5"},
		view_range = 10,
		-- replace grass/wheat with air (eat)
		replace_rate = 50,
		replace_what = {"default:grass_3", "default:grass_4", "default:grass_5", "farming:wheat_8"},
		replace_with = "air",
		-- right click sheep to shear sheep and get wood, feed 8 wheat for wool to grow back
		replace_offset = -1,
		on_rightclick = function(self, clicker)
			local shpcolor = string.split(self.name,"_")[2]
			if shpcolor =="dark" then
				shpcolor = shpcolor.."_"..string.split(self.name,"_")[3]
			end

			--are we feeding?
			if mobs:feed_tame(self, clicker, 8, true, true) then
				--if full grow fuzz
				if self.gotten == false then
					self.object:set_properties({
						textures = {"mobs_sheep_"..shpcolor..".png"},
						mesh = "mobs_sheep.b3d",
					})
				end
				return
			end

			local item = clicker:get_wielded_item()
			local itemname = item:get_name()

			--are we giving a haircut>
			if itemname == "mobs:shears" then
				if self.gotten == false and self.child == false then
					self.gotten = true -- shaved
					if minetest.get_modpath("wool") then
						local pos = self.object:getpos()
						pos.y = pos.y + 0.5
						local obj = minetest.add_item(pos, ItemStack("wool:"..shpcolor.." "..math.random(2,3)))
						if obj then
							obj:setvelocity({
								x = math.random(-1,1),
								y = 5,
								z = math.random(-1,1)
							})
						end
						item:add_wear(650) -- 100 uses
						clicker:set_wielded_item(item)
					end
					self.object:set_properties({
						textures = {"mobs_sheep_shaved.png"},
						mesh = "mobs_sheep_shaved.b3d",
					})
				end
				return
			end

			local name = clicker:get_player_name()

			--are we coloring?
			if itemname:find("dye:") then
				if self.gotten == false and self.child == false and self.tamed == true and name == self.owner then
					local col = string.split(itemname,":")[2]
					for _,c in pairs(all_colours) do
						if c == col then
							local pos = self.object:getpos()
							self.object:remove()
							local mob = minetest.add_entity(pos, "mobs:sheep_"..col)
							local ent = mob:get_luaentity()
							ent.owner = name
							ent.tamed = true
							-- take item
							if not minetest.setting_getbool("creative_mode") then
								item:take_item()
								clicker:set_wielded_item(item)
							end
							break
						end
					end
				end
				return
			end

			--are we capturing?
			mobs:capture_mob(self, clicker, 0, 5, 60, false, nil)
		end
	})

	mobs:register_egg("mobs:sheep_"..col, "Sheep ("..col..")", "mobs_sheep_"..col.."_inv.png", 1)

end

mobs:spawn_specific("mobs:sheep_white", {"default:dirt_with_grass"}, {"air"}, 8, 20, 30, 10000, 1, -31000, 31000, true)

-- compatibility (item and entity)
minetest.register_alias("mobs:sheep", "mobs:sheep_white")

minetest.register_entity("mobs:sheep", {
	hp_max = 1,
	physical = true,
	collide_with_objects = true,
	visual = "mesh",
	mesh = "mobs_sheep.b3d",
	visual_size = {x = 1, y = 1},
	textures = {"mobs_sheep_white.png"},
	velocity = {x = 0, y = 0, z = 0},
	collisionbox = {-0.4, -1, -0.4, 0.4, 0.3, 0.4},
	is_visible = true,
	speed = 0,
	timer = 0,

	on_rightclick = function(self, clicker)
		clicker:get_inventory():add_item("main", "mobs:sheep_white")
		self.object:remove()
	end,

	on_step = function(self, dtime)
		self.timer = self.timer + dtime
		if self.timer >= 1 then
			self.timer = 0
			self.object:setacceleration({
				x = 0,
				y = -10,
				z = 0
			})
		end
	end,

})

-- -- shears (right click sheep to shear wool)
-- minetest.register_tool("mobs:shears", {
-- 	description = "Steel Shears (right-click sheep to shear)",
-- 	inventory_image = "mobs_shears.png",
-- 	tool_capabilities = {				-- Modif MFF /DEBUT
-- 		full_punch_interval = 1,
-- 		max_drop_level=1,
-- 		groupcaps={
-- 			snappy={times={[1]=2.5, [2]=1.20, [3]=0.35}, uses=30, maxlevel=2},
-- 		},
-- 		damage_groups = {fleshy=0},
-- 	}
-- })							-- Modif MFF /FIN