STC12C2052AD單片機AD轉換C語言程序

首先：這個小程序搞了我兩天，加上焊板子共三天，當然是業余時間。也有24個小時了。

我瞪著電腦兩個晚上，我拆了裝，裝了拆（下載程序不在本板子上)。最后，就在今天！（“今”讀四聲）18點。可讓我找到問題所在了！搞了兩個晚上，AD轉換控制流程，根本沒錯！！！！啊！！ 錯就錯在一個小地方，打死都想不到的地方。

具體錯在哪，請在下文中找！！！！

功能：STC12C2052AD AD轉換C程序 +PWM輸出功能 成功使用。

應用：AD檢測電壓進行過欠壓保護（繼電器控制）+PWM把直流電壓斬波成脈動直流。

板子功能：給手機電池充電。

降壓用的LM317，小電流應用應該夠了。沒時間去買開關管，就用的9013開關。

圖紙：

//以下是成功了的程序。如果你需要應用在你自己的項目中，您只需要更改io就能直接應用了
//程序的完整版本下載地址:http://www.51hei.com/ziliao/file/stc12c2052adde.rar
#include stc12c2052ad.h> //stc單片機專用的頭文件
#include intrins.h>
#define uchar unsigned char
#define uint unsigned int
#define AD_SPEED 0x60 //0110,0000 1 1 270個時鐘周期轉換一次，
/************河北正定歡迎您！少占魚歡迎您！******************************/
//
sbit M=P1^5; //過壓指示燈
sbit N=P1^3; //欠壓指示燈
sbit LED=P1^7; //工作正常燈
sbit CONTRL=P3^4; //輸出控制端
sbit PWM=P3^7;
/****************************************************************/
void pwm();
void delayms(uint);
uint ADC();
void InitADC();
void baohu();
float voltage=0.0;
uint V;
float VCC=5.05;
uchar mtab[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
/***8**************************************************************/
void main()
{
CONTRL=0;//先關閉輸出
delayms(700);
V=40; //這些是我差錯的時候添上去的。目的在于弄明白到底AD轉換了沒有。
voltage=4.0;//實踐證明，更換數值沒用，說明沒AD
LED=0;
CONTRL=1;
voltage=V*VCC/256.00*5.00;
delayms(1000);
PWM=1;
CONTRL=1;//繼電器工作，是保護狀態
delayms(1000);
M=0;
N=0;
LED=0;
delayms(2000);
M=1;
N=1;
LED=1;
pwm();//產生PWM波形
delayms(7000);

delayms(100);//延時
InitADC();
delayms(20);
V= ADC();
baohu();
while(1)
{
V= ADC();
baohu();
delayms(300);
}

}
//
//
void pwm()
{
//PCA模塊工作于PWM模式 C程序
CMOD = 0x04; //用定時器0溢出做PCA脈沖
CL = 0x00; //PCA定時器低8位 地址：E9H
CH = 0x00; //PCA高8位 地址 F9H
CCON=0x00;
CCAP0L = 0x60; //PWM模式時他倆用來控制占空比
CCAP0H = 0x60; //0xff-0xc0=0x3f 64/256=25% 占空比（溢出）
CCAPM0 = 0x42; //0100,0010 Setup PCA module 0 in PWM mode
// ECOM0=1使能比較 PWM0=1 使能CEX0腳用作脈寬調節輸出
/*********************
PCA 模塊工作模式設置 (CCAPMn 寄存器 n= 0-3四種)
7 6 5 4 3 2 1 0
- ECOMn CAPPn CAPNn MATn TOGn PWMn ECCFn
選項： 0x00 無此操作
0x20 16位捕捉模式，由 CEXn上升沿觸發
0x10 16位捕捉模式，由CEXn下降沿觸發
0x30 16位捕捉模式，由CEXn的跳變觸發
0x48 16位軟件定時器
0x4c 16位高速輸出
0x42 8位PWM輸出
每個PCA模塊另外還對應兩個寄存器：CCAPnH和CCAPnL 。 捕獲或者比較時，它們用來
保存16位計數值，當工作于PWM模式時，用來控制占空比
*******************************/
TMOD=0x02;
TH0=0x06;
TL0=0x06;
CR=1; //Start PCA Timer.
TR0=1;
}

//AD轉換初始化 ----打開ADC電源
void InitADC()
{
P1=0xff;
ADC_CONTR|=0x80;
delayms(80);
//這兩個寄存器用來設置 P1口四種狀態,每一位對應一個P1引腳 ，按狀態組合操作
/*****************
P1M0 和P1M1 寄存器位 7 6 5 4 3 2 1 0
P1.7 P1.6 P1.5 P1.4 P1.3 P1.2 P1.1 P1.0
同理P3M0 P3M0 也是。因為STC12C2052AD只有兩個P口，所以只有這倆組 STC12C5410AD還多P2M0 P1M0 有三組
P1M0 P1M1 高
0 0 普通I0口 （準雙向） P1寄存器位 7 6 5 4 3 2 1 0
0 1 強推挽輸出 (20MA電流 )盡量少用 P1.7 P1.6 P1.5 P1.4 P1.3 P1.2 P1.1 P1.0
1 0 僅做輸入 A/D轉換時可用此模式
1 1 開漏 ,A/D轉換時可用此模式

例如：
要設置P1.2為 AD 輸入口
則 P1M0=0X02 ;
P1M1=0X02; 開漏即可
當不用AD時，最好 關閉ADC電源 ，恢復為IO口狀態
********************************/
P1M0=0x02;//這兩個寄存器用來設置 P1口四種狀態,每一位對應一個P1引腳 ，按狀態組合操作
P1M1=0x02;//設置P1.1為開漏狀態
}

// AD轉換程序
/******************************************************
注意：這個函數里注釋的命令是通用命令，可以針對所有AD通道使用，我這就認準了P1.1一個通道，所以直接
//賦值，省點流量！折磨我的問題就出在這個函數里的while等待語句
while (1) //等待A/D轉換結束
{
if (ADC_CONTR 0x10) //0001,0000 測試A/D轉換結束否
{ break; }
}
這是能用的，我原來寫的是：
while (ADC_CONTR 0x10==0）；
這樣寫不能用，再說一遍：這樣就不能用了！！
至于為嘛，因為 優先級，“==”比優先級高，
所以加個括號就可以了
while ( (ADC_CONTR 0x10) == 0 ）；
不經常用C語言，就會記不住啦！！！
由此得到一個教訓；小問題影響效率
經驗：經常加一加括號會死啊，似乎也不耗“流量”吧！！
*********************************************/
uint ADC()
{
ADC_DATA = 0; //清除結果
ADC_CONTR = 0x60; //轉換速度設置 0x60 最快速度
ADC_CONTR = 0xE0; //1110,0000 清 ADC_FLAG, ADC_START 位和低 3 位
ADC_CONTR =0xe1;
// ADC_CONTR |= 0x01; //選擇 A/D 當前通道 P1.1
delayms(1); //使輸入電壓達到穩定
ADC_CONTR = 0xe9;
// ADC_CONTR |= 0x08; //0000,1000 令 ADCS = 1, 啟動A/D轉換,
while (1) //等待A/D轉換結束
{
if (ADC_CONTR 0x10) //0001,0000 測試A/D轉換結束否
{ break; }
}
ADC_CONTR =0xe1;
//ADC_CONTR = 0xE7; //1111,0111 清 ADC_FLAG 位, 關閉A/D轉換,
return ADC_DATA; //返回 A/D 10 位轉換結果
}

//
void baohu()
{
voltage=V*VCC/256.00*5.00;
if( voltage>5.25)
{ CONTRL=1;//過壓保護 ,關斷開關管控制端
M=0;
N=1;
LED=1;
}
if(voltage4.60)
{
CONTRL=1;//保護繼電器打開，常閉觸點斷開保護
N=0;
M=1;
LED=1;
}
if(voltage>4.62voltage5.24)
{
LED=0;
M=1;
N=1;
CONTRL=0;//繼電器斷開，正常狀態
}
}

void delayms(uint k)
{
uint data i,j;
for(i=0;i