@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (a.txt) do (
    for %%b in (%%a) do set "a=####%%b"&set "_!a:~-4!=a"
)
for /f "tokens=1 delims=#_=" %%a in ('set _') do (
     set /a n+=1,m=n%%6
     set /p=%%a        <nul>>b.txt
     if !m! equ 0 echo.>>b.txt
)
start b.txtCOPY

for /f "delims=" %%a in ('findstr .* a.txt') do echo %%aCOPY

findstr .* a.txt>b.txt
for /f "delims=" %%a in (b.txt) do echo %%aCOPY

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in ('more a.txt') do (
for %%j in (%%i) do (
set "num=0000%%j"&set "num=!num:~-4!"
if defined _!num! (set/a m+=1&set _!num!!m!=%%j
) else set _!num!=%%j
))
for /f "tokens=2 delims==" %%i in ('set _') do (
<nul set/p=%%i >>b.txt
set/a n+=1
if !n! equ 6 echo.>>b.txt&set/a n=0
)
start "" "b.txt"COPY

@echo off
Setlocal EnableDelayedExpansion
Set fs=1.txt
Set dt=2.txt
Set tf=db-tmp.txt
Set lenb=1
Set "o=>>%tf%"
 
call :sizehex %fs%
call :consoledb %fs%
 
::scan file1
%o% echo s 100 %size% 20
%o% echo q
start /w debug ^<%tf% ^>db-out.txt
 
::edit file1
call :consoledb %fs%
for /f "eol=- tokens=2 delims=:" %%a in (db-out.txt) do (
if defined old (
	set /a len=0x%%a-old-1
	set /a old=0x%%a
	if !len! GTR !lenb! Set /a lenb=len
) else (
	set /a old=0x%%a
)
%o% echo e %%a
%o% echo 0A
)
%o% echo w
%o% echo q
start /w debug ^<%tf%
 
::output
call :fined >%dt%
 
 
call :sizehex %dt%
call :consoledb %dt%
 
::scan file2
%o% echo s 100 %size% 0D
%o% echo q
start /w debug ^<%tf% ^>db-out.txt
 
::edit file2
call :consoledb %dt%
for /f "eol=- tokens=2 delims=:" %%a in (db-out.txt) do (
	set /a count+=1,line=count%%6
	if !line! NEQ 0 (
		%o% echo e %%a
		%o% echo 20 20
	)
)
%o% echo w
%o% echo q
start /w debug ^<%tf%
 
 
 
 
pause
del db-???.txt
goto :eof
 
:fined
set reg=%reg%[0-9]
if %lenb% EQU 0 goto :eof
set /a lenb-=1
more %fs%|findstr /b /e %reg%|sort
call :fined
goto :eof
 
:consoledb
>%tf% cd.
%o% echo n%1
%o% echo l
goto :eof
 
:sizehex
set /a size=%~z1/16*10
goto :eofCOPY

@echo off&setlocal enabledelayedexpansion
for /l %%a in (1 1 10000) do (
    for /f "delims=" %%b in (a.txt) do (
        for %%c in (%%b) do (
            if %%a equ %%c set /p= %%a<nul&set /a n+=1&if !n! equ 6 echo\&set n=0
)))
pauseCOPY