UserInputService

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

local ball = script.Parent:WaitForChild("Ball")
local mass = ball:GetMass()
local gravityForce = ball:WaitForChild("GravityForce")

local function moveBall(gravity)
	gravityForce.Force = gravity.Position * Workspace.Gravity * mass
end

if UserInputService.AccelerometerEnabled then
	UserInputService.DeviceGravityChanged:Connect(moveBall)
end

local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")

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

local camera = workspace.CurrentCamera
local currentRotation = camera.CFrame -- CFrame.new(Vector3.new(0,0,0), Vector3.new(0,0,0))
local lastInputFrame = nil
local upsideDown = false

task.wait()

local orientationSet = false
local function GravityChanged(gravity)
	if not orientationSet then
		upsideDown = (gravity.Position.X < -0.5 or gravity.Position.Z > 0.5)

		orientationSet = true
	end
end

local function RotationChanged(_rotation, rotCFrame)
	if orientationSet then
		if not lastInputFrame then
			lastInputFrame = rotCFrame
		end

		local delta = rotCFrame * lastInputFrame:inverse()
		local x, y, z = delta:ToEulerAnglesXYZ()
		if upsideDown then
			delta = CFrame.Angles(-x, y, z)
		else
			delta = CFrame.Angles(x, -y, z)
		end
		currentRotation = currentRotation * delta

		lastInputFrame = rotCFrame
	end
end

local function HideCharacter()
	for _, limb in pairs(character:GetChildren()) do
		if limb:IsA("Part") then
			limb.Transparency = 1
		end
	end
end

if UserInputService.GyroscopeEnabled then
	UserInputService.DeviceGravityChanged:Connect(GravityChanged)
	UserInputService.DeviceRotationChanged:Connect(RotationChanged)

	HideCharacter()

	RunService:BindToRenderStep("Camera", Enum.RenderPriority.Camera.Value, function()
		camera.CFrame = CFrame.new(head.Position - Vector3.new(0, 8, 10)) * currentRotation
		camera.Focus = CFrame.new(currentRotation * Vector3.new(0, 0, -10))
	end)
end

local UserInputService = game:GetService("UserInputService")

local function getActiveGamepad()
	local activeGamepad = nil
	
	local connectedGamepads = UserInputService:GetConnectedGamepads()

	if #connectedGamepads > 0 then
		for _, gamepad in connectedGamepads do
			if activeGamepad == nil or gamepad.Value < activeGamepad.Value then
				activeGamepad = gamepad
			end
		end
	end

	if activeGamepad == nil then  -- Nothing is connected; set up for "Gamepad1"
		activeGamepad = Enum.UserInputType.Gamepad1
	end

	return activeGamepad
end

if UserInputService.GamepadEnabled then
	local activeGamepad = getActiveGamepad()
  print(activeGamepad)
end

local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")

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

local camera = workspace.CurrentCamera
local currentRotation = camera.CFrame -- CFrame.new(Vector3.new(0,0,0), Vector3.new(0,0,0))
local lastInputFrame = nil
local upsideDown = false

task.wait()

local orientationSet = false
local function GravityChanged(gravity)
	if not orientationSet then
		upsideDown = (gravity.Position.X < -0.5 or gravity.Position.Z > 0.5)

		orientationSet = true
	end
end

local function RotationChanged(_rotation, rotCFrame)
	if orientationSet then
		if not lastInputFrame then
			lastInputFrame = rotCFrame
		end

		local delta = rotCFrame * lastInputFrame:inverse()
		local x, y, z = delta:ToEulerAnglesXYZ()
		if upsideDown then
			delta = CFrame.Angles(-x, y, z)
		else
			delta = CFrame.Angles(x, -y, z)
		end
		currentRotation = currentRotation * delta

		lastInputFrame = rotCFrame
	end
end

local function HideCharacter()
	for _, limb in pairs(character:GetChildren()) do
		if limb:IsA("Part") then
			limb.Transparency = 1
		end
	end
end

if UserInputService.GyroscopeEnabled then
	UserInputService.DeviceGravityChanged:Connect(GravityChanged)
	UserInputService.DeviceRotationChanged:Connect(RotationChanged)

	HideCharacter()

	RunService:BindToRenderStep("Camera", Enum.RenderPriority.Camera.Value, function()
		camera.CFrame = CFrame.new(head.Position - Vector3.new(0, 8, 10)) * currentRotation
		camera.Focus = CFrame.new(currentRotation * Vector3.new(0, 0, -10))
	end)
