0

Which roku remote can control the HD2000?

khayman281

April 01, 2009 00:20

None

Follow

I have an HD2000, and I'm trying to write a script to start and stop a video using an IR remote. I plan on using a logitech harmony remote 880 to control it, and won't be getting the Roku remote compatible with the HD2000. On Roku's website, it says that the soundbridge remote will work. Which one though? THe R1000 or M1001? Logitech seems to have codes for both, (and it seems to also recognize the HD-600) but none of the commands work. I could be incorrect on my scripting, but I wanted to rule out the possibility of having incorrect remote codes. Can someone give me a hand?

• Facebook
• Twitter
• LinkedIn

3 comments

• 0
  
  RokuLyndon April 01, 2009 00:47

  
  
  Either should work. I use both with no problems.  Can you post your script or the part that accepts commands?
  
• 0
  
  khayman281 April 01, 2009 00:58

  
  
  Here yo go:
  
  
  
  p = CreateObject("roMessagePort")
  
  remote = CreateObject("roIRRemote")
  
  remote.SetPort(p)
  
  video = CreateObject("roVideoPlayer")
  
  video.SetPort(p)
  
  vmde = CreateObject("roVideoMode")
  
  ok = vmde.SetMode("1280x720x60p")
  
  
  
  REM *********************************
  
  REM IR Remote Defines
  
  REM *********************************
  
  media_end=8 'value returned when a video stops playing
  
  play=9 '9 is returned when you press the play button
  
  stop_video=12 '12 is returned when you press the pause button
  
  
  
  wait_for_play:
  
  msg = wait(0, p)
  
  
  
  REM Checking if event received is a remote button press REM
  
  
  
  if type(msg) = "roIRRemotePress" then
  
  if debug print "Button pressed: ";msg.GetInt()
  
  if msg.GetInt() = play
  
  if debug print "Play pressed!"
  
  play_demo 'playing video
  
  endif
  
  else if type(msg) = "roVideoEvent" then
  
  if msg.GetInt() = media_end attract_loop endif
  
  
  
  goto wait_for_play
  
  
  
  
  
  play_demo:
  
  sw.SetOutputState(17,led_off)
  
  ok=video.Stop()
  
  video.SetLoopMode(0)
  
  ok=video.PlayFile("\hello.mpg")
  
  goto wait_for_play
  
• 0
  
  RokuLyndon April 01, 2009 03:31

  
  
  I indented this section a little to make it easier to read..
  
  
  
  Play_demo was missing the "goto"
  
  And, if msg.GetInt() = play was missing the "then"
  
  
  
  if type(msg) = "roIRRemotePress" then
  
    if debug print "Button pressed: ";msg.GetInt()
  
    if msg.GetInt() = play then
  
       if debug print "Play pressed!"
  
       goto play_demo 'playing video
  
    endif
  
  else if type(msg) = "roVideoEvent" then
  
    if msg.GetInt() = media_end attract_loop
  
  endif