xxpinqz

@echo off&setlocal enabledelayedexpansion
set /a p=p1=p2=p3=p4=p5=0
(for /f "tokens=1* delims=-" %%a in (a.txt) do (
  set /a 1/%%a 2>nul&&set "str=%%a-%%b"||(
    for /f "tokens=1* delims=、" %%c in ("%%a") do (
      set /a 1/%%c 2>nul&&set /a p4+=100,p5=0||(
        if not "%%d"=="" (
          set /a p2+=1000000,p3=p4=p5=0
        ) else (
          for /f "tokens=1,2 delims=）" %%e in ("%%a") do (
            set /a 1/%%e 2>nul&&set /a p5+=1||(
              if not "%%f"=="" (
                set /a p3+=10000,p4=p5=0
              ) else (
                set /a p1+=100000000,p2=p3=p4=p5=0
              )
            )
          )
        )
      )
    )
    set /a p=!p1!+!p2!+!p3!+!p4!+!p5!
    set "str=0!p!_%%a"
  )
  echo,!str!
))>b.txt
复制代码

xxpinqz

只测了你举的例子，没测压缩包的，所以注意下：
后两句FOR中的delims=、和delims=）是全角字符

供参考，自个儿看的都有点头大。。。
大体思路：
p1-p5分别代表第几个层次
先用-号分割，如果第一列是纯数字则直接输出；（日期开头的行）
             如果非纯数字：再用、和）进行分割，如果第二列为空，则为p1 （宪法。。。）
                                          如果不为空则分别判断第一列是否为纯数字，然后分别记为p4,p2,p5,p3
定义完某一层次的序号后同时清除之后层次的数值
最后定义出前缀p及str
第一序列不能超过21个,其他子项不能超99个

xxpinqz

回复 5# pan528
原来觉得用for直接分割比较快点，没考虑到同时出现、）的情况，稍微改下。不过还是有致命伤的，你还是6楼的代码。
怎么就没想到分成两位数在组合起来呢~~

@echo off&setlocal enabledelayedexpansion
set /a p=p1=p2=p3=p4=p5=0
(for /f "tokens=1* delims=-" %%a in (a.txt) do (
  set "str=%%a"
  set /a 1/%%a 2>nul&&set "str=%%a-%%b"||(
    for /f "tokens=1* delims=、" %%c in ("!str:~,5!") do (
      set /a 1/%%c 2>nul&&set /a p4+=100,p5=0||(
        if not "%%d"=="" (
          set /a p2+=1000000,p3=p4=p5=0
        ) else (
          for /f "tokens=1* delims=）" %%e in ("!str:~,5!") do (
            set /a 1/%%e 2>nul&&set /a p5+=1||(
              if not "%%f"=="" (
                set /a p3+=10000,p4=p5=0
              ) else (
                set /a p1+=100000000,p2=p3=p4=p5=0
              )
            )
          )
        )
      )
    )
    set /a p=p1+p2+p3+p4+p5
    set "str=0!p!_%%a"
  )
  echo,!str!
))>b.txt
复制代码