0

HD810 with EM100 to play AC3

rafael

June 16, 2011 18:53

None

Follow

Hi, I've got a HD810 with the EM100 expansion module ad i want to play several clips with embedded multichannel AC3 audio via the optical out of the EM100. I've added this script to my autorun.brs: p = CreateObject("roMessagePort") video = CreateObject("roVideoPlayer") video.SetPort(p) vm = CreateObject("roVideoMode") vm.SetMode ("1920x1080x50i") video.SetAudioOutput(3) video.SetAudioMode(0) video.MapDigitalOutput(0) video.SetVolume(100) But i can't get any audio out of the EM100, can somebody please help me? thanks in advance, Rafael

• Facebook
• Twitter
• LinkedIn

2 comments

• 0
  
  RokuLyndon June 17, 2011 04:38

  
  
  Where's the full script? It might be useful to see the whole thing.
  
• 0
  
  rafael June 17, 2011 16:33

  
  
  we want to play the clip after pressing a button. nothing works no video no audio
  this is the script
  
  v=createobject("roVideoPlayer")
  p=createobject("roMessagePort")
  v.SetPort(p)
  
  
  rem video mode
  mode=createobject("roVideoMode")
  mode.SetMode("720x576x25p")
  
  REM Settings
  v.SetAudioOutput(3)
  v.MapDigitalOutput(1) 'expander spdif
  goto start1
  
  listen:
  msg = wait(0,p)
  
  if type(msg) = "roVideoEvent" then
  if msg.GetInt() = 8 then
  goto start1
  endif
  endif
  
  goto listen
  
  
  debug=true
  gpio = CreateObject("roControlPort", "Expander-GPIO")
  p = createobject("roMessagePort")
  vplayer = CreateObject("roVideoPlayer")
  vplayer.SetPort(p)
  gpio.SetPort(p)
  
  gpio.EnableInput(0)
  gpio.EnableInput(1)
  gpio.EnableInput(2)
  gpio.EnableInput(3)
  gpio.EnableInput(4)
  gpio.EnableInput(5)
  gpio.EnableInput(6)
  gpio.EnableInput(7)
  gpio.EnableInput(9)
  gpio.EnableInput(10)
  gpio.EnableInput(11)
  gpio.EnableInput(12)
  
  REM Video Database
  DIM vlist[12]
  vlist[0]="autoplay.vob"
  vlist[1]="video2.mpg"
  vlist[2]="3.ts"
  vlist[3]="4.ts"
  vlist[4]="5.ts"
  vlist[5]="6.ts"
  vlist[6]="7.ts"
  vlist[7]="8.ts"
  vlist[8]="9.ts"
  vlist[9]="10.ts"
  vlist[10]="11.ts"
  vlist[11]="12.ts"
  
  Start:
  vplayer.PlayFile("attract.ts")
  
  
  loop:
  msg = wait(0,p)
  
  if type(msg) = "roControlDown" then
  button_pressed = msg.GetInt()
  
  with this script the video autoplay.vob plays with ac3 so we only have to configure the buttons.
  
  v=createobject("roVideoPlayer")
  p=createobject("roMessagePort")
  v.SetPort(p)
  
  
  rem video mode
  mode=createobject("roVideoMode")
  mode.SetMode("720x576x25p")
  
  REM Settings
  v.SetAudioOutput(3)
  v.MapDigitalOutput(1) 'expander spdif
  goto start1
  
  listen:
  msg = wait(0,p)
  
  if type(msg) = "roVideoEvent" then
  if msg.GetInt() = 8 then
  goto start1
  endif
  endif
  
  goto listen
  
  
  start1:
  v.PlayFile("autoplay.vob")
  goto listen
  
  
  is it possibel that after one clip a loop clip will play until another button is pressed?