Why isn't this part moving around with the mouse?

I want it to spawn a part with Q keep moving the part around, and then if the user clicks the part will then anchor and no longer move, everything is being printed, nothing is moving, but all the part does is briefly spawn at 0, 0, 0 then despawn, help?

mouse = game.Players.LocalPlayer:GetMouse()
tool = script.Parent
spawned = false
final = false

function onKeyDown(key)
    if key == "q" then
        print ("Q was pressed")
        if spawned == false then
            local target = mouse.Target
            q = game.Lighting.Beacon:Clone()
            q.Parent = game.Workspace
            q.Owner.Value = script.Parent.Parent.Name   
            q.Size = Vector3.new(3,3,3)
            q.Anchored = false
            q.CanCollide = false
            spawned = true
            print ("Checkpoint 1; passed")
            while spawned do
                wait()
                q.CFrame = CFrame.new(Vector3.new(tool.Parent.Humanoid.TargetPoint.X,1,tool.Parent.Humanoid.TargetPoint.Z))
            end
        end
    end
end
mouse.KeyDown:connect(onKeyDown)

function OnClick()
    final = true
    q.Anchored = true
end
mouse.Button1Up:connect(OnClick)

function onUnequipped()
    q:remove()
    spawned, final = false, false
end
script.Parent.Unequipped:connect(onUnequipped)