Вывод строки пробелов без переноса, или как обойти спецсимволы?

@Eva Rosalene · Регистрация: 06.01.2013

Студворк — интернет-сервис помощи студентам

Написал код вывода дерева папок наподобие tree.
Все вроде работает, но вывод пробелов без переноса строки работает только через спецсимволы, из-за них же не могу привести код здесь, он во вложениях.
Посмотрите, как можно обойтись без спецсимволов в строках 14 и 21

Dragokas · 04.05.2013, 04:13

Что-то у меня не как дерево.

На счет лидирующих пробелов - победить их у меня не получилось. Есть одна идея, потом попробую.
Но можно немного ускорить за счет подготовки заранее нескольких уровней пробелов в массив переменных,
чтобы потом не пользоваться Set /p
Более в код особо не всматривался.

FraidZZ, ты же сегодня с телефона. Там разве есть клавиша ALT, или я отстал от жизни?

@Eva Rosalene · 04.05.2013, 09:21 **[ТС]**

Сообщение от Dragokas

Там разве есть клавиша ALT, или я отстал от жизни?

Я не всегда с телефона. Не весь день.
Иногда с телефона, иногда с компа, иногда с ноута. Все зависит от того, где я в этот момент сам.

Добавлено через 40 секунд
Хм, а у меня все работало, т.е отступ был разный на разных уровнях вложености. Странно

Добавлено через 2 минуты
П3ДЦ. У меня тоже ПЕРЕСТАЛО работать!!!! ВТФ

Добавлено через 11 минут

Сообщение от Dragokas

На счет лидирующих пробелов - победить их у меня не получилось. Есть одна идея, потом попробую.
Но можно немного ускорить за счет подготовки заранее нескольких уровней пробелов в массив переменных,

Почти так сделал, получилось вот что:

Bash
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
@echo off
setlocal enabledelayedexpansion
chcp 1251>nul
if "%~1"=="" (set dr=%cd%) else (set dr=%~1)
if not "%dr:~-1%"=="\" (set dr=%dr%\)
echo.%dr%
set spt="  "
call :mytree "%dr%" 0
pause>nul
exit /b
 
:mytree
for /F "usebackq tokens=*" %%A IN (`dir /b /a:d "%~1"`) DO (
 set mysp=
 for /L %%B IN (1,1,%~2) DO (set mysp=!mysp!!spt:~1,2!) 
 echo.!mysp!:%%A
 set /a nl=%~2+1
 call :mytree "%~1%%A\" !nl!
)
for %%A IN ("%~1*") DO (
 set mysp=
 for /L %%B IN (1,1,%~2) DO (set mysp=!mysp!!spt:~1,2!) 
 echo.!mysp!:%%~nxA
)
exit /b

Все вроде работает.

Добавлено через 2 минуты
Заметил, что в дереве с "прошлого уровня" как бы "веточки" тянутся
Попробуем сделать...

@Eva Rosalene · 04.05.2013, 09:35 **[ТС]**

Bash
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
@echo off
setlocal enabledelayedexpansion
chcp 1251>nul
if "%~1"=="" (set dr=%cd%) else (set dr=%~1)
if not "%dr:~-1%"=="\" (set dr=%dr%\)
echo.%dr%
set spt="  "
call :mytree "%dr%" 0
pause>nul
exit /b
 
:mytree
for /F "usebackq tokens=*" %%A IN (`dir /b /a:d "%~1"`) DO (
 set mysp=
 set /a ca=%~2-1
 for /L %%B IN (1,1,!ca!) DO (set mysp=!mysp!^|!spt:~1,1!) 
 if "%~2"=="0" (echo.!mysp!:%%A) else (echo.!mysp!^|--%%A)
 set /a nl=%~2+1
 call :mytree "%~1%%A\" !nl!
)
for %%A IN ("%~1*") DO (
 set mysp=
 set /a ca=%~2-1
 for /L %%B IN (1,1,!ca!) DO (set mysp=!mysp!^|!spt:~1,1!) 
 if "%~2"=="0" (echo.!mysp!:%%~nxA) else (echo.!mysp!^|--%%~nxA)
)
exit /b

Получилось вот что. Не совсем так, как в tree, но вроде работает.

@fhrbc · 08.02.2019, 00:35

Сообщение от Dragokas

На счет лидирующих пробелов - победить их у меня не получилось. Есть одна идея, потом попробую.

Некро, но всё же может кому пригодится... (не нашёл нигде, писану здесь)

ПРОБЕЛЫ ВНАЧАЛЕ КОММЕНТАРИЯ / ПРИГЛАШЕНИЯ SET /З

Windows Batch file
1
2
<nul set /p "str=X     Пробелы перед комментарием"
pause>nul

@alpap · 08.02.2019, 01:38

del

Новые блоги и статьи Все статьи Все блоги /
Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Programma_Boinc 01.01.2026 Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .

Dragokas 18030 / 7733 / 892 Регистрация: 25.12.2011 Сообщений: 11,502 Записей в блоге: 16
	04.05.2013, 04:13
	Что-то у меня не как дерево. На счет лидирующих пробелов - победить их у меня не получилось. Есть одна идея, потом попробую. Но можно немного ускорить за счет подготовки заранее нескольких уровней пробелов в массив переменных, чтобы потом не пользоваться Set /p Более в код особо не всматривался. FraidZZ, ты же сегодня с телефона. Там разве есть клавиша ALT, или я отстал от жизни? Миниатюры 1

@alpap 4340 / 2130 / 661 Регистрация: 26.04.2015 Сообщений: 6,823
	08.02.2019, 01:38
	del 1