zaqmlp

@echo off
set info=互助互利,支付宝扫码头像,感谢赞助
rem 有问题,可加QQ956535081及时沟通
rem 把convert.exe、potrace.exe跟bat放一起
title %info%
start mshta VBScript:Execute("msgbox(""%info%""):close")
cd /d "%~dp0"
for /f "delims=" %%a in ('dir /a-d/b/s *.png') do (
    convert.exe "%%a" "%%~dpna.pnm"
    potrace.exe "%%~dpna.pnm" -s -o "%%~dpna.svg"
    del "%%~dpna.pnm"
)
pause
复制代码