找回密码
 注册
搜索
系统gho:最纯净好用系统下载站投放广告、加入VIP会员,请联系 微信:wuyouceo
查看: 885|回复: 31

[原创] win11可用豆沙绿bat

[复制链接]
发表于 4 天前 | 显示全部楼层 |阅读模式
提供豆沙绿跟恢复两个bat
恢复白色
@echo off
chcp 936 >nul
title 恢复窗口背景为默认白色


:: 检查管理员权限
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
if '%errorlevel%' NEQ '0' (
    echo 请右键此文件,选择"以管理员身份运行"
    pause
    exit /B
)


echo.
echo [1/3] 恢复注册表默认值...
reg add "HKCU\Control Panel\Colors" /v Window /t REG_SZ /d "255 255 255" /f >nul 2>&1
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes\DefaultColors\Standard" /v Window /t REG_BINARY /d ffffff /f >nul 2>&1
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes\DefaultColors\HighContrast" /v Window /t REG_BINARY /d ffffff /f >nul 2>&1
reg delete "HKCU\Control Panel\Desktop\Colors" /v Window /f >nul 2>&1


echo [2/3] 调用系统API立即生效(无需注销重启)...
powershell -NoProfile -Command "Add-Type -MemberDefinition '[DllImport(\"user32.dll\")]public static extern bool SetSysColors(int c,int[] e,int[] v);[DllImport(\"user32.dll\")]public static extern IntPtr SendMessageW(IntPtr h,uint m,IntPtr w,string l);' -Name S -Namespace W;[W.S]::SetSysColors(1,[int[]]@(5),[int[]]@(16777215));[W.S]::SendMessageW([IntPtr]65535,0x1A,[IntPtr]::Zero,'WindowColors')" >nul 2>&1


echo [3/3] 完成!
echo.
echo 窗口背景已恢复为默认白色。
echo 个别已打开的程序如未变色,关闭重新打开即可。
echo.
pause



豆沙绿

@echo off
chcp 936 >nul
title 开启豆沙绿护眼模式


:: 检查管理员权限
>nul 2>&1 "%SYSTEMROOT%\system32\cacls.exe" "%SYSTEMROOT%\system32\config\system"
if '%errorlevel%' NEQ '0' (
    echo 请右键此文件,选择"以管理员身份运行"
    pause
    exit /B
)


echo.
echo [1/3] 写入注册表(持久化,重启后仍生效)...
reg add "HKCU\Control Panel\Colors" /v Window /t REG_SZ /d "199 237 204" /f >nul 2>&1
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes\DefaultColors\Standard" /v Window /t REG_BINARY /d c7edcc /f >nul 2>&1
reg add "HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Themes\DefaultColors\HighContrast" /v Window /t REG_BINARY /d c7edcc /f >nul 2>&1


echo [2/3] 清理旧脚本写入的错误残留...
reg delete "HKCU\Control Panel\Desktop\Colors" /v Window /f >nul 2>&1


echo [3/3] 调用系统API立即生效(无需注销重启)...
powershell -NoProfile -Command "Add-Type -MemberDefinition '[DllImport(\"user32.dll\")]public static extern bool SetSysColors(int c,int[] e,int[] v);[DllImport(\"user32.dll\")]public static extern IntPtr SendMessageW(IntPtr h,uint m,IntPtr w,string l);' -Name S -Namespace W;[W.S]::SetSysColors(1,[int[]]@(5),[int[]]@(13430215));[W.S]::SendMessageW([IntPtr]65535,0x1A,[IntPtr]::Zero,'WindowColors')" >nul 2>&1


echo 完成!
echo.
echo 传统Win32程序(记事本、资源管理器、Word等)已变为豆沙绿。
echo 浏览器网页、UWP应用不受影响。
echo 如需恢复默认白色,请运行"恢复白色.bat"
echo.
pause



发表于 4 天前 | 显示全部楼层
相当于护眼模式
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
调这个豆沙绿很丑
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
谢谢楼主分享
这个效果存疑
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
多谢楼主分享好用的脚本啊,试用了
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
效果不错
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢楼主分享的bat脚本
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢楼主分享,如果有效果图可以给贴一张看看,谢谢。
回复

使用道具 举报

发表于 4 天前 来自手机 | 显示全部楼层
感谢分享辛苦了
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢楼主分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
好东东,收下了谢谢
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
用不上这个,支持
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
辛苦了。
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
护眼模式啊,哈哈
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
感谢分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
实用小工具 支持
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
可以护眼
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
谢谢楼主分享
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
试了 Win11PE 无效
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
是不是护眼效果的豆沙绿色?
回复

使用道具 举报

发表于 4 天前 | 显示全部楼层
建议把“完成”提示改成检查结果后再显示。现在 reg 和 PowerShell 都用了 >nul 2>&1,即使写入或 Add-Type 失败,也会继续打印“已变为豆沙绿”。楼上说 Win11PE 无效,可以先临时去掉 PowerShell 那行的输出重定向,看看实际错误,再判断是调用失败还是目标窗口没有采用系统颜色。

另外,微软文档说明 SetSysColors 本身就会广播 WM_SYSCOLORCHANGE,并且只影响当前会话,不负责持久保存。建议检查它的 bool 返回值,而不要把执行完这一行当成成功。原脚本后面的 0x1A 是 WM_SETTINGCHANGE,不能替代对 SetSysColors 返回值的检查。

恢复脚本把颜色固定写成白色,也不等于恢复用户原先的设置;若用户之前用了自定义颜色或高对比度,最好先保存原值再还原。我没有实测这个 bat,只是根据代码和 API 文档指出这几个排查点。
https://learn.microsoft.com/en-u ... inuser-setsyscolors
回复

使用道具 举报

发表于 3 天前 | 显示全部楼层
这个可以有
回复

使用道具 举报

发表于 前天 14:28 | 显示全部楼层
感谢分享
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1|闽公网安备35020302032614号 )

GMT+8, 2026-10-14 06:04

Powered by Discuz! X5.0

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表