CrLf

回复 14# tcasdsss


    噢，怪不得，那当我啥都没发好了...

tcasdsss

回复 11# neorobin

    @echo off & setlocal enabledelayedexpansion
    set /a Width=0, Height=0
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i     "jpg$ png$ bmp$"') do (
     for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^|          findstr "Width Height"') do (
                    if %%j gtr !%%i! set "%%i=%%j"
            )
    )
    set Width
    set Height
call 1.bat
    pause
复制代码

这样就不能用了…… 加入了别人的检索代码之后

我知道哪错了……

tcasdsss

回复 16# CrLf


    我准备把他合成为一个转图片 音频的bat集 以后没准你也会用得上

tcasdsss

我其实没做什么 就是一直在问而已……

tcasdsss

回复 11# neorobin


    现在这个命令只能在一个目录下才可以 我希望他可以弄到所有子目录下 就完美了

neorobin

回复 17# tcasdsss


第 3 行 的 %%i   和   第 4 行 的 %%a    不对应,    当然出问题了,  %%a  无定义了!

tcasdsss

回复 21# neorobin


    %folder%我也错了……

neorobin

回复 22# tcasdsss


folder  你事先给它赋上正确的值就 OK

tcasdsss

回复 23# neorobin


    利用跳转 可不可以把所有的bat合成一个？ 我怕变量不对

  可以！ 那边量怎么清空呢？ 直接赋值为0？

tcasdsss

回复 21# neorobin


    搞定了
虽然毫无美感……

@echo off
:start
echo 目录及子目录下所有：分辨率至偶数（1）图片改名（2） 解压图片（3）
echo 解压音频（4） 解压视频流（5） 强制分辨率为最大（6）
echo 压缩图片（7） 压缩音频（8） 压缩为视频流（9）
echo 删除hevc （q） 删除图片（e） 删除opus（r）
echo 删除音频（t）
echo 相同或不同分辨率图片转为视频流 并删除图片（z） 
echo 分辨率至偶数再单张压缩图片 并删除图片 （x）

set choice=
set /p choice=
if /i "%choice%"=="1" goto 1 
if /i "%choice%"=="2" goto 2 
if /i "%choice%"=="3" goto 3 
if /i "%choice%"=="4" goto 4 
if /i "%choice%"=="5" goto 5 
if /i "%choice%"=="6" goto 6 
if /i "%choice%"=="7" goto 7 
if /i "%choice%"=="8" goto 8 
if /i "%choice%"=="9" goto 9 
if /i "%choice%"=="q" goto q 
if /i "%choice%"=="e" goto e
if /i "%choice%"=="r" goto r
if /i "%choice%"=="t" goto t 
if /i "%choice%"=="z" goto z 
if /i "%choice%"=="x" goto x
goto start

:1
    setlocal enabledelayedexpansion
    for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
        for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
            set "%%i=%%j"
        )
        set /a modW=Width%%2
        set /a modH=Height%%2
        set "change=0"
        if !modW! neq 0 (
            set /a newW=Width-1
            set "change=1"
        ) else (
            set newW=!Width!
        )
        if !modH! neq 0 (
            set /a newH=Height-1
            set "change=1"
        ) else (
            set newH=!Height!
        )
        if !change! equ 1 (
            nconvert -overwrite -crop 0 0 !newW! !newH! "%%a"
        )
    )
goto start

:2
setlocal enabledelayedexpansion
set n=0
set "folder=%cd%"
for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "jpg$ png$ bmp$"') do (
    set /a n+=1
    set "%%i=!n!"
    set mod=0000!n!
    ren "%%~fi" !mod:~-5!%%~xi
)
goto start

:3
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "hevc$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe -i "%%~nxi"  "%%~ni.png"
    )
goto start

:4
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "opus$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe -i "%%~nxi"  "%%~ni.flac"
    )
goto start
:5
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "hevc$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe -i "%%~nxi"  "%%05d.png"
    )
goto start

:6
    set /a Width=0, Height=0
    for /f "delims=" %%a in ('dir /s /a-d /b "%cd%" ^| findstr /i     "jpg$ png$ bmp$"') do (
     for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^|          findstr "Width Height"') do (
                    if %%j gtr !%%i! set "%%i=%%j"
            )
    )
    set Width
    set Height
    
    setlocal enabledelayedexpansion
    for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
        for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
            set "%%i=%%j"
        )
            
            nconvert -overwrite -canvas %Width% %Height% center "%%a"
        )
    )
goto start

