stc12c5a60s2采集電壓實物圖：
單片機源程序如下:
- /***********************************************************
- 程序功能：STC12C5A60S2自帶ADC采集電壓信號+DS18B20溫度傳感器+LCD1602液晶顯示
- MCU型號： STC12C5A60S2
- 晶振頻率：11.0892MHz
- 整理時間：2012年4月25號
- ************************************************************/
- #include "reg51.h"
- #include "intrins.h"
- sfr P4 = 0XC0;
- sfr ADC_CONTR = 0XBC;
- sfr ADC_RES = 0XBD;
- sfr ADC_LOW2 = 0XBE;
- sfr P1ASF = 0X9D;
- typedef unsigned char BYTE;
- typedef unsigned int WORD;
- #include "1602.h"
- #include "DS18B20.h"
- #define ADC_POWER 0X80
- #define ADC_FLAG 0X10
- #define ADC_START 0X08
- #define ADC_SPEEDLL 0X00
- #define ADC_SPEEDL 0X20
- #define ADC_SPEEDH 0X40
- #define ADC_SPEEDHH 0X60
- void InitADC();
- void Delay(WORD n);
- WORD GetADCResult(BYTE ch);
- void DisplayADCResult(BYTE Channel);
- void DisplayTemperature();
- char qian=0,bai=0,shi=0,ge=0;
- BYTE ly_dis[4];//定義顯示緩沖區
- void main()
- {
- WORD i=0;
- float tt;
- int ltemp;
- InitADC();
- LCDInit();
- DisplayListChar(0, 0, "Temp:");
- DisplayListChar(0, 1, "Volt:");
- while(1)
- {
- if(i==0)
- tmpchange(); //溫度轉換
- if(i==100)
- {
- tt=tmp()*0.0625; //得到真實十進制溫度值，因為DS18B20
- //可以精確到0.0625度，所以讀回數據的最低位代表的是0.0625度。
- ltemp=tt*10+0.5; //放大十倍，這樣做的目的將小數點后第一位也轉換為可顯示數字，同時進行一個四舍五入操作。
- if(ltemp<0)
- { //判斷第一位顯示整數還是負號
- ly_dis[0]=0xbf;
- ltemp=0-ltemp;
- }
- else
- ly_dis[0]=ltemp/1000;//顯示百位值
- ltemp=ltemp%1000;
- ly_dis[1]=ltemp/100; //顯示溫度十位值
- ltemp=ltemp%100;
- ly_dis[2]=ltemp/10; //顯示溫度個位值
- ly_dis[3]=ltemp%10; //顯示小數點后一位
- }
- i++;
- if(i==3000)
- {
- DisplayADCResult(0);
- i=0;
- }
- DisplayTemperature(); //調用顯示
- }
- }
- void DisplayADCResult(BYTE Channel)
- {
- qian=GetADCResult(Channel)/1000;
- bai=GetADCResult(Channel)%1000/100;
- shi=GetADCResult(Channel)%1000%100/10;
- ge=GetADCResult(Channel)%10;
- if(0==qian)
- DisplayOneChar(5,1,' ');
- else
- DisplayOneChar(5,1,table[qian]);
- if(0==bai&&0==qian)
- DisplayOneChar(6,1,' ');
- else
- DisplayOneChar(6,1,table[bai]);
- DisplayOneChar(7,1,table[shi]);
- DisplayOneChar(8,1,table[ge]);
-
- DisplayOneChar(9, 1, 'v');
-
- }
- void DisplayTemperature()
- {
- if(0==ly_dis[0])
- DisplayOneChar(5, 0, ' ');
- else
- DisplayOneChar(5, 0, table[ly_dis[0]]);
- DisplayOneChar(6, 0, table[ly_dis[1]]);
- DisplayOneChar(7, 0, table[ly_dis[2]]);
- DisplayOneChar(8, 0, '.');
- DisplayOneChar(9, 0, table[ly_dis[3]]);
- DisplayOneChar(10, 0, 0xdf);
- DisplayOneChar(11, 0, 'C');
- }
- WORD GetADCResult(BYTE ch)
- {
- ADC_CONTR=ADC_POWER|ADC_SPEEDLL|ch|ADC_START;
- _nop_();
- _nop_();
- _nop_();
- _nop_();
- while(!(ADC_CONTR&ADC_FLAG));
- ADC_CONTR&=~ADC_FLAG;
- return ADC_RES*4+ADC_LOW2;
- }
- void InitADC()
- {
- ……………………
- …………限于本文篇幅 余下代碼請從51黑下載附件…………
所有資料51hei提供下載:
STC12C5A60S2自帶ADC采集電壓信號 DS18B20溫度傳感器 LCD1602液晶顯示.rar
(458.99 KB, 下載次數: 625)
2017-6-13 11:36 上傳
點擊文件名下載附件
|
[復制鏈接]
