[[sensors-1-h-class]]
 command: set readInterval=3600000
 command: set sendInterval=0
 command: program daily
 program: dim dataTable
 program: dim columnLabel
 program: dim rowLabel
 program: dim devname
 program: dim ave
 program: dim avemax
 program: dim avemin
 program: devname(0)="pir": devname(1)="lux": devname(2)="temp":devname(3)="humid":devname(4)="co2":devname(5)="dst"
 program: ex("service","clear sendBuffer")
 program: output=""
 program: url="http://www.yama-lab.org/adk-wiki-1/index.php?sensors-1-h-"
 program: for j=0 to 5
 program:    dx=devname(j)
 program:    ave(dx)=0
 program:    avemax(dx)=0
 program:    avemin(dx)=60000
 program: next j
 program: for i=0 to 23
 program:   page=ex("connector" , "getpage "+url+i)
 program:   rpart=getResultPart(page)
 program:   ex("service","println "+rpart)
 program:   ’ex("service","println "+rpart)
 program:   parseCsv(rpart,dataTable,rowLabel,columnLabel)
 program:   for j=0 to 5
 program:     dname=devname(j)
 program:     y0=sumif(dataTable,rowLabel,columnLabel("device"),"=",dname,columnLabel("v"))
 program:     c0=countif(dataTable,rowLabel,columnLabel("device"),"=",dname)
 program:     ave(dname)=1.0*y0/c0
 program:     if ave(dname)>avemax(dname) then avemax(dname)=ave(dname)
 program:     if ave(dname)<avemin(dname) then avemin(dname)=ave(dname)
 program:     dataline="device="+dname+", Date="+dataTable(0,columnLabel("Date"))+",ave="+ave(dname)
 program:     ex("service","println "+dataline)
 program:     ex("service","putSendBuffer "+dataline)
 program:   next j
 program: next i
 program: for j=0 to 5
 program:   dname=devname(j)
 program:   dataline="dev-max-min="+dname+",Data="+dataTable(0,columnLabel("Date"))
 program:   dataline=dataline+",max="+avemax(dname)+",min="+avemin(dname)
 program:   ex("service","println "+dataline)
 program:   ex("service","putSendBuffer "+dataline)
 program: next j
 program: ex("service","sendResults.")
 command: end daily
 command: run daily
 command: set pageName="sensors-1-d-<day>"

Front page   Edit Diff Backup Upload Copy Rename Reload   New List of pages Search Recent changes   Help   RSS of recent changes