[綜合]無題

執行檔代碼↓
[aa]
chcp 65001
@echo off
setlocal EnableDelayedExpansion

:: GLOBAL SETTINGS
set "inputDir=%~dp0Video"
set "outputDir=%~dp0webm"
:: 設置目標大小為 5120 KB (5MB)
set "targetSizeMB=5120"
:: 設置安全邊際為 100 KB (约为 0.1 MB)
set "safetyMarginKB=100"
:: 實際用於計算的編碼目標大小： 5120 KB - 100 KB = 5020 KB
set /a "targetSizeForCalc=%targetSizeMB% - %safetyMarginKB%"
set "audioBitrate=32"

:: CHECK TOOLS
where ffmpeg >nul 2>nul
if %errorlevel% neq 0 ( echo ERROR: ffmpeg not found. & pause & exit /b )
where ffprobe >nul 2>nul
if %errorlevel% neq 0 ( echo ERROR: ffprobe not found. & pause & exit /b )

:: DIRECTORY SETUP
if not exist "%inputDir%" (
mkdir "%inputDir%"
echo [!] Video folder created. Place videos and run again.
pause
goto :EOF
)
if not exist "%outputDir%" mkdir "%outputDir%"

:: INITIALIZATION & USER INPUT
cls
echo ==========================================
echo Video 5MB Compression Tool (Stable)
echo ==========================================
echo.
echo Enter maximum video width (e.g., 1280, leave empty for original):
set /p "width="

set "scaleFilter="
if not "%width%"=="" set "scaleFilter=-vf scale=%width%:-2"

:: COUNT FILES
echo.
echo Scanning files...
set "totalFiles=0"
for %%i in ("%inputDir%\*.*") do set /a totalFiles+=1

if %totalFiles%==0 (
echo [!] No files found in Video folder.
pause
goto :EOF
)

:: RECORD GLOBAL START TIME (using PowerShell for accurate timestamp)
for /f %%a in ('powershell -Command "Get-Date -UFormat %%s"') do set "globalStart=%%a"

:: MAIN LOOP
set "currentCount=0"

for %%i in ("%inputDir%\*.*") do (
set /a currentCount+=1
call :ProcessFile "%%i"
)

:: FINAL SUMMARY
for /f %%a in ('powershell -Command "Get-Date -UFormat %%s"') do set "globalEnd=%%a"
call :CalcDuration %globalStart% %globalEnd%

echo.
echo ==========================================
echo ALL TASKS COMPLETE!
echo Total files processed: %totalFiles%
echo Total duration: !formattedDuration!
echo ==========================================
powershell -Command "[console]::beep(1000,500)"
title Conversion Complete
pause
goto :EOF

:: ==========================================
:: SUBROUTINE: PROCESS SINGLE FILE
:: ==========================================
:ProcessFile
set "inputFile=%~1"
set "fileName=%~n1"

:: 1. Draw Progress Bar
set /a "percent=(currentCount*100)/totalFiles"
call :DrawProgressBar %percent%

:: Update Title Bar
title [%percent%%%] Processing (%currentCount%/%totalFiles%): %fileName%

echo.
echo Processing: %fileName%

:: Record File Start Time
for /f %%a in ('powershell -Command "Get-Date -UFormat %%s"') do set "fileStart=%%a"

:: 2. Get Duration
set "duration="
for /f "tokens=*" %%a in ('ffprobe -v error -show_entries format^=duration -of default^=noprint_wrapp
[/aa]

>>29327235
你怎麼不把這個影片也轉了

>>29327235
這是要騙人去下載加料過的FFmpeg主程式嗎?

>>29327383
我12年前的爛筆電要轉35分鐘才能把兩分多鐘的影片轉好

要是有人贊助我一台新電腦我就加上支援顯卡加速轉檔功能

>>29327238
不能用　小黑窗閃退

>>29328260
你有裝ffmpeg嗎？

>>29328266
有哦

>>29328266
窩用AI幫我對症下藥 修正了一下可以ㄌ

40M壓到1M 還不錯ㄛ

>>29327235
我自己用handbrake轉就好了
用5mb*1024*8減去音軌的碼率再除以秒數就是平均碼率了

>>29328289
要修正哪裡 我也是閃退

ffmpeg不是一行就可以轉擋了嗎...
沒h264或265硬體支援, 就會很慢

喔喔 懂了
要能在這裡上傳

>>29328051
之前都用i5-3340轉1分30幾秒的OP跟你耗的時間差不多
上個月買了i5-12400+美光p310的套裝機 轉檔只要5分多鐘