ppll2030

新手村的来试试。
审题不严谨，再来~！

@echo off
setlocal enabledelayedexpansion

for /f "tokens=*" %%i in ('dir /b /a-d *.nc') do call :addline "%%i"
exit

:addline
set F=%1
FOR /f "tokens=1* delims=:" %%A IN ('FINDstr /N "T.*" %F%') DO echo %%A>>Tlist.txt
set lineFlag=0
for /f "tokens=*" %%i in ('type %F%') do (
	set line=%%i
	set "n=!line:~1!"
	set /a lineFlag+=1
	for /f "delims=" %%a in (Tlist.txt) do (
		set T=%%a
		if !lineFlag! equ !T! (
			echo;!line!
			echo;G43H!n!
			echo;M03 S18000
			echo;M141
		)>>temp.txt
	)
	echo;!line!>>temp.txt
)
 
ren %F% %F%.%date:/=-%.bak
ren temp.txt %F%
del /q Tlist.txt
goto :eof
复制代码