1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49
|
@ECHO OFF
echo effacement des ancien fichiers
if exist "file_list.txt" del /s "file_list.txt"
if exist "script.vcf" del /s "script.vcf"
if exist "*.avs" del /s "*.avs"
echo creation de la liste des mp4
dir *.mp4 /B>file_list.txt
echo creation des fichiers AVS
for /F "delims=;" %%I in (file_list.txt) do echo DirectShowSource("%%I")>> %%I.avs
echo effacement des ancien fichiers
if exist "file_list.txt" del /s "file_list.txt"
echo création de la liste des mp4 sans extemsion
for %%i in (*.mp4) do @echo %%~ni>>file_list.txt
echo creation des dossiers qui porte de même nom que les mp4 mai sans mp4
for /F "delims=;" %%I in (file_list.txt) do md "%%I"
echo création du fichier script.vcf qui comtien les AVS pour sortir des photos
for /F "delims=;" %%I in (file_list.txt) do echo VirtualDub.video.SetFrameRate(0,300); VirtualDub.Open("%%I.mp4.avs","",0,"EAAAAAAAAAAB////gAAAAA==");VirtualDub.SaveImageSequence("%%I\\", ".jpeg", 4, 2, 95); >> script.vcf
vdub.exe /x /i "script.vcf"
echo creation du dossier Photos
if not exist "Photos" md Photos
echo déplacement des dossier photos dans le dossier photos.
for /F "delims=;" %%I in (file_list.txt) do move /Y "%~dp0%%I" "Photos\%%I"
echo effacement des fichiers temporaire
if exist "script.vcf" del /s "script.vcf"
if exist "file_list.txt" del /s "file_list.txt"
dir *.avs /B /O:N > file_list.txt
for /F "delims=;" %%I in (file_list.txt) do del "%%I"
if exist "file_list.txt" del /s "file_list.txt" |
Partager