:7
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "jpg$ png$ bmp$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe -i "%%~nxi" -pix_fmt yuv420p -vcodec libx265 -preset placebo -x265-params qp=30    "%%~ni.hevc"
    )
goto start
:8
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "wav$ ogg$ mp3$ flac$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe  -i "%%~nxi" -vcodec libopus -ab 64k   "%%~ni.opus"
    )
goto start
:9
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "png$ jpg$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe  -i "%%~nxi"  "%%~ni.bmp"
    )
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "bmp$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe -f image2 -i "%%05d.bmp" -pix_fmt yuv420p -vcodec libx265 -preset placebo -x265-params qp=25    "%folder%\1.hevc"
 goto start  
 )

:q
del /f /s *.hevc >nul
goto start
:e
del /f /s *.jpg *.bmp *.png >nul
goto start
:r
del /f /s *.opus >nul
goto start
:t
del /f /s *.wav *.ogg *.mp3 *.flac >nul
goto start

:z
    setlocal enabledelayedexpansion
set n=0
set "folder=%cd%"
for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "jpg$ png$ bmp$"') do (
    set /a n+=1
    set "%%i=!n!"
    set mod=0000!n!
    ren "%%~fi" !mod:~-5!%%~xi
)
    setlocal enabledelayedexpansion
    for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
        for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
            set "%%i=%%j"
        )
        set /a modW=Width%%2
        set /a modH=Height%%2
        set "change=0"
        if !modW! neq 0 (
            set /a newW=Width-1
            set "change=1"
        ) else (
            set newW=!Width!
        )
        if !modH! neq 0 (
            set /a newH=Height-1
            set "change=1"
        ) else (
            set newH=!Height!
        )
        if !change! equ 1 (
            nconvert -overwrite -crop 0 0 !newW! !newH! "%%a"
        )
    )

    set /a Width=0, Height=0
    for /f "delims=" %%a in ('dir /s /a-d /b "%cd%" ^| findstr /i     "jpg$ png$ bmp$"') do (
     for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^|          findstr "Width Height"') do (
                    if %%j gtr !%%i! set "%%i=%%j"
            )
    )
    set Width
    set Height
    
    setlocal enabledelayedexpansion
    for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
        for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
            set "%%i=%%j"
        )
            
            nconvert -overwrite -canvas %Width% %Height% center "%%a"
        )
    )
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "png$ jpg$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe  -i "%%~nxi"  "%%~ni.bmp"
    )
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i   "bmp$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe -f image2 -i "%%05d.bmp" -pix_fmt yuv420p -vcodec      libx265 -preset placebo -x265-params qp=25    "%folder%\1.hevc"
goto e
    )


:x
    setlocal enabledelayedexpansion
set n=0
set "folder=%cd%"
for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "jpg$ png$ bmp$"') do (
    set /a n+=1
    set "%%i=!n!"
    set mod=0000!n!
    ren "%%~fi" !mod:~-5!%%~xi
)
    setlocal enabledelayedexpansion
    for /f "delims=" %%a in ('dir /b /s /a-d *.jpg *.png *.bmp') do (
        for /f "tokens=1,3" %%i in ('nconvert.exe -info "%%a" ^| findstr "Width Height"') do (
            set "%%i=%%j"
        )
        set /a modW=Width%%2
        set /a modH=Height%%2
        set "change=0"
        if !modW! neq 0 (
            set /a newW=Width-1
            set "change=1"
        ) else (
            set newW=!Width!
        )
        if !modH! neq 0 (
            set /a newH=Height-1
            set "change=1"
        ) else (
            set newH=!Height!
        )
        if !change! equ 1 (
            nconvert -overwrite -crop 0 0 !newW! !newH! "%%a"
        )
    )
    set "PATH=%PATH%;%cd%\bin"
    set "folder=%cd%"
    for /f "delims=" %%i in ('dir /s /a-d /b "%folder%" ^| findstr /i "jpg$ png$ bmp$"') do (
        cd /d "%%~dpi"
        ffmpeg.exe -i "%%~nxi" -pix_fmt yuv420p -vcodec libx265 -preset placebo -x265-params qp=30    "%%~ni.hevc"
    )
  del /f /s *.jpg *.bmp *.png >nul
  goto start
复制代码

问题解决 就差精简代码了……

neorobin

回复 24# tcasdsss


set "var="  即可, 双引号不是必要的,  但要保证 = 后面没有尾随空格之类的字符

tcasdsss

回复 26# neorobin


    你试一下 现在我的代码有点毛病 压缩视频流会变成 压缩完后还会重复压……
没问题了……