CrLf

【该思路已有先例，523066680较早提出】
我认为for嵌套递归始终是最快的方案，所以构思了一个基于for /l递归的新思路，唯一的缺陷是for嵌套理论上限62层[A-Za-z0-9]，本代码由于作者偷懒，功能不够强大，仅兼容低于10层，而且不能有重复项...

@echo off&setlocal enabledelayedexpansion
set str= a b c d e f g
set t=%time%
for %%a in (%str%) do (
	set /a n+=1,"tmp+=^!tmp"
	set "echo=%%!n! !echo!"
)
::初始化
set "for=for /f %%1 in ("^^!tmp1:%%2 =^^!") do (set /a z+=1)&echo %echo%"
for /l %%a in (2 1 %n%) do (
	set /a last=%%a-1
	set "for=for %%%%a in (^!tmp%%a^!) do ((set tmp!last!=^!tmp%%a: %%%%a = ^!)&!for!)"
)
::为str构建相应层数的for嵌套
set tmp%n%=%str% 
%for%
::执行组装而成的for嵌套
echo 共有%z%种组合 开始于%t% 结束于%time%
pause
复制代码

CrLf

22# caruko


？？
不懂...

CrLf

反正5040种组合耗时3秒，应该算不错的成绩了

CrLf

你们怎么会认为是字符插入呢？这段代码和我所理解的字符插入的概念一点关系都没有呀，看来原有的注释太少，弄详细点：

@echo off&setlocal enabledelayedexpansion
set str= a b c d e f g
set t=%time%
for %%a in (%str%) do (
        set /a n+=1,"tmp+=^!tmp"
        set "echo=%%!n! !echo!"
)
::初始化
set "for=for /f %%1 in ("^^!tmp1:%%2 =^^!") do (set /a z+=1)&echo %echo%"
::定义最里层的for
for /l %%a in (2 1 %n%) do (
        set /a last=%%a-1
        set "for=for %%%%a in (^!tmp%%a^!) do ((set tmp!last!=^!tmp%%a: %%%%a = ^!)&!for!)"
rem 定义for嵌套，一层包一层...
)
::为str构建相应层数的for嵌套
set tmp%n%=%str% 
%for%
::执行组装而成的for嵌套，改成echo !for!就明白了
echo 共有%z%种组合 开始于%t% 结束于%time%
pause
复制代码

CrLf

那个%for%运行起来就是这个效果：

@echo off&setlocal enabledelayedexpansion&set tmp5=a b c de f 
for %%5 in (!tmp5!) do (
	set tmp4=!tmp5:%%5 =!
	for %%4 in (!tmp4!) do (
		set tmp3=!tmp4:%%4 =!
		for %%3 in (!tmp3!) do (
			set tmp2=!tmp3:%%3 =!
			for %%2 in (!tmp2!) do (
				set tmp1=!tmp2:%%2 =!
				for /f "delims=" %%1 in ("!tmp1:%%2=!") do (
					echo %%5 %%4 %%3 %%2 %%1
				)
			)
		)
	)
)
pause
复制代码

很明显是最土的办法...只是我改进思路后，在执行之前可以自动定义层数，然后用一个变量存储了整个for嵌套，实际运行的代码就是这样子：

@echo off&setlocal enabledelayedexpansion&set tmp5=a b c de f 
for %%5 in (!tmp5!) do ((set tmp4=!tmp5:%%5 =!)&for %%4 in (!tmp4!) do ((set tmp3=!tmp4:%%4 =!)&for %%3 in (!tmp3!) do ((set tmp2=!tmp3:%%3 =!)&for %%2 in (!tmp2!) do ((set tmp1=!tmp2:%%2 =!)&for /f "delims=" %%1 in ("!tmp1:%%2=!") do echo %%5 %%4 %%3 %%2 %%1 ))))
pause
复制代码

CrLf

噢，发现27楼代码就是6楼代码，只是21楼代码是对这种思路的改进

CrLf

32楼用偏移的办法确实更好，如果是8个排列项，那这种方法就避开了!7次的set和for /l，从而弥补了for /f频繁读写对效率的影响，这种用for /f从文件读取的思路真是太妙了

CrLf

建议把临时文件名改为纯数字，这样每次循环还可以省去两个set