local CaptureService = game:GetService("CaptureService")

-- Referentie naar een ImageLabel ouder van het script dat deze code bevat
local imageLabel = script.Parent

local function onCaptureReady(contentId)
	imageLabel.Image = contentId
end

CaptureService:CaptureScreenshot(onCaptureReady)

local CaptureService = game:GetService("CaptureService")

local function isGalleryAccessGranted()
	local accepted = CaptureService:PromptCaptureGalleryPermissionAsync(Enum.CaptureGalleryPermission.ReadAndUpload)
	return accepted
end

local CaptureService = game:GetService("CaptureService")

local function onShareAccepted()
	print("Vastleg delen werd geaccepteerd!")
end

local function onShareDenied()
	print("Vastleg delen werd geweigerd!")
end

local onCaptureReady = function(result, videoCapture)
	if videoCapture then
		local captureContent = Content.fromObject(videoCapture)
		CaptureService:PromptShareCapture(captureContent, "launchData" , onShareAccepted, onShareDenied)
	end
end

CaptureService:StartVideoCaptureAsync(onCaptureReady, {})

local CaptureService = game:GetService("CaptureService")

local function readCapturesFromGallery()
	local allCaptures = {}

	local capturesPages
	local success, result = pcall(function()
		local readResult, pages = CaptureService:ReadCapturesFromGalleryAsync({}, false)
		if readResult == Enum.ReadCapturesFromGalleryResult.Success then
			capturesPages = pages
		end
		return readResult
	end)

	if not success or result ~= Enum.ReadCapturesFromGalleryResult.Success then
		-- Waarschijnlijk een machtigingsfout, zie CaptureService:PromptCaptureGalleryPermissionAsync()
		warn("Kon de initiële captures niet ophalen: " .. result.Name)
		return
	end

	-- Doorloop de huidige pagina
	local currentPage = capturesPages:GetCurrentPage()

	for _, capture in currentPage do
		table.insert(allCaptures, capture)
	end

	-- Ga door naar de volgende pagina totdat deze is voltooid
	while not capturesPages.IsFinished do
		local advanceToNextPageSuccess, _ = pcall(function()
			capturesPages:AdvanceToNextPageAsync()
		end)

		if not advanceToNextPageSuccess then
			return
		end

		currentPage = capturesPages:GetCurrentPage()
		for _, capture in currentPage do
			table.insert(allCaptures, capture)
		end
	end

	return allCaptures
end

local CaptureService = game:GetService("CaptureService")

local tool = Instance.new("Tool")
tool.Parent = workspace

local onCaptureReady = function(result, videoCapture)
	if result ~= Enum.VideoCaptureResult.Success and result ~= Enum.VideoCaptureResult.TimeLimitReached or not videoCapture then
		print("Video-opname is om de volgende reden niet voltooid:", result)
	else
		-- Vraag de gebruiker om de video-opname op te slaan in hun galerij
		CaptureService:PromptSaveCapturesToGallery({ videoCapture }, function()
			print("Opname opgeslagen")
		end)
	end
end

tool.Activated:Connect(function()
	local videoRecordingAllowedResult: Enum.VideoCaptureStartedResult = CaptureService:StartVideoCaptureAsync(onCaptureReady, {})
	if videoRecordingAllowedResult ~= Enum.VideoCaptureStartedResult.Success then
		print("Video-opname is om de volgende reden niet gestart:", videoRecordingAllowedResult)
	end
end)

local CaptureService = game:GetService("CaptureService")

local parent = Instance.new("Tool")
parent.Parent = workspace

local onCaptureReady = function(result, screenshotCapture)
	if result ~= Enum.ScreenshotCaptureResult.Success or not screenshotCapture then
		print("Screenshot is om de volgende reden niet voltooid:", result)
	else
		-- Vraag de gebruiker om de screenshot vastlegging op te slaan in hun galerij
		CaptureService:PromptSaveCapturesToGallery({ screenshotCapture }, function(results)
			for capture, result in pairs(results) do
				if result then
					print("Vastlegging opgeslagen")
				end
			end
		end)
	end
end

parent.Activated:Connect(function()
	CaptureService:TakeScreenshotCaptureAsync(onCaptureReady, { UICaptureMode = Enum.UICaptureMode.All })
end)

local CaptureService = game:GetService("CaptureService")

local function uploadCapture(capture: Capture)
	local success, result = pcall(function()
		local uploadCaptureResult, assetId = CaptureService:UploadCaptureAsync(capture)

		if uploadCaptureResult ~= Enum.UploadCaptureResult.Success then
			-- Foutafhandeling
			return nil
		end

		return assetId
	end)

	if not success then
		-- Foutafhandeling
		return nil
	end

	return result
end