batman

我也来一个，从后向前截取字符的：

@echo off
for /f "delims=" %%i in (1.txt) do (
    set "str=%%i"&set "begin=a"
　　setlocal enabledelayedexpansion
    call :lp
    echo !str!!a!!var!!last!
　　endlocal
)
pause>nul&goto :eof
:lp
set "a=%str:~-1%"&set "str=%str:~,-1%"
if "%a%" geq "0" (
   if "%a%" leq "9" set "flag=a"&set "begin="
)
if defined flag (
   set var=%a%!var!&set "flag="
   ) else (
   if defined begin (
      set last=%a%!last!
      ) else (
　 set /a var*=7&goto :eof
   )
)
goto lp
复制代码

[ 本帖最后由 batman 于 2008-8-9 12:38 编辑 ]