Plugin: Problem with dragging parts?

I'm creating a plugin that helps you to create and visualize welds. The way I'm making my weld visualizer system is by creating parts that start on the Part0 and go to the Part1 of the weld. It all works fine, but the problem is that, when I drag the parts while the visualizer is on, Studio will lag horribly and the parts that you've dragged will get placed really far up on the sky. That's probably caused because of the parts of the visualizer. Is there some way I could fix that?

Plugin link: https://www.roblox.com/library/848009995/Welder-Plugin

My code is pretty big and might not be use for you, but just in case you need, here's the module script that contains the visualizer:

------------------
--[DECLARATIONS]--
------------------

----/[MAIN]\----
local module = {}

----/[VARIABLES]\----
local weldParts = {}

----/[EVENT VARIABLES]\----
local workspaceDescendantAdded
local workspaceDescendantRemoved 
local selectionChanged
local weldEvents = {}

----/[CONFIGURATION]\----
local COLOR_WELDFX = Color3.new(1, 0, 0)
local COLOR_H_WELDFX = Color3.new(0, 0, 1)
local TRANSP_WELDFX = 0

---------------
--[FUNCTIONS]--
---------------

--Activates the weld viewer
function module:WeldViewer(activate)
    if activate then            --Activates weld viewer
        ActivateWeldViewer()
    else                        --Deactivates weld viewer
        DeactivateWeldViewer()
    end
end

---------------------
--[LOCAL FUNCTIONS]--
---------------------

--Highlights the weld if it's selected
function HighlightWeldEffect(weld, highlight)
    --Get the weld part
    local weldFX = weldParts[weld]

    --Check if the effect exists
    if not weldFX then return end

    --Get the all of the surface guis in the weld part
    for _, connectorEffect in pairs(weldFX:GetChildren()) do
        local connectorEffectFrame = connectorEffect:FindFirstChild("Frame")

        --Check if the frame exists
        if connectorEffectFrame then
            --Get the color that will be applied to the frame
            local color = (highlight and COLOR_H_WELDFX) or COLOR_WELDFX

            --Apply the color to the frame
            connectorEffectFrame.BackgroundColor3 = color
        end
    end
end

--Returns a table with all of the welded part
function GetAllWelds(objToCheck)
    --Create an array with all of the parts found
    local welds = {}

    for _, obj in pairs(objToCheck:GetChildren()) do

        --If the object is a weld, add it to the table
        if obj:IsA("Weld") then
            table.insert(welds, obj)
        end

        --Get the weld of the children of the object
        local objChildren = obj:GetChildren()

        if #objChildren > 0 then 
            for _, childWeld in pairs(GetAllWelds(obj)) do
                table.insert(welds, childWeld)
            end
        end
    end

    --Return the weld objetcs
    return welds
end

--Creates the weld connector's effect
function CreateWeldConnectorEffect(face, parent)
    --Create surface gui
    local surfaceGui = Instance.new("SurfaceGui", parent)
        surfaceGui.Face = face
        surfaceGui.AlwaysOnTop = true

    --Create Frame
    local frame = Instance.new("Frame", surfaceGui)
        frame.BackgroundColor3 = COLOR_WELDFX
        frame.BackgroundTransparency = TRANSP_WELDFX
        frame.BorderSizePixel = 0
        frame.Size = UDim2.new(1, 0, 1, 0)
end

--Receives the weld and the connector and positions the connector in place
function PositionWeldConnector(weld, connector)
    --Check if the connector and the weld exists
    if not weld or not connector then return end    

    --Get the weld's parts
    local part0 = weld.Part0
    local part1 = weld.Part1

    --Check if both parts exists
    if not part0 or not part1 then return end

    --Update the position and size of the connector
    local distance = (weld.Part0.Position - weld.Part1.Position).magnitude
    connector.Size = Vector3.new(.25, .25, distance)
    connector.CFrame = CFrame.new(weld.Part0.Position, weld.Part1.Position) * CFrame.new(0, 0, -distance/2)
end

