game.ReplicatedStorage.VillagerRole.OnServerEvent:Connect(function(player)
	player:WaitForChild("Role").Value = "Mini Villager"
	player.Character.Humanoid.MaxHealth = 100
	player.Character.Humanoid.BodyDepthScale.Value = 0.7
	player.Character.Humanoid.BodyHeightScale.Value = 0.7
	player.Character.Humanoid.BodyWidthScale.Value = 0.6
	local Shirt1 = script.Villager:WaitForChild("Shirt"):Clone()
	local Pants1 = script.Villager:WaitForChild("Pants"):Clone()
	if (player) and (player.Character) then
		for _, Item in pairs(player.Character:GetChildren()) do
			if Item:IsA("Shirt") then
				Item:Destroy()
				Shirt1.Parent = player.Character
			elseif Item:IsA("Pants") then
				Item:Destroy()
			end
		end
	end
	Shirt1.Parent = player.Character
	Pants1.Parent = player.Character
end)

game.ReplicatedStorage.TheFatRole.OnServerEvent:Connect(function(player)
	player:WaitForChild("Role").Value = "Fat"
	player.Character.Humanoid.MaxHealth = 100
	player.Character.Humanoid.BodyDepthScale.Value = 0.9
	player.Character.Humanoid.BodyHeightScale.Value = 0.7
	player.Character.Humanoid.BodyWidthScale.Value = 0.7
	local Shirt1 = script.The_Fat:WaitForChild("Shirt"):Clone()
	local Pants1 = script.The_Fat:WaitForChild("Pants"):Clone()
	if (player) and (player.Character) then
		for _, Item in pairs(player.Character:GetChildren()) do
			if Item:IsA("Shirt") then
				Item:Destroy()
				Shirt1.Parent = player.Character
			elseif Item:IsA("Pants") then
				Item:Destroy()
			end
		end
	end
	Shirt1.Parent = player.Character
	Pants1.Parent = player.Character
end)

game.ReplicatedStorage.Villager2Role.OnServerEvent:Connect(function(player)
	player:WaitForChild("Role").Value = "Villager"
	player.Character.Humanoid.MaxHealth = 50
	local Shirt1 = script.Villager:WaitForChild("Shirt"):Clone()
	local Pants1 = script.Villager:WaitForChild("Pants"):Clone()
	if (player) and (player.Character) then
		for _, Item in pairs(player.Character:GetChildren()) do
			if Item:IsA("Shirt") then
				Item:Destroy()
				Shirt1.Parent = player.Character
			elseif Item:IsA("Pants") then
				Item:Destroy()
			end
		end
	end
	Shirt1.Parent = player.Character
	Pants1.Parent = player.Character
end)

game.ReplicatedStorage.FitnessRole.OnServerEvent:Connect(function(player)
	player:WaitForChild("Role").Value = "Fitness"
	local tool = game.ServerStorage.RoleTools.Punch:Clone()
	player.Character.Humanoid.MaxHealth = 50
	player.Character.Humanoid.WalkSpeed = 25
	local Shirt1 = script.The_Fitness:WaitForChild("Shirt"):Clone()
	local Pants1 = script.The_Fitness:WaitForChild("Pants"):Clone()
	if (player) and (player.Character) then
		for _, Item in pairs(player.Character:GetChildren()) do
			if Item:IsA("Shirt") then
				Item:Destroy()
				Shirt1.Parent = player.Character
			elseif Item:IsA("Pants") then
				Item:Destroy()
			end
		end
	end
	Shirt1.Parent = player.Character
	Pants1.Parent = player.Character
end)