Why is the tool not being distributed?

Hi! - The game I am currently working on has the tool inside of a script, and that script chooses the gamemodes, and gives the tool out to the players. This script is essential, considering it gives out all of the player's GUI(s), and such. However, this script has suddenly stopped distributed the tool for no reason whatsoever. I've tried all the fixes I could - and ended up asking here. Tell me what you guys think the error is - please!

I warn you - it's very long!

gtool = script.GameTool:clone()
script:remove()

roundTime = {
    ["Free for All"] = 600
    }
gd = workspace.GlobalDistribution
function consoleMessage(text,color)
    local Msg = Instance.new("StringValue",game.Lighting.ServerConsole)
    Msg.Value = "Global Distribution: "..text
    if color then
        Msg.Name = color
    end
    game.Debris:AddItem(errorMsg,3)
end

function alert(text,color3)
    local Msg = Instance.new("StringValue",game.Lighting.ServerAlerts)
    Msg.Value = text
    if color then
        Instance.new("Color3Value",Msg).Value = color3
    end
end


game.Lighting.ServerDamage.ChildAdded:connect(function(child)
    if child:IsA("NumberValue") then
        if pcall(function() 
            workspace:findFirstChild(child.Name):findFirstChild("Humanoid"):TakeDamage(child.Value) 
            end) then
            if workspace:findFirstChild(child.Name).Humanoid.Health <= 0 and workspace:findFirstChild(child.Name).Humanoid.MaxHealth > 5 then
                workspace[child.Name].Humanoid.MaxHealth = 1
                consoleMessage("Attempting to add killmessage","Bright yellow")
                if #game.Lighting.ServerKillMessages:GetChildren() > 5 then
                    game.Lighting.ServerKillMessages:GetChildren()[1]:Destroy()
                end
                Spawn(function()
                    wait(0.1)
                    if child:findFirstChild("KillMessage") then
                        consoleMessage("damageData contains killmessage","Bright yellow")
                        local ksmg = child.KillMessage:clone()
                        ksmg.Parent = game.Lighting.ServerKillMessages
                    else
                        consoleMessage("damageData did not contain killmessage","Bright yellow")
                    end
                end)
            end
        else
            consoleMessage("ERROR: Failed to distribute damage to "..child.Name,"Bright red")
        end
        child:Destroy()
    end
end)

game.Players.PlayerAdded:connect(function(player)
    consoleMessage(player.Name.." has connected.","Toothpaste")
    player.CharacterAdded:connect(function()
        gtool:clone().Parent = player.Backpack
        player.Backpack["GameTool"].Archivable = false
        player.Backpack["GameTool"]["woop"].Archivable = false
    end)
    local warning = game.Lighting.Resources.GUI.Warning:clone()
    Spawn(function()
        repeat wait(0) until player:findFirstChild("PlayerGui") and player.PlayerGui:findFirstChild("Menu")
        warning.Parent = player.PlayerGui
        local leedstat = Instance.new("BoolValue",player)
        leedstat.Name = "leaderstats"
        Instance.new("StringValue",leedstat).Name = "Users"
        wait(4)
        warning.Agree:TweenPosition(UDim2.new(0.35,0,.7,0),"Out","Quad",1,true)
        warning.Agree.MouseButton1Click:connect(function()
            warning.Agree:TweenPosition(UDim2.new(0.5,-100,2,0),"Out","Quad",1,true)
            warning.Frame:TweenPosition(UDim2.new(0,0,2,0),"Out","Quad",0.7,true)
            game.Debris:AddItem(warning,2)
            player.PlayerGui.Menu.Frame.Active = true
        end)
    end)
end)

game.Players.ChildRemoved:connect(function(player)
    if player:IsA("Player") then
        consoleMessage(player.Name.." has disconnected.","Toothpaste")
        local bin = workspace.Ignore:findFirstChild(player.Name.."HandleBin")
        if bin then bin:Destroy() end
        local objectsInIgnore = workspace.Ignore:GetChildren()
        consoleMessage("workspace.Ignore contains:","Brick yellow")
        for x = 1, #objectsInIgnore do
            if objectsInIgnore[x]:IsA("Part") and objectsInIgnore[x].CanCollide then
                objectsInIgnore[x]:Destroy()
            else
                consoleMessage(objectsInIgnore[x].Name,"Brick yellow")
            end
        end
    end
end)

