A111
Assure
A12
Cons tant
Smail
A012
Exa
Explosive
Weird
A12345
Admission
A077
Chant
Reli gious
Praise
Rhyming
32987
Parsley
A034
Faith
Zealous
Absorb
24980
Principle
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
    set str=%%i
    if "!str:~0,1!"=="A" (
        set var=!str:~-3!
        if !var! gtr 0 if !var! lss 999 set /a n+=1
)
call,set ".!n!=%%.!n!%%"%%i" "
)
for /f "tokens=2 delims==" %%i in ('set .') do (
    for /f "tokens=1" %%a in ("%%i") do (
        set hh=%%a&set num=!hh:~2,3!&set _!num!=%%i
))
for /f "tokens=2 delims==" %%i in ('set _') do (
    for %%b in (%%i) do echo %%~b
    echo\
)
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "usebackq" %%i in (`findstr "^A[0-9]*$" a.txt^|sort`) do (set /a num+=1&set "_!num!=%%i")
for /l %%a in (1 1 %num%) do (
	call set "var=%%_%%a%%"
	for /f "delims=" %%j in (a.txt) do (
		if "%%j"=="!var!" (set flag=yes&set /a n=0) else (
		echo %%j|findstr "^A[0-9]*$">nul&&(set flag=&set /a n+=1&(if !n! equ 1 echo.))
		)
		if defined flag echo %%j		
	)
)
复制代码

@echo off & setlocal EnableDelayedExpansion
md temp
for /f "tokens=1* delims=:" %%i in ('findstr /n .* "a.txt"') do (
    if not "%%j"=="" ( set "str=%%j" & set "strs=!strs! !str: =+!" ) else ( md "temp\!strs!" & set "strs=" )
)
md "temp\!strs!"
for /f "delims=" %%i in (' dir /b/on %cd%\temp ') do (
    for %%j in (%%i) do ( set "str=%%j" & echo !str:+= !)
    echo.
)
rd /q/s temp
复制代码