-- vim:set ft=lua:
HIDE_SERVICES={
--非表示にしたいサービスを['ONID-TSID-SID']=true,のように指定
--['1-2345-6789']=true,
}
dofile(mg.script_name:gsub('[^\\/]*$','')..'util.lua')
ct=CreateContentBuilder(GZIP_THRESHOLD_BYTE)
ct:Append([=[
\n')
for i,v in ipairs(et) do
sub=v.eventGroupInfo and #v.eventGroupInfo.eventDataList==1 and (
v.eventGroupInfo.eventDataList[1].onid~=v.onid or
v.eventGroupInfo.eventDataList[1].tsid~=v.tsid or
v.eventGroupInfo.eventDataList[1].sid~=v.sid or
v.eventGroupInfo.eventDataList[1].eid~=v.eid)
if not sub then
if v.startTime and os.time(v.startTime)+timezone <= now+9*3600 and
#et>i and et[i+1].startTime and os.time(et[i+1].startTime)+timezone > now+9*3600 then
v.now=true
end
cont=v.contentInfoList and #v.contentInfoList>0 and math.floor(v.contentInfoList[1].content_nibble/256)%16 or 16
ct:Append('
'
..(v.startTime and ('%02d%s %02d:%02d'):format(v.startTime.day, ({'日','月','火','水','木','金','土'})[v.startTime.wday], v.startTime.hour, v.startTime.min) or '不明')
..(not v.past and rt[('%04X%04X%04X%04X'):format(v.onid, v.tsid, v.sid, v.eid)] and '
予' or '')
..'
'
..(v.shortInfo and v.shortInfo.event_name or ' ')..''
..'
\n')
end
end
ct:Append('
\n')
end
ct:Append([=[