Basic-ex1
objectPage http://www.yama-lab.org/fwb4pi/index.php?Basic-ex2 or http://www.yama-lab.org/fwb4pi/index.php?Basic-ex2
device yamaRasPiDp9_1 or yamaRasPiDp9_2 start after no write for 10 min.
command: set readInterval=60000
command: set execInterval=0
command: program ex1
program: def abs(x) if x>=0 return x else return -x
program: ex("service","clear sendBuffer")
program: s=0
program: for i=0 to 10
program: s=s+i
program: ex("service","putSendBuffer "+s)
program: next i
program: d=ex("service","getCurrentDate.")
program: ex("service","putSendBuffer d="+d)
program: ld=date2l(d)
program: ex("service","putSendBuffer ld="+ld)
program: dl=l2date(ld)
program: ex("service","putSendBuffer dl="+dl)
program: rd=date2l("2019/7/01 13:15:00")
program: ex("service","putSendBuffer rd="+rd)
program: ddx=abs(rd,dl)
program: ex("service","putSendBuffer ddx="+ddx)
program: if abs(rd,dl)<300 then
program: {
program: ex("service","putSendBuffer it is almost "+d)
program: }
program: else
program: {
program: ex("service","putSendBuffer it is not "+d)
program: }
program: ex("service","sendResults.")
command: end ex1
command: run ex1
result:
0
1
3
6
10
15
21
28
36
45
55
d=2019/6/27/ 22:39:52
ld=1561642792000
dl=2019/06/27/ 22:39:52
currentDevice="yamaRasPiDp1_1",Date=2019/6/27/ 22:39:52