[已解决]批处理怎样合并文本的三行到一行？

LTSC1809

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. set js=1
   
4. for /f "delims=" %%i in (a.txt) do (
   
5.     set a[!js!]=%%i
   
6.     set a[!js!]=%a[!js!]:----=-%
   
7.     echo %a[!js!]%
   
8.     set /a js+=1
   
9. )
   
10. cls
    
11. set jslast=js
    
12. set js=1
    
13. set jst=0
    
14. :loop
    
15. set /a jst+=3
    
16. set /a o=jst-1
    
17. set /a t=jst-2
    
18. echo %a!t!% %a!o!% %a!jst!%>>b.txt
    
19. echo %a!t!% %a!o!% %a!jst!%
    
20. set /a js+=1
    
21. if %js% leq %jslast% goto loop

复制代码

我的需求是将一个每行格式为xxxx----xxxx，有很多行的文本文件处理为把所有的----换成一个- 然后要把原来的三行弄到一行去。但是这个我尝试了一下，最开始第一个for读取文件的循环中第四行echo %a[!js!]%显示的是ECHO 处于关闭状态，也就是%a[!js!]%这个变量未定义 这是怎么回事

pd1

回复 1# LTSC1809

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. set js=1
   
4. for /f "delims=" %%i in (a.txt) do (
   
5.     set a[!js!]=%%i
   
6.     call set a[!js!]=%%a[!js!]:----=-%%
   
7.     call echo %%a[!js!]%%
   
8.     set /a js+=1
   
9. )
   
10. 
    
11. 
    
12. cls
    
13. set jslast=%js%
    
14. set js=1
    
15. set jst=0
    
16. :loop
    
17. 
    
18. set /a jst+=3
    
19. set /a o=jst-1
    
20. set /a t=jst-2
    
21. call echo %%a[!t!]%% %%a[!o!]%% %%a[!jst!]%%>>b.txt
    
22. 
    
23. call echo %%a[!t!]%% %%a[!o!]%% %%a[!jst!]%%
    
24. 
    
25. echo %jst% %jslast%
    
26. if %jst% LEQ %jslast% goto loop

复制代码

1. <# :
   
2. @echo off
   
3. powershell -NoProfile -ExecutionPolicy bypass "Get-Content -literal '%~f0' |Out-String|Invoke-Expression"
   
4. pause
   
5. #>
   
6. $txt=gc .\a.txt|%{$_.replace("----","-")}
   
7. 0..(($txt.Length-$txt.Length%3)/3)|%{$txt[3*$_]+" "+$txt[3*$_+1]+" "+$txt[3*$_+2]>>b.txt}

复制代码

Batcher

回复 1# LTSC1809

1. @echo off
   
2. (for /f "tokens=1,2 delims=-" %%a in ('type "1.txt"') do (
   
3.     set /a n+=1
   
4.     set /a m=n%%3
   
5.     set /p=%%a-%%b <nul
   
6.     set /a test=1/m 2>nul || echo,
   
7. ))>"2.txt"

复制代码

aloha20200628

回复 1# LTSC1809

假设楼主的源文件中不包含!^等特殊字符，批处理代码如下...

1. 
   
2. @echo off &setlocal enabledelayedexpansion
   
3. (for /f "delims=" %%a in (1.txt) do (
   
4.         set "_s=%%a"&set "s=!s!!_s:----=-!"&set/a "n+=1"
   
5.         if !n! equ 3 (echo,!s!&set "n=0"&set "s=")
   
6. ))>2.txt
   
7. pause&exit/b
   

复制代码

若源文件中包含!^等特殊字符，批处理代码如下（有幸set/a变量能在循环体内自由出入变量延迟期 ）...

1. 
   
2. @echo off &setlocal
   
3. (for /f "delims=" %%a in (1.txt) do (
   
4.         set "_s=%%a"&set/a "n+=1"
   
5.         setlocal enabledelayedexpansion
   
6.         set/p="!_s:----=-!"<nul
   
7.         if !n! equ 3 (echo,&set/a "n=0")
   
8.         endlocal
   
9. ))>2.txt
   
10. exit/b
    

复制代码

aloha20200628

回复 1# LTSC1809

如果批处理代码中采用 set/p... 输出字符串，要求不能在头部包含空格和=等字符，否则空格会被删除，=会导致报错退出。因此为避免入坑则要改用如下代码...
call可用于set和echo但不能用于if语块，故还须有劳‘延迟变量!n!和!s!’来串场解围

1. 
   
2. @echo off &setlocal
   
3. (for /f "delims=" %%a in (1.txt) do (
   
4.         set "_s=%%a"&set/a "n+=1"
   
5.         call set "s=%%s%%%%_s:----=-%%"
   
6.         setlocal enabledelayedexpansion
   
7.         if !n! equ 3 (
   
8.                 echo,!s!
   
9.                 endlocal
   
10.                 set/a "n=0"&set "s="
    
11.         ) else endlocal
    
12. ))>2.txt
    
13. pause&exit/b
    

复制代码