@ECHO OFF&PUSHD %~DP0 &TITLE 绿化
Md "%WinDir%\System32\test_permissions" 2>NUL||(Echo.&Echo 请使用右键"以管理员身份运行"!&&Pause >NUL&&Exit)
Rd "%WinDir%\System32\test_permissions" 2>NUL
SetLocal EnableDelayedExpansion

taskkill /f /im BaiduMusic* >NUL 2>NUL

rd/s/q "%UserProfile%\AppData\Local\BaiduMusic"2>NUL
rd/s/q "%ProgramData%\Baidu\BaiduMusic\AutoUpdate" 2>NUL
rd/s/q "%AllUsersProfile%\Application Data\Baidu\BaiduMusic\AutoUpdate"2>NUL

start /wait /B "" "%~dp0BaiduMusic.exe" /install
start /wait /B "" "%~dp0BaiduMusic.exe" /importttlist

ECHO.&ECHO 绿化完成！创建快捷方式？
ECHO.&ECHO 是按任意键，否直接关闭！&PAUSE >NUL 2>NUL & CLS

mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\百度音乐.lnk""):b.TargetPath=""%~dp0BaiduMusic.exe"":b.WorkingDirectory=""%~dp0"":b.Save:close")
ECHO.&ECHO 创建完成！按任意键退出！&PAUSE >NUL 2>NUL & CLS