end

local UserInputService = game:GetService("UserInputService")

if UserInputService.KeyboardEnabled then
	print("The user's device has an available keyboard!")
else
	print("The user's device does not have an available keyboard!")
end

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

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

local mouse = player:GetMouse()

local zoomed = false
local camera = game.Workspace.CurrentCamera
local target = nil
local originalProperties = {
	FieldOfView = nil,
	_CFrame = nil,
	MouseBehavior = nil,
	MouseDeltaSensitivity = nil,
}

local AngleX, TargetAngleX = 0, 0
local AngleY, TargetAngleY = 0, 0

-- Reset camera back to CFrame and FieldOfView before zoom
local function ResetCamera()
	target = nil
	camera.CameraType = Enum.CameraType.Custom
	camera.CFrame = originalProperties._CFrame
	camera.FieldOfView = originalProperties.FieldOfView

	UserInputService.MouseBehavior = originalProperties.MouseBehavior
	UserInputService.MouseDeltaSensitivity = originalProperties.MouseDeltaSensitivity
end

local function ZoomCamera()
	-- Allow camera to be changed by script
	camera.CameraType = Enum.CameraType.Scriptable

	-- Store camera properties before zoom
	originalProperties._CFrame = camera.CFrame
	originalProperties.FieldOfView = camera.FieldOfView
	originalProperties.MouseBehavior = UserInputService.MouseBehavior
	originalProperties.MouseDeltaSensitivity = UserInputService.MouseDeltaSensitivity

	-- Zoom camera
	target = mouse.Hit.Position
	local eyesight = head.Position
	camera.CFrame = CFrame.new(eyesight, target)
	camera.Focus = CFrame.new(target)
	camera.FieldOfView = 10

	-- Lock and slow down mouse
	UserInputService.MouseBehavior = Enum.MouseBehavior.LockCenter
	UserInputService.MouseDeltaSensitivity = 1

	-- Reset zoom angles
	AngleX, TargetAngleX = 0, 0
	AngleY, TargetAngleY = 0, 0
end

-- Toggle camera zoom/unzoom
local function MouseClick()
	if zoomed then
		-- Unzoom camera
		ResetCamera()
	else
		-- Zoom in camera
		ZoomCamera()
	end

	zoomed = not zoomed
end

local function MouseMoved(input)
	if zoomed then
		local sensitivity = 0.6 -- anything higher would make looking up and down harder; recommend anything between 0~1
		local smoothness = 0.05 -- recommend anything between 0~1

		local delta = Vector2.new(input.Delta.x / sensitivity, input.Delta.y / sensitivity) * smoothness

		local X = TargetAngleX - delta.y
		local Y = TargetAngleY - delta.x
		TargetAngleX = (X >= 80 and 80) or (X <= -80 and -80) or X
		TargetAngleY = (Y >= 80 and 80) or (Y <= -80 and -80) or Y

		AngleX = AngleX + (TargetAngleX - AngleX) * 0.35
		AngleY = AngleY + (TargetAngleY - AngleY) * 0.15

		camera.CFrame = CFrame.new(head.Position, target)
			* CFrame.Angles(0, math.rad(AngleY), 0)
			* CFrame.Angles(math.rad(AngleX), 0, 0)
	end
end

local function InputBegan(input, _gameProcessedEvent)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then
		MouseClick()
	end
end

local function InputChanged(input, _gameProcessedEvent)
	if input.UserInputType == Enum.UserInputType.MouseMovement then
		MouseMoved(input)
	end
end

if UserInputService.MouseEnabled then
	UserInputService.InputBegan:Connect(InputBegan)
	UserInputService.InputChanged:Connect(InputChanged)
end

local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")

local camera = workspace.CurrentCamera

local player = Players.LocalPlayer
local character = player.CharacterAdded:Wait()
local torso = character:WaitForChild("HumanoidRootPart")
local playerPosition = torso.Position

local default_CameraPosition = torso.Position
local default_CameraRotation = Vector2.new(0, math.rad(-60))
local default_CameraZoom = 15

local cameraPosition = default_CameraPosition
local cameraRotation = default_CameraRotation
local cameraZoom = default_CameraZoom

local cameraZoomBounds = nil -- {10,200}
local cameraRotateSpeed = 10
local cameraMouseRotateSpeed = 0.25
local cameraTouchRotateSpeed = 10

local function SetCameraMode()
	camera.CameraType = "Scriptable"
	camera.FieldOfView = 80
	camera.CameraSubject = nil
end

