[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 2# idwma


    00:!BianLiang!:00 是不是没有考虑超过60分钟的视频?
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 12# idwma


他那两段可以简化一下
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. cd /d "%~dp0"
  4. for /f "delims=" %%i in ('dir /b /s /a-d "*.mp4"') do (
  5.     for /f "tokens=2,3,4 delims=:. " %%a in ('ffmpeg -i "%%i" 2^>^&1 ^| find "Duration:"') do (
  6.         set hh=%%a
  7.         set mm=%%b
  8.         set ss=%%c
  9.     )
  10.     if "!hh:~0,1!"=="0" (set /a hh=!hh:~-1!*3600) else (set /a hh=!hh!*3600)
  11.     if "!mm:~0,1!"=="0" (set /a mm=!mm:~-1!*60) else (set /a mm=!mm!*60)
  12.     set /a str=!hh!+!mm!+!ss!
  13.     set /a BianLiang=!str!/10
  14.     set str=!BianLiang!
  15.     for /l %%d in (1,1,9) do (
  16.         ffmpeg -i "%%i" -ss !BianLiang! -frames:v 1 "%%~dpni0%%d.png"
  17.         set /a BianLiang=!str!+!BianLiang!
  18.     )
  19.     (for /l %%x in (1,1,9) do (
  20.         echo "%%~dpni0%%x.png"
  21.     ))>"filelist.txt"
  22.     "%~dp0MagickFull\magick.exe" montage @filelist.txt -geometry +0+0 -background #00000000 "%%~dpni-YuLan.jpg"
  23.     del /q /f filelist.txt "%%~dpni0*.png"
  24. )
复制代码
1

评分人数

    • thp2008: 完美,测试没有问题技术 + 1
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表