MP3Car.com - View Single Post - Freecom DVB-T USB2 stick

Rmack · 03-26-2006, 03:57 PM

If you are lucky you stick suports BDA (Broadcast Driver Architecture)

If it does

You could try the TV plug in for WINAMP
http://www.tv-plugin.com/index.php?id=5,0,0,1,0,0

or try a making a VB Script (Example is for Sydney Australia just change Bandwidth and carrierFrequency)

'(Paste below into notepad and save as 'test.hta')

<html>
<title>TV Tunner</title>

<HTA:APPLICATION ID="TVTest">

<head><body>

<OBJECT ID="MSVidCtl" CLASSID="CLSID:B0EDF163-910A-11D2-B632-00C04F79498E" WIDTH="100%" HEIGHT="100%"></OBJECT>

</body></head>

<script language=vbscript>

Dim objTuner
Dim objTSContainer
Dim objTuningSpace
Dim objTuneRequest
Dim objLocator

Set objTSContainer = CreateObject("BDATuner.SystemTuningSpaces")
Set objTuningSpace = objTSContainer("DVB-T")
Set objTuneRequest = objTuningSpace.CreateTuneRequest
Set objLocator = CreateObject("BDATuner.DVBTLocator")

objLocator.Bandwidth = 7 ' Set for Bandwidth
objLocator.CarrierFrequency = 226500 ' Frequency of tv station (Hard Coded to abc hd Sydney)
objTuneRequest.Locator = objLocator

MSVidCtl.MaintainAspectRatio = "False"
MSVidCtl.View objTuneRequest
MSVidCtl.Run

</Script>
</html>

edit: To make it easier to read.

03-26-2006, 03:57 PM	#8
Rmack Newbie Join Date: Mar 2006 Posts: 2 My Photos: ()	If you are lucky you stick suports BDA (Broadcast Driver Architecture) If it does You could try the TV plug in for WINAMP http://www.tv-plugin.com/index.php?id=5,0,0,1,0,0 or try a making a VB Script (Example is for Sydney Australia just change Bandwidth and carrierFrequency) '(Paste below into notepad and save as 'test.hta') <html> <title>TV Tunner</title> <HTA:APPLICATION ID="TVTest"> <head><body> <OBJECT ID="MSVidCtl" CLASSID="CLSID:B0EDF163-910A-11D2-B632-00C04F79498E" WIDTH="100%" HEIGHT="100%"></OBJECT> </body></head> <script language=vbscript> Dim objTuner Dim objTSContainer Dim objTuningSpace Dim objTuneRequest Dim objLocator Set objTSContainer = CreateObject("BDATuner.SystemTuningSpaces") Set objTuningSpace = objTSContainer("DVB-T") Set objTuneRequest = objTuningSpace.CreateTuneRequest Set objLocator = CreateObject("BDATuner.DVBTLocator") objLocator.Bandwidth = 7 ' Set for Bandwidth objLocator.CarrierFrequency = 226500 ' Frequency of tv station (Hard Coded to abc hd Sydney) objTuneRequest.Locator = objLocator MSVidCtl.MaintainAspectRatio = "False" MSVidCtl.View objTuneRequest MSVidCtl.Run </Script> </html> edit: To make it easier to read. Last edited by Rmack; 03-27-2006 at 04:43 AM.