|
本帖最后由 mdyblog 于 2017-8-21 20:16 编辑
4、自动更换壁纸命令怎么写,我写了没有时间段生效。
--------------------------------
用这个
udmsmenu.zip
(5.17 KB, 下载次数: 2)
替换你的。
在用你原来的 defudmmenu的行替换本文件对应行。
....
//根据屏幕大小记住 壁纸合适大小 %wallpre%
if /i "in_theme600x16"=="%_%" set "cmdtheme=call :theme_600x16" && set wallpre=600- && goto :getcfg_
if /i "in_theme800x16"=="%_%" set "cmdtheme=call :theme_800x16" && set wallpre=800- && goto :getcfg_
if /i "in_theme800x24"=="%_%" set "cmdtheme=call :theme_800x24" && set wallpre=800- && goto :getcfg_
if /i "in_theme1000x16"=="%_%" set "cmdtheme=call :theme_1000x16" && set wallpre=1000- && goto :getcfg_
goto :getcfg_
:getwall
//先是大小合适 %wallpre% 的壁纸
set wall= && call :checkfile wallpaper%wallpre%%%h%.jpg && set wall=wallpaper%wallpre%%%h%.jpg
if ""=="%wall%" && call :checkfile wallpaper%wallpre%%%h%-%h%.jpg && set wall=wallpaperwallpaper%wallpre%%%h%-%h%.jpg
if ""=="%wall%" && call :checkfile wallpaper%wallpre%%%ho%.jpg && set wall=wallpaper%wallpre%%%ho%.jpg
if ""=="%wall%" && call :checkfile wallpaper%wallpre%%%he%.jpg && set wall=wallpaper%wallpre%%%he%.jpg
if ""=="%wall%" && checkrange 8:19 calc %h% > nul && call :checkfile wallpaper%wallpre%8-19.jpg && set wall=wallpaper%wallpre%8-19.jpg
if ""=="%wall%" && checkrange 0:7,20:24 calc %h% > nul && call :checkfile wallpaper%wallpre%20-7.jpg && set wall=wallpaper%wallpre%20-7.jpg
if ""=="%wall%" && call :checkfile wallpaper%wallpre%.jpg && set wall=wallpaper%wallpre%.jpg
//再是没有大小%wallpre%限制的通用壁纸
if ""=="%wall%" && call :checkfile wallpaper%h%.jpg && set wall=wallpaper%h%.jpg
if ""=="%wall%" && call :checkfile wallpaper%h%-%h%.jpg && set wall=wallpaper%h%-%h%.jpg
if ""=="%wall%" && call :checkfile wallpaper%ho%.jpg && set wall=wallpaper%ho%.jpg
if ""=="%wall%" && call :checkfile wallpaper%he%.jpg && set wall=wallpaper%he%.jpg
if ""=="%wall%" && checkrange 8:19 calc %h% > nul && call :checkfile wallpaper8-19.jpg && set wall=wallpaper8-19.jpg
if ""=="%wall%" && checkrange 0:7,20:24 calc %h% > nul && call :checkfile wallpaper20-7.jpg && set wall=wallpaper20-7.jpg
if ""=="%wall%" && call :checkfile wallpaper.jpg && set wall=wallpaper.jpg
exit 0
答题测试了下,能换壁纸。
800x600, 19点文件:
合适大小的壁纸: wallpaper800-19.jpg
通用壁纸: wallpaper19.jpg
|
|