Board logo

标题: [文件操作] 【已解决】批处理使用ImageMagick拼图以及命名的问题,代码优化解决 [打印本页]

作者: qq629926132    时间: 2022-9-24 11:16     标题: 【已解决】批处理使用ImageMagick拼图以及命名的问题,代码优化解决

本帖最后由 qq629926132 于 2022-9-24 14:50 编辑

先说原因:
是这样的,因为文件夹有很多文件需要拼接成长图,网上找了一段命令
montage *.jpg -tile 1x2 -geometry +0+0 10.jpg 是可以把目录内的图片拼接且成功的,但是我需要合并的时候以“第一张图的名字”作为合并之后的文件名。
所以我想了一个笨方法
1、遍历当前目录内的图片,把前2个文件移动到A目录
2、再用命令获取A目录里面的第一个文件的名字,然后用命令拼接,拼接后的图片改名为第一个名字
3、把A文件夹处理好的文件移出去
4、循环,再把当前目录内的图片2个移动到A 如此反复

然后就出现了一个问题,移动到最后的时候,会一直提示找不到文件然后不能停止,所以如何在中间加一段判断呢,就是循环的时候如果移动文件发现找不到文件的时候就自动退出或者提示所有文件处理完毕
  1. @echo off
  2. Setlocal enabledelayedexpansion
  3. if not exist ok\nul md ok
  4. if not exist temp\nul md temp
  5. :loop
  6. pushd "%~dp0"&set n=0
  7. for /f "delims=" %%a in ('dir /a-d /b *.jpg') do (
  8.         set/a n+=1&move "%%a" temp\>nul      
  9. if "!n!"=="2" goto :img
  10. )
  11. :img
  12. for /f "delims=" %%i in ('dir /a-d /b "temp\*.jpg"') do (
  13. set "name=%%i"
  14. goto :first)
  15. :first
  16. set "name=%name:~0,-4%"
  17. Magick montage "temp\*.jpg" -tile 1x2 -geometry +0+0 "ok\%name%.jpg"
  18. move temp\*.jpg 已处理\
  19. goto:loop
复制代码
当然了 代码都是抄的论坛前辈的然后我自己拼凑的,感谢各位的奉献,
本次发帖的目的主要是为了解决这个循环到最后Magick 找不到文件会一直提示错误,有没有好的办法可以终止
或者有其他方案也可以。
作者: Batcher    时间: 2022-9-24 13:21

回复 1# qq629926132
  1. @echo off
  2. cd /d "%~dp0"
  3. for %%i in (*.jpg) do (
  4.     set "NewName=%%i"
  5.     goto :MergePic
  6. )
  7. :MergePic
  8. montage *.jpg -tile 1x2 -geometry +0+0 "%NewName%.tmp"
  9. move /y "%NewName%.tmp" %NewName%
复制代码

作者: qq629926132    时间: 2022-9-24 14:49

大概理解这段代码的意思了




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2