首页->【软件工具包使用(SW/Software Tools Usage)】

4 1

set FdStr=Eqn_

:auto_fill_Vars
set TsetVarOld=ts1
if %size[0]% gtr %size[1]% (
for  /f "tokens=1 delims=            " %%a in ('findstr /i /c:"%FdStr%" %na[1]%') do (
        set TsetName=%%a
        for /f "tokens=5 delims=_" %%b in ("!TsetName!") do (
        set TsetVarNew=%%b
        if  !TsetVarNew!==!TsetVarOld! ( if !TsetVarNew!==ts1 set SrcTset[0]= !TsetName! ) else (
        set /a cnt=cnt+1
        set SrcTset[!cnt!]=!TsetName!
        set TsetVarOld=!TsetVarNew! )        
        )
     )
for  /f "tokens=1 delims=            " %%a in ('findstr /i /c:"%FdStr%" %na[2]%') do (set DirTset=%%a )
) else (
for  /f "tokens=1 delims=            " %%a in ('findstr /i /c:"%FdStr%" %na[2]%') do (
        set TsetName=%%a
        for /f "tokens=5 delims=_" %%b in ("!TsetName!") do (
        set TsetVarNew=%%b
        if  !TsetVarNew!==!TsetVarOld! (if !TsetVarNew!==ts1 set SrcTset[0]= !TsetName! ) else (
        set /a cnt=cnt+1
        set SrcTset[!cnt!]=!TsetName!
        set TsetVarOld=!TsetVarNew!)        
          )
    )
for  /f "tokens=1 delims=            " %%a in ('findstr /i /c:"%FdStr%" %na[1]%') do (set DirTset=%%a )
  )
set /a TsetNo=cnt+1
echo =====%SrcTset[0]%,%SrcTset[1]%====
echo =====%SrcTset[2]%,%SrcTset[3]%====
echo =====%SrcTset[4]%,%SrcTset[5]%====
echo =====%SrcTset[6]%,%SrcTset[7]%,%TsetNo%,%DirTset%====
goto normal

楼主可见

  1. shwnyoo 1#

    ***此内容已隐藏,只有楼主可见***