local function UpdateCamera()
	SetCameraMode()
	local cameraRotationCFrame = CFrame.Angles(0, cameraRotation.X, 0) * CFrame.Angles(cameraRotation.Y, 0, 0)
	camera.CFrame = cameraRotationCFrame + cameraPosition + cameraRotationCFrame * Vector3.new(0, 0, cameraZoom)
	camera.Focus = camera.CFrame - Vector3.new(0, camera.CFrame.p.Y, 0)
end

local lastTouchTranslation = nil
local function TouchMove(_touchPositions, totalTranslation, _velocity, state)
	if state == Enum.UserInputState.Change or state == Enum.UserInputState.End then
		local difference = totalTranslation - lastTouchTranslation
		cameraPosition = cameraPosition + Vector3.new(difference.X, 0, difference.Y)
		UpdateCamera()
	end
	lastTouchTranslation = totalTranslation
end

local lastTouchRotation = nil
local function TouchRotate(_touchPositions, rotation, _velocity, state)
	if state == Enum.UserInputState.Change or state == Enum.UserInputState.End then
		local difference = rotation - lastTouchRotation
		cameraRotation = cameraRotation
			+ Vector2.new(-difference, 0) * math.rad(cameraTouchRotateSpeed * cameraRotateSpeed)
		UpdateCamera()
	end
	lastTouchRotation = rotation
end

local lastTouchScale = nil
local function TouchZoom(_touchPositions, scale, _velocity, state)
	if state == Enum.UserInputState.Change or state == Enum.UserInputState.End then
		local difference = scale - lastTouchScale
		cameraZoom = cameraZoom * (1 + difference)
		if cameraZoomBounds ~= nil then
			cameraZoom = math.min(math.max(cameraZoom, cameraZoomBounds[1]), cameraZoomBounds[2])
		else
			cameraZoom = math.max(cameraZoom, 0)
		end
		UpdateCamera()
	end
	lastTouchScale = scale
end

local function Input(inputObject)
	if inputObject.UserInputType == Enum.UserInputType.Keyboard then
		if inputObject.UserInputState == Enum.UserInputState.Begin then
			-- (I) Zoom In
			if inputObject.KeyCode == Enum.KeyCode.I then
				cameraZoom = cameraZoom - 15
			elseif inputObject.KeyCode == Enum.KeyCode.O then
				cameraZoom = cameraZoom + 15
			end

			-- (O) Zoom Out
			if cameraZoomBounds ~= nil then
				cameraZoom = math.min(math.max(cameraZoom, cameraZoomBounds[1]), cameraZoomBounds[2])
			else
				cameraZoom = math.max(cameraZoom, 0)
			end

			UpdateCamera()
		end
	end

	local pressed = UserInputService:IsMouseButtonPressed(Enum.UserInputType.MouseButton1)
	if pressed then
		UserInputService.MouseBehavior = Enum.MouseBehavior.LockCurrentPosition
		local rotation = UserInputService:GetMouseDelta()
		cameraRotation = cameraRotation + rotation * math.rad(cameraMouseRotateSpeed)
	else
		UserInputService.MouseBehavior = Enum.MouseBehavior.Default
	end
end

local function PlayerChanged()
	local movement = torso.Position - playerPosition
	cameraPosition = cameraPosition + movement
	playerPosition = torso.Position

	UpdateCamera()
end

-- Determine whether the user is on a mobile device
if UserInputService.TouchEnabled then
	-- The user is on a mobile device, use Touch events
	UserInputService.TouchPan:Connect(TouchMove)
	UserInputService.TouchRotate:Connect(TouchRotate)
	UserInputService.TouchPinch:Connect(TouchZoom)
else
	-- The user is not on a mobile device use Input events
	UserInputService.InputBegan:Connect(Input)
	UserInputService.InputChanged:Connect(Input)
	UserInputService.InputEnded:Connect(Input)

	-- Camera controlled by player movement
	task.wait(2)
	RunService:BindToRenderStep("PlayerChanged", Enum.RenderPriority.Camera.Value - 1, PlayerChanged)
end

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

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

local mouse = player:GetMouse()

local zoomed = false
local camera = game.Workspace.CurrentCamera
local target = nil
local originalProperties = {
	FieldOfView = nil,
	_CFrame = nil,
	MouseBehavior = nil,
	MouseDeltaSensitivity = nil,
}

local AngleX, TargetAngleX = 0, 0
local AngleY, TargetAngleY = 0, 0

