@echo off
chcp 65001 >nul
setlocal EnableExtensions DisableDelayedExpansion

echo 正在將影片分段標題轉換為繁體中文……
echo.

call :rename 1 "1.初次到店、左右耳保養與第一次付款制約♡"
call :rename 2 "2.特別項目解鎖♡ 舔耳、乳頭調教與鼠蹊部敏感開發♡"
call :rename 3 "3.只靠乳頭迎來初次射精♡ 乳頭調教與舔耳低語♡"
call :rename 4 "4.美玲的全面支配♡ 深吻、手交與貞操帶射精管理項目♡"
call :rename 5 "5.禁止射精語音訊息♡ 回家路上已經在聽了嗎♡哈哈"
call :rename 6 "6.射精許可付款♡ 龜頭調教讓敗犬潮吹♡"
call :rename 7 "7.錢包管理語音訊息♡ 一切都由美玲支配♡"
call :rename 8 "8.尾聲 深陷美玲泥沼再也逃不掉的敗犬♡"

echo.
echo 轉換完成。
pause
exit /b

:rename
set "part=%~1"
set "target=%~2"
for %%E in (.mp4 .mkv .mov .m4v .webm) do (
    if exist "%target%%%E" (
        echo [正常] %target%%%E
        goto :eof
    )
)
for %%E in (.mp4 .mkv .mov .m4v .webm) do (
    for %%F in ("%part%.*%%E") do (
        if exist "%%~fF" (
            ren "%%~fF" "%target%%%~xF"
            echo [已更名] %%~nxF
            echo       → %target%%%~xF
            goto :eof
        )
    )
)
echo [注意] 找不到第%part%部分的影片。
goto :eof
