@echo off
setlocal enabledelayedexpansion
cd /d "D:\数据\"
for %%f in (*.txt) do (
set /p str=<"%%f"
set n=0
for %%i in (!str!) do (
set /a n+=1
)
for /l %%a in (1 1 !n!) do call :aa %%a "%%f"
move $ "%%f"
)
pause & exit
:aa
set s=
for /f "tokens=%1" %%b in ('type %2') do (
set "s=!s!%%b "
)
>>$ echo,!s:~0,-1!
goto :eof
复制代码

@echo off
cd /d "d:\数据1\"
for %%i in (*.txt) do (
  setlocal enabledelayedexpansion
  for /f "delims=" %%a in (%%i) do (
    set n=0
    for %%b in (%%a) do (
        set/a n+=1
        for %%c in (!n!) do set "#!n!=!#%%c!%%b "
    )
  )
  for /l %%a in (1,1,!n!) do echo,!#%%a!
  endlocal
)>"d:\数据2\%%i"
复制代码

@echo off&setlocal enabledelayedexpansion
for %%a in (d:\数据\*.txt) do (
    set/p str=<"%%a"
    for %%b in (!str!) do set/a n+=1
    (for /l %%c in (1 1 !n!) do call :lines %%c "%%a") >%temp%\$
    move /y %temp%\$ "%%a"
    set/a n=0
)
pause&exit

:lines
for /f "usebackq tokens=%1 delims= " %%i in ("%~2") do (
    set/p=%%i <nul
)
echo,&goto :eof
复制代码