Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @ECHO off
- TITLE Youtube-DL。
- :start
- CLS
- COLOR 8a
- ::使用COLOR命令对控制台输出颜色进行更改
- set tm1=%time:~0,2%
- set tm2=%time:~3,2%
- set tm3=%time:~6,2%
- ECHO %date% %tm1%点%tm2%分%tm3%秒
- ECHO =========================================
- call :getProprty Clipboard link
- set savePath="%user%Videos"
- ::savePath设置保存文件的地址
- cd %savePath%
- set proxy="127.0.0.1:1080"
- ::在上一行设置代理端口
- set cookie=" "
- ::在上一行设置cookie路径
- set mtime="--no-mtime"
- ::Do not copy the mtime
- set thumb="--write-thumbnail"
- ::Write thumbnail image to disk
- ECHO 当前下载地址为: %link%
- ECHO 当前保存路径为: %savePath%
- ECHO 当前饼干路径为: %cookie%
- ECHO 请选择要进行的操作.
- ECHO ───────────────
- ECHO 1. 使用代理
- ECHO 2. 查看格式
- ECHO 3. 直接下载
- ECHO 4. 尝试不加载Cookie
- ECHO 5. 尝试you-get
- ECHO 6. 更新
- ECHO 0. 刷新下载地址
- ECHO ───────────────
- ECHO.
- :cho
- CHOICE /C 12345670 /N /M 请选择:
- IF %ERRORLEVEL% EQU 1 GOTO SetProxy
- IF %ERRORLEVEL% EQU 2 GOTO Itag
- IF %ERRORLEVEL% EQU 3 GOTO Download
- IF %ERRORLEVEL% EQU 4 GOTO cho2
- IF %ERRORLEVEL% EQU 5 GOTO youget
- IF %ERRORLEVEL% EQU 6 GOTO upgrade
- IF %ERRORLEVEL% EQU 7 GOTO Player
- IF %ERRORLEVEL% EQU 0 GOTO start
- ECHO.
- GOTO start
- :upgrade
- upgradeytdl
- :youget
- youget
- :Player
- CLS
- ECHO
- youtube-dl --cookies %cookie% -o - "%link%" | vlc -
- ECHO.
- GOTO start
- :PlayerP
- CLS
- ECHO
- youtube-dl --cookies %cookie% --proxy %proxy% -o - "%link%" | vlc -
- ECHO.
- GOTO start
- :SetProxy
- CLS
- ECHO.
- ECHO ───────────────
- ECHO 1.选择格式后下载
- ECHO 2.直接下载youtube1080p
- ECHO 3.直接下载youtube音频
- ECHO 4.直接下载
- ECHO 0.返回主菜单
- ECHO ───────────────
- ECHO.
- CHOICE /C 123450 /N /M 请选择:
- IF %ERRORLEVEL% EQU 1 GOTO ItagProxy
- IF %ERRORLEVEL% EQU 2 GOTO Download1080p
- IF %ERRORLEVEL% EQU 3 GOTO DownloadMusic
- IF %ERRORLEVEL% EQU 4 GOTO DownloadProxy
- IF %ERRORLEVEL% EQU 5 GOTO PlayerP
- IF %ERRORLEVEL% EQU 0 GOTO start
- GOTO start
- :Itag
- CLS
- ECHO.
- youtube-dl -F "%link%"
- ECHO.
- SET ItagX=
- SET /P ItagX=选择:
- youtube-dl --cookies %cookie% -f %ItagX% %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :ItagProxy
- CLS
- ECHO.
- youtube-dl --proxy %proxy% --cookies %cookie% -F "%link%"
- ECHO.
- SET ItagX=
- SET /P ItagX=选择:
- youtube-dl --proxy %proxy% --cookies %cookie% -f %ItagX% %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :Download
- CLS
- ECHO.
- youtube-dl --cookies %cookie% %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :DownloadProxy
- CLS
- ECHO.
- youtube-dl --proxy %proxy% --cookies %cookie% %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :Download1080p
- CLS
- ECHO.
- youtube-dl --proxy %proxy% --cookies %cookie% -f 137+140 %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :DownloadMusic
- CLS
- ECHO.
- youtube-dl --proxy %proxy% --cookies %cookie% -f 251 %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :cho2
- CLS
- ECHO.
- ECHO ───────────────
- ECHO 1. 使用代理
- ECHO 2. 选择格式
- ECHO 3. 直接下载
- ECHO 0. 刷新下载地址
- ECHO ───────────────
- ECHO.
- CHOICE /C 1230 /N /M 请选择:
- IF %ERRORLEVEL% EQU 1 GOTO SetProxy2
- IF %ERRORLEVEL% EQU 2 GOTO Itag2
- IF %ERRORLEVEL% EQU 3 GOTO Download
- IF %ERRORLEVEL% EQU 0 GOTO start
- ECHO.
- GOTO cho2
- :SetProxy2
- CLS
- ECHO.
- ECHO ───────────────
- ECHO 1.选择格式后下载
- ECHO 2.直接下载youtube1080p
- ECHO 3.直接下载
- ECHO 0.返回主菜单
- ECHO ───────────────
- ECHO.
- CHOICE /C 1230 /N /M 请选择:
- IF %ERRORLEVEL% EQU 1 GOTO ItagProxy2
- IF %ERRORLEVEL% EQU 2 GOTO Download1080p2
- IF %ERRORLEVEL% EQU 3 GOTO DownloadProxy2
- IF %ERRORLEVEL% EQU 0 GOTO start
- GOTO SetProxy2
- :Itag2
- CLS
- ECHO.
- youtube-dl -F "%link%"
- ECHO.
- SET ItagX=
- SET /P ItagX=选择:
- youtube-dl -f %ItagX% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :ItagProxy2
- CLS
- ECHO.
- youtube-dl --proxy %proxy% -F "%link%"
- ECHO.
- SET ItagX=
- SET /P ItagX=选择:
- youtube-dl --proxy %proxy% -f %ItagX% %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :Download2
- CLS
- ECHO.
- youtube-dl %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :DownloadProxy2
- CLS
- ECHO.
- youtube-dl --proxy %proxy% %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :Download1080p2
- CLS
- ECHO.
- youtube-dl --proxy %proxy% -f 137+140 %mtime% %thumb% "%link%"
- ECHO 任意键返回菜单
- pause>nul
- GOTO start
- :getProprty
- set "_~_=%temp%\Spring"
- set "_$_=WScript.Echo .parentWindow."
- > "%_~_%" echo v = WScript.Arguments(0)
- >>"%_~_%" echo With CreateObject^("htmlfile"^)
- >>"%_~_%" echo If v = "Clipboard" Then %_$_%clipboardData.GetData^("text"^)
- >>"%_~_%" echo End With
- for /f "delims=" %%z in ('cscript -nologo -e:vbs "%_~_%" "%1"') do (
- if /i "%2"=="" (
- echo %%z
- ) else (
- set "%2=%%z"
- )
- )
- del "%_~_%" /q
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement