標題: 單片機1602電壓電流表原理圖和源程序 [打印本頁]
作者: 無名氏1957    時間: 2022-1-3 13:13
標題: 單片機1602電壓電流表原理圖和源程序


單片機源程序如下:
  1. /******引腳說明LCD液晶RS2.5  RW2.6    E2.7       DB0~DB7:P0.0~P0.7
  2. 電壓測量P1.1;需要0~30v需要加分流電阻，，分辨率0.03v；
  3. 電流側量P1.7；需要加放大電路如lm358；op07等，分辨率3ma
  4. **********/
  5. //stc12c5a60                        
  6. #include<STC12C5A60S2.h>
  7. #include<stdio.h>
  8. #include<intrins.h>//頭文件

  10. #define uchar unsigned char//宏定義
  11. #define uint unsigned int//宏定義
  12. #define ulint unsigned long int//宏定義
  13. #define N 21//ADC中值濾波次數，必須為基數
  14. #define ISP_TRIG() ISP_TRIG=0x5A,ISP_TRIG=0xA5//ISP觸發(fā)命令

  16. sbit rs=P3^5;//液晶RS
  17. sbit rw=P3^6;//液晶RW
  18. sbit e=P3^4;//液晶E

  20. void AD_init(void);//ADC初始化
  21. void delay(uint z);//延時函數
  22. uint AD_get(uchar haha );//讀ADC的數值
  23. void LCD_data(uchar shuju);//寫數據
  24. void zhiling(uchar zhilin);//寫指令
  25. void LCD_init(void);//初始化LCD
  26. void tablex(uint tab);//數據分解
  27. uint filter(uchar dat);//中值濾波
  28. void timer_init(void);//定時器初始化

  30. uchar h1,h2,h3,h4;//LCD顯示變量
  31. ulint mas,maz;//容量計算

  33. uchar table[]="0123456789";//顯示數組
  34. uchar table1[]=".VAWa";

  36. void main()
  37. {
  38.         ulint tempv,tempa;//存放電壓電流值
  39.         AD_init();//ADC初始化
  40.         timer_init();//定時器初始化
  41.         LCD_init();//LCD初始化
  42.         while(1)
  43.         {
  44.                 tempv=filter(0x88);//設置ADC通道0、開始轉換
  45.                 tablex(tempv*3);//分解數據
  46.                 zhiling(0x80);//LCD地址
  47.                 LCD_data(table[h1]);//
  48.                 LCD_data(table[h2]);//
  49.                 LCD_data(table1[0]);//
  50.                 LCD_data(table[h3]);//
  51.                 LCD_data(table[h4]);//
  52.                 LCD_data(table1[1]);//顯示
  53.                
  54.                 tempa=filter(0x8f);//設置ADC通道7、開始轉換
  55.                 if(tempa<=10)//防止數據成負數
  56.                         tempa=10;
  57.                 mas=tempa*3-30;//計算容量取樣賦值
  58.                 tablex(tempa*3-30);//減去LM358失調的數值
  59.                 zhiling(0x88);//LCD地址
  60.                 LCD_data(table[h1]);
  61.                 LCD_data(table1[0]);
  62.                 LCD_data(table[h2]);
  63.                 LCD_data(table[h3]);
  64.                 LCD_data(table[h4]);
  65.                 LCD_data(table1[2]);
  66.                
  67.                 tablex((tempv*3/10)*((tempa*3-30)/10)/10);//計算功率
  68.                 zhiling(0x80+0x40);
  69.                 LCD_data(table[h1]);
  70.                 LCD_data(table[h2]);
  71.                 LCD_data(table1[0]);
  72.                 LCD_data(table[h3]);
  73.                 LCD_data(table[h4]);
  74.                 LCD_data(table1[3]);
  75.                
  76.                 tablex(maz/1000);//顯示MAH
  77.                 zhiling(0x88+0x40);
  78.                 LCD_data(table[h1]);
  79.                 LCD_data(table1[0]);
  80.                 LCD_data(table[h2]);
  81.                 LCD_data(table[h3]);
  82.                 LCD_data(table[h4]);
  83.                 LCD_data(table1[4]);
  84.                
  85.         }
  86. }
  87. //-------------------------------------------------------------
  88. void delay(uint z)///////////////延時程序
  89. {
  90.    uint x,y;
  91.    for(x=z;x>0;x--)
  92.    for(y=19;y>0;y--);
  93. }
  94. void AD_init(void)/////////////////////初始化ADC
  95. {
  96. P1ASF=0xff;//P1口全部作為模擬功能AD使用
  97. ADC_RES=0;//清零轉換結果寄存器高8位
  98. ADC_RESL=0;//清零轉換結果寄存器低2位
  99. ADC_CONTR=0x80;//開啟AD電源
  100. delay(5);//等待1ms，讓AD電源穩(wěn)定
  101. }

  103. uint AD_get(uchar haha )//ADC讀數
  104. {
  105.         uint rew;
  106.         ADC_CONTR=haha;//開啟AD轉換
  107.         _nop_(); _nop_(); _nop_(); _nop_();//要經過4個CPU時鐘的延時
  108.         while(!(ADC_CONTR&0x10));//等待轉換完成
  109.         ADC_CONTR&=0xe7;//關閉AD轉換，ADC_FLAG位由軟件清0
  110.         rew=ADC_RES*4+ADC_RESL;//組合成10位
  111.         delay(1);//等待
  112.         return rew;//返回ADC值
  113. }
  114. void zhiling(uchar zhilin)//寫指令
  115. {
  116.         e=0;
  117.         rs=0;
  118.         rw=0;
  119.         P0=zhilin;
  120.         delay(20);
  121.         e=1;
  122.         delay(20);
  123.         e=0;
  124. }
  125. void LCD_data(uchar shuju)//寫數據
  126. {
  127.         e=0;
  128.         rs=1;
  129.         rw=0;
  130.         P0=shuju;
  131.         delay(20);
  132.         e=1;
  133.         delay(20);
  134.         e=0;
  135. }
  136. void LCD_init(void)//初始化LCD
  137. {
  138. delay(300);
  139. zhiling(0x38);
  140. delay(100);
  141. zhiling(0x38);
  142. delay(100);
  143. zhiling(0x38);
  144. delay(100);
  145. zhiling(0x38);
  146. zhiling(0x38);
  147. zhiling(0x08);
  148. zhiling(0x01);
  149. zhiling(0x06);
  150. zhiling(0x0c);
  151. }
  152. void tablex(uint tab1)//數據分解
  153. {
  154.         h1=tab1/1000;//1023//1
  155.         h2=tab1%1000/100;//023//0
  156.         h3=tab1%100/10;//23//2
  157.         h4=tab1%10;//3
  158. }
  159. uint filter(uchar dat)//中位值濾波
  160. {
  161.    uint value_buf[N];
  162.    uint count,i,j,temp;
  163.    for(count=0;count<N;count++)
  164.    {
  165.                          AD_init();//初始化ADC
  166.       value_buf[count] = AD_get(dat);//讀ADC數值
  167.       delay(1);
  168.    }
  169.    for (j=0;j<N-1;j++)
  170.    {
  171.       for (i=0;i<N-j;i++)
  172.       {
  173.          if ( value_buf[i]>value_buf[i+1] )
  174.          {
  175.             temp = value_buf[i];
  176.             value_buf[i] = value_buf[i+1];
  177.             value_buf[i+1] = temp;
  178.          }
  179.       }
  180.    }
  181.    return value_buf[(N-1)/2];
  182. }
  183. void timer_init(void)//定時器初始化
  184. {
  185.         TMOD=0x01;/////////設置工作方式1
  186.         TH0=(65536-50000)/256;///////賦值
  187.         TL0=(65536-50000)%256;
  188.         EA=1;ET0=1;//開總中斷；開定時器中斷
  189.         TR0=1;////////啟動計數器
  190. }
復制代碼


作者: liuyiyi    時間: 2022-1-4 11:41
希望多這樣的作者，既不要黑B,還能學習
作者: 金越科技    時間: 2022-3-31 20:40
要下來學習   這個程序很好找了好久了——可以用——，
作者: caihj3    時間: 2022-4-1 12:04
原理圖如能清晰一些就更好，謝謝分享。
作者: electmo    時間: 2023-3-22 18:59
Proteus仿真沒有數字顯示怎么會事？



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