[文本处理] 批处理选择文本某一行修改，第二次替换会发生异常

幻羽落尘

@echo on
set "Ymd=%date:~0,10%_%time:~0,2%:%time:~3,2%"
echo 【====================================================================】
echo 【========== 》工具箱《  =============================================】
echo 【========== @幻羽出品 ===============================================】
echo 【========== #创建时间：2018-11-06 ===================================】
echo 【========== #当前时间：%Ymd% =============================】
echo 【====================================================================】

setlocal enabledelayedexpansion
title 》》档案《《 &color 0a
echo.
set /p r1="【输入姓名】："
cd [04_%r1%=更多相关]/【01_%r1%=档案】
cls &color f1
:aa
echo.
echo 【打开 %r1%_档案=简介】
echo 【====================================================================】
type "%r1%_档案=简介".txt
echo.
echo 【====================================================================】
echo 【以上为该文本内容】
echo.
set /p a1="【是否修改内容？(y=1/n=0)】："
echo.
if %a1%==1 cls & goto a1
goto a0

:a1
echo.
echo 【正在编译： %r1%_档案=简介】
echo 【====================================================================】
type "%r1%_档案=简介".txt
echo.
echo 【====================================================================】
echo.
set /p r2="【请选择编译的行数：】："
if %r2%==0	set /p mingzi="【输入更改姓名】："& goto cc2
if %r2%==1	set "r3=【=1=姓名】:" & goto cc
if %r2%==2	set "r3=【=2=性别】：" & goto cc
if %r2%==3	set "r3=【=3=生日】：" & goto cc
if %r2%==4	set "r3=【=4=初始关系】：" & goto cc
if %r2%==5	set "r3=【=5=初识印象】：" & goto cc
if %r2%==6	set "r3=【=6=其他介绍】：" & goto cc
if %r2%==6	set "r3=【=7=散碎信息】：" & goto cc
echo 输入错误，点击重选&pause>nul&cls& goto a1

:cc
set /p ee="【修改为】："
echo 【====================================================================】
set/a r4=%r2%+2

for %%a in (%r4%) do set %%a=1 

for /f "tokens=1* delims=:" %%a in ('findstr /n .* "%r1%_档案=简介.txt"') do (
if defined %%a (echo;%r3% %ee%) else echo;%%b)>>a.txt
rem type "a.txt">"流云_档案=简介.txt"
move a.txt "%r1%_档案=简介".txt >nul
set "r4="
goto cc3

:cc2
set/a r4=1
set "r0=【==%mingzi%的简介==】"
echo 【====================================================================】

for %%d in (%r4%) do set %%d=1 

for /f "tokens=1* delims=:" %%d in ('findstr /n .* "%r1%_档案=简介.txt"') do (
if defined %%d (echo;%r0%) else echo;%%b)>>b.txt
rem type "a.txt">"流云_档案=简介.txt"
move b.txt "%r1%_档案=简介".txt >nul
set "r4="
:cc3
echo 【正在修改。】
rem echo ┌─────────────────────────────────────────────────────────────┐
rem set /p= │<nul 
rem for /L %%i in (1 1 28) do set /p a=■<nul&ping /n 1 127.0.0.1>nul
rem echo 100%%│
rem echo └─────────────────────────────────────────────────────────────┘
echo 【修改完毕！】
rem echo 【====================================================================】
rem for /l %%z in (1,1,1000) do echo %%z>nul
echo 【点击继续】  
pause>nul
cls &color f1
goto aa



rem 【添加时间：2018-11-11============================================】







:a0
pause>nul
复制代码

第二次替换会把第一次替换位置也替换掉，出现两行重复

初始模样

第二次修改，会发生覆盖第一次修改位置

flashercs

变量清零计划.

set "%r4%="
set "r4="
复制代码