-- Reset camera back to CFrame and FieldOfView before zoom
local function ResetCamera()
	target = nil
	camera.CameraType = Enum.CameraType.Custom
	camera.CFrame = originalProperties._CFrame
	camera.FieldOfView = originalProperties.FieldOfView

	UserInputService.MouseBehavior = originalProperties.MouseBehavior
	UserInputService.MouseDeltaSensitivity = originalProperties.MouseDeltaSensitivity
end

local function ZoomCamera()
	-- Allow camera to be changed by script
	camera.CameraType = Enum.CameraType.Scriptable

	-- Store camera properties before zoom
	originalProperties._CFrame = camera.CFrame
	originalProperties.FieldOfView = camera.FieldOfView
	originalProperties.MouseBehavior = UserInputService.MouseBehavior
	originalProperties.MouseDeltaSensitivity = UserInputService.MouseDeltaSensitivity

	-- Zoom camera
	target = mouse.Hit.Position
	local eyesight = head.Position
	camera.CFrame = CFrame.new(eyesight, target)
	camera.Focus = CFrame.new(target)
	camera.FieldOfView = 10

	-- Lock and slow down mouse
	UserInputService.MouseBehavior = Enum.MouseBehavior.LockCenter
	UserInputService.MouseDeltaSensitivity = 1

	-- Reset zoom angles
	AngleX, TargetAngleX = 0, 0
	AngleY, TargetAngleY = 0, 0
end

-- Toggle camera zoom/unzoom
local function MouseClick()
	if zoomed then
		-- Unzoom camera
		ResetCamera()
	else
		-- Zoom in camera
		ZoomCamera()
	end

	zoomed = not zoomed
end

local function MouseMoved(input)
	if zoomed then
		local sensitivity = 0.6 -- anything higher would make looking up and down harder; recommend anything between 0~1
		local smoothness = 0.05 -- recommend anything between 0~1

		local delta = Vector2.new(input.Delta.x / sensitivity, input.Delta.y / sensitivity) * smoothness

		local X = TargetAngleX - delta.y
		local Y = TargetAngleY - delta.x
		TargetAngleX = (X >= 80 and 80) or (X <= -80 and -80) or X
		TargetAngleY = (Y >= 80 and 80) or (Y <= -80 and -80) or Y

		AngleX = AngleX + (TargetAngleX - AngleX) * 0.35
		AngleY = AngleY + (TargetAngleY - AngleY) * 0.15

		camera.CFrame = CFrame.new(head.Position, target)
			* CFrame.Angles(0, math.rad(AngleY), 0)
			* CFrame.Angles(math.rad(AngleX), 0, 0)
	end
end

local function InputBegan(input, _gameProcessedEvent)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then
		MouseClick()
	end
end

local function InputChanged(input, _gameProcessedEvent)
	if input.UserInputType == Enum.UserInputType.MouseMovement then
		MouseMoved(input)
	end
end

if UserInputService.MouseEnabled then
	UserInputService.InputBegan:Connect(InputBegan)
	UserInputService.InputChanged:Connect(InputChanged)
end

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

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

local mouse = player:GetMouse()

local zoomed = false
local camera = game.Workspace.CurrentCamera
local target = nil
local originalProperties = {
	FieldOfView = nil,
	_CFrame = nil,
	MouseBehavior = nil,
	MouseDeltaSensitivity = nil,
}

local AngleX, TargetAngleX = 0, 0
local AngleY, TargetAngleY = 0, 0

-- Reset camera back to CFrame and FieldOfView before zoom
local function ResetCamera()
	target = nil
	camera.CameraType = Enum.CameraType.Custom
	camera.CFrame = originalProperties._CFrame
	camera.FieldOfView = originalProperties.FieldOfView

	UserInputService.MouseBehavior = originalProperties.MouseBehavior
	UserInputService.MouseDeltaSensitivity = originalProperties.MouseDeltaSensitivity
end

local function ZoomCamera()
	-- Allow camera to be changed by script
	camera.CameraType = Enum.CameraType.Scriptable

	-- Store camera properties before zoom
	originalProperties._CFrame = camera.CFrame
	originalProperties.FieldOfView = camera.FieldOfView
	originalProperties.MouseBehavior = UserInputService.MouseBehavior
	originalProperties.MouseDeltaSensitivity = UserInputService.MouseDeltaSensitivity

	-- Zoom camera
	target = mouse.Hit.Position
	local eyesight = head.Position
	camera.CFrame = CFrame.new(eyesight, target)
	camera.Focus = CFrame.new(target)
	camera.FieldOfView = 10

	-- Lock and slow down mouse
	UserInputService.MouseBehavior = Enum.MouseBehavior.LockCenter
	UserInputService.MouseDeltaSensitivity = 1

	-- Reset zoom angles
	AngleX, TargetAngleX = 0, 0
	AngleY, TargetAngleY = 0, 0
