all repos — fast-scripts @ 91ad877b609c1970114b901276fa63385f9c37cc

scripts que podem ser uteis para meu dia a dia

Vídeos/baixar-videos.cmd (view raw)

 1
 2
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
 100
 101
 102
 103
 104
 105
 106
 107
 108
 109
 110
 111
 112
 113
 114
 115
 116
 117
 118
 119
 120
 121
 122
 123
 124
 125
 126
 127
 128
 129
 130
 131
 132
 133
 134
 135
 136
 137
 138
 139
 140
 141
 142
 143
 144
 145
 146
 147
 148
 149
 150
 151
 152
 153
 154
 155
 156
 157
 158
 159
 160
 161
 162
 163
 164
 165
 166
 167
 168
 169
 170
 171
 172
 173
 174
 175
 176
 177
 178
 179
 180
 181
 182
 183
 184
 185
 186
 187
 188
 189
 190
 191
 192
<# :
@echo off
powershell -NoLogo -NoProfile -ExecutionPolicy Bypass -Command "Invoke-Expression ([System.IO.File]::ReadAllText('%~f0',[System.Text.Encoding]::UTF8))"
exit /b %errorlevel%
#>

# ============================================================
#  Baixar Vídeos - download de vídeos/áudio (yt-dlp)
#  Baixa de YouTube, Instagram, TikTok, X, Vimeo e +1000 sites
#  Desenvolvido por Pablo Murad - 2026
# ============================================================

try { [Console]::OutputEncoding = [System.Text.Encoding]::UTF8 } catch {}
try { $Host.UI.RawUI.WindowTitle = 'Baixar Vídeos' } catch {}

function Pausar { Write-Host ''; Write-Host 'Pressione Enter para fechar...' -ForegroundColor DarkGray; [void][System.Console]::ReadLine() }
function Titulo($t) {
    Write-Host ''
    Write-Host '============================================================' -ForegroundColor DarkCyan
    Write-Host "  $t" -ForegroundColor Cyan
    Write-Host '============================================================' -ForegroundColor DarkCyan
}

$configDir  = Join-Path $env:APPDATA 'BaixarVideos'
$configFile = Join-Path $configDir 'config.json'
function Carregar-Config { if (Test-Path -LiteralPath $configFile) { try { return Get-Content -LiteralPath $configFile -Raw -Encoding UTF8 | ConvertFrom-Json } catch {} }; return $null }
function Salvar-Config($o) { try { New-Item -ItemType Directory -Path $configDir -Force | Out-Null; $o | ConvertTo-Json | Set-Content -LiteralPath $configFile -Encoding UTF8 } catch {} }

# Perfis de qualidade / formato
$perfis = @(
    [pscustomobject]@{ Id=1; Nome='Melhor qualidade (resolução máxima)'; Tipo='video'; Altura=0 },
    [pscustomobject]@{ Id=2; Nome='1080p (Full HD)';                      Tipo='video'; Altura=1080 },
    [pscustomobject]@{ Id=3; Nome='720p (HD)';                            Tipo='video'; Altura=720 },
    [pscustomobject]@{ Id=4; Nome='480p';                                 Tipo='video'; Altura=480 },
    [pscustomobject]@{ Id=5; Nome='360p (compacto)';                      Tipo='video'; Altura=360 },
    [pscustomobject]@{ Id=6; Nome='Só áudio - MP3';                       Tipo='mp3';   Altura=0 },
    [pscustomobject]@{ Id=7; Nome='Só áudio - M4A';                       Tipo='m4a';   Altura=0 }
)

Titulo 'Baixar Vídeos'
Write-Host '  Desenvolvido por Pablo Murad - 2026' -ForegroundColor DarkGray
Write-Host ''
Write-Host 'Verificando o que é necessário...' -ForegroundColor Gray

