[amel27]

shadowbat, 1-4. ВСЁ это делает одна единственная команда DIR, т.е. весь смысл батника сводится к передаче ей нужных параметров: файлы/папки (параметр /A), начальная папка, маска и т.п. Варианты: через блок переменных, через параметры командной строки батника, интерактивно пользователем... как нужно?.. и нужно ли, если можно просто набрать в командной строке DIR с нужными параметрами?

реализовать принтер дерева »

в качестве альтернативы DIR гляньте команду TREE - она не способна выводить файлы по маске, но каталоги печатает афигенно

Код:

Tree "%ProgramFiles%" /A >tree.txt

пример простенького листера файлов от amel27 »

не вводите народ в заблуждение - это не "листер файлов", а "резак" длинных имен с сохранением расширения... т.е. форматирование вывода всё того же DIR

[shadowbat]

одно из решений:
Принтер Дерева папок:

Код:

Tree "%CD%" >tree.txt

[deepred]

shadowbat,

а немножко фантазии?

Код:

Echo off&Chcp 866&Title L I S T I N G & Cls
set $dir=%1
set $mask=%2
set $list=%3
set $deep=%4

if "%$list%"=="" call :input
if "%$dir%"=="" set $dir=%CD%
if "%$list%"=="1" (set $list=D) else set $list=-D
if "%$deep%"=="1" set $deep=^/s

Dir /A%$list% %$deep% /d %$dir%\%$mask% > %$dir%\strr.lst

set /p dspl=Вывести листинг на экран? 1-да:
if "%dspl%" NEQ "1" (goto :eof) else type %$dir%\strr.lst

pause&goto :eof

:input
set /p $dir=Введите путь к директории, по умолчанию текущая: 
set /p $mask=Укажите маску:
set /p $list=Укажите тип вывода, "1"-каталоги, "2"-файлы: 
set /p $deep=Обрабатывать подкаталоги, "1"-да, "2"-нет:

Пример запуска из Run или CMD:

Код:

 listing.bat "F:\2\part_name\dir_0014" *.* 1 1 

[shadowbat]

Код:

set $m=%CD%
set $f=dir.txt
set mp=500

(for /f "delims=" %%a in ('dir /b/s "%$m%"') do @(
set "b=%%~dpna"&call echo.%%b:~0,%mp%%%%%~xa))>"%$f%"

код не работает с файлами, у которых есть символ "&" в имени файла
например если в папке два файла:
file.txt
file & file.txt
то в dir.txt будет только file.txt
как то можно, чтобы в dir.txt записались оба файла?

[Georgio]

Код:

@echo off

set "$m=%CD%"
set "$f=dir.txt"
set "mp=500"

(
for /f "delims=" %%a in ('dir/b/s "%$m%"') do @(
 set "b=%%~dpna"
 cmd/v/c echo.!b:~0^^,%mp%!%%~xa
)
)>"%$f%"

[shadowbat]

Georgio спасибо, помогло