@echo off&setlocal enabledelayedexpansion
set cs=0
set /p File=把你的TXT文件拖进bat窗口然后按Enter(回车键)确认 ::
cls
set /p firstr=<%File%
for /f "tokens=2 delims=^：" %%a in ("%firstr%") do set a=%%a
echo %a%
echo %a% >新的TXT名字.txt
set oldstr=%a%
:loop
set /a cs+=1
for /f "skip=%cs% tokens=2 delims=^：" %%i in ('type,%File%') do set newstr=%%i&goto GetEnd
:GetEnd
if !newstr!==!oldstr! goto End
echo.%newstr%
echo.%newstr%>>新的TXT名字.txt
set oldstr=%newstr%
goto loop
:End
start 新的TXT名字.txt
echo.运行完毕！按任意键退出..&pause>nul&exit

echo.？