[Maza Faka]

А как можно проиграть плейлист? Никак не получается, проигрывается первый трэк и скрипт завершается, кому не лень, гляньте плз.

Код:

#include <GUIConstants.au3>
$file = ""
GUICreate("Player", 300, 200, -1, -1, -1)
GUISetIcon(@ProgramFilesDir & "\Winamp\winamp.exe", 0)
GUICtrlCreateLabel("Simple player", 100, 5, 100, 15, -1)

;Progress
;$progress = GUICtrlCreateProgress(90, 25, 150, 15)
;GUICtrlSetLimit($progress, 100, 0)
;GUICtrlSetData($progress, 90)

;Menu
$menu = GUICtrlCreateMenu("File", -1)
$playlist = GUICtrlCreateMenuItem("Open playlist", $menu)
GUICtrlCreateMenuItem("", $menu)
$quit = GUICtrlCreateMenuItem("Quit", $menu)

;Button
$play = GUICtrlCreateButton("Play", 10, 115, 60)
$open = GUICtrlCreateButton("Open", 10, 10, 60)

;Slider
$slider = GUICtrlCreateSlider(83, 115, 100, 30, -1)
GUICtrlSetLimit($slider, 100, 0)
GuiCtrlSetData($slider, 100)

GUISetState()

While 1
    $msg = GUIGetMsg()
    Select
        Case $msg = $open
        $file = FileOpenDialog("Add selected file", "", "Sound files (*.mp3)", 1)
        If @error = 0 Then SoundPlay($file, 0)
        Case $msg = $play
            If Not $file = "" Then
                SoundPlay($file, 0)
            Else
                MsgBox(64, "Error", "Please open file")
            EndIf
        Case $msg = $slider
            $Read_slider = GUICtrlRead($slider)
            SoundSetWaveVolume($Read_slider)
        Case $msg = $Gui_Event_Close
            ExitLoop
        Case $msg = $quit
            Exit
            Case $msg = $playlist
            $list = FileOpenDialog("Add playlist", "", "Playlist (*.m3u)", 1)
            $mp3_list = FileOpen($list, 0)
            Prepare($mp3_list)
            FileClose($mp3_list)
        EndSelect
    WEnd

    Func Prepare($list)
    While 1
        $music = FileReadLine($mp3_list)
        If @error <> 0 Then ExitLoop
            Play($music)
    WEnd
EndFunc

Func Play($music)
    SoundPlay($music, 0)
EndFunc

Плейлист имеете такой формат:
\\ws10\d\Music\Scorpions\Scorpions - Destin.mp3
\\ws10\d\Music\Scorpions\SCORPIONS - EYE TO EYE.mp3
\\ws10\d\Music\Scorpions\Scorpions - Holiday.mp3