connectFunctionsToEvents

function connectFunctionsToEvents(tbl, parentobject)
    for name,tbl2 in next,tbl do
        local object = parentobject:FindFirstChild(name)
        local events = tbl2.Events
        if object and events then
            for eventName,functionToConnect in next,events do
                object[eventName]:connect(functionToConnect)
            end
            connectFunctionsToEvents(tbl2, object)
        end
    end
end