Radio hören ?

    Hallo Leute ich habe eine frage wie ist es denn möglich mit autoit eine INternetradio zu hören der öfnnet es bei mir irgendwie nicht der script ist nicht von mir ich habe ihn hier im forum gefunden und eig. nur ein Hintergrundbild eingebaut ^^


    ich poste ihn mal vielleicht findet ihr ja den fehler ^^

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <Sound.au3>
    #include <WindowsConstants.au3>
    #include <StaticConstants.au3>
    #NoTrayIcon

    [/autoit] [autoit][/autoit] [autoit]

    opt("guioneventmode",1)
    $Form1 = GUICreate("M-T Radio Programm", 205, 140, -1, -1,$WS_Popup)
    $Button1 = GUICtrlCreateButton("Stop", 5, 40, 80, 30, 0)
    GUICtrlSetOnEvent(-1,"stop")
    $Button2 = GUICtrlCreateButton("Play", 5, 5, 80, 30, 0)
    guictrlsetonevent(-1,"Play")
    $Button3 = GUICtrlCreateButton("Pause", 120, 5, 80, 30, 0)
    guictrlsetonevent(-1,"Pause")
    $Button4 = GUICtrlCreateButton("Resume", 120, 40, 80, 30, 0)
    guictrlsetonevent(-1,"Resume")
    guisetonevent($GUI_EVENT_CLOSE,"_exit")
    GUICtrlSetState($Button1, $GUI_DISABLE)
    GUICtrlSetState($Button3, $GUI_DISABLE)
    GUICtrlSetState($Button4, $GUI_DISABLE)
    $Pic2 = GUICtrlCreatePic(".\Close.jpg",170, 105, 30, 30, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))
    guictrlsetonevent(-1,"_exit2")
    $Pic1 = GUICtrlCreatePic(".\BG.jpg", 0, 0, 205, 140, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS,$WS_Disabled))
    GUICtrlCreateLabel("",0,0,205,140,0,$GUI_WS_EX_PARENTDRAG)
    GUICtrlSetBkColor(-1,$GUI_BKCOLOR_TRANSPARENT)
    GUISetState(@SW_SHOW)

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    wend

    [/autoit] [autoit][/autoit] [autoit]

    func play()
    $choosefile=fileopendialog("Choose a sound",@mydocumentsdir,"Musik(*.pls)")
    global $sound=_soundopen($choosefile)
    global $play=_SoundPlay($sound)
    endfunc

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    func stop()
    _soundstop($sound)
    GUICtrlSetState($Button3, $GUI_DISABLE)
    GUICtrlSetState($Button4, $GUI_DISABLE)
    GUICtrlSetState($Button1, $GUI_DISABLE)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    func _exit()
    _soundclose($sound)
    exit
    endfunc
    func _exit2()
    exit
    endfunc

    [/autoit] [autoit][/autoit] [autoit]

    func resume()
    _soundresume($sound)
    GUICtrlSetState($Button3, $GUI_enable)
    GUICtrlSetState($Button4, $GUI_DISABLE)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    func pause()
    _SoundPause($sound)
    GUICtrlSetState($Button4, $GUI_Enable)
    GUICtrlSetState($Button3, $GUI_DISABLE)
    endfunc

    [/autoit]


    MFG Eistee

    schön das dir meine vorarbeit gefällt doch das is nur für lieder auf deinem pc du müsstest dir ne internet adresse besorgen und es dann warscheinlich mit ienavigate holen dann würde es sich abspielen lassen .... frag doch deepred er hat ein ganz gutes gemacht ....

    oh dein script ? tolle arbeit sithlord aber genau das ist mein problem es geht dabei um mein eigenes internetradio da ist kein integrierter player oder sowas es läuft über winamp shoutcast und ich möchte einen player machen mit eigener gui und so weiter wo man halt nur dieses radio hören kann
    gibt es denn nicht irgendeine möglichkeit eine listen.pls datei (radio stream datei) mit dieser oder einer ähnlichen konfiguration abzuspielen ?


    P.S. ich hoffe das es in ordnung ist wen ich deinen script als ausgangspunkt benutze und das du mir nicht sauer bist das ich nicht gleich gefragt habe aber es soll ja auch nur für mich sein da ging ich davon aus das es nicht stört

    MFG Eistee