why isnt this working???

hi, i was working on a teleport tool, but it dosent work fully :l ... what did i do wrong?

local deb = false

script.Parent.Deselected:connect(function()
    if deb == true then
local me = game.Players.LocalPlayer
local char = game.Players.LocalPlayer.Character
        if char then
            char:BreakJoints()
        end
        end
end)


script.Parent.Selected:connect(function(m)
    m.Button1Down:connect(function(mouse)
        if deb == false then deb = true
local me = game.Players.LocalPlayer
local char = game.Players.LocalPlayer.Character
        if char:findFirstChild("Torso") and m.Target ~= nil then
            local parts = {"Right Leg", "Left Leg", "Torso", "Right Arm", "Left Arm", "Head"}
            for _,v in ipairs(parts) do
            local smoke = Instance.new("Smoke")
            smoke.Color = BrickColor.new("Bright blue").Color
            smoke.Enabled = true
            smoke.Opacity = .5
            smoke.RiseVelocity = 0
            smoke.Size = .05
            local smoke2 = Instance.new("Smoke")
            smoke2.Color = BrickColor.new("Bright blue").Color
            smoke2.Enabled = true
            smoke2.Opacity = .5
            smoke2.RiseVelocity = 0
            smoke2.Size = .05
                smoke2.Parent = char:FindFirstChild(v)
                local limb = char:FindFirstChild(v)
                if limb then
                    wait(0.2)
                        limb.Transparency = .5
                end
            end
            local h = char:findFirstChild("Torso")
            h.CFrame = CFrame.new(m.Hit.p) + Vector3.new(0,4,0)
            local parts = {"Right Leg", "Left Leg", "Torso", "Right Arm", "Left Arm", "Head"}
            for qq,oo in ipairs(parts) do
                for vvv = 1,2 do
                char:FindFirstChild(oo):FindFirstChild("Smoke"):Destroy()
                end
                local limb = char:FindFirstChild(oo)
                if limb then
                    wait(0.01)
                        limb.Transparency = 0
                end
            end
        end
        deb = false
        end
    end)
end)