In diesem Thread wird kein Donwload mehr zur verfügung gestellt.
Bitte Kritik und Co. in diesem Thread:https://autoit.de/index.php?page=Thread&postID=121729
Und fals ein Mod das hier liest könnte er den Thread bitte löschen?
Gruß Roggazzz
In diesem Thread wird kein Donwload mehr zur verfügung gestellt.
Bitte Kritik und Co. in diesem Thread:https://autoit.de/index.php?page=Thread&postID=121729
Und fals ein Mod das hier liest könnte er den Thread bitte löschen?
Gruß Roggazzz
Cool, und wo gibts die anderen Kanäle ?
welche anderen? meinst du
Tennis TV, BahnTV und Deluxe Music?
Die werden durch einen Link gestreamt
schau mal im Skript bei z.B. Deluxe Music:
$oWMP.url = ("mms://ha-lb01.cdn.eviscomedia.com/deluxemusictv_video")
[/autoit]
Gruß Roggazzz
Achso ok
Aber ist das nicht illegal ?
wieso sollte es illegal sein? die verschiedenen Sender bieten diese Livesteam ja offiziel an als .asx(Datei für Windows Media Player zum Abspielen) oder in einem Link format und mein Programm ist sogesehen nur ein Windows Media Player Embedded das die dateien abspielt.
also ich finde das ne gute Idee, mach weiter so
habe die GUI etwas an Game TV Angepasst, verbessertes SKript sowie die Exe im Ersten post.
ich find dein Programm sch****
Weil ich schon seit 2 Stunden Game.TV gugge
nein richtig hammer, echt^^
Groooßes Lob^^
hm habe grade was ausprobiert und es geht ... nimm doch einfach Livestreams von "mega-stream.us" da habe ich Nick gefunden und per _IECreateEmbeeded reingemacht
also dein script schaut bei mir so aus :
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiStatusBar.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
Global $Form2
$oWMP = ObjCreate("WMPlayer.OCX")
$oIE=_IECreateEmbedded()
#Region ### START Koda GUI section ### Form=
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("MyOnlineTelevision", 779, 513, 192, 154)
$Button1 = GUICtrlCreateButton("N-TV", 696, 40, 75, 17)
$Button2 = GUICtrlCreateButton("Stoppen", 236, 464, 75, 25)
$Button3 = GUICtrlCreateButton("Starten", 340, 464, 75, 25)
$Button4 = GUICtrlCreateButton("KI.KA", 696, 64, 75, 17)
$Button5 = GUICtrlCreateButton("Game TV", 696, 88, 75, 17)
$Button6 = GUICtrlCreateButton("Bahn TV", 696, 112, 75, 17)
$Button7 = GUICtrlCreateButton("Tennis TV", 696, 136, 75, 17)
$Button8 = GUICtrlCreateButton("Deluxe Music", 696, 160, 75, 17)
$Button9 = GUICtrlCreateButton("Nick", 696, 184, 75, 17, 0)
$Button10 = GUICtrlCreateButton("Nicht belegt", 696, 208, 75, 17, 0)
$Button11 = GUICtrlCreateButton("Nicht belegt", 696, 232, 75, 17)
$Button12 = GUICtrlCreateButton("Vollbild Nick", 696, 256, 75, 17)
$Slider1 = GUICtrlCreateSlider(8, 454, 222, 29)
$Label1 = GUICtrlCreateLabel("Lautstärke", 16, 436, 54, 17)
GUICtrlSetData($Slider1,100)
$wmp = GUICtrlCreateObj($oWMP, 8, 8, 680, 430)
$ie = GUICtrlCreateObj($oIE,8,8,680,430)
GUICtrlSetState($ie,@SW_HIDE)
GUISetState(@SW_SHOW)
With $oWMP
.URL = ("")
.fullScreen = True
.windowlessVideo = True
.stretchToFit = True
.enableContextMenu = True
;.enabled = True
.uiMode = "none"; none / mini full
.settings.autostart = True
.settings.mute = True
.settings.volume = 100; 0 - 100
.settings.Balance = 0; -100 to 100
EndWith
$StatusBar1 = _GUICtrlStatusBar_Create($Form1)
#EndRegion ### END Koda GUI section ###
Global $oMediaPlayControl = $oWMP.Controls
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
GUIDelete($Form2)
GUISetState(@SW_SHOW,$Form1)
Case $button12
GUISetState(@SW_HIDE,$Form1)
$oIE=_IECreateEmbedded()
$Form2 = GUICreate("MyOnlineTelevision", 1280, 1024, 0, 0)
$ie = GUICtrlCreateObj($oIE,0,0,1280,1024)
GUISetState(@SW_SHOW,$Form2)
_IENavigate($oIE,"http://cdn.livestream.com/grid/PlayerV2.swf?channel=SuperRTL&Fullscreen",0)
Case $Button9
GUICtrlSetState($wmp,@SW_HIDE)
GUICtrlSetState($ie,@SW_SHOW)
_GUICtrlStatusBar_SetText($StatusBar1,"Verbinde mit Mega-Stream.com")
If Ping("google.de")=0 Then
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung mit Mega-Stream.com Fehlgeschlagen")
Else
_IENavigate($oIE,"http://cdn.livestream.com/grid/PlayerV2.swf?channel=SuperRTL&Fullscreen",0)
EndIf
Case $Button8
_GUICtrlStatusBar_SetText($StatusBar1,"Verbine mit Deluxe Music...")
If Ping("google.de")=0 Then
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung mit Deluxe Music Fehlgeschlagen")
Else
$oWMP.url = ("mms://ha-lb01.cdn.eviscomedia.com/deluxemusictv_video")
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung wurde erfolgreich hergestellt")
endif
Case $Button7
_GUICtrlStatusBar_SetText($StatusBar1,"Verbine mit Tennis-TV...")
If Ping("google.de")=0 Then
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung mit Tennis-TV Fehlgeschlagen")
Else
$oWMP.url = ("mms://213.155.73.173/Speedup-TV_Tennis-TV_10")
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung wurde erfolgreich hergestellt")
endif
Case $Button6
_GUICtrlStatusBar_SetText($StatusBar1,"Verbine mit Bahn-TV...")
If Ping("google.de")=0 Then
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung mit Bahn-TV Fehlgeschlagen")
Else
$oWMP.url = ("mms://atkon-webcast1-700k.wm.llnwd.net/atkon_webcast1_700K")
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung wurde erfolgreich hergestellt")
endif
Case $Button5
_GUICtrlStatusBar_SetText($StatusBar1,"Verbine mit Game-TV...")
If Ping("google.de")=0 Then
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung mit Game-TV Fehlgeschlagen")
Else
$oWMP.url = (@ScriptDir&"\Sender\gametv.asx")
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung wurde erfolgreich hergestellt")
endif
Case $Button4
_GUICtrlStatusBar_SetText($StatusBar1,"Verbine mit KI.KA...")
If Ping("google.de")=0 Then
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung mit KI.KA Fehlgeschlagen")
Else
$oWMP.url = (@ScriptDir&"\Sender\kika.asx")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung wurde erfolgreich hergestellt")
endif
Case $Button2
$oMediaPlayControl.stop
Case $Button3
$oMediaPlayControl.play
Case $Button1
_GUICtrlStatusBar_SetText($StatusBar1,"Verbine mit N-TV...")
If Ping("google.de")=0 Then
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung mit N-TV Fehlgeschlagen")
Else
$oWMP.url = (@ScriptDir&"\Sender\ntv.asx")
_GUICtrlStatusBar_SetText($StatusBar1,"Verbindung wurde erfolgreich hergestellt")
endif
EndSwitch
$oWMP.settings.volume=GUiCtrlRead($Slider1)
WEnd
Hi danke für den Vorschlag aber das sind alles keine Live sender(NIck auch nicht)
ich habe mir nick gerade auf mega-strams.us angeschaut und gleichzeitig auf dem fernseher das ist unterschiedlich.
Trozdem Danke
ja auch grade gemerkt^^ aber hier leuft einer finde amer im quellcode den link ned
EDIT hab den link rausbekommen : http://www.justin.tv/widgets/live_e…f?channel=grg06
sehr geil
N24 lässt sich super einbinden
Ich denke Morgen werde ich auf wunsch von Sandmaenchen N24 einbinden und an Prosiebe versuche ich mich auch.
Gruß Roggazzz
Vielleicht wäre es sinnvoll ein etwas anderes Gui Konzept zu wählen.
z.B. ein Listview in dem alle Sender aufgelistet werden.
Dazu den Ordner mit den .asx Dateien und eine .txt für die Direktlinks.
So kann jeder einfach neue Links einfügen und du musst nicht mit den Buttons darauf reagieren.
Ich hab auch mal ein "IP-View" Programm gecodet. Hab da noch so ein paar Sender für dich, wenn du sie mit in dein Programm einbauen möchtest kannste es gern machen
9Live=http://livestream.9live.de/ps9live-live/ps9live1
Astro Line TV=mms://85.214.87.175/camorakel/
Donau TV=mms://80.190.139.66/11008bmt/live/3338s04donautv/300.wmv?cid=60535&dummy=.wmv
Flott Tv=http://www.flott-tv.de/reginalfernsehen/FLOTT_DSL.wmv
Game Tv=mms://195.182.58.55/gametv1
IT News=http://sirocool.si.funpic.de/i.TV/TV%20Sender/Deutschland/IT%20News.asx
Kanal 1=http://www.vm-deutschland.de/vaccount/_kanal1/videos/zeitnah_aktuell.wmv
Kika=http://apps.nc3.de/clients/kika/player/myplaylist.php?channel=1&programm=1&videoshow=&video=1&ppid=
Massive Mag=mms://stream01.massive-mag.tv/massivemag_mq
München TV=mms://d8019013966.w.glx.core006.cdn.streamfarm.net/11008bmt/live/3338s15muenchentv/300.wmv?cid=60919&dummy=.wmv
Noa4=mms://wt-wm1.wtnet.de/noa4-stream
Oberfranken TV=mms://80.190.139.66/11008bmt/live/3338s05tvoberfranken/300.wmv?cid=60441&dummy=.wmv
Oberpfalz TV=mms://80.190.139.66/11008bmt/live/3338s01oberpfalztv/300.wmv?cid=60534&dummy=.wmv
Phoenix=mms://live.msmedia.zdf.newmedia.nacamar.net/zdf/phoenix_vh.wmv
Rhein Main=mms://rheinmaintv-livestream.de/rmtv-livestream
SpeedUp TV=http://www.speedup-tv.com/act_stream.aspx?sender_id=1&OBT_fname=act_stream.htm
Streetclip TV=mms://85.214.76.233:1234
TV Aktuell=mms://80.190.139.66/11008bmt/live/3338s13tvaostbayern/300.wmv?cid=60737&dummy=.wmv
XX Home=http://mfile.akamai.com/53957/live/reflector:36565.asx?bkup=36560&prop=e
ZDF=http://wstreaming.zdf.de/encoder/livestream6_h.asx
Gute arbeit für einen 12 Jährigen! Bravo, weiter so!
Btw, meine Tochter ist genauso am 1.8.97 geboren!
UEZ