内涵图生成器
bat吧
全部回复
仅看楼主
level 3
TJSCerº 楼主
批处理小白练手,望大佬指正与改进<( ̄︶ ̄)>
2020年04月09日 05点04分 1
level 3
TJSCerº 楼主
@璐村惂鐢ㄦ埛_000076K馃惥 off
title 内涵图生成器
echo 本生成器由XDC制作
echo 请根据指示操作
pause
:0
cls
echo 1.zip+jpg 2.zip+png 3.rar+jpg 4.rar+png
echo 生成的内涵图后缀与所选相同
set /p o=需要哪一项生成?
if %o%==1 goto :w
if %o%==2 goto :e
if %o%==3 goto :q
if %o%==4 goto :r
:r
set /p a=请输入png的名称:
set /p b=请输入rar的名称:
copy /b %a%.png + %b%.rar 内涵图.png
echo 生成完毕
goto :t
:e
set /p a=请输入png的名称:
set /p b=请输入zip的名称:
copy /b %a%.png + %b%.zip 内涵图.png
echo 生成完毕
goto :t
:w
set /p a=请输入jpg的名称:
set /p b=请输入zip的名称:
copy /b %a%.jpg + %b%.zip 内涵图.jpg
echo 生成完毕
goto :t
:q
set /p a=请输入jpg的名称:
set /p b=请输入rar的名称:
copy /b %a%.jpg + %b%.rar 内涵图.jpg
echo 生成完毕
goyo :t
:t
set /p d=还需要再次生成吗?(A or B)
if %d%==A goto :0
2020年04月09日 05点04分 2
纰漏百出,望指正
2020年04月09日 05点04分
level 8
可以加一个防止输入扩展名错误的
for %%i in (%a%) do (if "%%~xi" neq ".jpg" goto error)
for %%i in (%b%) do (if "%%~xi" neq ".zip" goto error)
:error
echo 扩展名输入错误,请按任意键退回&pause >nul&exit
2020年04月09日 06点04分 3
打错了,不是exit,是goto 0
2020年04月09日 06点04分
感谢大佬
2020年04月09日 07点04分
@TJSCerº 运行你的算法 命令错误[泪]
2020年04月10日 01点04分
@🔥剑天下第一 但我这边没问题,应该是倒数第四行“goto”写成了“goyo”,我再测试一下
2020年04月10日 02点04分
level 8
我也来一个吧,要是写的不好,大佬勿喷哈[勉强]
@璐村惂鐢ㄦ埛_000076K馃惥 off
:again
cls&set /p Path1=请输入图片路径:
set /p Path2=请输入压缩包路径:
for %%i in (%Path1%) do (
if "%%~xi" equ ".jpg" (set n=jpg&&goto next)
if "%%~xi" equ ".png" (set n=png&&goto next)
goto error
)
:next
for %%i in (%Path2%) do (
if "%%~xi" equ ".zip" (goto start)
if "%%~xi" equ ".rar" (goto start)
goto error
)
:start
copy /b %Path1%+%Path2% 合并.%n% >nul
echo 合并完成&pause&goto select
:select
choice /t 15 /m "再来一次y,退出n,15秒后自动退出" /d n
if %errorlevel% equ 1 (goto again)
if %errorlevel% equ 2 (exit)
:error
echo 扩展名错误,请重新尝试&pause&exit
2020年04月09日 14点04分 5
我写的不行吗?这么久都没人评论[泪]
2020年04月10日 03点04分
level 13
关注Bat语言和Bat吧这么久了,我还是一点也不会...
2020年04月16日 15点04分 6
1