[gora]

Код:

@Echo Off
SetLocal EnableDelayedExpansion
:: Обрабатываемая папка
Set Folder=e:\Temp\Source
:: папка назначения
Set Out=e:\Temp\jpg

For /R "%Folder%" %%a In (*.txt) Do (
	Set flag=
	For /F "usebackq tokens=* delims=" %%i In ("%%a") Do (
		If Not Defined flag (
			Set flag=1
			Set tim=%%i
			Set tim=!tim:~0,2!-!tim:~2,2!
			If Not Exist "%Out%\!tim!" MD "%Out%\!tim!"
			Copy "%%a" "%Out%\!tim!"
		)
	)
)