daily

command: set readInterval=3600000
command: set sendInterval=3600000
command: program daily
program: dim dataTable
program: dim columnLabel
program: dim rowLabel
program: output=""
program: url="http://www.yama-lab.org/adk-wiki-1/index.php?pir-1-"
program: for i=0 to 2
program:   page=ex("connector" , "getpage "+url+i)
program:   rpart=getResultPart(page)
program:   ex("service","println "+rpart)
program:   parseCsv(rpart,dataTable,rowLabel,columnLabel)
program:   y0=sumif(dataTable,rowLabel,columnLabel("device"),"=","a-0",columnLabel("sdv"))
program:   c0=countif(dataTable,rowLabel,columnLabel("device"),"=","a-0")
program:   ave0=1.0*y0/c0
program:   dataline="device=a-0, Date="+dataTable(0,columnLabel("Date"))+",ave="+ave0
program:   ex("service","println "+dataline)
program:   ex("service","putSendBuffer "+dataline)
program:   y1=sumif(dataTable,rowLabel,columnLabel("device"),"=","a-1",columnLabel("v"))
program:   c1=countif(dataTable,rowLabel,columnLabel("device"),"=","a-1")
program:   ave1=1.0*y1/c1
program:   dataline="device=a-1, Date="+dataTable(0,columnLabel("Date"))+",ave="+ave1
program:   ex("service","println "+dataline);
program:   ex("service","putSendBuffer "+dataline);
program:   y2=sumif(dataTable,rowLabel,columnLabel("device"),"=","a-2",columnLabel("v"))
program:   c2=countif(dataTable,rowLabel,columnLabel("device"),"=","a-2")
program:   ave2=1.0*y2/c2
program:   dataline="device=a-2, Date="+dataTable(0,columnLabel("Date"))+",ave="+ave2
program:   ex("service","println "+dataline)
program:   ex("service","putSendBuffer "+dataline)
program: next i
command: end daily
command: set pageName="daily-1-<day>"
command: set result=""
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.

Front page   New List of pages Search Recent changes   Help   RSS of recent changes