PowerShell/Scripts/play-m3u.ps1
2021-08-29 17:50:03 +02:00

49 lines
1.4 KiB
PowerShell
Executable File
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

<#
.SYNOPSIS
play-m3u.ps1 [<playlist-file>]
.DESCRIPTION
Plays the given playlist (in .M3U file format).
.EXAMPLE
PS> .\play-m3u.ps1 C:\MyPlaylist.m3u
.NOTES
Author: Markus Fleschutz · License: CC0
.LINK
https://github.com/fleschutz/PowerShell
#>
param([string]$Filename = "")
try {
if ($Filename -eq "" ) { $Filename = read-host "Enter the M3U playlist filename" }
if (-not(test-path "$Filename" -pathType leaf)) { throw "Can't access playlist file: $Filename" }
$Lines = get-content $Filename
add-type -assemblyName presentationCore
$MediaPlayer = new-object system.windows.media.mediaplayer
for ([int]$i=0; $i -lt $Lines.Count; $i++) {
$Line = $Lines[$i]
if ($Line[0] -eq "#") { continue }
if (-not(test-path "$Line" -pathType leaf)) { throw "Can't access audio file: $Line" }
$FullPath = (get-childItem "$Line").fullname
$Filename = (get-item "$FullPath").name
do {
$MediaPlayer.open("$FullPath")
$Milliseconds = $MediaPlayer.NaturalDuration.TimeSpan.TotalMilliseconds
} until ($Milliseconds)
[int]$Minutes = $Milliseconds / 60000
[int]$Seconds = ($Milliseconds / 1000) % 60
"Playing 🎵$Filename ($($Minutes.ToString('00')):$($Seconds.ToString('00'))) ..."
$MediaPlayer.Volume = 1
$MediaPlayer.play()
start-sleep -milliseconds $Milliseconds
$MediaPlayer.stop()
$MediaPlayer.close()
}
exit 0
} catch {
write-error "⚠️ Error in line $($_.InvocationInfo.ScriptLineNumber): $($Error[0])"
exit 1
}