/Common/Settings/Preferences.vb

Large files files are truncated, but you can click here to view the full file

Imports System.IO

Imports System.Xml

Imports System.Threading

Imports System.ComponentModel

'Imports MediaInfoNET

Imports System.Data.SQLite

Imports System.Data

Imports XBMC.JsonRpc



Module Ext

    <System.Runtime.CompilerServices.Extension()> _

    Public Sub AppendChild(root As XmlElement, doc As XmlDocument, name As String, value As String)



        Dim child As XmlElement = doc.CreateElement(name)



        child.InnerText = value

        root.AppendChild(child)

    End Sub



    <System.Runtime.CompilerServices.Extension()> _

    Public Sub AppendChildList(root As XmlElement, doc As XmlDocument, name As String, value() As String, Optional separator As String="|")



        Dim child As XmlElement = doc.CreateElement(name)



        child.InnerText = If(value.Count>0, String.Join(separator,value), "")

        root.AppendChild(child)

    End Sub



End Module





Public Class Pref 



    'Shared Event PropertyChanged_MkvMergeGuiPath



    Public Const SetDefaults = True

    Public Const datePattern As String = "yyyyMMddHHmmss"

    Public Const nfoDatePattern As String = "yyyy-MM-dd"

    Public Const tv_EpRegexDate As String = "([0-9]{4})[.\-_]([0-9]{2})[.\-_]([0-9]{2})"

    

    'Not saved items

    Public Shared fixnfoid As Boolean

    Public Shared tv_RegexScraper As New List(Of String)

    Public Shared tv_RegexRename As New List(Of String)

    Public Shared profiles As New List(Of ListOfProfiles)

    Public Shared workingProfile As New ListOfProfiles

    Public Shared commandlist As New List(Of str_ListOfCommands)

    Public Shared configpath As String

    Public Shared DoneAMov As Boolean = False

    Public Shared MusicVidScrape As Boolean = False

    Public Shared MusicVidConcertScrape As Boolean = False

    Public Shared DlMissingEpData As Boolean = False

    Public Shared googlecount As Integer = 0

    Public Shared engineno As Integer = 0

    Public Shared enginefront As New List(Of String)

    Public Shared engineend As New List(Of String)

    Public Shared proxysettings As New List(Of String)

    Public Shared applicationDatapath As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\Media Companion\"

    'Public Shared XbmcTmdbHDTrailer As String = "No"

    Public Shared MovieChangeKeepExistingArt As Boolean = True

    Public Shared MovieChangeMovie As Boolean = False

    Public Shared MovieDeleteNfoArtwork As Boolean = False

    

    Public Shared TvChgShowDlPoster As Boolean = False

    Public Shared TvChgShowDlFanart As Boolean = False

    Public Shared TvChgShowDlSeasonthumbs As Boolean = False

    Public Shared TvChgShowDlFanartTvArt As Boolean = False

    Public Shared TvChgShowOverwriteImgs As Boolean = False



    Public Shared ReadOnly Property EdenEnabled As Boolean

        Get

            Return Pref.XBMC_version<>2    '0=Eden only, 1=Both, 2=Frodo only

        End Get

    End Property



    Public Shared ReadOnly Property FrodoEnabled As Boolean

        Get

            Return Pref.XBMC_version<>0    '0=Eden only, 1=Both, 2=Frodo only

        End Get

    End Property



    Public Shared Property applicationPath As String

        Get

            Return Utilities.applicationPath

        End Get

        Set(ByVal value As String)

            Utilities.applicationPath = value

        End Set

    End Property

    Public Shared Property tvScraperLog As String

        Get

            Return Utilities.tvScraperLog

        End Get

        Set(ByVal value As String)

            Utilities.tvScraperLog = value

        End Set

    End Property



    'Saved Folder Prefs

    Public Shared tvFolders         As New List(Of String)

    Public Shared tvRootFolders     As New List(Of str_RootPaths)

    Public Shared movieFolders      As New List(Of str_RootPaths)

    Public Shared custtvFolders     As New List(Of String)

    Public Shared offlinefolders    As New List(Of String)

    Public Shared stubfolder        As String

    Public Shared stubmessage       As String = "Insert Media to Continue"

    Public Shared homemoviefolders  As New List(Of str_RootPaths)

    Public Shared ExcludeFolders    As New Excludes("Folders")

    Public Shared MVidFolders       As New List(Of str_RootPaths)

    Public Shared MVConcertFolders  As New List(Of str_RootPaths)



    'Saved Form Prefs

    Public Shared backgroundcolour As String

    Public Shared forgroundcolour As String

    Public Shared remembersize As Boolean

    Public Shared locx As Integer

    Public Shared locy As Integer

    Public Shared formheight As Integer

    Public Shared formwidth As Integer

    Public Shared splt1 As Integer

    Public Shared splt2 As Integer

    Public Shared splt3 As Integer

    Public Shared splt4 As Integer

    Public Shared splt5 As Integer

    Public Shared splt6 As Integer  'Tv Banner Split distance  -  To be superceeded by tvbannersplit

    Public Shared tvbannersplit As Double  ' Banner as Percentage

    Public Shared maximised As Boolean

    Public Shared startuptab As Byte

    Public Shared logview As Integer

    Public Shared LogScrapeTimes As Boolean = False

    Public Shared ScrapeTimingsLogThreshold As Integer = 100

    Public Shared lastpath As String

    Public Shared maximumthumbs As Integer

    Public Shared preferredscreen As Integer



    'Saved General Prefs

    Public Shared startupCache As Boolean

    Public Shared renamenfofiles As Boolean

    Public Shared actorseasy As Boolean

    Public Shared overwritethumbs As Boolean

    Public Shared LocalActorImage As Boolean = True

    Public Shared videomode As Integer

    Public Shared selectedvideoplayer As String

    Public Shared externalbrowser As Boolean

    Public Shared selectedBrowser As String

    Public Shared altnfoeditor As String

    Public Shared ignorearticle As Boolean

    Public Shared ignoreAarticle As Boolean

    Public Shared ignoreAn As Boolean 

    Public Shared sorttitleignorearticle As Boolean

    Public Shared MovSetTitleIgnArticle As Boolean

    Public Shared MovPosterTabTMDBSelect As Boolean = False

    Public Shared intruntime As Boolean

    Public Shared XBMC_version As Byte

    Public Shared ShowMovieGridToolTip As Boolean = False

    Public Shared ShowLogOnError As Boolean = True

    Public Shared AutoHideStatusBar As Boolean

    Public Shared DisplayRatingOverlay As Boolean

    Public Shared DisplayMediainfoOverlay As Boolean

    Public Shared DisplayMediaInfoFolderSize As Boolean

    Public Shared EnableFolderSize As Boolean

    Public Shared font As String

    Public Shared MultiMonitoEnabled As Boolean

    Public Shared ShowAllAudioTracks As Boolean

    Public Shared DisplayDefaultSubtitleLang As Boolean

    Public Shared DisplayAllSubtitleLang As Boolean

    'Private Shared _MkvMergeGuiPath As String

    Public Shared MkvMergeGuiPath As String



    'Shared Property MkvMergeGuiPath As String

    '    Get

    '        Return _MkvMergeGuiPath

    '    End Get

    '    Set (ByVal value As String)

    '        If IO.File.Exists(value) Then

    '            _MkvMergeGuiPath = value

    '            RaiseEvent PropertyChanged_MkvMergeGuiPath

    '        End If

    '    End Set

    'End Property



    'Saved General Proxy Prefs

    Public Shared prxyEnabled As String

    Public Shared prxyIp As String

    Public Shared prxyPort As String

    Public Shared prxyUsername As String

    Public Shared prxyPassword As String

    

    'Saved Movie Prefs

    Public Shared DownloadTrailerDuringScrape As Boolean

    Public Shared NoAltTitle As Boolean

    Public Shared XtraFrodoUrls As Boolean

    Public Shared gettrailer As Boolean

    Public Shared ignoretrailers As Boolean

    Public Shared moviePreferredTrailerResolution As String

    Public Shared moviescraper As Integer

    Public Shared nfoposterscraper As Integer

    Public Shared ignoreactorthumbs As Boolean

    Public Shared maxactors As Integer

    Public Shared MovTagBlacklist As String

    Public Shared maxmoviegenre As Integer

    Public Shared enablehdtags As Boolean

    Public Shared MovDurationAsRuntine As Boolean

    Public Shared MovRuntimeAsDuration As Boolean

    Public Shared movieRuntimeDisplay As String

    Public Shared movieRuntimeFallbackToFile As Boolean = False

    Public Shared disablelogfiles As Boolean

    Public Shared incmissingmovies As Boolean

    Public Shared fanartnotstacked As Boolean

    Public Shared posternotstacked As Boolean

    Public Shared scrapemovieposters As Boolean

    Public Shared movrootfoldercheck As Boolean

    Public Shared posterjpg As Boolean

    Public Shared usefanart As Boolean

    Public Shared dontdisplayposter As Boolean

    Public Shared usefoldernames As Boolean

    Public Shared movxtrathumb As Boolean

    Public Shared movxtrafanart As Boolean

    Public Shared movxtrafanartqty As Integer

    Public Shared dlxtrafanart As Boolean

    Public Shared dlMovSetArtwork As Boolean

    Public Shared MovCustFolderjpgNoDelete As Boolean

    Public Shared MovCustPosterjpgNoDelete As Boolean

    Public Shared MovSetArtSetFolder As Boolean

    Public Shared MovSetArtCentralFolder As String

    Public Shared allfolders As Boolean

    Public Shared actorsave As Boolean

    Public Shared actorsavepath As String

    Public Shared actorsavealpha As Boolean

    Public Shared actornetworkpath As String

    Public Shared imdbmirror As String

    Public Shared createfolderjpg As Boolean

    Public Shared createfanartjpg As Boolean    'Use to create fanart.jpg if in a folder

    Public Shared basicsavemode As Boolean

    Public Shared namemode As String

    Public Shared usetransparency As Boolean

    Public Shared transparencyvalue As Integer

    Public Shared savefanart As Boolean

    Public Shared MovFanartTvscrape As Boolean   'cbMovFanartTvScrape

    Public Shared MovFanartNaming As Boolean     'cbMovFanartNaming

    Public Shared MovFanartTvDlClearArt As Boolean

    Public Shared MovFanartTvDlClearLogo As Boolean

    Public Shared MovFanartTvDlPoster As Boolean

    Public Shared MovFanartTvDlFanart As Boolean

    Public Shared MovFanartTvDlDisc As Boolean

    Public Shared MovFanartTvDlBanner As Boolean

    Public Shared MovFanartTvDlLandscape As Boolean

    Public Shared fanartjpg As Boolean      'Used to create fanart.jpg instead of movie-fanart.jpg

    Public Shared roundminutes As Boolean

    Public Shared moviedefaultlist As Byte

    Public Shared movies_useXBMC_Scraper As Boolean

    Public Shared TmdbActorsImdbScrape As Boolean

    Public Shared ImdbPrimaryPlot As Boolean

    Public Shared MovImdbFirstRunTime As Boolean

    Public Shared MovImdbAspectRatio As Boolean

    Public Shared XBMC_Scraper As String = "tmdb"   'Locked TMDb as XBMC Scraper.

    Public Shared XbmcTmdbRenameMovie As Boolean

    Public Shared XbmcTmdbMissingFromImdb As Boolean

    Public Shared XbmcTmdbTop250FromImdb As Boolean

    Public Shared XbmcTmdbVotesFromImdb As Boolean

    Public Shared XbmcTmdbCertFromImdb As Boolean

    Public Shared XbmcTmdbStarsFromImdb As Boolean

    Public Shared XbmcTmdbAkasFromImdb As Boolean

    Public Shared XbmcTmdbAspectFromImdb As Boolean

    Public Shared XbmcTmdbMetascoreFromImdb As Boolean

    Public Shared XbmcTmdbActorDL As Boolean

    Public Shared XbmcTmdbActorFromImdb As Boolean

    Public Shared XbmcTmdbGenreFromImdb As Boolean

    Public Shared scrapefullcert As Boolean

    Public Shared MovCertRemovePhrase As Boolean

    Public Shared OfflineDVDTitle As String

    Public Shared MovieManualRename As Boolean

    Public Shared MovieRenameEnable As Boolean

    Public Shared MovieRenameTemplate As String

    Public Shared MovFolderRename As Boolean

    Public Shared MovFolderRenameTemplate As String

    Public Shared MovNewFolderInRootFolder As String

    Public Shared MovRenameSpaceCharacter As Boolean

    Public Shared MovSetIgnArticle As Boolean

    Public Shared MovSortIgnArticle As Boolean

    Public Shared MovTitleIgnArticle As Boolean

    Public Shared MovTitleCase As Boolean

    Public Shared ExcludeMpaaRated As Boolean

    Public Shared IncludeMpaaRated As Boolean

    Public Shared MovThousSeparator As Boolean

    Public Shared MovieImdbGenreRegEx As String

    Public Shared showsortdate As Boolean

    Public Shared TMDbSelectedLanguageName As String = "English - US"

    Public Shared TMDbUseCustomLanguage As Boolean = False

    Public Shared TMDbCustomLanguageValue As String = ""

    Public Shared GetMovieSetFromTMDb As Boolean = True

    Public Shared ActorResolutionSI As Integer = 2     ' Height  768           SI = Selected Index

    Public Shared PosterResolutionSI As Integer = 9     ' Height  1080  

    Public Shared BackDropResolutionSI As Integer = 15     ' Full HD 1920x1080



    Public Shared ActorsFilterMinFilms          As Integer =   1

    Public Shared MaxActorsInFilter             As Integer = 500

    Public Shared MovieFilters_Actors_Order     As Integer =   0        ' 0=Number of films desc 1=A-Z



    Public Shared DirectorsFilterMinFilms       As Integer =   1

    Public Shared MaxDirectorsInFilter          As Integer = 500

    Public Shared MovieFilters_Directors_Order  As Integer =   0        ' 0=Number of films desc 1=A-Z



    Public Shared SetsFilterMinFilms            As Integer =   1             

    Public Shared MaxSetsInFilter               As Integer = 500

    Public Shared MovieFilters_Sets_Order       As Integer =   0        ' 0=Number of films desc 1=A-Z



    Public Shared MinTagsInFilter               As Integer =   1             

    Public Shared MaxTagsInFilter               As Integer = 500

    Public Shared MovFiltersTagsOrder           As Integer =   0        ' 0=Number of films desc 1=A-Z





    Public Shared DateFormat As String = "YYYY-MM-DD"   'Valid tokens: YYYY MM DD HH MIN SS Used in Movie list

    Public Shared DateFormat2 As String = "yyyy-MM-dd HH:mm:ss"   'Valid tokens: YYYY MM DD HH MIN SS Used in Movie list

    Public Shared MovieList_ShowColPlot As Boolean = False

    Public Shared DisableNotMatchingRenamePattern As Boolean = True

    Public Shared MovieList_ShowColWatched As Boolean = False

    Public Shared MovieScraper_MaxStudios As Integer = 3     ' 9 = Max

    Public Shared moviesortorder As Integer

    Public Shared movieinvertorder As Boolean

    Public Shared moviesets As New List(Of String)

    Public Shared movietags As New List(Of String)

    Public Shared moviethumbpriority As New List(Of String)

    Public Shared certificatepriority() As String

    Public Shared releaseformat() As String

    Public Shared tableview As New List(Of String)

    Public Shared tablesortorder As String

    Public Shared MovSepLst As New List(Of String)

    Public Shared ThreeDKeyWords As New List(Of String)

    Public Shared MovFiltLastSize As Integer

    Public Shared RenameSpaceCharacter As String



    Public Shared Original_Title     As Boolean=False

    Public Shared UseMultipleThreads As Boolean=False

    Public Shared XbmcTmdbScraperFanart As String = Nothing

    Public Shared XbmcTmdbScraperTrailerQ As String = Nothing

    Public Shared XbmcTmdbScraperTrailerQLB As New List(Of String)

    Public Shared XbmcTmdbScraperLanguage As String = Nothing

    Public Shared XbmcTmdbScraperLanguageLB As New List(Of String)

    Public Shared XbmcTmdbScraperRatings As String = Nothing

    Public Shared XbmcTmdbScraperCertCountry As String = Nothing

    Public Shared XbmcTmdbScraperCertCountryLB As New List(Of String)



    Public Shared movie_filters As MovieFilters = New MovieFilters



    Public Shared CheckForNewVersion As Boolean=False

    Public Shared CloseMCForDLNewVersion As Boolean = True

    Public Shared AllowUserTags As Boolean

    Public Shared keywordasTag As Boolean

    Public Shared keywordlimit As Integer

    Public Shared TagRes As Boolean

    Public Shared GenreCustomBefore As Boolean

    Public Shared CustomTmdbApiKey As String = ""

    Public Shared MovNfoWatchTag As Boolean



    Public Shared Property movieignorepart As Boolean

        Get

            Return Utilities.ignoreParts

        End Get

        Set(value As Boolean)

            Utilities.ignoreParts = value

        End Set

    End Property

    Public Shared Property moviecleanTags As String

        Get

            Return Utilities.userCleanTags

        End Get

        Set(value As String)

            Utilities.userCleanTags = value

        End Set

    End Property

    Public Shared Property rarsize As Integer

        Get

            Return Utilities.RARsize

        End Get

        Set(value As Integer)

            Utilities.RARsize = value

        End Set

    End Property

    Public Shared ReadOnly Property MovFanartTvDlAll As Boolean

        Get

            Return MovFanartTvDlBanner AndAlso MovFanartTvDlClearArt AndAlso MovFanartTvDlClearLogo AndAlso MovFanartTvDlDisc AndAlso MovFanartTvDlFanart AndAlso MovFanartTvDlLandscape AndAlso MovFanartTvDlPoster 

        End Get

    End Property



    'Saved TV Prefs

    Public Shared tvshowautoquick As Boolean

    Public Shared copytvactorthumbs As Boolean = False

    Public Shared tvdbIMDbRating As Boolean = False

    Public Shared displayMissingEpisodes As Boolean = False

    Public Shared ignoreMissingSpecials As Boolean = False

    Public Shared TvMissingEpOffset As Boolean = False

    Public Shared sortorder As String

    Public Shared tvdlposter As Boolean

    Public Shared tvdlfanart As Boolean

    Public Shared tvdlseasonthumbs As Boolean

    Public Shared TvDlFanartTvArt As Boolean

    Public Shared TvFanartTvFirst As Boolean

    Public Shared dlTVxtrafanart As Boolean

    Public Shared TvXtraFanartQty As Integer

    Public Shared tvfolderjpg As Boolean

    Public Shared seasonfolderjpg As Boolean

    Public Shared enabletvhdtags As Boolean

    Public Shared disabletvlogs As Boolean

    Public Shared postertype As String

    Public Shared TvdbActorScrape As Integer

    Public Shared seasonall As String

    Public Shared tvrename As Integer

    Public Shared ScrShtDelay As Integer

    Public Shared tvshowrefreshlog As Boolean

    Public Shared autoepisodescreenshot As Boolean

    Public Shared tvscrnshtTVDBResize As Boolean

    Public Shared tvshow_useXBMC_Scraper As Boolean

    Public Shared autorenameepisodes As Boolean

    Public Shared eprenamelowercase As Boolean

    Public Shared TvRenameReplaceSpace As Boolean

    Public Shared TvRenameReplaceSpaceDot As Boolean

    Public Shared TvdbLanguage As String = "English"

    Public Shared TvdbLanguageCode As String = "en"

    Public Shared lastrefreshmissingdate As String

    Public Shared excludefromshowfoldername As String

    Public Shared TvMaxGenres As Integer

    'XBMC TVDB Scraper Options

    Public Shared XBMCTVDbDvdOrder As Boolean

    Public Shared XBMCTVDbAbsoluteNumber As Boolean

    Public Shared XBMCTVDbFanart As Boolean

    Public Shared XBMCTVDbPoster As Boolean

    Public Shared XBMCTVDbLanguage As String

    Public Shared XBMCTVDbLanguageLB As New List(Of String)

    Public Shared XBMCTVDbRatings As String = "IMDb"            'Assign a default to prevent frmPreferences crashing here: cbXBMCTvdbRatingImdb            .Checked    = If(Pref.XBMCTVDbRatings.ToLower = "imdb", True, False)

    Public Shared XBMCTVDbfallback As Boolean



    'Saved Home Movie Prefs

    Public Shared HmFanartScrnShot As Boolean

    Public Shared HmFanartTime As Integer

    Public Shared HmPosterTime As Integer



    'Saved Music Video Prefs

    Public Shared MVScraper As String

    Public Shared MVsortorder As Integer

    Public Shared MVdefaultlist As Integer

    Public Shared MVPrefScrnSht As Integer

    Public Shared MVPrefShowLog As Boolean



    '(Unsure)

    Public Shared maximagecount As Integer

    Public Shared episodeacrorsource As String

    Public Shared alwaysuseimdbid As Boolean

    

    'XBMC Sync

    Public Shared XBMC_Active As Boolean = False

    Public Shared XBMC_Link                   As Boolean = False

    Public Shared XBMC_Address                As String = "127.0.0.1"

    Public Shared XBMC_Port                   As String = "8080"

    Public Shared XBMC_Username               As String = ""

    Public Shared XBMC_Password               As String = ""

    Public Shared XBMC_UserdataFolder         As String = ""

    Public Shared XBMC_TexturesDb             As String = "Database\Textures13.db"

    Public Shared XBMC_ThumbnailsFolder       As String = "Thumbnails"

    Public Shared XBMC_MC_MovieFolderMappings As New XBMC_MC_FolderMappings("Movie")

    Public Shared XBMC_MC_CompareFields       As New XBMC_MC_CompareFields ("Movie")

    Public Shared XBMC_Link_Use_Forward_Slash As Boolean = False    'This property does not get persisted, it's assigned in XbmcController at runtime

    Public Shared XBMC_Delete_Cached_Images   As Boolean = True

    

    Public Shared ShowExtraMovieFilters       As Boolean = False

    Public Shared ExportXBMCPath              As String = ""

    

    ReadOnly Shared Property AppPath As String

        Get 

            Return My.Application.Info.DirectoryPath

         End Get

    End Property 

    

    ReadOnly Shared Property XBMC_TestsPassed As Boolean

        Get 

            'Non-db tests...

            Dim result As Boolean = XBMC_Active AndAlso XBMC_MC_MovieFolderMappings.Initialised AndAlso FrodoEnabled AndAlso XBMC_CanPing AndAlso XBMC_CanConnect 

            If Not result Then Return False



            'Db tests...

            If XBMC_Delete_Cached_Images Then

                result = XBMC_UserdataFolder_Valid     AndAlso XBMC_TexturesDbFile_Valid   AndAlso XBMC_TexturesDb_Conn_Valid  AndAlso 

                         XBMC_TexturesDb_Version_Valid AndAlso XBMC_ThumbnailsFolder_Valid  

            End If

            Return result 

         End Get

    End Property  

    

    ReadOnly Shared Property XBMC_CanConnect As Boolean

        Get

            Dim xbmc As XbmcJsonRpcConnection

            Try

                xbmc = new XbmcJsonRpcConnection(XBMC_Address, XBMC_Port, XBMC_Username, XBMC_Password)

                xbmc.Open

                Dim result As Boolean = xbmc.IsAlive

                xbmc.Close

                Return result

            Catch

            End Try

            Return False

        End Get

    End Property



    ReadOnly Shared Property XBMC_CanPing As Boolean

        Get

            Dim result As Boolean = False

            Try

                result = My.Computer.Network.Ping(XBMC_Address,1000)

            Catch

            End Try

            Return result

        End Get

    End Property



    ReadOnly Shared Property XBMC_TexturesDb_Version_Valid As Boolean

        Get

            Return TexturesDbVersion = 13

        End Get

    End Property



    Public Shared Function TexturesDbVersion As Integer

        Try

            Dim conn As SQLiteConnection = new SQLiteConnection(XBMC_TexturesDb_ReadOnly_ConnectionStr)

            conn.Open

            Dim dt As DataTable = DbUtils.ExecuteReader(conn, "Select idVersion from version" )

            conn.Close

            Return dt.Rows(0)("idVersion").ToString

        Catch ex As Exception

            Return -1

        End Try

    End Function



    ReadOnly Shared Property XBMC_TexturesDb_Conn_Valid As Boolean

        Get

            Try

                Dim conn As SQLiteConnection = new SQLiteConnection(XBMC_TexturesDb_ReadOnly_ConnectionStr)

                conn.Open

                Dim dt As DataTable = DbUtils.ExecuteReader(conn, "Select idVersion from version" )

                conn.Close

                Return True

            Catch ex As Exception

                Return False

            End Try

        End Get

    End Property



    ReadOnly Shared Property XBMC_ThumbnailsFolder_Valid As Boolean

        Get

            Return Directory.Exists(XBMC_Thumbnails_Path)

        End Get

    End Property



    ReadOnly Shared Property XBMC_UserdataFolder_Valid As Boolean

        Get

            Return Directory.Exists(XBMC_UserdataFolder)

        End Get

    End Property



    ReadOnly Shared Property XBMC_TexturesDbFile_Valid As Boolean

        Get

            Return IO.File.Exists(XBMC_TexturesDb_Path)

        End Get

    End Property



    ReadOnly Shared Property XBMC_TexturesDb_ReadOnly_ConnectionStr As String

        Get

            Return XBMC_TexturesDb_ConnectionStr & "Read Only=True;"

        End Get

    End Property



    ReadOnly Shared Property XBMC_TexturesDb_ConnectionStr As String

        Get

            Return "Data Source=" + Pref.XBMC_TexturesDb_Path + ";Version=3;New=False;Compress=True;FailIfMissing=True;"

        End Get

    End Property



    ReadOnly Shared Property XBMC_Thumbnails_Path As String

        Get

            Return Path.Combine(XBMC_UserdataFolder,XBMC_ThumbnailsFolder)

        End Get

    End Property



    ReadOnly Shared Property XBMC_TexturesDb_Path As String

        Get

            Return Path.Combine(XBMC_UserdataFolder,XBMC_TexturesDb)

        End Get

    End Property



    ReadOnly Shared Property XbmcLinkReady As Boolean

        Get

            Return XBMC_Link And XBMC_TestsPassed

        End Get

    End Property



    Public Shared Sub SetUpPreferences()

        'General

        ignorearticle = False

        ignoreAarticle = False

        ignoreAn = False

        sorttitleignorearticle = False

        MovSetTitleIgnArticle = False

        MovPosterTabTMDBSelect = False

        externalbrowser = False

        selectedBrowser = ""

        altnfoeditor = ""

        backgroundcolour = "Silver"

        forgroundcolour = "#D3D9DC"

        formheight = "600"

        formwidth = "800"

        disablelogfiles = False

        AutoHideStatusBar = True

        DisplayRatingOverlay = True

        DisplayMediainfoOverlay = True

        DisplayMediaInfoFolderSize = False

        EnableFolderSize = False

        ShowAllAudioTracks = False

        DisplayDefaultSubtitleLang = True

        DisplayAllSubtitleLang = False

        incmissingmovies = False

        startupCache = True

        rarsize = 8

        renamenfofiles = True

        scrapemovieposters = True

        movrootfoldercheck = True

        posterjpg = False

        dontdisplayposter = False

        usetransparency = False 'not used in gen2

        transparencyvalue = 255 'not used in gen2

        lastpath = applicationPath ' Application.StartupPath

        videomode = 1

        locx = 0

        locy = 0

        formheight = 725

        formwidth = 1060

        splt5 = 0

        splt6 = 230

        tvbannersplit = 0

        showsortdate = False

        MultiMonitoEnabled = False

        XBMC_version = 2

        'Proxy settings

        prxyEnabled = "false"

        prxyIp = "127.0.0.1"

        prxyPort = "8099"

        prxyUsername = "username"

        prxyPassword = "password"



        'Movies

        movies_useXBMC_Scraper = False

        TmdbActorsImdbScrape = False

        ImdbPrimaryPlot = False

        MovImdbFirstRunTime = False

        MovImdbAspectRatio = False

        XBMC_Scraper = "tmdb"

        XbmcTmdbRenameMovie = False

        XbmcTmdbMissingFromImdb = False

        XbmcTmdbTop250FromImdb = False

        XbmcTmdbVotesFromImdb = False

        XbmcTmdbCertFromImdb = False

        XbmcTmdbStarsFromImdb = False

        XbmcTmdbAkasFromImdb = False

        XbmcTmdbAspectFromImdb = False

        XbmcTmdbMetascoreFromImdb = False

        XbmcTmdbActorDL = False

        XbmcTmdbActorFromImdb = False

        XbmcTmdbGenreFromImdb = False

        scrapefullcert = False

        MovCertRemovePhrase = False

        moviedefaultlist = 0

        moviesortorder = 0

        'movieinvertorder = 0

        imdbmirror = "http://www.imdb.com/"

        usefoldernames = False

        movxtrafanart = True

        movxtrafanartqty = 0

        movxtrathumb = False

        dlxtrafanart = False

        dlMovSetArtwork = False

        MovCustFolderjpgNoDelete = False

        MovCustPosterjpgNoDelete = False

        MovSetArtSetFolder = False

        MovSetArtCentralFolder = ""

        allfolders = False

        'ReDim moviethumbpriority(3)

        maxmoviegenre = 99

        moviethumbpriority.Add("themoviedb.org")

        moviethumbpriority.Add("IMDB")

        'moviethumbpriority.Add("Movie Poster DB")

        moviethumbpriority.Add("Internet Movie Poster Awards")

        MovSepLst.Add("3DSBS")

        MovSepLst.Add("3DTAB")

        MovSepLst.Add("3D")

        MovSepLst.Add("Directors-Cut")

        MovSepLst.Add("Extended-Edition")

        MovSepLst.Add("Theatrical-Version")

        MovSepLst.Add("Unrated-Version")

        ThreeDKeyWords.Clear()

        ThreeDKeyWords.Add("HSBS")

        ThreeDKeyWords.Add("SBS")

        ThreeDKeyWords.Add("TAB")

        ThreeDKeyWords.Add("MVC")

        movieRuntimeDisplay = "scraper"

        moviePreferredTrailerResolution = "720"

        MovieManualRename = True

        MovieRenameEnable = False

        MovieRenameTemplate = "%T (%Y)"

        MovFolderRename = False

        MovRenameSpaceCharacter = False

        MovSetIgnArticle = False

        MovSortIgnArticle = False

        MovTitleIgnArticle = False

        MovTitleCase = False

        ExcludeMpaaRated = False

        IncludeMpaaRated = False

        MovThousSeparator = False

        MovFolderRenameTemplate = "%N\%T (%Y)"

        MovNewFolderInRootFolder = False

        MovieImdbGenreRegEx = "/genre/.*?>(?<genre>.*?)</a>"

        MovFiltLastSize = 384

        RenameSpaceCharacter = "_"





        'TV

        tvshow_useXBMC_Scraper = False

        autorenameepisodes = False

        eprenamelowercase = False

        TvRenameReplaceSpace = False

        TvRenameReplaceSpaceDot = False

        autoepisodescreenshot = False

        tvscrnshtTVDBResize = False

        tvshowautoquick = False

        copytvactorthumbs = True

        tvdbIMDbRating = False

        enabletvhdtags = True

        tvshowrefreshlog = False

        seasonall = "none"

        tvrename = 0

        

        tvdlfanart = True

        tvdlposter = True

        tvdlseasonthumbs = True

        TvDlFanartTvArt = False

        TvFanartTvFirst = False

        dlTVxtrafanart = False

        TvXtraFanartQty = 5

        tvfolderjpg = False

        seasonfolderjpg = False

        postertype = "poster"

        TvdbLanguage = "English"

        TvdbLanguageCode = "en"

        lastrefreshmissingdate = ""   'DateTime.Now.ToString("yyyy-MM-dd")

        sortorder = "default"

        TvdbActorScrape = 0

        OfflineDVDTitle = "Please Load '%T' Media To Play..."

        fixnfoid = False

        logview = "0"  'first entry in combobox is 'Full' (log view)

        displayMissingEpisodes = False

        ignoreMissingSpecials = False

        TvMissingEpOffset = False

        ScrShtDelay = 10

        excludefromshowfoldername = "[ended]"

        TvMaxGenres = 99



        'Home Movie

        HmFanartScrnShot = True

        HmFanartTime = 10

        HmPosterTime = 10



        'Music Video

        MVScraper = "wiki"

        MVsortorder = 0

        MVdefaultlist = 0

        MVPrefScrnSht = 10

        MVPrefShowLog = True



        'Unknown - need to be sorted/named better

        GenreCustomBefore = False

        CustomTmdbApiKey = ""

        MovNfoWatchTag = False

        intruntime = False

        actorseasy = True

        startuptab = 0

        font = "Microsoft Sans Serif, 9pt"

        fanartnotstacked = False

        posternotstacked = False

        ignoreactorthumbs = False

        actorsave = False

        actorsavepath = ""

        actorsavealpha = False

        actornetworkpath = ""

        usefanart = True

        ignoretrailers = False

        enablehdtags = True

        MovDurationAsRuntine = False

        MovRuntimeAsDuration = False

        savefanart = True

        MovFanartTvscrape = False

        MovFanartNaming = False

        MovFanartTvDlClearArt = True

        MovFanartTvDlClearLogo = True

        MovFanartTvDlPoster = True

        MovFanartTvDlFanart = True

        MovFanartTvDldisc = True

        MovFanartTvDlBanner = True

        MovFanartTvDlLandscape = True

        fanartjpg = False

        overwritethumbs = False

        LocalActorImage = True

        maxactors = 9999

        AllowUserTags = True

        keywordasTag = False

        keywordlimit = 5

        TagRes = False

        MovTagBlacklist = ""

        createfolderjpg = False

        createfanartjpg = False

        basicsavemode = False               'movie.nfo, movie.tbn, fanart.jpg

        namemode = "1"

        maximumthumbs = 6

        preferredscreen = 0

        gettrailer = False

        DownloadTrailerDuringScrape = False

        NoAltTitle = False

        XtraFrodoUrls = True

        ExportXBMCPath = ""



        ReDim certificatepriority(33)

        certificatepriority(0) = "MPAA"

        certificatepriority(1) = "UK"

        certificatepriority(2) = "USA"

        certificatepriority(3) = "Ireland"

        certificatepriority(4) = "Australia"

        certificatepriority(5) = "New Zealand"

        certificatepriority(6) = "Norway"

        certificatepriority(7) = "Singapore"

        certificatepriority(8) = "South Korea"

        certificatepriority(9) = "Philippines"

        certificatepriority(10) = "Brazil"

        certificatepriority(11) = "Netherlands"

        certificatepriority(12) = "Malaysia"

        certificatepriority(13) = "Argentina"

        certificatepriority(14) = "Iceland"

        certificatepriority(15) = "Canada (Quebec)"

        certificatepriority(16) = "Canada (British Columbia/Ontario)"

        certificatepriority(17) = "Canada (Alberta/Manitoba/Nova Scotia)"

        certificatepriority(18) = "Peru"

        certificatepriority(19) = "Sweden"

        certificatepriority(20) = "Portugal"

        certificatepriority(21) = "South Africa"

        certificatepriority(22) = "Denmark"

        certificatepriority(23) = "Hong Kong"

        certificatepriority(24) = "Finland"

        certificatepriority(25) = "India"

        certificatepriority(26) = "Mexico"

        certificatepriority(27) = "France"

        certificatepriority(28) = "Italy"

        certificatepriority(29) = "Switzerland (canton of Vaud)"

        certificatepriority(30) = "Switzerland (canton of Geneva)"

        certificatepriority(31) = "Germany"

        certificatepriority(32) = "Greece"

        certificatepriority(33) = "Austria"

        maximagecount = 10

        ReDim releaseformat(14)

        releaseformat(0) = "Cam"

        releaseformat(1) = "Telesync"

        releaseformat(2) = "Workprint"

        releaseformat(3) = "Telecine"

        releaseformat(4) = "Pay-Per-View Rip"

        releaseformat(5) = "Screener"

        releaseformat(6) = "R5"

        releaseformat(7) = "DVD-Rip"

        releaseformat(8) = "DVD-R"

        releaseformat(9) = "HDTV"

        releaseformat(10) = "VODRip"

        releaseformat(11) = "BRRip"

        releaseformat(12) = "BDRip"

        releaseformat(13) = "Bluray"

        releaseformat(14) = "DVD"



        movieFolders        .Clear()

        tvRootFolders       .Clear()

        tvFolders           .Clear()

        MVidFolders         .Clear()

        MVConcertFolders    .Clear()

        custtvFolders       .Clear()



    End Sub



    Public Shared Sub resetmovthumblist

        moviethumbpriority.Clear()

        moviethumbpriority.Add("themoviedb.org")

        moviethumbpriority.Add("IMDB")

        'moviethumbpriority.Add("Movie Poster DB")

        moviethumbpriority.Add("Internet Movie Poster Awards")

    End Sub



    Public Shared Sub ResetMovSepLst

        MovSepLst.Clear()

        MovSepLst.Add("3DSBS")

        MovSepLst.Add("3DTAB")

        MovSepLst.Add("3D")

        MovSepLst.Add("Directors-Cut")

        MovSepLst.Add("Extended-Edition")

        MovSepLst.Add("Theatrical-Version")

        MovSepLst.Add("Unrated-Version")

        MovSepLst.Add("DVD")

        MovSepLst.Add("Bluray")

    End Sub



    Public Shared Sub Proxyreload()

        proxysettings.Clear()

        proxysettings.Add(prxyEnabled)

        proxysettings.Add(prxyIp)

        proxysettings.Add(prxyPort)

        proxysettings.Add(prxyUsername)

        proxysettings.Add(prxyPassword)

        Utilities.MCProxy = proxysettings

    End Sub



    Public Shared Sub engineupdate

        enginefront.Clear()

        engineend.Clear()

        enginefront.Add("http://www.google.co.uk/search?hl=en-US&as_q=")

        engineend.Add("&as_sitesearch=www.imdb.com")

        enginefront.Add("https://duckduckgo.com/lite/?q=")

        engineend.Add("+site%3Aimdb.com&kp=-1&kaf=1&k1=-1&kac=-1&ia=web")

        'enginefront.Add("http://www.bing.com/search?q=")

        'engineend.Add("+movie+site%3Aimdb.com")

        'enginefront.Add("http://www.ask.com/web?qsrc=1&o=0&l=dir&q=")

        'engineend.Add("&qo=serpSearchTopBox")

    End Sub

    Public Shared Sub ConfigSave()

        

        Dim tempstring As String = String.Empty

        Dim doc As New XmlDocument

        Dim xmlproc As XmlDeclaration



        xmlproc = doc.CreateXmlDeclaration("1.0", "UTF-8", "yes")

        doc.AppendChild(xmlproc)

        Dim root As XmlElement

        Dim child As XmlElement

        root = doc.CreateElement("xbmc_media_companion_config_v1.0")





        'Folders In Use ------------------------------------------------------

        For Each path In tvFolders

            root.AppendChild(doc, "tvfolder", path)

        Next



        For Each path In tvRootFolders

            Dim t As String = path.rpath & "|" & path.selected 

            root.AppendChild(doc, "tvrootfolder", t)

        Next



        For Each path In movieFolders

            Dim t As String = path.rpath & "|" & path.selected 

            root.AppendChild(doc, "nfofolder", t)

        Next

        root.AppendChild(doc, "stubfolder", stubfolder)

        root.AppendChild(doc, "stubmessage", stubmessage)

        For Each path In offlinefolders

            root.AppendChild(doc, "offlinefolder", path)

        Next



        For Each path In homemoviefolders

            Dim t As String = path.rpath & "|" & path.selected

            root.AppendChild(doc, "homemoviefolder", t)

        Next



        For Each path In MVidFolders

            Dim t As String = path.rpath & "|" & path.selected

            root.AppendChild(doc, "MVidFolders", t)

        Next



        For Each path In MVConcertFolders

            Dim t As String = path.rpath & "|" & path.selected

            root.AppendChild(doc, "MVConcertFolders", t)

        Next



        For each path In custtvFolders

            root.AppendChild(doc, "custtvFolder", path)

        Next



        root.AppendChild(ExcludeFolders.GetChild(doc))

        

        'Form Settings ------------------------------------------------------------

        root.AppendChild(doc, "backgroundcolour",           backgroundcolour)

        root.AppendChild(doc, "forgroundcolour",            forgroundcolour)

        root.AppendChild(doc, "remembersize",               remembersize)

        root.AppendChild(doc, "locx",                       locx)

        root.AppendChild(doc, "locy",                       locy)

        root.AppendChild(doc, "formheight",                 formheight)

        root.AppendChild(doc, "formwidth",                  formwidth)

        root.AppendChild(doc, "splitcontainer1",            splt1)

        root.AppendChild(doc, "splitcontainer2",            splt2)

        root.AppendChild(doc, "splitcontainer3",            splt3)

        root.AppendChild(doc, "splitcontainer4",            splt4)

        root.AppendChild(doc, "splitcontainer5",            splt5)

        root.AppendChild(doc, "splitcontainer6",            splt6)

        root.AppendChild(doc, "tvbannersplit",              tvbannersplit)

        root.AppendChild(doc, "maximised",                  maximised)

        root.AppendChild(doc, "startuptab",                 startuptab)

        root.AppendChild(doc, "logview",                    logview)

        root.AppendChild(doc, "LogScrapeTimes",             LogScrapeTimes)

        root.AppendChild(doc, "ScrapeTimingsLogThreshold",  ScrapeTimingsLogThreshold)

        root.AppendChild(doc, "maximumthumbs",              maximumthumbs)

        root.AppendChild(doc, "preferredscreen",            preferredscreen)

        root.AppendChild(doc, "lastpath",                   lastpath)

        root.AppendChild(doc, "MovieImdbGenreRegEx",        MovieImdbGenreRegEx)

        root.AppendChild(doc, "moviedefaultlist",           moviedefaultlist)           'RadioButtonFileName,RadioButtonTitleAndYear,RadioButtonFolder

        root.AppendChild(doc, "moviesortorder",             moviesortorder)             'cbSort

        root.AppendChild(doc, "movieinvertorder",           movieinvertorder)           'btnreverse

        root.AppendChild(doc, "displayMissingEpisodes",     displayMissingEpisodes)     'SearchForMissingEpisodesToolStripMenuItem

        root.AppendChild(doc, "ignoreMissingSpecials",      ignoreMissingSpecials)      'cbTvMissingSpecials

        root.AppendChild(doc, "TvMissingEpOffset",          TvMissingEpOffset)          'cb_TvMissingEpOffset

        

        'Still to do

        child = doc.CreateElement("moviesets")

        Dim childchild As XmlElement

        For Each movieset In moviesets

            If movieset <> "-None-" Then

                childchild = doc.CreateElement("set")

                childchild.InnerText = movieset

                child.AppendChild(childchild)

            End If

        Next

        root.AppendChild(child)



        child = doc.CreateElement("movietags")  'preparing new movie tags

        Dim childchild3 As XmlElement

        For Each movietag In movietags

            If movietag <> "" And Not IsNothing(movietag) Then

                childchild3 = doc.CreateElement("tag")

                childchild3.InnerText = movietag

                child.AppendChild(childchild3)

            End If

        Next

        root.AppendChild(child)



        child = doc.CreateElement("table")

        Dim childchild2 As XmlElement

        childchild2 = doc.CreateElement("sort")

        childchild2.InnerText = tablesortorder

        child.AppendChild(childchild2)

        For Each tabs In tableview

            childchild2 = doc.CreateElement("tab")

            childchild2.InnerText = tabs

            child.AppendChild(childchild2)

        Next

        root.AppendChild(child)

        

        'General Prefs ------------------------------------------------------------

        root.AppendChild(doc, "startupcache"                , startupCache              ) 'chkbx_disablecache

        root.AppendChild(doc, "renamenfofiles"              , renamenfofiles            ) 'CheckBoxRenameNFOtoINFO

        root.AppendChild(doc, "actorseasy"                  , actorseasy                ) 'CheckBox33

        root.AppendChild(doc, "rarsize"                     , rarsize                   ) 'txtbx_minrarsize

        root.AppendChild(doc, "overwritethumbs"             , overwritethumbs           )'cbOverwriteArtwork - does not appear to be used?

        root.AppendChild(doc, "LocalActorImage"             , LocalActorImage           ) 'cbDisplayLocalActor

        root.AppendChild(doc, "videomode"                   , videomode                 ) 'RadioButton36-38

        root.AppendChild(doc, "selectedvideoplayer"         , selectedvideoplayer       )'btn_custommediaplayer

        root.AppendChild(doc, "externalbrowser"             , externalbrowser           ) 'CheckBox12

        root.AppendChild(doc, "selectedBrowser"             , selectedBrowser           ) 'btnFindBrowser

        root.AppendChild(doc, "altnfoeditor"                , altnfoeditor              ) 'btnaltnfoeditor

        root.AppendChild(doc, "ignorearticle"               , ignorearticle             ) 'cb_IgnoreThe

        root.AppendChild(doc, "ignoreAarticle"              , ignoreAarticle            ) 'cb_IgnoreA

        root.AppendChild(doc, "ignoreAn"                    , ignoreAn                  ) 'cb_IgnoreAn

        root.AppendChild(doc, "sorttitleignorearticle"      , sorttitleignorearticle    ) 'cb_SorttitleIgnoreArticles

        root.AppendChild(doc, "MovSetTitleIgnArticle"       , MovSetTitleIgnArticle     ) 'cb_MovSetTitleIgnArticle

        root.AppendChild(doc, "MovPosterTabTMDBSelect"      , MovPosterTabTMDBSelect    ) 'cb_MovPosterTabTMDBSelect

        root.AppendChild(doc, "intruntime"                  , intruntime                ) 'CheckBox38

        root.AppendChild(doc, "xbmcartwork"                 , XBMC_version              ) 'rbXBMCv_pre,rbXBMCv_post,rbXBMCv_both

        root.AppendChild(doc, "ShowMovieGridToolTip"        , ShowMovieGridToolTip      ) 'cbShowMovieGridToolTip

        root.AppendChild(doc, "ShowLogOnError"              , ShowLogOnError            ) 'cbShowLogOnError

        root.AppendChild(doc, "CheckForNewVersion"          , CheckForNewVersion        )

        root.AppendChild(doc, "CloseMCForDLNewVersion"      , CloseMCForDLNewVersion    ) 'cbMcCloseMCForDLNewVersion

        root.AppendChild(doc, "MkvMergeGuiPath"             , MkvMergeGuiPath           ) 'tbMkvMergeGuiPath

        root.AppendChild(doc, "prxyEnabled"                 , prxyEnabled               ) 'ucGenPref_Proxy.cb_prxyEnable

        root.AppendChild(doc, "prxyIp"                      , prxyIp                    ) 'ucGenPref_Proxy.tb_prxyIp

        root.AppendChild(doc, "prxyPort"                    , prxyPort                  ) 'ucGenPref_Proxy.prxyPort

        root.AppendChild(doc, "prxyUsername"                , prxyUsername              ) 'ucGenPref_Proxy.prxyUsername

        root.AppendChild(doc, "prxyPassword"                , prxyPassword              ) 'ucGenPref_Proxy.prxyPassword

        root.AppendChild(doc, "ShowAllAudioTracks"          , ShowAllAudioTracks        ) 'cbShowAllAudioTracks

        root.AppendChild(doc, "DisplayDefaultSubtitleLang"  , DisplayDefaultSubtitleLang) 'cbDisplayDefaultSubtitleLang

        root.AppendChild(doc, "DisplayAllSubtitleLang"      , DisplayAllSubtitleLang    ) 'cbDisplayAllSubtitleLang

        root.AppendChild(doc, "GenreCustomBefore"           , GenreCustomBefore         ) 'cbGenreCustomBefore

        root.AppendChild(doc, "CustomTmdbApiKey"            , CustomTmdbApiKey          ) 'tbTMDbAPI

        root.AppendChild(doc, "MovNfoWatchTag"              , MovNfoWatchTag            ) 'cbMovNfoWatchTag

        

        If Not String.IsNullOrEmpty(font) Then

            root.AppendChild(doc, "font", font)                                 'Button96

        End If



        For Each com In commandlist

            If com.command <> "" And com.title <> "" Then

                child = doc.CreateElement("comms")

                childchild = doc.CreateElement("title")

                childchild.InnerText = com.title

                child.AppendChild(childchild)

                childchild = doc.CreateElement("command")

                childchild.InnerText = com.command

                child.AppendChild(childchild)

                root.AppendChild(child)

            End If

        Next

        

        'Movie Prefs ------------------------------------------------------------

        root.AppendChild(doc, "DownloadTrailerDuringScrape",        DownloadTrailerDuringScrape)        'cbDlTrailerDuringScrape

        root.AppendChild(doc, "gettrailer",                         gettrailer)                         'CheckBox11

        root.AppendChild(doc, "ignoretrailers",                     ignoretrailers)                     'set from frmOptions - obsolete

        root.AppendChild(doc, "moviescraper",                       moviescraper)                       'set from frmOptions - obsolete

        root.AppendChild(doc, "nfoposterscraper",                   nfoposterscraper)                   'IMPA_chk,mpdb_chk,tmdb_chk,imdb_chk

        root.AppendChild(doc, "alwaysuseimdbid",                    alwaysuseimdbid)                    'set from frmOptions - obsolete

        root.AppendChild(doc, "ignoreactorthumbs",                  ignoreactorthumbs)                  'set from frmOptions - obsolete

        root.AppendChild(doc, "maxactors",                          maxactors)                          'ComboBox7

        root.AppendChild(doc, "MovTagBlacklist",                    MovTagBlacklist)                    'tb_MovTagBlacklist

        root.AppendChild(doc, "maxmoviegenre",                      maxmoviegenre)                      'cmbxMovScraper_MaxGenres

        root.AppendChild(doc, "enablehdtags",                       enablehdtags)                       'CheckBox19

        root.AppendChild(doc, "MovDurationAsRuntine",               MovDurationAsRuntine)               'cb_MovDurationAsRuntine

        root.AppendChild(doc, "MovRuntimeAsDuration",               MovRuntimeAsDuration)               'cb_MovRuntimeAsDuration

        root.AppendChild(doc, "movieruntimedisplay",                movieRuntimeDisplay)                'rbRuntimeScraper

        root.AppendChild(doc, "movieRuntimeFallbackToFile",         movieRuntimeFallbackToFile)         'cbMovieRuntimeFallbackToFile

        root.AppendChild(doc, "fanartnotstacked",                   fanartnotstacked)                   'set fr…

Large files files are truncated, but you can click here to view the full file