end

-- Toggle camera zoom/unzoom
local function MouseClick()
	if zoomed then
		-- Unzoom camera
		ResetCamera()
	else
		-- Zoom in camera
		ZoomCamera()
	end

	zoomed = not zoomed
end

local function MouseMoved(input)
	if zoomed then
		local sensitivity = 0.6 -- anything higher would make looking up and down harder; recommend anything between 0~1
		local smoothness = 0.05 -- recommend anything between 0~1

		local delta = Vector2.new(input.Delta.x / sensitivity, input.Delta.y / sensitivity) * smoothness

		local X = TargetAngleX - delta.y
		local Y = TargetAngleY - delta.x
		TargetAngleX = (X >= 80 and 80) or (X <= -80 and -80) or X
		TargetAngleY = (Y >= 80 and 80) or (Y <= -80 and -80) or Y

		AngleX = AngleX + (TargetAngleX - AngleX) * 0.35
		AngleY = AngleY + (TargetAngleY - AngleY) * 0.15

		camera.CFrame = CFrame.new(head.Position, target)
			* CFrame.Angles(0, math.rad(AngleY), 0)
			* CFrame.Angles(math.rad(AngleX), 0, 0)
	end
end

local function InputBegan(input, _gameProcessedEvent)
	if input.UserInputType == Enum.UserInputType.MouseButton1 then
		MouseClick()
	end
end

local function InputChanged(input, _gameProcessedEvent)
	if input.UserInputType == Enum.UserInputType.MouseMovement then
		MouseMoved(input)
	end
end

if UserInputService.MouseEnabled then
	UserInputService.InputBegan:Connect(InputBegan)
	UserInputService.InputChanged:Connect(InputChanged)
end

local UserInputService = game:GetService("UserInputService")

-- In order to restore the cursor to what it was set to previously, it will need to be saved to a variable
local savedCursor = nil
local function setTemporaryCursor(cursor: string)
  -- Only update the saved cursor if it's not currently saved
  if not savedCursor then  
    savedCursor = UserInputService.MouseIcon
  end
  UserInputService.MouseIcon = cursor
end

local function clearTemporaryCursor()
  -- Only restore the mouse cursor if there's a saved cursor to restore
  if savedCursor then
    UserInputService.MouseIcon = savedCursor
    -- Don't restore the same cursor twice (might overwrite another script)
    savedCursor = nil
  end
end

setTemporaryCursor("http://www.roblox.com/asset?id=163023520")
print(UserInputService.MouseIcon)

clearTemporaryCursor()
print(UserInputService.MouseIcon)

local UserInputService = game:GetService("UserInputService")

local mouseInput = {
	Enum.UserInputType.MouseButton1,
	Enum.UserInputType.MouseButton2,
	Enum.UserInputType.MouseButton3,
	Enum.UserInputType.MouseMovement,
	Enum.UserInputType.MouseWheel,
}

local keyboard = Enum.UserInputType.Keyboard

local function toggleMouse(lastInputType)
	if lastInputType == keyboard then
		UserInputService.MouseIconEnabled = false
		return
	end

	for _, mouse in pairs(mouseInput) do
		if lastInputType == mouse then
			UserInputService.MouseIconEnabled = true
			return
		end
	end
end

UserInputService.LastInputTypeChanged:Connect(toggleMouse)

local UserInputService = game:GetService("UserInputService")

print(UserInputService.OnScreenKeyboardPosition)

local UserInputService = game:GetService("UserInputService")
local RunService = game:GetService("RunService")
local Players = game:GetService("Players")

local camera = workspace.CurrentCamera

local player = Players.LocalPlayer
local character = player.CharacterAdded:Wait()
local torso = character:WaitForChild("HumanoidRootPart")
local playerPosition = torso.Position

local default_CameraPosition = torso.Position
local default_CameraRotation = Vector2.new(0, math.rad(-60))
local default_CameraZoom = 15

local cameraPosition = default_CameraPosition
local cameraRotation = default_CameraRotation
local cameraZoom = default_CameraZoom

local cameraZoomBounds = nil -- {10,200}
local cameraRotateSpeed = 10
local cameraMouseRotateSpeed = 0.25
local cameraTouchRotateSpeed = 10