game.Lighting.ServerPing.ChildAdded:connect(function(packet)
    if packet:IsA("NumberValue") then
        if pcall(function() packet.Parent = game.Players:findFirstChild(packet.Name) end) then
        else
            consoleMessage("GlobalDistribution ERROR: Failed to send pafcket to "..packet.Name,"Bright red")
        end
    end

end)

function RidStuff()
    if not workspace:findFirstChild("Drops") then
        Instance.new("Model",workspace).Name = "Drops"
    end
    if allTheThings then
        for x = 1, #allTheThings do
            allTheThings[x]:disconnect()
        end
    end
    allTheThings = {
    workspace.ChildAdded:connect(function(child)
        if child:IsA("Hat") then
            game.Debris:AddItem(child,10)
        end
    end),
    workspace.Drops.ChildAdded:connect(function(child)
        game.Debris:AddItem(child,15)
    end),
    workspace.Ignore.Effects.ChildAdded:connect(function(child)
        game.Debris:AddItem(child,10)
    end),
    game.Lighting.ServerDamage.ChildAdded:connect(function(child)
        game.Debris:AddItem(child,10)
    end),
    game.Lighting.ServerSound.ChildAdded:connect(function(child)
        game.Debris:AddItem(child,10)
    end),
    game.Lighting.ServerConsole.ChildAdded:connect(function(child)
        game.Debris:AddItem(child,10)
    end),
    game.Lighting.ServerAlerts.ChildAdded:connect(function(child)
        game.Debris:AddItem(child,10)
    end)
    }
end
RidStuff()
-----------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------
---------- GAME ROUNDS ---- GAME ROUNDS ---- GAME ROUNDS ---- GAME ROUNDS ---- GAME ROUNDS ----------
-----------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------

lastmap = nil
function spawnMap(gMode)
    local mapName
    mapLibrary = game.Lighting.Resources.Maps
    if workspace:findFirstChild("Map") then
        workspace:findFirstChild("Map"):Destroy()
    end
    if workspace.Ignore:findFirstChild("Flags") then
        workspace.Ignore.Flags:Destroy()
        Instance.new("Model",workspace.Ignore).Name = "Flags"
    end
    if gMode == "Free for All" then
        repeat
        map = mapLibrary.FFA:GetChildren()[math.random(1,#mapLibrary.FFA:GetChildren())]
        until map ~= lastmap
        lastmap = map
        map = map:clone()
        mapName = map.Name
        gd.gameMap.Value = mapName
        map.Name = "Map"
    end
    alert(gMode.." at "..mapName,Color3.new(0.3,0.8,0))
    map.Parent = workspace
    if map:findFirstChild("BlueFlag") then
        map.BlueFlag.Parent = workspace.Ignore.Flags
    end
    if map:findFirstChild("RedFlag") then
        map.RedFlag.Parent = workspace.Ignore.Flags
    end
end
gameMode = gd.gameMode
gameTime = gd.gameTime
gModes = {"Free for All"}
while true do
    pcall(RidStuff)
    gameMode.Value = gModes[math.random(1,#gModes)]
    gameTime.Value = roundTime[gameMode.Value]
    spawnMap(gameMode.Value)
    repeat
        wait(1)
        gameTime.Value = gameTime.Value - 1
        if gameTime.Value == 10 then
            alert("TEN SECONDS REMAIN!",Color3.new(0,0.8,1))
        end
    until gameTime.Value <= 0
    gameMode.Value = ""
    local players = game.Players:GetChildren()
    alert("ROUND END!",Color3.new(0,0.8,1))
    for x = 1, #players do
        pcall(function()
            players[x].LeftWeapon.Value = "Pistol"
            players[x].RightWeapon.Value = "Knife"
            if players[x].Character:findFirstChild("Humanoid") then
                players[x].Character.Humanoid.Health = 0
            end
        end)
    end
    wait(15)
    for x = 1, #players do
        if players[x]:findFirstChild("LeaderInfo") then
            pcall(function()
                players[x].LeaderInfo.Kills.Value = 0
                players[x].LeaderInfo.Scores.Value = 0
                players[x].LeaderInfo.Deaths.Value = 0
                players[x].LeaderInfo.Team.Value = 0
            end)
        end
    end
end

• Dragon

EDIT: If needed, I can provide the GameTool as well - but the problem appears to be originating here.

It should be said that the first player to connect is getting the tool, while all other players after him or her are not.