nomuke のバックアップ(No.2)

i2c-slave-mq3_c2h5oh_sensor_ex1
command: set readInterval=120000
command: set execInterval=10000
command: set sendInterval=600000
command: program ex1
program: ' init i2c
program: ex("pi4j", "i2c use 1")
program: '
program: 'Ardino-I2C Alcohol sensor 
program: '
program: 'get 30sec. motions
program: v1=ex("pi4j", "i2c read1 0x14,0x01")
program: v2=ex("pi4j", "i2c read1 0x14,0x02")
program: v=s2i(v1)*256+s2i(v2)
program: if v > 300 then
program: {
program:   msg="#nomuke (red)呑(green)んだけ! (blue)v="+v+" (rainbow)- <hour>:<min>."
program:   ex("twitter","tweet \"+msg+"\"")
program:   delay(120000)
program: }
program: else
program: {
program:   msg="#nomuke (blue)呑(green)むけ! (blue)v="+v+" (rainbow)- <hour>:<min>."
program:   ex("twitter","tweet \"+msg+"\"")
program:   delay(300000)
program: }
program: ex("service","putSendBuffer device=alchl, Date="+ex("service","getCurrentDate.")+"\""+msg+"\"")
program: ex("service","println "+dataline)
program: ex("service","sendResults.")
command: end ex1
command: run ex1