Reply to thread

Message

<blockquote data-quote="JDWestoby" data-source="post: 696961" data-attributes="member: 72093">Hows this code and 8 seconds of radio! [shock!]Still trying.......&lt;grin&gt;OK, now [in a plugin] have it playing for 8 seconds -using the following code!Bit weird as I need a copy/instance of 'Radio' [myRadio] so that I can call the Process() method, but it is invoked using the singleton TVHome! TVHome doesn't have a callable Process and g_player gives all sorts of problems so I'm doing something wrong.I can't believe it is this involved, all I'd like to do is call a method [TVHome.Play(&quot;BBC Radio 2&quot;)] and an equivalent stop [TVHome.Stop() maybe].&nbsp; &nbsp; &nbsp; &nbsp; Private Sub OnButtonX()&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myRunning = Not (myRunning) 'toggle the thread flag&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; If (myRunning) Then&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myRadio = New Radio&nbsp; &nbsp;&nbsp; 'get the radio instance&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Dim l As TvBusinessLayer = New TvBusinessLayer()&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Dim c As Channel = l.GetChannelByName(&quot;BBC Radio 2&quot;)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; TVHome.ViewChannel(c)&nbsp; 'tune the radio&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 'now make a thread to keep things going&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myMediaThread = New System.Threading.Thread(AddressOf MediaThreadMethod)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myMediaThread.IsBackground = True&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myMediaThread.Start()&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Else&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; 'stop the radio - ignore this for the moment!&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End If&nbsp; &nbsp; &nbsp; &nbsp; End Sub&nbsp; &nbsp; &nbsp;&nbsp; Public Sub MediaThreadMethod()&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Dim p As Integer = 0&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; While (MPClockPlugin.myRunning)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; If (Not (myRadio Is Nothing)) Then&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; myRadio.Process()&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; RemoteControl.Instance.HeartBeat(TVHome.Card().User)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Thread.Sleep(1000)&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End If&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; If (5 &lt;= p) Then p = 0 Else p = p + 1&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; End While&nbsp; &nbsp; &nbsp; &nbsp; End SubThe heartbeat doesn't seem to do anything - works for 8 seconds with or without. I did have the thread Process and HeartBeat on a five second boundary, as seen in the existing code [ if (p = 5) then ...], but that didin't do much either.One odd thing is that the media counter goes to 8 (or sometimes 9) and then back to zero - repeating. But no sound after the first 8 seconds.And in case I get called lazy for not reading the source - I have many, many times! in fact literally I have tried to get this to play using more than 100 different attempts. I have spent days on this.I'm waiting for VisualStudio 2005 (currently using 2003) &gt;just&lt; so I can build my own TV library function as mentioned above!So MediaPortal is causing me to spend serious cash too - ach well.....!</blockquote>

[QUOTE="JDWestoby, post: 696961, member: 72093"] [b]Hows this code and 8 seconds of radio! [shock!][/b] Still trying.......<grin> OK, now [in a plugin] have it playing for 8 seconds -using the following code! Bit weird as I need a copy/instance of 'Radio' [myRadio] so that I can call the Process() method, but it is invoked using the singleton TVHome! TVHome doesn't have a callable Process and g_player gives all sorts of problems so I'm doing something wrong. I can't believe it is this involved, all I'd like to do is call a method [TVHome.Play("BBC Radio 2")] and an equivalent stop [TVHome.Stop() maybe]. Private Sub OnButtonX() myRunning = Not (myRunning) 'toggle the thread flag If (myRunning) Then myRadio = New Radio 'get the radio instance Dim l As TvBusinessLayer = New TvBusinessLayer() Dim c As Channel = l.GetChannelByName("BBC Radio 2") TVHome.ViewChannel(c) 'tune the radio 'now make a thread to keep things going myMediaThread = New System.Threading.Thread(AddressOf MediaThreadMethod) myMediaThread.IsBackground = True myMediaThread.Start() Else 'stop the radio - ignore this for the moment! End If End Sub Public Sub MediaThreadMethod() Dim p As Integer = 0 While (MPClockPlugin.myRunning) If (Not (myRadio Is Nothing)) Then myRadio.Process() RemoteControl.Instance.HeartBeat(TVHome.Card().User) Thread.Sleep(1000) End If If (5 <= p) Then p = 0 Else p = p + 1 End While End Sub The heartbeat doesn't seem to do anything - works for 8 seconds with or without. I did have the thread Process and HeartBeat on a five second boundary, as seen in the existing code [ if (p = 5) then ...], but that didin't do much either. One odd thing is that the media counter goes to 8 (or sometimes 9) and then back to zero - repeating. But no sound after the first 8 seconds. And in case I get called lazy for not reading the source - I have many, many times! in fact literally I have tried to get this to play using more than 100 different attempts. I have spent days on this. I'm waiting for VisualStudio 2005 (currently using 2003) >just< so I can build my own TV library function as mentioned above! So MediaPortal is causing me to spend serious cash too - ach well.....! [/QUOTE]

Verification