[文本处理] 已经完美解决。求批处理cue生成txt文本

hepeisheng

双击bat,遍历所有文件夹,检查每个文件夹是否有名为list.txt的文件,没有则根据本文件夹内的cue文件生成名为list.txt的文件,如果有多个cue文件,都写到一个txt文件裏,谢谢。

要求生成文本的样子:

张国荣1989-拒绝再玩 [T113-01胶圈版]
曲目
01. 拒绝再玩
02. 共同渡过
03. 无心睡眠
04. 失散的影子
05. 至未来的日子
06. 为你
07. 野火
08. 惊梦
09. 找一个地方
10. 倩女幽魂


cue格式如下:

REM GENRE POP
REM DATE 1989
REM DISCID 710A310A
REM COMMENT "ExactAudioCopy v0.99pb2"
PERFORMER "张国荣"
TITLE "拒绝再玩 [T113-01胶圈版]"
FILE "123.wav" WAVE
  TRACK 01 AUDIO
    TITLE "拒绝再玩"
    PERFORMER "张国荣"
    INDEX 00 00:00:00
    INDEX 01 00:00:32
  TRACK 02 AUDIO
    TITLE "共同渡过"
    PERFORMER "张国荣"
    INDEX 00 03:31:70
    INDEX 01 03:34:32
  TRACK 03 AUDIO
    TITLE "无心睡眠"
    PERFORMER "张国荣"
    INDEX 00 07:57:62
    INDEX 01 08:00:25
  TRACK 04 AUDIO
    TITLE "失散的影子"
    PERFORMER "张国荣"
    INDEX 00 11:10:07
    INDEX 01 11:12:45
  TRACK 05 AUDIO
    TITLE "到未来日子"
    PERFORMER "张国荣"
    INDEX 00 17:05:57
    INDEX 01 17:08:20
  TRACK 06 AUDIO
    TITLE "为你"
    PERFORMER "张国荣"
    INDEX 00 21:37:15
    INDEX 01 21:39:52
  TRACK 07 AUDIO
    TITLE "野火"
    PERFORMER "张国荣"
    INDEX 00 26:31:07
    INDEX 01 26:33:45
  TRACK 08 AUDIO
    TITLE "惊梦"
    PERFORMER "张国荣"
    INDEX 00 30:26:57
    INDEX 01 30:29:20
  TRACK 09 AUDIO
    TITLE "找一个地方"
    PERFORMER "张国荣"
    INDEX 00 35:37:37
    INDEX 01 35:40:00
  TRACK 10 AUDIO
    TITLE "倩女幽魂"
    PERFORMER "张国荣"
    INDEX 00 39:52:25
    INDEX 01 39:54:62

hepeisheng

完美解决多谢qixiaobin0715,多谢批处理之家。多谢大家。

qixiaobin0715

回复 6# hepeisheng
代码第17行中!DATE1!后面添加-

hepeisheng

年份后边少了一个"-",应该是1989-,其他就完美了。

qixiaobin0715

回复 3# hepeisheng
未测试：

@echo off
setlocal enabledelayedexpansion
for /r /d %%i in (*) do (
    cd /d %%i
    if not exist list.txt if exist *.cue (
        (for %%j in (*.cue) do (
            for /f "tokens=1,2*" %%a in ('type "%%j"') do (
                if "%%a"=="REM" (
                    set %%b1=%%c
                ) else if "%%a"=="TRACK" (
                    set %%a=%%b
                ) else (
                    set %%a=%%~b %%~c
                )
                if defined TITLE (
                    if defined DATE1 (
                        echo,!PERFORMER!!DATE1!!TITLE:~,-1!
                        set TITLE=
                        set DATE1=
                    ) else (
                        echo,!TRACK!. !TITLE!
                        set TITLE=
                    )
                )
            )
        ))>list.txt
    )
)
pause
复制代码

newswan

8t ？豪豪豪豪豪豪

hepeisheng

卷 8T 的文件夹 PATH 列表
卷序列号为 18C-9B8C
E:\0著名歌手1.13T\OK张国荣2017-07-13解压成功
│  0张国荣2017-07-13.txt
│  SACD-----------.txt
│  
├─0香港套装复刻版
│  │  Back Cover.jpg
│  │  Cover1.JPG
│  │  Cover2.JPG
│  │  Front Cover.JPG
│  │  List.txt
│  │  
│  ├─1987-SUMMER ROMANCE'87[香港套装复刻版][WAV]
│  │      back.jpg
│  │      back1.jpg
│  │      cover.jpg
│  │      list.txt
│  │      log.log
│  │      内2.jpg
│  │      内3.jpg
│  │      内4.jpg
│  │      张国荣.-.[SUMMER ROMANCE'87](1987)[WAV].cue
│  │      张国荣.-.[SUMMER ROMANCE'87](1987)[WAV].wav
│  │           
│  └─2005-Final Collection[环球]8CD
├─1978-DAY DREAMIN'[香港套装复刻版][WAV]
│      back.jpg
│      cover.jpg
│      disc.jpg
│      log.log
│      张国荣.-.[DAY DREAMIN'](1978)[WAV].cue
│      张国荣.-.[DAY DREAMIN'](1978)[WAV].wav
│      
├─1978-DAY DREAMIN'[香港环球复黑王版][WAV]
│      back.jpg
│      cd.jpg
│      cover.jpg
│      log.log
│      张国荣.-.[DAY DREAMIN'](1978)[WAV].cue
│      张国荣.-.[DAY DREAMIN'](1978)[WAV].wav
│      
├─1978-情人箭[香港复黑王版][WAV]
│      back.jpg
│      cover.jpg
│      disc.jpg
│      log.log
│      张国荣.-.[情人箭](1978)[WAV].cue
│      张国荣.-.[情人箭](1978)[WAV].wav
│      
├─1978-情人箭[香港套装复刻版][WAV]
│      back.jpg
│      cover.jpg
│      disc.jpg
│      list.TXT
│      log.log
│      内1.jpg
│      内2.jpg
│      内3.jpg
│      张国荣.-.[情人箭](1978)[WAV].cue
│      张国荣.-.[情人箭](1978)[WAV].wav

qixiaobin0715

回复 1# hepeisheng
处理文本的代码已经写好并测试，只是不知道你的目录结构是什么样的。tree一下发上来看看。