找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 5010|回復: 1
打印 上一主題 下一主題
收起左側

ADC0832模數(shù)轉換與顯示電路仿真與代碼

[復制鏈接]
跳轉到指定樓層
樓主
ID:212506 發(fā)表于 2017-6-19 11:48 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）



單片機源程序如下:
  1. #include <reg52.h>
  2. #include <intrins.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char
  5. #define delay4us() {_nop_();_nop_();_nop_();_nop_();}

  7. sbit RS = P2^0;
  8. sbit RW = P2^1;
  9. sbit E  = P2^2;

  11. sbit CS  = P1^0;
  12. sbit CLK = P1^1;
  13. sbit DIO = P1^2;

  15. uchar Display_Buffer[] = "0.00V";
  16. uchar code Line1[] = "Current Voltage:";

  18. void DelayMS(uint ms)
  19. {
  20.         uchar i;
  21.         while(ms--)
  22.         {
  23.                  for(i=0;i<120;i++);
  24.         }
  25. }

  27. bit LCD_Busy_Check()
  28. {
  29.         bit result;
  30.         RS = 0;
  31.         RW = 1;
  32.         E  = 1;
  33.         delay4us();
  34.         result = (bit)(P0&0x80);
  35.         E  = 0;
  36.         return result;
  37. }

  39. void LCD_Write_Command(uchar cmd)
  40. {
  41.         while(LCD_Busy_Check());
  42.         RS = 0;
  43.         RW = 0;
  44.         E  = 0;
  45.         _nop_();
  46.         _nop_();
  47.         P0 = cmd;
  48.         delay4us();
  49.         E = 1;
  50.         delay4us();
  51.         E = 0;
  52. }

  54. void Set_Disp_Pos(uchar pos)
  55. {
  56.         LCD_Write_Command(pos | 0x80);
  57. }

  59. void LCD_Write_Data(uchar dat)
  60. {
  61.         while(LCD_Busy_Check());
  62.         RS = 1;
  63.         RW = 0;
  64.         E  = 0;
  65.         P0 = dat;
  66.         delay4us();
  67.         E = 1;
  68.         delay4us();
  69.         E = 0;
  70. }

  72. void LCD_Initialise()
  73. {
  74.         LCD_Write_Command(0x38); DelayMS(1);
  75.         LCD_Write_Command(0x0c); DelayMS(1);
  76.         LCD_Write_Command(0x06); DelayMS(1);
  77.         LCD_Write_Command(0x01); DelayMS(1);
  78. }

  80. uchar Get_AD_Result()
  81. {
  82.         uchar i,dat1=0,dat2=0;
  83.         /*CS  = 0;
  84.         CLK = 0;
  85.         DIO = 1; _nop_(); _nop_();
  86.         CLK = 1; _nop_(); _nop_();
  87.         CLK = 0;DIO = 1; _nop_(); _nop_();
  88.         CLK = 1; _nop_(); _nop_();
  89.         CLK = 0;DIO = 1; _nop_(); _nop_();
  90.         CLK = 1;DIO = 1; _nop_(); _nop_();
  91.         CLK = 0;DIO = 1; _nop_(); _nop_();*/

  93.         uchar j;
  94.         CS=0;
  95.         for(j=0;j<4;j++)
  96.         {
  97.                 CLK=0;
  98.                 DIO=1;
  99.                 _nop_();_nop_();
  100.                 CLK=1;
  101.                 _nop_();_nop_();       
  102.         }
  103.         for(i=0;i<8;i++)
  104.         {
  105.                  CLK = 1; _nop_(); _nop_();
  106.                 CLK = 0; _nop_(); _nop_();
  107.                 dat1 = dat1 << 1 | DIO;       
  108.         }
  109.         for(i=0;i<8;i++)
  110.         {
  111.                  dat2 = dat2 << ((uchar)(DIO)<<i);
  112.                 CLK = 1; _nop_(); _nop_();
  113.                 CLK = 0; _nop_(); _nop_();
  114.         }
  115.         CS = 1;
  116.         return (dat1 == dat2) ? dat1:0;
  117. }

  119. void main()
  120. {
  121.         uchar i;
  122.         uint d;
  123.         LCD_Initialise();
  124.         DelayMS(10);
  125.         while(1)
  126.         {
  127.                  d = Get_AD_Result()*500.0/255;
  128.                 Display_Buffer[0]=d/100+'0';
  129.                 Display_Buffer[2]=d/10%10+'0';
  130.                 Display_Buffer[3]=d%10+'0';
  131.                 Set_Disp_Pos(0x01);
  132.                 i = 0;
  133.                 while(Line1[i]!='\0')
  134. ……………………

  136. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
ADC0832模數(shù)轉換與顯示.rar (52.4 KB, 下載次數(shù): 90)




分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂 踩踩
回復

使用道具 舉報

沙發(fā)
ID:272932 發(fā)表于 2020-5-9 22:43 | 只看該作者
真的黑，給的程序仿真失敗，只能用HEX文件仿真。
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復 返回頂部 返回列表