local function SetCameraMode()
	camera.CameraType = "Scriptable"
	camera.FieldOfView = 80
	camera.CameraSubject = nil
end

local function UpdateCamera()
	SetCameraMode()
	local cameraRotationCFrame = CFrame.Angles(0, cameraRotation.X, 0) * CFrame.Angles(cameraRotation.Y, 0, 0)
	camera.CFrame = cameraRotationCFrame + cameraPosition + cameraRotationCFrame * Vector3.new(0, 0, cameraZoom)
	camera.Focus = camera.CFrame - Vector3.new(0, camera.CFrame.p.Y, 0)
end

local lastTouchTranslation = nil
local function TouchMove(_touchPositions, totalTranslation, _velocity, state)
	if state == Enum.UserInputState.Change or state == Enum.UserInputState.End then
		local difference = totalTranslation - lastTouchTranslation
		cameraPosition = cameraPosition + Vector3.new(difference.X, 0, difference.Y)
		UpdateCamera()
	end
	lastTouchTranslation = totalTranslation
end

local lastTouchRotation = nil
local function TouchRotate(_touchPositions, rotation, _velocity, state)
	if state == Enum.UserInputState.Change or state == Enum.UserInputState.End then
		local difference = rotation - lastTouchRotation
		cameraRotation = cameraRotation
			+ Vector2.new(-difference, 0) * math.rad(cameraTouchRotateSpeed * cameraRotateSpeed)
		UpdateCamera()
	end
	lastTouchRotation = rotation
end

local lastTouchScale = nil
local function TouchZoom(_touchPositions, scale, _velocity, state)
	if state == Enum.UserInputState.Change or state == Enum.UserInputState.End then
		local difference = scale - lastTouchScale
		cameraZoom = cameraZoom * (1 + difference)
		if cameraZoomBounds ~= nil then
			cameraZoom = math.min(math.max(cameraZoom, cameraZoomBounds[1]), cameraZoomBounds[2])
		else
			cameraZoom = math.max(cameraZoom, 0)
		end
		UpdateCamera()
	end
	lastTouchScale = scale
end

local function Input(inputObject)
	if inputObject.UserInputType == Enum.UserInputType.Keyboard then
		if inputObject.UserInputState == Enum.UserInputState.Begin then
			-- (I) Zoom In
			if inputObject.KeyCode == Enum.KeyCode.I then
				cameraZoom = cameraZoom - 15
			elseif inputObject.KeyCode == Enum.KeyCode.O then
				cameraZoom = cameraZoom + 15
			end

			-- (O) Zoom Out
			if cameraZoomBounds ~= nil then
				cameraZoom = math.min(math.max(cameraZoom, cameraZoomBounds[1]), cameraZoomBounds[2])
			else
				cameraZoom = math.max(cameraZoom, 0)
			end

			UpdateCamera()
		end
	end

	local pressed = UserInputService:IsMouseButtonPressed(Enum.UserInputType.MouseButton1)
	if pressed then
		UserInputService.MouseBehavior = Enum.MouseBehavior.LockCurrentPosition
		local rotation = UserInputService:GetMouseDelta()
		cameraRotation = cameraRotation + rotation * math.rad(cameraMouseRotateSpeed)
	else
		UserInputService.MouseBehavior = Enum.MouseBehavior.Default
	end
end

local function PlayerChanged()
	local movement = torso.Position - playerPosition
	cameraPosition = cameraPosition + movement
	playerPosition = torso.Position

	UpdateCamera()
end

-- Determine whether the user is on a mobile device
if UserInputService.TouchEnabled then
	-- The user is on a mobile device, use Touch events
	UserInputService.TouchPan:Connect(TouchMove)
	UserInputService.TouchRotate:Connect(TouchRotate)
	UserInputService.TouchPinch:Connect(TouchZoom)
else
	-- The user is not on a mobile device use Input events
	UserInputService.InputBegan:Connect(Input)
	UserInputService.InputChanged:Connect(Input)
	UserInputService.InputEnded:Connect(Input)

	-- Camera controlled by player movement
	task.wait(2)
	RunService:BindToRenderStep("PlayerChanged", Enum.RenderPriority.Camera.Value - 1, PlayerChanged)
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
	-- Set the initial CFrame
	head.CFrame = VRService:GetUserCFrame(Enum.UserCFrame.Head)

	-- Track VR headset movement and mirror for character's head
	VRService.UserCFrameChanged:Connect(TrackHead)
end