@echo off
for /f "tokens=1,2 delims= " %%i in (a.txt) do (
  set str=%%j&set num=100
  setlocal enabledelayedexpansion
  for /l %%a in (0 1 6) do (
    set/a n1=%%a+1
    for /l %%b in (!n1! 1 6) do (
      set/a n2=%%b+1
      for /l %%c in (!n2! 1 6) do (
        set/a num+=1
        echo,%%i !str:~%%a,1!!str:~%%b,1!!str:~%%c,1!>>!num:~-2!.txt
      )
    )
  )
  endlocal
)
复制代码