daily
command: set readInterval=3600000
command: set sendInterval=3600000
command: program daily
program: dim dtable
program: dim clabel
program: dim llabel
program: output=""
program: url="http://www.yama-lab.org/adk-wiki-1/pir-1-"
program: for i=0 to 23
program: hour=0
program: page=ex("connector" , "getpage "+url+hour)
program: parsecsv2(page,dtable,clabel,llabel)
program: y0=sumif(datable,llabel,clabel("device"),"==","a0",clabel("sdv"))
program: c0=countif(dtable,llabel,clabel("device"),"==","a0")
program: ave0=1.0*y0/c0
program: y1=sumif(dtable,llabel,clabel("device"),"==","a1",clabel("v"))
program: c1=countif(dtable,llabel,clabel("device"),"==","a1")
program: ave1=1.0*y1/c1
program: y2=sumif(dtable,llabel,clabel("device"),"==","a2",clabel("v"))
program: c2=countif(dtable,llabel,clabel("device"),"==","a2")
program: ave2=1.0*y2/c2
program: output=output+"Date="+dtable(0,clabel("Date"))+
program: ",ave-a0="+ave0+",ave-a1="+ave1+",ave-a2="+ave2+".\n"
program: next i
program: print output
command: end daily
command:set pageName="pir-1-<hour>"
command: run daily
result:
device=a-0, Date=2012/12/24/ 0, sdv=10.434068380627922.
device=a-1, Data=2012/12/24/ 0, v=100.
, max=631, min=556, f1=2, f2=0, f3=0, n=600, dt=100.
device=a-2, Date=2012/12/24/ 17:46:54, v=174.
device=d, Date=2012/12/24/ 17:46:54, v=0x0c0.
device=a-1, Date=2012/12/24/ 17:47:17, ave=15, sdv=33.053828152810915, max=88, min=0, f1=2, f2=0, f3=0, n=10, dt=10000.