local VRService = game:GetService("VRService")

if VRService.VREnabled then
	print(VRService.GuiInputUserCFrame.Name)
else
	print("Geen VR-apparaat gedetecteerd!")
end

local VRService = game:GetService("VRService")
local Players = game:GetService("Players")

local player = Players.LocalPlayer
local character = player.CharacterAdded:Wait()
local head = character:WaitForChild("Head")

local function TrackHead(inputType, value)
	if inputType == Enum.UserCFrame.Head then
		head.CFrame = value
	end
end

if VRService.VREnabled then
	-- Stel de initiële CFrame in
	head.CFrame = VRService:GetUserCFrame(Enum.UserCFrame.Head)

	-- Volg de beweging van de VR-headset en spiegel deze voor het hoofd van het karakter
	VRService.UserCFrameChanged:Connect(TrackHead)
end

local VRService = game:GetService("VRService")

VRService:GetTouchpadMode(Enum.VRTouchpad.Left)

local Workspace = game:GetService("Workspace")
local VRService = game:GetService("VRService")

local camera = Workspace.CurrentCamera
local part = script.Parent.Part
local handOffset = VRService:GetUserCFrame(Enum.UserCFrame.LeftHand)

-- Houd rekening met headscale
handOffset = handOffset.Rotation + handOffset.Position * camera.HeadScale
part.CFrame = camera.CFrame * handOffset

local VRService = game:GetService("VRService")

local isEnabled = VRService:GetUserCFrameEnabled(Enum.UserCFrame.Head)
if isEnabled then
	print("VR-apparaat is ingeschakeld!")
else
	print("VR-apparaat is gedeactiveerd!")
end

local VRService = game:GetService("VRService")

VRService:RecenterUserHeadCFrame()

local VRService = game:GetService("VRService")

local destination = workspace:FindFirstChild("NavigationDestination")

VRService:RequestNavigation(Enum.UserCFrame.Head, destination.CFrame)

local VRService = game:GetService("VRService")

VRService:SetTouchpadMode(Enum.VRTouchpad.Left, Enum.VRTouchpadMode.Touch)

local VRService = game:GetService("VRService")

VRService.NavigationRequested:Connect(function(cframe, inputUserCFrame)
	print(inputUserCFrame.Name .. " heeft een aanvraag gedaan met CFrame: " .. cframe)
end)

local VRService = game:GetService("VRService")

VRService.TouchpadModeChanged:Connect(function(pad, mode)
	print(pad.Name .. " Touchpad veranderd naar status: " .. mode.Name)
end)

local VRService = game:GetService("VRService")

VRService.UserCFrameChanged:Connect(function(userCFrameType, cframeValue)
	print(userCFrameType.Name .. " is veranderd. Geüpdatete Frame: " .. tostring(cframeValue))
end)

local VRService = game:GetService("VRService")

VRService.UserCFrameEnabled:Connect(function(type, enabled)
	if enabled then
		print(type.Name .. " is ingeschakeld!")
	else
		print(type.Name .. " is uitgeschakeld!")
	end
end)