Color part does not work and breaks the whole thing! Why is it doing that?

Can anyone help?

local model = script.Parent

local ticker = {
    guis = {},
    config = model.Configurations,
    adornees = {},

    length = 0,
    dist = 0,
    textlengthpx = 0
}

--
-- util functions
function resizesurfaces()
    local factor = ticker.config.PixelDensityFactor.Value

    for gui, info in next, ticker.guis do
        local adornee = gui.Adornee or gui.Parent
        local surfacelength = math.max(math.max(adornee.Size.x, adornee.Size.z), (ticker.textlengthpx+ticker.config.MinPixelsBetweenPhrases.Value)/factor)
        gui.CanvasSize = Vector2.new(surfacelength, adornee.Size.y)*factor

        ticker.adornees[adornee] = true
    end
end
function settext(text)
    for gui, info in next, ticker.guis do
        for index, label in next, info.labels do
            label.Text = text

            ticker.textlengthpx = label.TextBounds.X
        end
    end

    resizesurfaces()
end
--- broken part
function settextcolor(color)
    for gui, info in next, ticker.guis do
        for index, label in next, info.labels do
            label.TextColor3 = Color3.fromRGB(script.Parent.Configurations.TextColor.Value.r,script.Parent.Configurations.TextColor.Value.g,script.Parent.Configurations.TextColor.Value.b)
        end
    end
end

--- end of broken part
function setbackgroundcolor(color)
    for gui, info in next, ticker.guis do
        gui.Back.BackgroundColor3 = color.Color
    end
end
function setbackgroundtransparency(transparency)
    for gui, info in next, ticker.guis do
        gui.Back.BackgroundTransparency = transparency
    end
end
function settextstroketransparency(transparency)
    for gui, info in next, ticker.guis do
        for index, label in next, info.labels do
            label.TextStrokeTransparency = transparency
        end
    end
end
function settextstrokecolor(color)
    for gui, info in next, ticker.guis do
        for index, label in next, info.labels do
            label.TextStrokeColor3 = color.Color
        end
    end
end

--
-- setup code
for index, obj in next, model:GetChildren() do
    if obj:IsA'SurfaceGui' then
        obj.Parent=nil wait() obj.Parent=model -- weird...

        local index = tonumber(obj.Name)

        if index then
            ticker.guis[obj] = {
                index = index,
                start = ticker.length,
                length = 0,
                labels = {}
            }

            local surfacesize = (Vector3.new(1,1,1) - Vector3.FromNormalId(obj.Face)) * (obj.Adornee or obj.Parent).Size
            ticker.guis[obj].length = math.max(surfacesize.x, surfacesize.z)

            ticker.length = ticker.length + ticker.guis[obj].length
        end
    end
end
for gui, info in next, ticker.guis do
    for index=1, 3 do
        local textlabel = Instance.new('TextLabel', gui.Back)
        textlabel.BackgroundTransparency = 1
        textlabel.Size = UDim2.new(1, 0, 1, 0)
        textlabel.Text = ticker.config.Text.Value
        textlabel.TextColor3 = ticker.config.TextColor.Value.Color
        textlabel.Font = Enum.Font.SourceSansBold
        textlabel.FontSize = Enum.FontSize.Size48
        textlabel.TextXAlignment = Enum.TextXAlignment.Left

        ticker.textlengthpx = textlabel.TextBounds.X

        info.labels[index] = textlabel
    end
end

resizesurfaces()

--
-- main functions
function update(delta)
    ticker.dist = (ticker.dist + (delta*-ticker.config.Speed.Value))%ticker.length

    for gui, info in next, ticker.guis do
        local alpha = ticker.dist/ticker.length

        info.labels[1].Position = UDim2.new(
            alpha-1,
            0,
            0,
            0
        )
        info.labels[2].Position = UDim2.new(
            alpha,
            0,
            0,
            0
        )
        info.labels[3].Position = UDim2.new(
            alpha+1,
            0,
            0,
            0
        )
    end
end

--
-- main loop
local cache = {
    adorneesizes = {}
}

ticker.config.Text.Changed:connect(settext)
ticker.config.TextColor.Changed:connect(settextcolor)
ticker.config.BackgroundColor.Changed:connect(setbackgroundcolor); setbackgroundcolor(ticker.config.BackgroundColor.Value)
ticker.config.BackgroundTransparency.Changed:connect(setbackgroundtransparency); setbackgroundtransparency(ticker.config.BackgroundTransparency.Value)
ticker.config.TextStrokeTransparency.Changed:connect(settextstroketransparency); settextstroketransparency(ticker.config.TextStrokeTransparency.Value)
ticker.config.TextStrokeColor.Changed:connect(settextstrokecolor); settextstrokecolor(ticker.config.TextStrokeColor.Value)
ticker.config.PixelDensityFactor.Changed:connect(resizesurfaces)
ticker.config.MinPixelsBetweenPhrases.Changed:connect(resizesurfaces)

while true do
    update(wait())

    local cacheSizeIsCorrect = true
    for adornee in next, ticker.adornees do
        if cache.adorneesizes ~= adornee.Size then
            cache.adorneesizes = adornee.Size
            cacheSizeIsCorrect = false
        end
    end
    if not cacheSizeIsCorrect then
        resizesurfaces()
    end
end