bascom avr ads1100

赵彬

最终数值为６５５３５


Config Sda = Portd.1                        ''****配置IC总线****''
Config Scl = Portd.0
I2cinit
waitms 10
I2cstart
I2cwbyte &B10010000
waitms 10
I2cwbyte &b1101
I2cstop
Waitms 10




''*******************IIC读取压力************************
i2cread:                             ''****IIC数据读取****''
I2cstart                             ''****发送IIC启动信号****''
I2cwbyte &B10010001                  ''****发送IIC读取数据的地址****''
I2crbyte data1 , Ack                 ''****读取数据高8位发送应答信号****''
I2crbyte data2 , Nack                ''****读取低8位不应答****''
I2cstop                              ''****发送停止信号****''
pressure1=data1*256                   ''****高8位左移8位****''
pressure1=pressure1+data2              ''****高8位加低8位组成一个完整的数据****''
pressure1=pressure1-6553
if pressure1<0 then
   pressure1=0
endif
if pressure1 >32767 then
   PRESSURE1  =32767
endif
pressure_temp=5000/26214
pressure1=pressure1*pressure_temp
pressure=pressure1
'pressure=1000
return