--Creates a part that will connect the weld's part1 to the weld's part2
function CreateWeldLinePart(weld, folder)
    --Create part
    local part = Instance.new("Part", folder)
        part.Name = "Effect"
        part.Anchored = true
        part.CanCollide = false
        part.Locked = true
        part.Archivable = false
        part.Transparency = 1

        --Positions the part
        PositionWeldConnector(weld, part)

    --Define the faces
    local faces = {"Back", "Bottom", "Front", "Left", "Right", "Top"}

    --Create a visual effect for the part
    for _, face in pairs(faces) do
        CreateWeldConnectorEffect(face, part)
    end

    --Roblox lock the part
    part.RobloxLocked = true

    return part
end

--Creates and manages weld part effects
function CreateWeldPartEffect(weld, effectFolder)
    --Create connector
    weldParts[weld] = CreateWeldLinePart(weld, effectFolder)

    --Get the parts of the weld
    local part0 = weld.Part0
    local part1 = weld.Part1        

    --Connect changed events
    weldEvents[part0] = part0.Changed:Connect(function() PositionWeldConnector(weld, weldParts[weld]) end)
    weldEvents[part1] = part1.Changed:Connect(function() PositionWeldConnector(weld, weldParts[weld]) end)
end

--Activates the weld viewer
function ActivateWeldViewer()
    -- Return if there's no camera or if the effects has already been created
    if not workspace:FindFirstChild("Camera") then warn("No camera found") return end
    if workspace.Camera:FindFirstChild("Weld Plugin") then return end   

    --Create a folder in workspace
    local partEffects = Instance.new("Folder", workspace.Camera)
        partEffects.Name = "Weld Plugin"
        partEffects.Archivable = false

    --Get all of the welds in the game
    local allWelds = GetAllWelds(workspace)

    --Clean table that will store the weld parts
    weldParts = {}

    --Create the weld connector and update the connector if it changes position
    for _, weld in pairs(allWelds) do
        CreateWeldPartEffect(weld, partEffects)
    end

    --Create a new weld connector when a new weld is created
    workspaceDescendantAdded = workspace.DescendantAdded:Connect(function(obj)
        --Create a new connector event if a weld has been added
        if obj:IsA("Weld") and workspace:FindFirstChild("Camera") then
            CreateWeldPartEffect(obj, partEffects)
        end
    end)

    --Destroy a weld connector when a weld is destroyed
    workspaceDescendantRemoved = workspace.DescendantRemoving:Connect(function(obj)
        if obj:IsA("Weld") and workspace:FindFirstChild("Camera") then
            --Destroy the weld connector part
            weldParts[obj]:Destroy()
            weldParts[obj] = nil
        end
    end)

    --Highlight a weld effect if a weld gets selected
    selectionChanged = game.Selection.SelectionChanged:Connect(function()
        --Remove highlight from all weld effect
        for index, weldFX in pairs(weldParts) do
            HighlightWeldEffect(index, false)
        end     

        --Get selected objects
        local selObjs = game.Selection:Get()

        --Go through all selected objects
        for _, selObj in pairs(selObjs) do  
            --If the object is a weld and there is a weld effect
            if weldParts[selObj] then
                --Highlight the weld effect
                HighlightWeldEffect(selObj, true)
            end
        end
    end)
end

--Deactivates the weld viewer
function DeactivateWeldViewer()
    --Check if the studio's camera exists
    if not workspace.Camera then warn("No camera found") return end

    --Find the part effects and destroy them
    local partEffects = workspace.Camera:FindFirstChild("Weld Plugin")
    if not partEffects then return end
    partEffects:Destroy()

    --Disconnect event
    if workspaceDescendantAdded then workspaceDescendantAdded:Disconnect() end
    if workspaceDescendantRemoved then workspaceDescendantRemoved:Disconnect() end
    if selectionChanged then selectionChanged:Disconnect() end
    for _, event in pairs(weldEvents) do
        event:Disconnect()
    end
end


------------------
--[FINALIZATION]--
------------------
return module