-- vim:set ft=lua: dofile(mg.script_name:gsub('[^\\/]*$','')..'util.lua') ct=CreateContentBuilder(GZIP_THRESHOLD_BYTE) ct:Append(DOCTYPE_HTML4_STRICT..[=[
]=]..DefaultHeadContents()..[=[

# EPG予約一覧

]=]) chList=edcb.GetChDataList() for i=page*pageCount+1,math.min(#a,(page+1)*pageCount) do v=a[i].searchInfo chInfo=#v.serviceList>0 and BinarySearch(chList,v.serviceList[1],CompareFields('onid',false,'tsid',false,'sid')) --無効 disAndKey=v.andKey:match('^^!{999}(.*)') --大小文字区別 andKey=(disAndKey or v.andKey):gsub('^C!{999}','(Aa) ') --メモ note=v.notKey:match('^:note:(.-　)') or v.notKey:match('^:note:([^ ]* ?)') notKey=v.notKey:sub(note and #note+7 or 1) note=(note or ''):gsub('　',''):gsub(' ',''):gsub('\\s',' '):gsub('\\m','　'):gsub('\\\\','\\') cl=disAndKey and ' class="disabled"' or '' ct:Append('
'..andKey..'' ..''..notKey ..''..note ..''..(#v.contentList>0 and edcb.GetGenreName(v.contentList[1].content_nibble)..(#v.contentList>1 and 'など' or '') or '') ..''..(chInfo and chInfo.serviceName or '')..(#v.serviceList>1 and 'など' or '') ..''..(RecModeTextList()[(a[i].recSetting.recMode~=5 and a[i].recSetting.recMode or a[i].recSetting.noRecMode or 1)+1] or '') ..''..a[i].recSetting.priority..'
\n') end ct:Append([=[

新規追加
]=]) ct:Finish() mg.write(ct:Pop(Response(200,'text/html','utf-8',ct.len,ct.gzip)..'\r\n'))