Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Ветеран


Сообщения: 1758
Благодарности: 966

Профиль | Цитировать


Потребуется консольный mediainfo:
Код: Выделить весь код
@echo off
setlocal enabledelayedexpansion

pushd %1 || goto:eof
set "mediainfo=mediainfo --Inform=Audio;%%Duration/String3%%"

for %%i in (*.mp3) do (

    for /f "tokens=1 delims=." %%j in (' !mediainfo! "%%i" ') do call:sum "%%j"

)
echo %th%:%tm%:%ts% | clip
popd
goto:eof

:sum
for /f "tokens=1-3 delims=:" %%i in (%1) do (

    set /a h=1%%i-100
    set /a m=1%%j-100
    set /a s=1%%k-100

)

set /a th+=h
set /a tm+=m
set /a ts+=s

if %ts% geq 60 (

    set /a tm+=1
    set /a ts-=60

)

if %tm% geq 60 (

    set /a th+=1
    set /a tm-=60

)
Вызывать с параметром - путь к папке с файлами mp3. Миллисекунды не считал
Это сообщение посчитали полезным следующие участники:

Отправлено: 22:20, 27-06-2012 | #3