WHY AM I DOING THIS TO ME

local tChoices = {};
if GetUserPref("Use10sinsteadof1s") == "2" then
    for i=1,256  do
    tChoices[i] = i-1;
    end;
else
    for i=1,26  do
    tChoices[i] = (i-1)*10;
    end;
end;

function Use10sinsteadof1s()
    local t = {
        Name = "Use10sinsteadof1s";
        LayoutType = "ShowAllInRow";
        SelectType = "SelectOne";
        OneChoiceForAllPlayers = true;
        ExportOnChange = true;
        Choices = { 'On','Off' };
        LoadSelections = function(self, list, pn)
            if ReadPrefFromFile("Use10sinsteadof1s") ~= nil then
                if GetUserPref("Use10sinsteadof1s") == "2" then
                    list[2] = true;
                else
                    list[1] = true;
                end;
            else
                WritePrefToFile("Use10sinsteadof1s","1");
                list[1] = true;
            end;
        end;
        SaveSelections = function(self, list, pn)
            local val;
            if list[2] then
                val = "2";
            else
                val = "1";
            end;
            WritePrefToFile("Use10sinsteadof1s",val);
            MESSAGEMAN:Broadcast("PreferenceSet", { Message == "Set Preference" } );
            THEME:ReloadMetrics();
        end;
    };
    setmetatable( t, t );
    return t;
end

function NoteskinColour4Red()
    local t = {
        Name = "NoteskinColour4Red";
        LayoutType = "ShowAllInRow";
        SelectType = "SelectOne";
        OneChoiceForAllPlayers = true;
        ExportOnChange = true;
        Choices = tChoices;
        LoadSelections = function(self, list, pn)
            if ReadPrefFromFile("NoteskinColour4Red") ~= nil then
                if GetUserPref("Use10sinsteadof1s") == "1" then
                    if GetUserPrefN("NoteskinColour4Red") < 26 then
                        local loadval = GetUserPrefN("NoteskinColour4Red")+1;
                        list[loadval] = true;
                    else
                        WritePrefToFile("NoteskinColour4Red",string.format('%.0f',GetUserPrefN("NoteskinColour4Red")/10));
                        list[1] = true;
                    end;
                else
                    local loadval = GetUserPrefN("NoteskinColour4Red")+1;
                    list[loadval] = true;
                end;
            else
                WritePrefToFile("NoteskinColour4Red","1");
                list[1] = true;
            end;
        end;
        SaveSelections = function(self, list, pn)
            local found = false
            for i=1,#list do
                if not found then
                    if list[i] == true then
                        local val = i-1;
                        WritePrefToFile("NoteskinColour4Red",val);
                        found = true
                    end
                end
            end
            MESSAGEMAN:Broadcast("PreferenceSet", { Message == "Set Preference" } );
            THEME:ReloadMetrics();
        end;
    };
    setmetatable( t, t );
    return t;
end;