[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 15# c_mang


    好的,那你就把12楼第7行的mkv改成mp4吧
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 16# Batcher

把第七行简单改MKV为MP4还是不行
call :merge "%topath%\%%~ni.mp4" "%frompath%\%%i" "%frompath1%\%%i"
似乎
frompath1所指向的E:\中文01.mkv仍没有着落。

TOP

%%~ni.m??或%%~ni.m*

TOP

回复 18# qixiaobin0715

call :merge "E:\日版\01.mp4" "E:\日版\01.mp4" "E:\中版\01.mp4"

TOP

回复 16# Batcher

我的本意思:
    call :merge "%topath%\%%~ni.mkv" "%frompath%\%%i~ni.mp4" "%frompath1%\%%i~ni.mkv"
但是这种表述是不被认可的。

TOP

回复 20# c_mang


语法应该是这样:
call :merge "%topath%\%%~ni.mkv" "%frompath%\%%~ni.mp4" "%frompath1%\%%~ni.mkv"
不知道你的实际需求是不是这样。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 21# Batcher
是这样,非常感谢!
Progress: 100%
The cue entries (the index) are being written...
Muxing took 6 seconds.
请按任意键继续. . .
现在只要把“请按任意键继续. . .”改成自动连续完成就大功告成了!
如何改动呢?

TOP

回复 22# c_mang


    把代码里面的pause删掉
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 23# Batcher

问题解决,衷心感谢!
再请教——
如果原两版的日语文件名以及中文简繁交错文件名不作修改,那么【共47话】能不能一次性批处理呢?最后是不是文件名均依.mp4格式逐一排列?
两集路径及第一回名称:
E:\\动漫类\\外国卷\\东映 三国志\\横山光輝 三国志 全47話\\[日版仅视频]横山光輝 三国志 全47話640x480\\横山光輝 三国志 第01話 「桃園の誓い」.mp4
E:\\动漫类\\外国卷\\东映 三国志\\横山光輝 三国志 全47話\\横山光辉-三国志-47话-[国日双语]含 (720x480vobsub) 字幕\\横山光辉三国志EP01(国日双语)桃园三结义.mkv

TOP

回复 24# c_mang


看看这个代码结果如何:
  1. set "topath=E:\日版"
  2. set "frompath=E:\动漫类\外国卷\东映 三国志\横山光輝 三国志 全47話\[日版仅视频]横山光輝 三国志 全47話640x480"
  3. set "frompath1=E:\动漫类\外国卷\东映 三国志\横山光輝 三国志 全47話\横山光辉-三国志-47话-[国日双语]含 (720x480vobsub) 字幕"
  4. set "FileCount=0"
  5. setlocal enabledelayedexpansion
  6. for /f "delims=" %%i in ('dir /b /a-d "%frompath%\*.mp4"') do (
  7.     set /a FileCount+=1
  8. )
  9. set "NumBegin=1001"
  10. set /a NumEnd=NumBegin+FileCount-1
  11. for /l %%i in (!NumBegin!,1,!NumEnd!) do (
  12.     set "NumCurrent=%%i"
  13.     for /f "delims=" %%j in ('dir /b /a-d "%frompath%\*!NumCurrent:~-2!*.mp4"') do (
  14.         for /f "delims=" %%k in ('dir /b /a-d "%frompath1%\*EP!NumCurrent:~-2!*.mkv"') do (
  15.             set "FileCN=%%k"
  16.             call :merge "%topath%\%%~nj.mkv" "%frompath%\%%~nj.mp4" "%frompath1%\%%~nk.mkv"
  17.             pause
  18.         )
  19.     )
  20. )
  21. goto :eof
  22. :merge
  23. "C:\Program Files (x86)\mkvtoolnix\mkvmerge.exe" -o "%~1"  "--forced-track" "0:no" "-d" "0" "-A" "-S" "-T" "--no-global-tags" "--no-chapters" "(" "%~2" ")" "--language" "1:chi" "--track-name" "1:国语" "--default-track" "1:yes" "--forced-track" "1:no" "--language" "2:jpn" "--track-name" "2:日语" "--default-track" "2:no" "--forced-track" "2:no" "--language" "3:chi" "--track-name" "3:中字" "--default-track" "3:yes" "--forced-track" "3:no" "-a" "1,2" "-s" "3" "-D" "-T" "--no-global-tags" "--no-chapters" "(" "%~3" ")" "--track-order" "0:0,1:1,1:2,1:3"
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 25# Batcher

感激不尽!
可以运行,但不知为何缺14话,也就是跳过去了?
显示的是日文名-【横山光輝 三国志 第01話 「桃園の誓い」.mkv】,很棒!

TOP

回复 26# c_mang


    请参考9楼把执行结果发出来我看下。还有就是把14话的中文、日文的两个完整文件名也发出来。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 27# Batcher
先发图
[img][/img]

TOP

回复 27# Batcher
让您费心了!
日文版:
横山光輝 三国志 第06話 「名馬・赤兎馬」.mp4
横山光輝 三国志 第07話 「暴虐将軍・董卓」.mp4
横山光輝 三国志 第14話 「乱世の美女・前編」.mp4
横山光輝 三国志 第15話 「乱世の美女・後編」.mp4
横山光輝 三国志 第18話 「酔虎・号泣」.mp4
横山光輝 三国志 第26話 「乱世の伏竜・孔明」.mp4
横山光輝 三国志 第29話 「玄徳軍・大結集」.mp4
横山光輝 三国志 第32話 「浪士・巣福」.mp4
横山光輝 三国志 第35話 「孔明・初陣」.mp4
横山光輝 三国志 第40話 「美丈夫・周瑜」.mp4
横山光輝 三国志 第44話 「黄蓋・苦肉の策」.mp4
横山光輝 三国志 第45話 「鳳雛・連環の計」.mp4
横山光輝 三国志 第46話 「赤壁の戦い・前編」.mp4
横山光輝 三国志 第47話 「赤壁の戦い・後編」.mp4
中文版:
横山光辉三国志EP06(国日双语)宝马配英雄.mkv
横山光辉三国志EP07(国日双语)残暴的董卓.mkv
横山光辉三国志EP14(国日双语)貂蝉计弄董卓.mkv
横山光辉三国志EP15(国日双语)长安城董卓归天.mkv
横山光辉三国志EP18(国日双语)张飞酗酒失徐州.mkv
横山光辉三国志EP26(国日双语)乱世伏龙孔明.mkv
横山光辉三国志EP29(国日双语)会古城主臣聚义.mkv
横山光辉三国志EP32(国日双语)单福新野遇英主.mkv
横山光辉三国志EP35(国日双语)博望坡军师初用兵.mkv
横山光辉三国志EP40(国日双语)孔明用智激周瑜.mkv
横山光辉三国志EP44(国日双语)献密计黄盖受刑.mkv
横山光辉三国志EP45(国日双语)庞统巧授连环计.mkv
横山光辉三国志EP46(国日双语)赤壁之战(上).mkv
横山光辉三国志EP47(国日双语)赤壁之战(下)(大结局).mkv

TOP

回复 29# c_mang
  1. set "topath=E:\日版"
  2. set "frompath=E:\动漫类\外国卷\东映 三国志\横山光輝 三国志 全47話\[日版仅视频]横山光輝 三国志 全47話640x480"
  3. set "frompath1=E:\动漫类\外国卷\东映 三国志\横山光輝 三国志 全47話\横山光辉-三国志-47话-[国日双语]含 (720x480vobsub) 字幕"
  4. set "FileCount=47"
  5. set "NumBegin=1001"
  6. set /a NumEnd=NumBegin+FileCount-1
  7. setlocal enabledelayedexpansion
  8. for /l %%i in (!NumBegin!,1,!NumEnd!) do (
  9.     set "NumCurrent=%%i"
  10.     for /f "delims=" %%j in ('dir /b /a-d "%frompath%\*!NumCurrent:~-2!*.mp4" 2^>nul') do (
  11.         for /f "delims=" %%k in ('dir /b /a-d "%frompath1%\*EP!NumCurrent:~-2!*.mkv" 2^>nul') do (
  12.             call :merge "%topath%\%%~nj.mkv" "%frompath%\%%~nj.mp4" "%frompath1%\%%~nk.mkv"
  13.             pause
  14.         )
  15.     )
  16. )
  17. goto :eof
  18. :merge
  19. "C:\Program Files (x86)\mkvtoolnix\mkvmerge.exe" -o "%~1"  "--forced-track" "0:no" "-d" "0" "-A" "-S" "-T" "--no-global-tags" "--no-chapters" "(" "%~2" ")" "--language" "1:chi" "--track-name" "1:国语" "--default-track" "1:yes" "--forced-track" "1:no" "--language" "2:jpn" "--track-name" "2:日语" "--default-track" "2:no" "--forced-track" "2:no" "--language" "3:chi" "--track-name" "3:中字" "--default-track" "3:yes" "--forced-track" "3:no" "-a" "1,2" "-s" "3" "-D" "-T" "--no-global-tags" "--no-chapters" "(" "%~3" ")" "--track-order" "0:0,1:1,1:2,1:3"
复制代码
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表