单片机教程网

电脑版
提示:原网页已由神马搜索转码, 内容由www.51hei.com提供.
查看:3806|回复:5
打印上一主题下一主题

基于51单片机的ADC0804的电压表设计

 [复制链接]
跳转到指定楼层
楼主
ID:216839发表于 2017-7-24 11:20|只看该作者|只看大图回帖奖励
最近看网上有很少的ADC0804的设计了，都由0809代替，但是有个别因为成本原因和学校课程设计要求需要ADC0804的，可以看此程序，仿真一并配齐，全套资料请打包下载：




单片机源程序如下:
  1. #include<reg51.h>
  2. #include<intrins.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char

  6. sbit rd=P3^6; //ADC0804IO口定义
  7. sbit wr=P3^5;
  8. sbit cs=P3^7;
  9. sbit int1=P3^4;
  10. //液晶LCD1602定义
  11. sbit rs=P2^5;
  12. sbit rw=P2^6;
  13. sbit e=P2^7;
  14. //0804转换变量
  15. unsigned int date;
  16. uchar Vol;
  17. uint V;
  18. void delay_uint(uint z)             //液晶驱动延迟
  19. {
  20.        while(z--);
  21. }
  22. /********************************************************************
  23. * 名称 : write_com(uchar com)
  24. * 功能 : 1602命令函数
  25. * 输入 : 输入的命令值
  26. * 输出 : 无
  27. ***********************************************************************/
  28. void write_com(uchar com)
  29. {
  30.        e=0;
  31.        rs=0;
  32.        rw=0;
  33.        P0=com;
  34.        delay_uint(25);
  35.        e=1;
  36.        delay_uint(100);
  37.        e=0;
  38. }

  40. /********************************************************************
  41. * 名称 : write_data(uchar dat)
  42. * 功能 : 1602写数据函数
  43. * 输入 : 需要写入1602的数据
  44. * 输出 : 无
  45. ***********************************************************************/
  46. void write_data(uchar dat)
  47. {
  48.        e=0;
  49.        rs=1;
  50.        rw=0;
  51.        P0=dat;
  52.        delay_uint(25);
  53.        e=1;
  54.        delay_uint(100);
  55.        e=0;      
  56. }
  57. /***********************lcd1602上显示字符函数************************/
  58. void write_string(uchar hang,uchar add,uchar *p)
  59. {
  60.        if(hang==1)  
  61.            write_com(0x80+add);
  62.        else
  63.            write_com(0x80+0x40+add);
  64.            while(1)                                                                            
  65.            {
  66.                  if(*p == '\0')  break;
  67.                  write_data(*p);
  68.                  p++;
  69.            }      
  70. }
  71. /***********************lcd1602上显示两位十进制数************************/
  72. void write_sfm2(uchar hang,uchar add,uint date)
  73. {
  74.        if(hang==1)  
  75.            write_com(0x80+add);
  76.        else
  77.            write_com(0x80+0x40+add);
  78.        write_data(0x30+date/100);
  79.        write_string(2,8,".");  
  80.        write_data(0x30+date/10%10);
  81.        write_data(0x30+date%10);      
  82. }

  84. /***********************lcd1602初始化设置************************/
  85. void init_1602()       //lcd1602初始化
  86. {
  87.        write_com(0x38);      
  88.        write_com(0x0c);
  89.        write_com(0x06);
  90.        delay_uint(1000);
  91.        write_string(1,0,"The Voltage is: ");
  92.        write_string(2,8,".");  
  93.        write_string(2,11,"V   ");      
  94.        write_sfm2(2,7,date);
  95. }
  96. void delay(uint z)
  97. {
  98.        uint x;
  99.        while(z--)
  100.            for(x=0;x<120;x++);
  101. }
  102. uchar read_0804()
  103. {
  104.        wr=0; //在片选信号CS为低电平情况下（由于CS接地，所以始终为低电平），
  105.        _nop_(); //WR由低电平到高电平时，即上升沿时，AD开始采样转换  
  106.        wr=1;  
  107.        delay(1); //延时1ms,等待采样转换结束  
  108.        P1=0xff;   //这条语句不能少，我也还不知道为什么  
  109. ……………………

  111. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
056-ADC0804电压表.zip(2.83 MB, 下载次数: 123)



评分

黑币 +50
收起理由
+ 50
共享资料的黑币奖励！

查看全部评分

沙发
ID:337367发表于 2018-6-12 22:14|只看该作者
谢谢分享
板凳
ID:236171发表于 2018-6-27 11:28|只看该作者
   P1=0xff;   //这条语句不能少，我也还不知道为什么  

回复楼主一下，因为P1做数据线的时候要先拉高才能读取数据
地板
ID:360242发表于 2018-6-27 14:24|只看该作者
谢谢了老铁，666
5#
ID:313760发表于 2018-7-19 16:12|只看该作者
谢谢楼主
6#
ID:111875发表于 2024-5-2 07:10|只看该作者
好资料感谢分享

手机版|小黑屋|51黑电子论坛|51黑电子论坛6群QQ管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网