如偶数位不是a 就替换不了啊
@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
set "str=%%i"
call :lp
)
pause
goto :eof
:lp
set str1=!str:~%n%,1!
if defined str1 set/a n+=2&set str2=!str2!!str1!b&goto lp
set n=&echo !str2!
set str2=
@echo off&setlocal enabledelayedexpansion
set n=-2
:begin
set /a n+=2
for /f "delims=" %%i in (a.txt) do (
set a=%%i&set a=!a:~%n%!
if not "!a!"=="" (
set str=!a:~,1!
set var=!var!!str!b
goto begin
)
echo !var!
)
pause>nul&goto :eof
[ Last edited by zw19750516 on 2008-4-24 at 11:31 PM ]
echo off&setlocal enabledelayedexpansion
set n=-2&set b=b
:begin
set /a n+=2
for /f "delims=" %%i in (a.txt) do (
set a=%%i&set a=!a:~%n%!
if "!a:~1!"=="" set "b="
if not "!a!"=="" (
set str=!a:~,1!
set var=!var!!str!!b!
goto begin
)
echo !var!
)
pause>nul&goto :eof
@echo off
for /f "delims=" %%a in (a.txt) do (
set str=%%a&set "num="
call :loop
)
pause
:loop
set num=%num%%str:~0,1%b
set str=%str:~2%
if not defined str echo %num%&goto :eof
goto loop
@echo off
for /f "delims=" %%a in (a.txt) do (
set str=%%a&set "num="
call :loop
)
pause
:loop
if not "%str:~1,1%"=="" (set num=%num%%str:~0,1%b) else set num=%num%%str%
set str=%str:~2%
if not defined str (echo %num%&goto :eof)
goto loop
