-- vim:set ft=lua: dofile(mg.script_name:gsub('[^\\/]*$','')..'util.lua') onid,tsid,sid=GetVarServiceID(mg.request_info.query_string,'id') edcb.htmlEscape=15 ServiceList=CustomServiceList() st=ServiceList[1] if onid and tsid and sid then for j,v in ipairs(ServiceList) do if onid==v.onid and tsid==v.tsid and sid==v.sid then st=v break end end end ct={ title='リモート視聴', js='\n', menu='
  • 強制停止
  • ' ..'
  • ' ..'' } ct.main='
    \n' ..'
    \n' ..'
    \n' ..'
    \n' ..'
    \n' ..player('', true) ..'
    \n' ..[=[
    ]=]..(USE_LIVEJK and '
    ' or '')..[=[
    ]=] NetworkList={} for i,v in ipairs(NetworkIndex()) do NetworkList[i]={} end for i,v in ipairs(ServiceList) do if oneseg or not v.partialReceptionFlag then table.insert(NetworkList[NetworkIndex(v)], '
    \n' ..'
    \n' ..'
    \n' ..'
    \n
    '..v.service_name..'
    \n' ..'
    \n' ..'
    ' ..'
    \n' ) if onid==v.onid and tsid==v.tsid and sid==v.sid then ct.title=''..v.service_name..'' end end end ctt={} label={} ct.css='\n' ct.main=ct.main..'
    \n' ..'\n'..table.concat(label) ..'
    \n
    \n'..table.concat(ctt) ..'
    \n
    \n
    \n' ct=template(ct) mg.write(ct:Pop(Response(200,'text/html','utf-8',ct.len)..(ct.gzip and 'Content-Encoding: gzip\r\n' or '')..'\r\n'))