77七

@echo off
set str=list
set #"%str%.txt"=1
if exist "%str%.txt" (
	for /l %%l in (2,1,1000) do (
		set #"%str%(%%l).txt"=1
		if not exist "%str%(%%l).txt" (
			set "file=%str%(%%l).txt"
			goto :next
		)
	)
) else (
	set "file=%str%.txt"
)
:next
(for /f "delims=" %%i in ('dir /b /a-d ^|find /v "%~nx0"') do (
	if not defined #"%%i" (
		echo %%~ni
	)
))>"%file%"
pause
复制代码