[文本处理] 批处理怎样提取txt多个指定字符串的全部行？

@echo off
setlocal enabledelayedexpansion
set "str=CT CY CL C1 WC"
(for /f "delims=" %%a in (111.txt) do (
	set "strr=%%a"
	if defined f (
		set ccc=
		if not "!strr:~0,2!"=="  " (
			set f=
			set ccc=1
		)
		if not defined ccc (
			call set "!ff!=%%!ff!%%!strr:~3!"

		)
	)

	for %%c in (!str!) do (
		if "!strr:~0,2!"=="%%c" (
			set str=!str:%%c=!
			set "ff=%%c"
			set "!ff!=!strr:~3! "
			set f=1
		)
	)

	if defined CT if defined CY if defined CL if defined WC if defined C1 (
		if not defined f (
			set /a n+=1
			echo;!n!##!CT!##!CY!##!CL!##!C1!##!WC!
			for %%c in (CT CY CL C1 WC) do set %%c=
			set "str=CT CY CL C1 WC"
		)
	)
))>222.txt
pause
复制代码

@echo off &@cls&chcp>nul 65001
set var=CT CY CL WC C1
setlocal enabledelayedexpansion
(echo,CT,CY,CL,WC,C1
for /f "tokens=1*" %%a in ('findstr /br "%var%" 2019') do (
    if "%%a"=="CT" if defined _CT (
        echo,"%%b","!_CY!","!_CL!","!_WC!","!_C1!"
        for %%i in (%var%) do set "_%%i="
    )
    set "_%%a=%%b"
)
echo,"!_CT!","!_CY!","!_CL!","!_WC!","!_C1!"
)>test.csv
pause
复制代码

@echo off &@cls&chcp>nul 65001
set var=CT CY CL WC C1
findstr /br "%var%" 2019>a.txt
setlocal enabledelayedexpansion
(echo,CT,CY,CL,WC,C1
for /f "tokens=1*" %%a in (a.txt) do (
    if "%%a"=="WC" (
        echo,"!_CT!","!_CY!","!_CL!","%%b","!_C1!"
        for %%i in (%var%) do set "_%%i="
    )
    set "_%%a=%%b"
))>test.csv
del a.txt
pause
复制代码