local ReplicatedStorage = game:GetService("ReplicatedStorage")
local TextService = game:GetService("TextService")
local Players = game:GetService("Players")

local Remotes = Instance.new("Folder")
Remotes.Name = "PetNamingRemotes"
Remotes.Parent = ReplicatedStorage

local UserNamedPet = Instance.new("RemoteEvent")
UserNamedPet.Name = "UserNamedPet"
UserNamedPet.Parent = Remotes

local SendPetName = Instance.new("RemoteEvent")
SendPetName.Name = "SendPetName"
SendPetName.Parent = Remotes

local RequestAllPetNames = Instance.new("RemoteFunction")
RequestAllPetNames.Name = "RequestAllPetNames"
RequestAllPetNames.Parent = Remotes

local filterResults = {}

local function broadcastPetName(userId)
	local filterResult = filterResults[userId]
	if filterResult then
		for _, player in pairs(Players:GetPlayers()) do
			if player then
				-- start een nieuwe thread zodat de update niet wordt onderbroken
				task.spawn(function()
					-- pak de gefilterde string voor deze gebruiker
					local toUserId = player.UserId
					local filteredString = filterResult:GetNonChatStringForUserAsync(toUserId)
					filteredString = filteredString or ""
					SendPetName:FireClient(player, userId, filteredString)
				end)
			end
		end
	end
end

UserNamedPet.OnServerEvent:Connect(function(player, petName)
	local fromUserId = player.UserId

	-- pcall om fouten op te vangen
	local success, result = pcall(function()
		return TextService:FilterStringAsync(petName, fromUserId)
	end)

	if success then
		filterResults[fromUserId] = result
		broadcastPetName(fromUserId)
	else
		print("Kon de huisdiernaam niet filteren")
	end
end)

RequestAllPetNames.OnServerInvoke = function(player)
	local toUserId = player.UserId

	local petNames = {}

	-- door filterresultaten gaan en de huisdiernaam filteren die verzonden moet worden
	for fromUserId, filterResult in pairs(filterResults) do
		local filteredString = filterResult:GetNonChatStringForUserAsync(toUserId)
		filteredString = filteredString or ""

		-- moet userId naar string converteren zodat het niet via een remote functie kan worden verzonden
		petNames[tostring(fromUserId)] = filteredString
	end

	return petNames
end

Players.PlayerRemoving:Connect(function(oldPlayer)
	local userId = oldPlayer.UserId
	filterResults[userId] = nil
end)

local TextService = game:GetService("TextService")

local familyToCheck = "rbxasset://fonts/families/Arimo.json"

local success, info = pcall(function()
	return TextService:GetFamilyInfoAsync(familyToCheck)
end)
if success then
	print("Naam van het lettertype:", info.Name)
	print("Gezichten:")
	for _, face in info.Faces do
		print("--------")
		print("Naam:", face.Name)
		print("Gewicht:", face.Weight.Name)
		print("Stijl:", face.Style.Name)
	end
end

local TextService = game:GetService("TextService")

-- Verklaar parameters
local params = Instance.new("GetTextBoundsParams")
params.Text = "Hallo wereld!"
params.Font = Font.new("rbxasset://fonts/families/GrenzeGotisch.json", Enum.FontWeight.Thin)
params.Size = 20
params.Width = 200

local success, bounds = pcall(function()
	return TextService:GetTextBoundsAsync(params)
end)
if success then
	print(bounds)
end

local TextService = game:GetService("TextService")

local function getTextBounds()
	local message = "Hallo wereld!"
	local size = Vector2.new(1, 1)
	local bounds = TextService:GetTextSize(message, 12, "SourceSans", size)
	return bounds
end

print(getTextBounds())

local TextService = game:GetService("TextService")

local label = script.Parent.TextLabel

-- Krijg offset aangepast voor de voorkeurstekstgrootte-instelling van de speler
local success, offset = pcall(function()
	return TextService:GetTextSizeOffsetAsync(label.TextSize, label.FontFace)
end)
if success then
	-- Pas de kernhoogte van het label aan door de offset toe te voegen
	label.Size = UDim2.fromOffset(label.Size.X.Offset, label.Size.Y.Offset + offset)
end