Moving parts are glitchy with my custom camera?

I was making a custom camera, and I got everything to work fine, though when I moved, my character started to rapidly change positions...Any way I can fix this?

Code:

local Player=game.Players.LocalPlayer
repeat wait() until workspace:FindFirstChild(Player.Name.."_Body")
local Body=workspace:FindFirstChild(Player.Name.."_Body")
local Character=Player.Character
local Camera=workspace.CurrentCamera
local Mouse=Player:GetMouse()
Character:WaitForChild("Humanoid").AutoRotate=false
Character:WaitForChild("HumanoidRootPart")
local Settings={
    InvertMouse=false,
    Sensitivity=.1, --0 to 2
}
local Prev={X=Mouse.X,Y=Mouse.Y}

function Update()
    local NewX=Mouse.X
    local NewY=Mouse.Y
    local NewCF=Camera.CoordinateFrame
    if NewX>Prev.X then --Turn Right
        NewCF=NewCF*CFrame.Angles(0,(math.rad(-math.min(5,math.abs(NewX-Prev.X))))*Settings.Sensitivity,0)
    elseif NewX<Prev.X then --Turn Left
        NewCF=NewCF*CFrame.Angles(0,math.rad(math.min(5,math.abs(NewX-Prev.X)))*Settings.Sensitivity,0)
    end
    if NewY<Prev.Y then --Look Up
        NewCF=NewCF*CFrame.Angles(math.rad(math.min(5,math.abs(NewY-Prev.Y)))*Settings.Sensitivity,0,0)
    elseif NewY>Prev.Y then --Look Down
        NewCF=NewCF*CFrame.Angles(math.rad(-math.min(5,math.abs(NewY-Prev.Y)))*Settings.Sensitivity,0,0)
    end
    local a,b,c,d,e,f,g,h,i,j,k,l=NewCF:components()
    a,b,c=0,0,0
    Camera.CoordinateFrame=Body.Head.CFrame*CFrame.new(a,b,c,d,e,f,g,h,i,j,k,l)
    Prev.X=NewX
    Prev.Y=NewY
end
coroutine.wrap(function()
    while true do
        game:GetService("RunService").RenderStepped:wait()
        Camera.CameraType="Scriptable"
        Update()
    end
end)()