Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать


Цитата NoIZz:
Над такой вещью до сих пор офигеваю »
Что Вас удивляет? Что в пакетных файлах можно использовать рекурсивные функции?
читать дальше »
Код: Выделить весь код
@echo off
setlocal enableextensions enabledelayedexpansion

call :Reverse "Мама мыла раму"

echo [%Reverse%]

endlocal
exit /b 0

:Reverse
	setlocal enableextensions enabledelayedexpansion
	set sOutName=%~0
	
	set sValue=%~1
	
	if defined sValue (
		call :Reverse "%sValue:~1%"
		set sResult=!Reverse!%sValue:~0,1%
	)
	
	endlocal & set %sOutName:~1%=%sResult%
	exit /b
Это сообщение посчитали полезным следующие участники:

Отправлено: 02:29, 27-07-2012 | #10