Batch Video Cutter & Encoder

:: Dieses Skript verarbeitet alle .mp4-Dateien im aktuellen Verzeichnis, entfernt die angegebenen Sekunden vom Anfang und Ende und komprimiert sie optional per FFmpeg mit einem wählbaren CRF-Wert. Nur Videos mit ausreichender Länge (Videolänge + 3 > Schnittbereich) werden bearbeitet. Der ursprüngliche Zeitstempel der Datei bleibt erhalten, und die Ausgabedateien erhalten angepasste Namen (_cut.mp4 oder _crfXX.mp4).
:: "ffmpeg-release-essentials.zip" hier herunterladen, entpacken und aus dem Ordner "bin" die ffmpeg.exe und ffprobe.exe in das Verzeichnis kopieren: https://www.gyan.dev/ffmpeg/builds/
:: Version 1.1 - 09.06.2025

@echo off
setlocal enabledelayedexpansion

:: Benutzerabfrage: Start-Sekunden schneiden
set /p CUT_START=Wie viele Sekunden vom ANFANG sollen entfernt werden?
if "%CUT_START%"=="" set CUT_START=0

:: Benutzerabfrage: End-Sekunden schneiden
set /p CUT_END=Wie viele Sekunden vom ENDE sollen entfernt werden?
if "%CUT_END%"=="" set CUT_END=0

:: Benutzerabfrage: CRF-Wert
echo CRF-Wert (18=hoch, 23=normal, 28=niedrig) - Leer lassen = nur schneiden (kein Re-Encoding)
set /p CRF_WERT=Welcher CRF-Wert soll verwendet werden?

:: Benutzerabfrage: Audio entfernen
set /p REMOVE_AUDIO=Ton entfernen? (y/n):
if /i "%REMOVE_AUDIO%"=="y" (
    set "AUDIO_PARAM=-an"
    set "AUDIO_SUFFIX=_mute"
) else (
    set "AUDIO_PARAM=-c:a aac -b:a 160k"
    set "AUDIO_SUFFIX="
)

:: Zahlenprüfung
for /f "delims=0123456789" %%A in ("%CUT_START%") do (
    echo Ungueltige Eingabe bei Startzeit & pause & exit /b
)
for /f "delims=0123456789" %%A in ("%CUT_END%") do (
    echo Ungueltige Eingabe bei Endzeit & pause & exit /b
)
if not "%CRF_WERT%"=="" (
    for /f "delims=0123456789" %%A in ("%CRF_WERT%") do (
        echo Ungueltige Eingabe bei CRF-Wert & pause & exit /b
    )
)

:: Schleife über MP4s
for %%F in (*.mp4) do (
    echo Bearbeite: %%F

    for /f "usebackq delims=" %%T in (`powershell -NoLogo -NoProfile -Command "(Get-Item '%%F').LastWriteTimeUtc.ToString('yyyy-MM-ddTHH:mm:ss')"`) do (
        set "TIMESTAMP=%%T"
    )

    for /f "usebackq delims=" %%D in (`ffprobe -v error -select_streams v:0 -show_entries format^=duration -of default^=nokey^=1:noprint_wrappers^=1 "%%F"`) do (
        set "DURATION=%%D"
    )

    for /f "tokens=1 delims=." %%T in ("!DURATION!") do set /a INTDURATION=%%T

    set /a CUTS_TOTAL=!CUT_START!+!CUT_END!
    set /a VIDEO_PLUS_3=!INTDURATION!+3

    if !VIDEO_PLUS_3! GTR !CUTS_TOTAL! (
        set /a REMAINING=!INTDURATION!-!CUTS_TOTAL!
        if !REMAINING! GEQ 1 (
            if "%CRF_WERT%"=="" (
                set "OUTFILE=%%~nF_cut!AUDIO_SUFFIX!.mp4"
                ffmpeg -y -i "%%F" -ss !CUT_START! -t !REMAINING! -c copy !AUDIO_PARAM! "!OUTFILE!"
            ) else (
                set "OUTFILE=%%~nF_crf!CRF_WERT!!AUDIO_SUFFIX!.mp4"
                ffmpeg -y -ss !CUT_START! -i "%%F" -t !REMAINING! -c:v libx265 -crf !CRF_WERT! -preset slow -movflags +faststart !AUDIO_PARAM! "!OUTFILE!"
            )
            powershell -NoLogo -NoProfile -Command "(Get-Item '!OUTFILE!').LastWriteTimeUtc = [datetime]::ParseExact('!TIMESTAMP!', 'yyyy-MM-ddTHH:mm:ss', $null)"
            echo ? Fertig: !OUTFILE! - !REMAINING!s uebrig
        ) else (
            echo ? uebersprungen: %%F - nur !REMAINING!s wuerden uebrig bleiben
        )
    ) else (
        echo ? uebersprungen: %%F - !VIDEO_PLUS_3! nicht > !CUTS_TOTAL!
    )
)

echo.
echo Alle passenden Videos wurden verarbeitet.
pause