|
|
楼主 |
发表于 2025-3-10 19:50:51
|
显示全部楼层
- @echo off
- set "df=微软雅黑Semibold-12pt-低分.ini"
- set "gf=微软雅黑Semibold-12pt-高分.ini"
- echo,分辨率-获取当前设置数值
- cls
- for /f "tokens=1-2" %%a in ('mshta VBScript:Execute("CreateObject(""Scripting.Filesystemobject"").GetStandardStream(1).Write(screen.width&"" ""&screen.height)"^)(close^)') do (
- set "ScreenWidth=%%a"
- set "ScreenHeight=%%b"
- )
- echo ScreenWidth=%ScreenWidth%
- echo ScreenHeight=%ScreenHeight%
- 1pause
- cls
- -----------------------------------------------------------------------------------------------
- -----------------------------------------------------------------------------------------------
- cls
- if %ScreenWidth% LEQ 1920 (goto :pc2k) else (goto :pc4k)
- 1pause
- exit
- ------------------------------------------------
- cls
- :pc2k
- echo 2k2k2k2k
- set win=%df%
- pause
- goto :nexx
- ------------------------------------------------
- cls
- :pc4k
- echo 4k4k4k4k
- set win=%gf%
- pause
- ------------------------------
- cls
- :nexx
- echo %win%
- 1pause
- cls
- cd
- echo 获取自身所在目录的路径(不包含文件名)
- echo;"%~dp0"
- set "dqmu=%~dp0"
- echo;"%dqmu%"
- cd /d "%dqmu%"
- cd
- 1pause
- cls
- start "" "noMeiryoUI.exe" %win% -set
- 1pause
- cls
- exit
复制代码 |
|