@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%a in (yangben.txt) do (
set "e=%%a"
set /a num+=1
call :aa
                                    )
for /l %%o in (1,1,!num!) do for /f "delims=" %%p in (%%o.txt) do (
set "v=%%p"
if "!v:~0,1!" neq "#" (
set "v=!v:~0,1!"
>>%%o%%o.txt set/p <nul "=!v!") else (
set "v=!v:~0,2!"
>>%%o%%o.txt set/p <nul "=!v!")
)
for /l %%o in (1,1,!num!) do for /f "delims=" %%p in (%%o%%o.txt) do (>>return.txt echo %%p)
for /r %%a in (*.txt) do if "%%~nxa" neq "yangben.txt" if "%%~nxa" neq "return.txt" del "%%a"
goto :eof
:aa
for /l %%b in (0,1,100) do (
set "d=!e:~%%b,1!"
if "!d!" neq "" (
if "%%b"=="0" (
if "!d!" gtr "Z" (
>>!num!.txt echo.!d!
set /a m=%%b+1
call set "f=%%e:~!m!,1%%"
if "!f!" gtr "Z" (>>!num!.txt echo.#!f!) else (>>!num!.txt echo.!f!)
                  ) else (
>>!num!.txt echo.!d!
set /a m=%%b+1
call set "f=%%e:~!m!,1%%"
>>!num!.txt echo.!f!
                         )
                ) else (
if "!d!" gtr "Z" (
set /a m=%%b+1
call set "f=%%e:~!m!,1%%"
if "!f!" gtr "Z" (>>!num!.txt echo.#!f!) else (>>!num!.txt echo.!f!)
                  ) else (
set /a m=%%b+1
call set "f=%%e:~!m!,1%%"
>>!num!.txt echo.!f!         )
                       )
                  ) else (goto cc)
                             )
:cc
goto :eof
复制代码

 
中华人民 共和bcdf国 
中华 人民，共和。国
中华aa人民 共和国, 中华abc人民 共和国.

开始菜单为何无法重起和关机_电脑网络_奇虎网
首先谈谈Windows系统自动关机的条件。在Win98及更高版本的系统中都支持自动关机，即不通过电源的物理开关实现关机。自动关机是通过操作系统支持的ACPI（Advanced Configurat
www.qihoo.com/q/computer/3593321.html 2010-4-25 - 百度快照 

Vista开始菜单中的关机和重启没了怎么办_滚动新闻_科技时代_新浪网
开始菜单怎么没有关机和重启了！咋办？ 解决方案如下： 1)运行regedit。 2)依次展开注册表：HKEY_CURRENT_USER \ Software \ Microsoft \ Windows \ ...
tech.sina.com.cn/other/2007-09-17/0810174 ... 2010-3-30 - 百度快照
复制代码

 

严重警告：

因为生成临时文件，所以本代码用了del，请测试人员注意建立单独文件夹测试！！
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (yangben.txt) do (
    set "s=%%a"
    set/ax=8190,i=0
    for /l %%? in (1 1 14) do (
        set /a "n=(x+i)/2"
        for %%b in ("!n!") do if [!s:~%%~b!]==[] (set/ax=n)else set/ai=n
   )
        for /l %%i in (0,1,!n!) do (
        set /a "i=%%i+1"
        for %%j in ("!i!") do (
        if "!s:~%%i,1!" gtr "Z" (
        if "!s:~%%~j,1!" gtr "Z" (set /p=!s:~%%i,1!#<nul) else set /p=!s:~%%i,1!<nul
      ) else set /p=!s:~%%i,1!<nul
   )
)
echo;
)
pause
复制代码

@echo off & setlocal enabledelayedexpansion
for /f "tokens=1* delims=:" %%a in ('findstr /n .* test.txt') do if "%%b"=="" (echo.) else (set a=%%b&call :s)
pause&exit
:s
set bb=&set b1=
:ss
set bb=!bb!!b1!
set b1=!a:~0,1!
set b2=!a:~1,1!
if !b1! gtr Z if !b2! gtr Z set b1=!a:~0,1!#
set a=!a:~1!
if not "!b1!"=="~0,1" goto ss
echo.!bb!
复制代码