[megaloman]

Код:

@Echo Off
cls
>nul chcp 1251
	Set "BoxIn=%APPDATA%\MyPrograms"
	Set "Mask=*.exe"
	Set "Ext=txt"

	If Not Exist "%BoxIn%\" (Echo "%BoxIn%" Not found &Pause &Exit /B 2)

	For /D %%d In ("%BoxIn%\*.*") Do (
		For %%f In ("%%d\%Mask%") Do (
			>"%BoxIn%\%%~nxd.%Ext%" (
				Echo [ENGINE]
				Echo Name=%%~nf
				Echo Author=Developer
				Echo Filename=.\%%~nxd\%%~nxf
			)
		)
	)
pause
Exit /B