# ------------------------------------------------------------
# 1) Localizar / baixar o yt-dlp (o baixador mais moderno)
# ------------------------------------------------------------
$localDir = Join-Path $env:LOCALAPPDATA 'fast-scripts'
$localExe = Join-Path $localDir 'yt-dlp.exe'
$ytdlp = $null
$cmd = Get-Command yt-dlp -ErrorAction SilentlyContinue
if ($cmd) { $ytdlp = $cmd.Source }
elseif (Test-Path -LiteralPath $localExe) { $ytdlp = $localExe }
else {
    Write-Host ''
    Write-Host 'yt-dlp não encontrado. Baixando a versão mais recente (site oficial)...' -ForegroundColor Yellow
    try {
        New-Item -ItemType Directory -Path $localDir -Force | Out-Null
        try { [Net.ServicePointManager]::SecurityProtocol = [Net.SecurityProtocolType]::Tls12 } catch {}
        $url = 'https://github.com/yt-dlp/yt-dlp/releases/latest/download/yt-dlp.exe'
        Invoke-WebRequest -Uri $url -OutFile $localExe -UseBasicParsing
        $ytdlp = $localExe
        Write-Host '[OK] yt-dlp baixado.' -ForegroundColor Green
    } catch {
        Write-Host "[ERRO] Não foi possível baixar o yt-dlp: $($_.Exception.Message)" -ForegroundColor Red
        Write-Host 'Verifique sua internet e tente de novo.' -ForegroundColor Yellow
        Pausar; exit 1
    }
}
Write-Host "[OK] yt-dlp: $ytdlp" -ForegroundColor Green

# Auto-atualiza SÓ a cópia que este programa baixou (não mexe numa instalação sua)
if ($ytdlp -eq $localExe) {
    $idadeDias = (New-TimeSpan -Start (Get-Item $localExe).LastWriteTime -End (Get-Date)).TotalDays
    if ($idadeDias -gt 15) {
        Write-Host 'Procurando atualização do yt-dlp...' -ForegroundColor Gray
        & $ytdlp -U 2>$null | Out-Null
    }
}

# ffmpeg (necessário p/ juntar vídeo+áudio de alta qualidade e converter áudio)
$ffmpeg = Get-Command ffmpeg -ErrorAction SilentlyContinue
$ffmpegDir = if ($ffmpeg) { Split-Path $ffmpeg.Source -Parent } else { $null }
if ($ffmpeg) { Write-Host "[OK] FFmpeg: $($ffmpeg.Source)" -ForegroundColor Green }
else { Write-Host '[!] FFmpeg não encontrado - alta qualidade e conversão de áudio podem falhar. Instale: winget install Gyan.FFmpeg' -ForegroundColor Yellow }

$config = Carregar-Config

# ------------------------------------------------------------
# 2) Link(s)
# ------------------------------------------------------------
$urls = @()
while ($urls.Count -eq 0) {
    Titulo 'Link do vídeo'
    Write-Host 'Cole o link (ou vários separados por espaço).' -ForegroundColor DarkGray
    Write-Host 'Funciona com YouTube, Instagram, TikTok, X, Vimeo, Facebook e +1000 sites.' -ForegroundColor DarkGray
    $resp = Read-Host 'Link'
    $urls = @($resp -split '\s+' | Where-Object { $_ -match '^https?://' })
    if ($urls.Count -eq 0) { Write-Host '[!] Cole um link válido (começando com http).' -ForegroundColor Yellow }
}

# ------------------------------------------------------------
# 3) Qualidade / formato
# ------------------------------------------------------------
$qPadrao = if ($config -and $config.UltimaQualidade) { [int]$config.UltimaQualidade } else { 1 }
Titulo 'Qualidade / formato'
foreach ($p in $perfis) {
    $m = if ($p.Id -eq $qPadrao) { '>' } else { ' ' }
    $c = if ($p.Id -eq $qPadrao) { 'White' } else { 'Gray' }
    Write-Host ("{0} [{1}] {2}" -f $m, $p.Id, $p.Nome) -ForegroundColor $c
}
Write-Host "Enter = usar a opção padrão [$qPadrao]" -ForegroundColor DarkGray
$perfil = $null
while (-not $perfil) {
    $e = Read-Host 'Qualidade (1-7)'; if ([string]::IsNullOrWhiteSpace($e)) { $e = "$qPadrao" }
    $perfil = $perfis | Where-Object { $_.Id -eq ($e -as [int]) } | Select-Object -First 1
    if (-not $perfil) { Write-Host '[!] Escolha de 1 a 7.' -ForegroundColor Yellow }
}

