PCF8591 AD采集单片机程序 LCD1602显示

relchhiclty

PCF8591 AD采集单片机程序 LCD1602显示

#include<reg52.h>
#include<intrins.h>
" L7 g+ [9 g, `) {- |#define uchar unsigned char
3 O9 ^5 x& o0 ?6 Z#define uint unsigned int
, _  Q% F& q. }( c#define Delay4us(){_nop_();_nop_();_nop_();_nop_();}
sbit LCD_RS=P2^2;
sbit LCD_RW=P2^1;
& R1 l! S: u" nsbit LCD_EN=P2^0;
sbit SCL=P1^0;                            //I2C时钟引脚
6 b  E# `2 W$ y$ Isbit SDA=P1^1;                            //I2C数据输入输出引脚
, [2 n  J4 S  i1 p* h0 M- I9 Fuchar Recv_Buffer[4];                     //数据接收缓冲
uint Voltage[]={'0','0','0','0','0','0'};         //数据分解为电压x.xx
; \* B; I+ ^5 N, Sbit bdata IIC_ERROR;                      //I2C错误标志位
1 R4 G( P2 x+ j( Xuchar LCD_Line_1[]={"DQ      .  ppm       "};
//延时
void delay(int ms)
{
uchar i;
while(ms--) for(i=0;i<250;i++) Delay4us();
}
% }2 F2 {: o- T6 U//LCD忙检测
bit LCD_Busy_Check()
{
! f$ W8 q5 k, g+ u  K' M0 V2 Ibit Result;
LCD_RS=0;LCD_RW=1;
LCD_EN=1;Delay4us();Result=(bit)(P0&0x80);
4 F" Z% D/ e4 [. x/ oLCD_EN=0;
return Result;
}
/ b4 k  v) R- w/ B9 G3 v9 J0 B' Z) I//写指令
void LCD_Write_Command(uchar cmd)
5 m, z% i0 T( J$ y2 I8 J( m{
. d4 r) n! K" W2 P$ E6 z6 b# F  v* Fwhile(LCD_Busy_Check());
LCD_RS=0;LCD_RW=0;LCD_EN=0;_nop_();_nop_();
P0=cmd;Delay4us();
1 T; p* e4 S) Q: H3 ]' p( jLCD_EN=1;Delay4us();LCD_EN=0;
}
// 写数据
7 u9 m  B( K: S- ^void LCD_Write_Data(uchar dat)
: `, j- |5 a5 t2 u9 j8 E{
while(LCD_Busy_Check());
: e1 y) C9 b- c5 C  `LCD_RS=1;LCD_RW=0;LCD_EN=00=dat;Delay4us();
LCD_EN=1;Delay4us();LCD_EN=0;
# b) [9 m; B2 A}
//初始化
void LCD_Initialise()
' q1 e6 m7 S: b: B{
LCD_Write_Command(0x38);delay(5);
7 T5 k0 k8 x3 I! xLCD_Write_Command(0x0c);delay(5);
* h# e7 s) L+ }  L% s  tLCD_Write_Command(0x06);delay(5);
LCD_Write_Command(0x01);delay(5);
LCD_Write_Command(0x03);delay(5);
LCD_Write_Command(0x02);delay(5);
+ L: V% L8 u' `$ u. d1 m}
& ]- p. b( l, d6 ^2 S2 E//设置显示位置
void LCD_Set_Position(uchar pos)
{
LCD_Write_Command(pos|0x80);
  N& ^% y& I/ a% ?3 J9 [}
//显示一行
5 d" t, J* m7 Q! K# r6 Evoid LCD_Display_A_Line(uchar Line_Addr,uchar s[])
{
uchar i;
LCD_Set_Position(Line_Addr);
1 c' K& v# [  D) W) o+ _; afor(i=0;i<16;i++)LCD_Write_Data(s);
}
% U9 ^; s5 v( D9 Y) y1 o2 V. [5 S// 将模数转换后得到的值分解存入缓存
# |) m9 E$ i8 c3 D+ p* c) Nvoid Convert_To_Voltage(uchar val)
) h5 e, n3 _' y( s) _, b+ Q5 M{
uchar Tmp;                       //最大值为255,对应5V
9 o$ E8 i5 d% dVoltage[2]=val/100+'0';           //整数部分
Voltage[3]=val/10%10+'0' ;
9 o- z3 M5 a( P. q! H4 T& q8 S/ fVoltage[4]=val%10+'0' ;
' a% r: ?3 b+ n- A! BTmp=val*10;                   // 第一位小数
6 @4 e/ a9 n2 Q" {Voltage[1]=Tmp%10+'0';
0 N8 g" e2 C8 l: Z2 W$ V+ Z: WTmp=Tmp*10;
! ?# J1 w. F6 i" U# x% W% y6 o% GVoltage[0]=Tmp%10+'0';
5 W, r6 ^2 m3 g9 `, S# J/ V}
# S- d5 I. F3 r$ ]! `5 G) h( O//启动I2C总线
& m7 _( v( J$ C6 P- c$ j$ Q0 ivoid IIC_Start()
{
$ v" u  Q( a4 w3 d. ISDA=1;SCL=1;Delay4us();SDA=0;Delay4us();SCL=0;
}
//停止I2C总线
void IIC_Stop()
{
4 `0 K, v4 B9 |+ ^! FSDA=0;SCL=1;Delay4us();SDA=1; Delay4us();SCL=0;
}
// 从机发送应答位
void Slave_ACK()
{
% J2 p& {# G. G( ~SDA=0;SCL=1;Delay4us();SCL=0;SDA=1;
7 B8 `: y, G2 {+ N! _) R2 P  O}
// 从机发送非应答位
void Slave_NOACK()
{
, k% g6 U, B' `: L! k) `; KSDA=1;SCL=1;Delay4us();SCL=0;SDA=0;
}
//发送一字节
5 j8 K  G) k9 q# z$ `: v" Yvoid IIC_SendByte(uchar wd)
9 D9 [  f7 L$ W{
6 y* p4 _7 E( u' h4 T- ]uchar i;
3 G" s$ d/ G# k6 ifor(i=0;i<8;i++) //循环移入8位
{
! s8 [7 M& o. y" z; B7 \0 l3 lSDA=(bit)(wd&0x80);_nop_();_nop_();
. ~- c% D$ q# Y8 \/ kSCL=1;Delay4us();SCL=0;wd<<=1;
}
9 v: g" n7 O# y# U% t+ sDelay4us();
SDA=1;                                 //释放总线并准备读取应答
SCL=1;
' s  A- E5 A- U% v8 TDelay4us();
IIC_ERROR=SDA;                        //IIC_ERROR=1表示无应答
: w6 |7 m5 m1 O5 ?& pSCL=0;
Delay4us();
: b* l7 c' h2 Q, \% x}
//接收一字节
uchar IIC_ReceiveByte()
{
5 O7 [: U& Z) D9 Y: g, Cuchar i,rd=0x00;
) i* E) m% G3 n  {- ffor(i=0;i<8;i++)
{
SCL=1;rd<<=1;rd|=SDA;Delay4us();SCL=0;Delay4us();
}
# l; o1 n4 Y$ q) `& x+ E8 kSCL=0;Delay4us();
' D, ?. Z; b! M, u: s1 Creturn rd;
}
//连续读入4路通道的A/D转换结果并保存到Recv_Buffer
/ l6 U' p0 A; P1 A" `- Bvoid ADC_PCF8591(uchar CtrlByte)
9 I0 i: y6 x0 }$ }+ E8 Y7 t7 a/ b{
9 J9 g3 Q3 R: n' }' l7 |+ Wuchar i;
* ?9 q2 {2 }/ R9 P: _IIC_Start();
IIC_SendByte(0x90);                         // 发送写地址
if(IIC_ERROR==1)return;
3 x$ V7 A2 o- \// IIC_SendByte(CtrlByte);                  //发送控制字节
//if(IIC_ERROR==1)return;
IIC_Start();                               //重新发送开始命令
IIC_SendByte(0x91);                        // 发送读地址
: z2 F( ~6 {% }if(IIC_ERROR==1)return;
7 ]5 O" w; Q4 z; XIIC_ReceiveByte();                        //空读一次,调整读顺序
0 v; C, E- \2 k/ w6 t2 WSlave_ACK();                             //收到一字节后发送一个应答位
4 {2 k) q5 f" \' o  bfor(i=0;i<4;i++)
{
# M3 B' e2 j/ \! N+ mRecv_Buffer[i++]=IIC_ReceiveByte();
% @  r8 n4 C" v9 K' t9 m/ MSlave_ACK();                          //收到一个字节后发送一个应答位
, P0 L1 m% r2 Q# I9 C5 Q, G}
9 \6 [( D1 t8 K& y/ [7 Z' t) V3 tSlave_NOACK();
IIC_Stop();                          //收到一个字节后发送一个非应答位
/ w% I( M3 M, U$ c% g: B. ]}

2 R1 d3 p5 g# i. s+ [
* K, M/ @. G: ^0 p* J* A…………限于本文篇幅 余下代码请从论坛下载附件…………

游客，如果您要查看本帖隐藏内容请回复

8 S* T' ~% N7 ~5 u8 U% k

8 N: b& e1 k7 @6 ~& ~& s) ~
* c! @. \# l2 ^

fanichicl

学习了 谢谢楼主