#!/tvbin/tivosh
set db [dbopen]
RetryTransaction {
  set lconfig  [db $db open /Setup]
  set rfoutput [dbobj $lconfig get RFOutputChannel]
}
dbclose $db

set rfo [expr 0x8a480004 | ( 303 + ( $rfoutput * 8 ) << 4 )]
exec iicsetnosub "0xca" "0x[format %x $rfo]"