# ------------------------------------------------------------
# 4) Playlist?
# ------------------------------------------------------------
$plPadrao = if ($config -and $config.UltimaPlaylist) { "$($config.UltimaPlaylist)" } else { 'nao' }
Titulo 'Playlist'
Write-Host 'Se o link fizer parte de uma playlist, baixar a playlist INTEIRA?' -ForegroundColor Gray
$dicaPl = if ($plPadrao -eq 'sim') { '(Enter = SIM)' } else { '(Enter = NÃO)' }
$rpl = Read-Host "Baixar playlist inteira? (s/n) $dicaPl"
$playlist = if ([string]::IsNullOrWhiteSpace($rpl)) { $plPadrao -eq 'sim' } else { $rpl -match '^(s|sim|y|yes)$' }

# ------------------------------------------------------------
# 5) Pasta de saída (lembra a última; cria se não existir)
# ------------------------------------------------------------
$saidaPadrao = if ($config -and $config.UltimaSaida) { $config.UltimaSaida } else { Join-Path $env:USERPROFILE 'Downloads\Baixados' }
while ($true) {
    Titulo 'Pasta de saída'
    Write-Host "  $saidaPadrao" -ForegroundColor White
    Write-Host 'Enter = usar esta pasta   |   ou cole/digite outra' -ForegroundColor DarkGray
    $rsaida = Read-Host 'Pasta de saída'
    $destino = if ([string]::IsNullOrWhiteSpace($rsaida)) { $saidaPadrao } else { $rsaida.Trim().Trim('"') }
    try { New-Item -ItemType Directory -Path $destino -Force | Out-Null; break }
    catch { Write-Host '[!] Não foi possível criar/usar essa pasta.' -ForegroundColor Yellow }
}
$destino = (Resolve-Path -LiteralPath $destino).Path

Salvar-Config ([pscustomobject]@{ UltimaQualidade=$perfil.Id; UltimaPlaylist=$(if ($playlist) {'sim'} else {'nao'}); UltimaSaida=$destino })

# ------------------------------------------------------------
# 6) Monta os argumentos do yt-dlp
# ------------------------------------------------------------
switch ($perfil.Tipo) {
    'mp3' { $fmtArgs = @('-f','ba/b','-x','--audio-format','mp3','--audio-quality','0') }
    'm4a' { $fmtArgs = @('-f','ba/b','-x','--audio-format','m4a') }
    default {
        if ($perfil.Altura -eq 0) { $fmtArgs = @('-f','bv*+ba/b','--merge-output-format','mp4') }
        else { $fmtArgs = @('-f',"bv*[height<=$($perfil.Altura)]+ba/b[height<=$($perfil.Altura)]/b[height<=$($perfil.Altura)]",'--merge-output-format','mp4') }
    }
}

$ytArgs = @()
$ytArgs += $fmtArgs
$ytArgs += @('-o', (Join-Path $destino '%(title)s.%(ext)s'))
$ytArgs += @('--embed-metadata','--embed-thumbnail')     # título, capa, etc.
$ytArgs += @('--no-overwrites')                          # pula o que já foi baixado
$ytArgs += @('--concurrent-fragments','8')               # baixa varios pedacos de uma vez
# O aria2c baixa em muitas conexoes ao mesmo tempo: bem mais rapido quando existe.
$aria = Get-Command aria2c -ErrorAction SilentlyContinue
if ($aria) {
    Write-Host '[OK] aria2c encontrado: download acelerado ligado.' -ForegroundColor Green
    $ytArgs += @('--downloader','aria2c','--downloader-args','aria2c:-x16 -s16 -k1M')
}               # download mais rápido
$ytArgs += @('--ignore-errors')                          # em lote, continua se um falhar
$ytArgs += if ($playlist) { '--yes-playlist' } else { '--no-playlist' }
if ($ffmpegDir) { $ytArgs += @('--ffmpeg-location', $ffmpegDir) }

# ------------------------------------------------------------
# 7) Baixar
# ------------------------------------------------------------
Titulo 'Baixando'
Write-Host "Qualidade: $($perfil.Nome)"
Write-Host "Playlist:  $(if ($playlist) {'sim'} else {'não'})"
Write-Host "Destino:   $destino"
Write-Host "Links:     $($urls.Count)"
Write-Host ''

& $ytdlp @ytArgs @urls
$rc = $LASTEXITCODE

Titulo 'Concluído'
if ($rc -eq 0) { Write-Host '[OK] Download finalizado.' -ForegroundColor Green }
else { Write-Host "[!] Terminou com avisos/erros (código $rc). Alguns itens podem não ter baixado." -ForegroundColor Yellow }
Write-Host "Pasta: $destino"
Pausar