[其他] [原创]Clannad登陆界面 用户头像----批处理

@echo off
mode con: cols=82 lines=23
title ☆★☆★大爱智代 ☆★☆★ by 智代_坂上
color 0B
:tomoyo
cls
ECHO 　　　 　 　　 ╭──────────────╮
ECHO 　　　 ╭────┤Clannad——登陆界面+用户头像├──╮
ECHO 　　　 │　　 ╰──────────────╯ │
ECHO │ │
ECHO │ [1] Clannad 登陆界面+用户头像 │
ECHO │ │
ECHO 　　 │ [2] 自定义用户头像 │
ECHO 　 │　 │
ECHO │ [3] 自定义登陆界面 │
ECHO │ │
ECHO │ [0] 退出 │
ECHO │ │
ECHO 　　　 ├──────────────────────┤
ECHO │ 注：想要测试效果按win+L │
ECHO │ │
ECHO 　　　 │ 注：只适用XP，让Vista/win7说去吧。 │
ECHO 　　 ╰──────────────────────╯

echo.
echo.
echo 输入1\2\3\0请选择
set /p n=
if %n%==1 goto clannad
if %n%==2 goto picture
if %n%==3 goto logonui
if %n%==0 goto :eof
cls
echo 不要乱输
echo 按任意键返回
pause>nul
goto tomoyo
exit
:clannad
cls
if not exist logonui.exe echo 木有检测到logonui.exe，无法使用Clannad登陆界面&pause&goto a
attrib -h logonui.exe
copy logonui.exe %systemroot%\ /y
reg add "HKLM\Software\Microsoft\Windows NT\CurrentVersion\Winlogon" /f /v UIHost /t REG_EXPAND_SZ /d %%systemroot%%/logonui.exe
attrib +h logonui.exe
:a
if not exist 团子.bmp echo 木有检测到团子.bmp，无法使用团子头像&pause&goto tomoyo
attrib -h 团子.bmp
copy 团子.bmp "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\Default Pictures" /y
copy "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\Default Pictures\团子.bmp" "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\%USERNAME%.bmp" /y
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Hints\%USERNAME%" /v "PictureSource" /d "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\Default Pictures\团子.bmp" /f
attrib +h 团子.bmp
cls
echo 完成，按任意键退出
pause>nul
exit
:logonui
cls
if not exist logonui.exe echo 木有检测到logonui.exe，无法自定义&pause&exit
if not exist %systemroot%\logonui.exe attrib -h logonui.exe© /y %systemroot%>nul&attrib +h logonui.exe
echo 把bmp位图拖到这里来
echo 图片大小适合你的显示器即可
set /p p=
for %%a in (%p%) do if not %%~xa==.bmp echo 这不是bmp位图!&pause&goto logonui
ResHacker.exe -addoverwrite %systemroot%\logonui.exe, %systemroot%\logonui.exe, %p%, bitmap,100,
del ResHacker.ini
del ResHacker.log
cls
echo 完成，按任意键退出
pause>nul
exit
:picture
cls
echo 图片大小建议48x48
echo 把bmp位图拖到这里来
set /p uap=
for %%a in (%uap%) do if not %%~xa==.bmp echo 这不是bmp位图!&pause&goto picture
for %%a in (%uap%) do set a=%%~nxa
copy %uap% "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\Default Pictures" /y
copy "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\Default Pictures\%a%" "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\%USERNAME%.bmp" /y
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Hints\%USERNAME%" /v "PictureSource" /d "%ALLUSERSPROFILE%\Application Data\Microsoft\User Account Pictures\Default Pictures\%a%" /f
cls
echo 完成，按任意键退出
pause>nul
exit
复制代码