Why is this script only changing the lookvector by a really, really tiny bit??

It only changes it by a tiny bit, like it only adds one ten-thousandth to the axis.

help

local camcenter = workspace.CameraCenter
local ccframe = camcenter.CFrame

local MaxIncrement = 10
local increment =    1

local uis = game:GetService("UserInputService")

uis.InputBegan:connect(function(input)
    print("InputDetected")
    if input.UserInputType == Enum.UserInputType.Keyboard then
        print("KeyboardInputDetected")
        if input.KeyCode == Enum.KeyCode.E or input.KeyCode == Enum.KeyCode.Q then
            print("WUPInputDetected")
            if (ccframe.LookVector + Vector3.new(0, 0, increment)).Z < Vector3.new(0, 0, MaxIncrement).Z then
                print("Changing")
                local newcframe = CFrame.new(Vector3.new(0,0,0), Vector3.new(ccframe.LookVector.X, ccframe.LookVector.Y, ccframe.LookVector.Z + increment)) 
                ccframe = newcframe
                print(ccframe.LookVector.Z)
            end
        end
    end
end)