標(biāo)題: 單片機(jī)+TLC2543數(shù)模模數(shù)轉(zhuǎn)換制作電子秤 Proteus仿真程序 數(shù)碼管顯示 [打印本頁]
作者: 威愛吃水果123    時間: 2022-1-13 21:21
標(biāo)題: 單片機(jī)+TLC2543數(shù)模模數(shù)轉(zhuǎn)換制作電子秤 Proteus仿真程序 數(shù)碼管顯示
左邊的模擬稱重傳感器電位一變，數(shù)碼管就顯示重量了中間有個數(shù)模模數(shù)轉(zhuǎn)換仿真均真實(shí)有效
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）


單片機(jī)源程序如下:
  1. #include <REG52.H>
  2. #include <intrins.h>
  3. #define uchar unsigned char         //宏定義方便以后用
  4. #define uint unsigned int  
  5. #define ulong unsigned long

  7. //數(shù)碼管位選
  8. sbit S1=P2^0;
  9. sbit S2=P2^1;
  10. sbit S3=P2^2;
  11. sbit S4=P2^3;


  14. //定義ADC的引腳
  15. sbit AD_CS=P1^3;
  16. sbit AD_CLK=P1^0;
  17. sbit AD_IN=P1^1;
  18. sbit AD_OUT=P1^2;


  21. uchar Disdatabuf[5]={0};        //數(shù)碼管顯示數(shù)據(jù)


  24. char code SEGtable[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e}; //共陽數(shù)碼管碼表


  27. void delay()
  28. {
  29.   uint i=5;
  30.   while(i--);
  31. }
  32. //讀取adc數(shù)值
  33. uint ReadADC_TLC2543(uint CH)
  34. {
  35.   uint ad=0,i;
  36.   AD_CLK=0;
  37.   AD_CS=0;
  38.   CH<<=4;
  39.   for(i=0;i<12;i++)
  40.   {
  41.     if(AD_OUT) ad|=0x01;
  42.     AD_IN=(bit)(CH&0x80);
  43.     AD_CLK=1;
  44.     delay();
  45.     AD_CLK=0;
  46.     delay();
  47.     CH<<=1;
  48.     ad<<=1;
  49.   }
  50.   AD_CS=1;
  51.   ad>>=1;
  52.   return(ad);
  53.   
  54. }




  59. void Delay(uint i)//1ms延時
  60. {
  61.   uchar x,j;
  62.   for(j=0;j<i;j++)
  63.     for(x=0;x<=148;x++);
  64. }


  67. //數(shù)碼管動態(tài)掃描

  69. void Show_data()
  70. {
  71.   static uchar i=0;
  72.   P0=0xff;      //關(guān)閉顯示
  73.   switch(i)
  74.   {
  75.   case 0:    //顯示模式
  76.     S1=1;S2=0;S3=0;S4=0;
  77.     P0=SEGtable[Disdatabuf[3]];
  78.     i++;
  79.     break;
  80.   case 1:       //正反轉(zhuǎn)
  81.     S1=0;S2=1;S3=0;S4=0;
  82.     P0=SEGtable[Disdatabuf[2]];
  83.     i++;
  84.     break;
  85.   case 2:
  86.     S1=0;S2=0;S3=1;S4=0;
  87.     P0=SEGtable[Disdatabuf[1]];
  88.     i++;
  89.     break;
  90.   case 3:
  91.     S1=0;S2=0;S3=0;S4=1;
  92.     P0=SEGtable[Disdatabuf[0]];
  93.     i=0;
  94.     break;
  95.    
  96.   }
  97. }

  99. //主函數(shù)
  100. void main()
  101. {
  102.   ulong temp=0;
  103.   ulong AD_Data=0;        //ADC數(shù)值       
  104.   while(1)
  105.   {
  106.         AD_Data=ReadADC_TLC2543(0);         //讀取ADC
  107.         temp= AD_Data*1000/4094;//轉(zhuǎn)化數(shù)據(jù)
  108.   //顯示占空比
  109.     Disdatabuf[3]= temp/1000;
  110.     Disdatabuf[2]= temp%1000/100;       
  111.     Disdatabuf[1]= temp%100/10;
  112.     Disdatabuf[0]=temp%10;
  113.     Show_data();        //顯示數(shù)據(jù)          
  114.     Delay(10);         //延時
  115.   }
  116. }
復(fù)制代碼

Keil代碼與Proteus仿真下載:
T88稱重仿真.zip (595.27 KB, 下載次數(shù): 35)





歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1