local VRService = game:GetService("VRService")

if VRService.VREnabled then
	print(VRService.GuiInputUserCFrame.Name)
else
	print("Aucun appareil VR détecté !")
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
	-- Définir le CFrame initial
	head.CFrame = VRService:GetUserCFrame(Enum.UserCFrame.Head)

	-- Suivre le mouvement du casque VR et le réfléchir pour la tête du personnage
	VRService.UserCFrameChanged:Connect(TrackHead)
end

local VRService = game:GetService("VRService")

-- Récupère le mode du pavé tactile gauche
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)

-- Tenir compte de la taille de la tête
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("Le dispositif VR est activé !")
else
	print("Le dispositif VR est désactivé !")
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")

-- Définit le mode du pavé tactile gauche sur Touch
VRService:SetTouchpadMode(Enum.VRTouchpad.Left, Enum.VRTouchpadMode.Touch)

local VRService = game:GetService("VRService")

VRService.NavigationRequested:Connect(function(cframe, inputUserCFrame)
	print(inputUserCFrame.Name .. " a fait une demande avec CFrame: " .. cframe)
end)

local VRService = game:GetService("VRService")

VRService.TouchpadModeChanged:Connect(function(pad, mode)
	print(pad.Name .. " Touchpad changé d'état en : " .. mode.Name)
end)

local VRService = game:GetService("VRService")

VRService.UserCFrameChanged:Connect(function(userCFrameType, cframeValue)
	print(userCFrameType.Name .. " a changé. Cadre mis à jour : " .. tostring(cframeValue))
end)

local VRService = game:GetService("VRService")

VRService.UserCFrameEnabled:Connect(function(type, enabled)
	if enabled then
		print(type.Name .. " a été activé!")
	else
		print(type.Name .. " a été désactivé!")
	end
end)