local Y=game:GetService("\082\117\110\083\101\114\118\105\099\101")local E local k={};(script.Parent:WaitForChild("\082\101\109\111\116\101\069\118\101\110\116")).OnServerEvent:Connect(function(Y,E)k[Y]=E end);(script.Parent:WaitForChild("\083\101\116\085\112")).OnServerEvent:Connect(function(L,n,s)local h=L.Character or L.CharacterAdded:Wait()local F=h:WaitForChild("\072\101\097\100")local T=h:WaitForChild("\072\117\109\097\110\111\105\100")local f=h:WaitForChild("\072\117\109\097\110\111\105\100\082\111\111\116\080\097\114\116")local Z=h:WaitForChild("\084\111\114\115\111")local M=Z:WaitForChild("\078\101\099\107")local D=f:WaitForChild("\082\111\111\116\074\111\105\110\116")local w=Z:WaitForChild("\082\105\103\104\116 \072\105\112")local S=Z:WaitForChild("\076\101\102\116 \072\105\112")local U=S.C0 local Q=w.C0 local X=M.C0 local i=D.C0 Y.Heartbeat:Connect(function(Y)E=k[L]or Vector3.new(0,0,0)local T=n if h:FindFirstChild("\084\111\114\115\111")and h:FindFirstChild("\072\101\097\100")then local Y=Z.CFrame.lookVector local k=F.CFrame.p if M and D then if s:IsDescendantOf(h)or s:IsDescendantOf(L)and f.Anchored~=true then local L=(F.CFrame.p-E).magnitude local n=F.CFrame.Y-E.Y local s=CFrame.Angles(-(math.atan(n/L)*.5),((k-E).Unit:Cross(Y)).Y*1,0)M.C0=(M.C0:lerp(s*X,.25)).Rotation+X.Position local h=-(math.atan(n/L)*.5)local T=((k-E).Unit:Cross(Y)).Y*.5 local f=CFrame.Angles(h,T,0)local Z=f*i D.C0=(D.C0:lerp(Z,.25)).Rotation+i.Position local l=D.C0*i:Inverse()local x=l:Inverse()w.C0=x*Q S.C0=x*U end end end end)end)

local RunService = game:GetService("RunService")
local Point
local playerMousePositionDictionary = {}

script.Parent:WaitForChild("RemoteEvent").OnServerEvent:Connect(function(playerThatFired, mousePosition)
	playerMousePositionDictionary [playerThatFired] = mousePosition
end)

script.Parent:WaitForChild("SetUp").OnServerEvent:Connect(function(Player, CamCFrame, CamSubject)
	local Character = Player.Character or Player.CharacterAdded:Wait()
	--task.wait(2.69)
	--Old R15 code
	local Head = Character:WaitForChild("Head")
	--local Neck = Head:WaitForChild("Neck")

	--local Torso = Character:WaitForChild("UpperTorso")
	--local Waist = Torso:WaitForChild("Waist")

	--New R6 stuff
	local Humanoid = Character:WaitForChild("Humanoid")
	local HumanoidRootPart = Character:WaitForChild("HumanoidRootPart")

	local Torso = Character:WaitForChild("Torso")
	local Neck = Torso:WaitForChild("Neck")

	local Waist = HumanoidRootPart:WaitForChild("RootJoint")

	local RHip = Torso:WaitForChild("Right Hip")
	local LHip = Torso:WaitForChild("Left Hip")

	local LHipOriginC0 = LHip.C0
	local RHipOriginC0 = RHip.C0

	local NeckOriginC0 = Neck.C0
	local WaistOriginC0 = Waist.C0

	RunService.Heartbeat:Connect(function(dt)
		Point = playerMousePositionDictionary[Player] or Vector3.new(0,0,0)

		local CameraCFrame = CamCFrame

		if Character:FindFirstChild("Torso") and Character:FindFirstChild("Head") then
			local TorsoLookVector = Torso.CFrame.lookVector
			local HeadPosition = Head.CFrame.p

			if Neck and Waist then
				if CamSubject:IsDescendantOf(Character) or CamSubject:IsDescendantOf(Player) and HumanoidRootPart.Anchored ~= true then

					local Distance = (Head.CFrame.p - Point).magnitude

					local Difference = Head.CFrame.Y - Point.Y


					local goalNeckCFrame = CFrame.Angles(-(math.atan(Difference / Distance) * 0.5), (((HeadPosition - Point).Unit):Cross(TorsoLookVector)).Y * 1, 0)
					Neck.C0 = Neck.C0:lerp(goalNeckCFrame*NeckOriginC0, 0.5 / 2).Rotation + NeckOriginC0.Position

					local xAxisWaistRotation = -(math.atan(Difference / Distance) * 0.5)	-- Change 0.5 to change amount of rotation
					local yAxisWaistRotation = (((HeadPosition - Point).Unit):Cross(TorsoLookVector)).Y * 0.5
					local rotationWaistCFrame = CFrame.Angles(xAxisWaistRotation, yAxisWaistRotation, 0)
					local goalWaistCFrame = rotationWaistCFrame*WaistOriginC0
					Waist.C0 = Waist.C0:lerp(goalWaistCFrame, 0.5 / 2).Rotation + WaistOriginC0.Position


					local currentLegCounterCFrame = Waist.C0*WaistOriginC0:Inverse()

					local legsCounterCFrame = currentLegCounterCFrame:Inverse()

					RHip.C0 =  legsCounterCFrame*RHipOriginC0
					LHip.C0 = legsCounterCFrame*LHipOriginC0
				end
			end
		end	
	end)
end)
