local R=game:GetService("\087\111\114\107\115\112\097\099\101")local s=require(script.Parent:WaitForChild("\066\097\115\101\084\101\115\116"))local t=s:Extend()t:SetClassName("\067\097\109\101\114\097\084\119\101\101\110\115\084\101\115\116")function t.__new(s)s:InitializeSuper()s.Name="\067\097\109\101\114\097 \065\110\105\109\097\116\105\111\110\115"s.Icon="\078\079\078\069"s.Status="\078\111\116 \068\101\116\101\099\116\101\100"s.ProblemText="\067\097\109\101\114\097 \097\110\105\109\097\116\105\111\110\115 \099\097\110 \099\097\117\115\101 \109\111\116\105\111\110 \115\105\099\107\110\101\115\115 \119\104\105\108\101 \112\108\097\121\105\110\103 \105\110 \086\082 \115\105\110\099\101 \105\116 \109\111\118\101\115 \116\104\101 \112\108\097\121\101\114\'\115 \118\105\101\119 \119\105\116\104\111\117\116 \116\104\101 \112\108\097\121\101\114 \109\111\118\105\110\103\046"s.SolutionText="\068\105\115\097\098\108\101 \099\097\109\101\114\097 \097\110\105\109\097\116\105\111\110\115 \105\110 \086\082\046"local t=R.CurrentCamera;(t:GetPropertyChangedSignal("\067\097\109\101\114\097\084\121\112\101")):Connect(function()s.LastScriptableTime=t.CameraType==Enum.CameraType.Scriptable and tick()or 0 end);(t:GetPropertyChangedSignal("\067\070\114\097\109\101")):Connect(function()if s.LastScriptableTime and tick()-s.LastScriptableTime>.016666666666667 then s.Icon="\087\065\082\078\073\078\071"s.Status="\080\114\111\098\108\101\109 \068\101\116\101\099\116\101\100"end end)end return t
--[[
TheNexusAvenger

Test for camera animations.
--]]

local Workspace = game:GetService("Workspace")

local BaseTest = require(script.Parent:WaitForChild("BaseTest"))

local CameraTweensTest = BaseTest:Extend()
CameraTweensTest:SetClassName("CameraTweensTest")



--[[
Creates the test.
--]]
function CameraTweensTest:__new()
    self:InitializeSuper()

    --Set up the initial state.
    self.Name = "Camera Animations"
    self.Icon = "NONE"
    self.Status = "Not Detected"
    self.ProblemText = "Camera animations can cause motion sickness while playing in VR since it moves the player's view without the player moving."
    self.SolutionText = "Disable camera animations in VR."

    --Connect camera changes.
    local Camera = Workspace.CurrentCamera
    Camera:GetPropertyChangedSignal("CameraType"):Connect(function()
        self.LastScriptableTime = (Camera.CameraType == Enum.CameraType.Scriptable and tick() or 0)
    end)
    Camera:GetPropertyChangedSignal("CFrame"):Connect(function()
        if self.LastScriptableTime and tick() - self.LastScriptableTime > 1/60 then
            self.Icon = "WARNING"
            self.Status = "Problem Detected"
        end
    end)
end



return CameraTweensTest