[Darkness231]

Originally Posted by william_fold

Works perfectly Darkness! Thx! I tried a couple things with mortscript and couldnt get it to work! Thx again!

I see what I did wrong, i missed a " on the "Windows Default" in my script

Yeah I had a problem with the fact that windows default had quotation marks around it. This is what worked for me

TouchFLO3DEXIST =RegValueExists("HKLM", "SOFTWARE\Microsoft\Today\Items\TouchFLO 3D", "Enabled")
HTCSENSEEXIST = RegValueExists("HKLM", "SOFTWARE\Microsoft\Today\Items\HTC Sense", "Enabled")
Titanium = RegRead( "HKLM", "SOFTWARE\Microsoft\Today\Items\""Windows Default""", "Enabled")


    If (Titanium = 1 )
    RegWriteDWord("HKLM", "SOFTWARE\Microsoft\Today\Items\""Windows Default""", "Enabled","0")
        If (TouchFLO3DEXIST)
        RegWriteDWord("HKLM", "SOFTWARE\Microsoft\Today\Items\TouchFLO 3D", "Enabled","1")
        Endif
        If (HTCSENSEEXIST)
        RegWriteDWord("HKLM", "SOFTWARE\Microsoft\Today\Items\HTC Sense", "Enabled","1")
        EndIf
    RedrawToday
    Show ( "Desktop" )

    Else
    If (Titanium = 0 )
        If (TouchFLO3DEXIST)
        RegWriteDWord("HKLM", "SOFTWARE\Microsoft\Today\Items\TouchFLO 3D", "Enabled","0")
        Endif
        If (HTCSENSEEXIST)
        RegWriteDWord("HKLM", "SOFTWARE\Microsoft\Today\Items\HTC Sense", "Enabled","0")
        EndIf
    RegWriteDWord("HKLM", "SOFTWARE\Microsoft\Today\Items\""Windows Default""", "Enabled","1")
    RedrawToday
    Show ( "Desktop" )
    Endif