\n'
edcb.htmlEscape=15
NetworkList={}
for i,v in ipairs(NetworkIndex()) do
NetworkList[i]={}
end
utc9Now=os.time()+9*3600
function Logo(onid,sid)
ddid=tonumber(edcb.GetPrivateProfile('LogoIDMap',('%04X%04X'):format(onid,sid),'','Setting\\LogoData.ini'))
if ddid then
dir=EdcbSettingPath()..'\\LogoData\\'
ff=edcb.FindFile(dir..('%04X_%03X_*'):format(onid,ddid),6) or {}
-- ファイル名の末尾2桁はロゴタイプ(STD-B21)
for i,v in ipairs({'05%.png','02%.png','04%.png','01%.png','03%.png','00%.png'}) do
for j,w in ipairs(ff) do
if w.name:lower():find(v..'$') then
return true
end
end
end
end
if LOGO_DIR then
fname=nil
f=edcb.io.open(LOGO_INI,'rb')
if f then
-- ロゴ識別とServiceIDとの対応を調べる
ddid=tonumber(f:read('*a'):upper():match(('\n%04X%04X=(%%d+)'):format(onid,sid)))
f:close()
if ddid then
ff=edcb.FindFile(LOGO_DIR..('\\%04X_%03X_*'):format(onid,ddid),12) or {}
-- ファイル名の末尾2桁はロゴタイプ(STD-B21)であると期待
for i,v in ipairs({'05%.png','05%.bmp','02%.png','02%.bmp','04%.png','04%.bmp','01%.png','01%.bmp','03%.png','03%.bmp','00%.png','00%.bmp'}) do
for j,w in ipairs(ff) do
if w.name:lower():find(v..'$') then
return true
end
end
end
end
end
else
fname=('%04X%04X.png'):format(onid,sid)
f=edcb.io.open(DocumentToNativePath('img/logo/'..fname),'rb')
if not f then
fname=('%04X%04X.bmp'):format(onid,sid)
f=edcb.io.open(DocumentToNativePath('img/logo/'..fname),'rb')
end
if f then
return true
end
end
return false
end
for i,v in ipairs(CustomServiceList()) do
if (oneseg or not v.partialReceptionFlag) then
x={eid=0, startTime=os.date('!*t',utc9Now)}
y=x
b=edcb.EnumEventInfo({{onid=v.onid, tsid=v.tsid, sid=v.sid}}, {startTime=os.date('!*t',utc9Now-24*3600), durationSecond=48*3600}) or {}
table.sort(b, function(a,b) return os.time(a.startTime)