Software for USB-UIRT

[mjbeam]

I downloaded the Girder trial but that application is really overkill for what I need. I just need to be able to send the 0-9 digits and the OK button from my remote to change the channels on my DirecTV box. Isnt there a simple application around that will allow me to record these signals from my remote and play them back with a script?

Thanks...Mike

[Guest]

Well, I found a nice easy solution.

I have a Hauppauge WinTV-USB2 connected to my cable box. I use the TitanTV listings which when you click on a show will create a scheduled Windows Task that will start up the WinTV2K.EXE program at the appropriate time and record the show. It passes the channel information to WinTV2K but WinTV2K has no way to change the channel on my box. I just needed a way to change the channel on my satelite set top box before the WinTV2K application starts.

Jon sent me the API proramming examples. I used the VB6 example to get the raw UIRT signals for the 0-9 and OK keys.

Then I modified the example program putting a few lines of code in the Form_Load event. I renamed the WinTV2K.EXE file to WinTV2K_HP.EXE and saved my app as WinTV2K.EXE. Now the task manager starts my app, my app parses out the channel info from the command$, changes the channel, then starts the now renamed WinTV2K_HP.EXE application and passes the original command$ to it, then terminates itself

Took all of 30 minutes to throw together and works great.

Thanks a lot Jon.


-Mike

[strabemus]

i need the same thing. is what you have re-distributable?

[mjbeam]

I added the following code at the end of the Load event for frmMain.

Code: Select all

    Dim l, m, n As Integer
    Dim mychannel
    Dim ircode As String
    Dim mytime
   
    mychannel = Mid$(Command$, InStr(Command$, "-c") + 2)
    mychannel = Left(mychannel, InStr(mychannel, " ") - 1)
    If Len(mychannel) < 3 Then mychannel = "0" & mychannel
    If Len(mychannel) < 3 Then mychannel = "0" & mychannel
   
    For l = 1 To 3
        m = Mid(mychannel, l, 1)
        Select Case m
            Case "0"
                ircode = Key_0
            Case "1"
                ircode = Key_1
            Case "2"
                ircode = Key_2
            Case "3"
                ircode = Key_3
            Case "4"
                ircode = Key_4
            Case "5"
                ircode = Key_5
            Case "6"
                ircode = Key_6
            Case "7"
                ircode = Key_7
            Case "8"
                ircode = Key_8
            Case "9"
                ircode = Key_9
        End Select

        SendCode ircode
       
        For n = 1 To 2
            mytime = Time
            Do
                DoEvents
            Loop Until Time <> mytime
        Next n
       
    Next l

    For n = 1 To 2
        mytime = Time
        Do
            DoEvents
        Loop Until Time <> mytime
    Next n

    SendCode Key_OK
   
    Shell "c:\program files\wintv\wintv2k_hp.exe " & Command$ & " -exitr"

    End


And these public constants were added to the Module in the general declarations section:

Code: Select all

Public Const Key_0 = "F40R0392815880AE1516151615161516151615161516151615161516151615161543151615161417151615161542154215161516151615161543154215161516154215431542154315|074D81595515"
Public Const Key_1 = "F40R0392815880AD1515151615161516151615161516151615161516151615161542151615161416154215421516151615161515151615161516151615421542154215421542154215|074D81585515"
Public Const Key_2 = "F40R0392815780AD1515151615161516151615161516151615161516151615161542151615161516151615161542151614161516151615161542154215161542154215421542154215|074D81585515"
Public Const Key_3 = "F40R0392815880AE1516151615161516151615161516151615161516151615161543151615161516154215161542151615161516151615161516154315161543154215431542154215|074D81595515"
Public Const Key_4 = "F40R0392815880AE1516151615161516151615161516151615161516151615161543151615161516151615431542151615161516151615161542151615161543154215431542154215|074D81595515"
Public Const Key_5 = "F40R0392815880AE1516151615161516151615161516151615161516151615161543151615161417154215431542151615161516151615161516151615161543154215431542154215|074D81595515"
Public Const Key_6 = "F40R0392815880AE1516151615161516151615161516151615161516151615161543151615161516151615161516154215161516151615161542154215421516154215421542154315|074D81585515"
Public Const Key_7 = "F40R0392815880AE1516151615161516151615161516151615161516151615161542151615161416154215161516154215161516151615161516154315421516154215431542154215|074D81585515"
Public Const Key_8 = "F40R0392815880AE1516151615161516151615161516151615161516151615161543151615161516151615421516154215161516151615161542151615421516154215421542154315|074D81585515"
Public Const Key_9 = "F40R0392815880AE1516151615161516151615161516151615161516151615161543151615161416154215431516154215161516151615161516151615421516154215431542154215|074D81585515"
Public Const Key_OK = "F40R0392815980AD1516151615161516151615161516151615161516151615161542151615161516154315421516151615421516151615161516151615431542151715421543154215|074D81595615"


These codes were retrived from my remote from within the example application before I modified it.

You will need to have Visual Basic 6 to compile the code.


-Mike

[Guest]

Xlobby works excellent with usb-uirt. I suggest you check it out at www.xlobby.com.

[Jehr]

I am installing the UIRT for the first time. I would like to be able to program the HTPC to open a couple of different programs on a command by a universal remote, and then perform basic functions like play, stop, next, back, left, right, up, down, and enter. that's really about all I need. I know Girder will do this, but before I begin experimenting with Girder, I was wondering if there were any other recommendations as to what might be the most user-friendly software out there to do what I need?