第11章 交流電壓測(cè)量
11.3.2 程序清單
該程序已在模板上調(diào)試通過(guò)，可作讀者的參考。有關(guān)顯示部分請(qǐng)讀者參考本書相關(guān)章節(jié)，有關(guān)A/D轉(zhuǎn)換的詳細(xì)設(shè)置請(qǐng)參考前面章節(jié)。

include

include

include

//該程序用于測(cè)電網(wǎng)的交流電壓有效值，最后的結(jié)果將在4個(gè)LED上顯示，保留
//1位小數(shù)。
//為了保證調(diào)試時(shí)數(shù)據(jù)運(yùn)算的精確性，需要將PICC的double型數(shù)據(jù)選成32位
union adres
{
int y1；
unsigned char adre[2]；
}adresult； //定義一個(gè)共用體
bank3 int re[40]； //定義存放A/D轉(zhuǎn)換結(jié)果的數(shù)組，在bank3中
unsigned char k，data； //定義幾個(gè)通用寄存器
double squ ，squad； //平方寄存器和平方和寄存器，squ又通用為存儲(chǔ)其
//它數(shù)值
int uo；
bank1 unsigned char s[4]； //此數(shù)組用于存儲(chǔ)需要顯示的字符的ASII碼
const char table[10]={0xc0，0xf9，0xa4，0xb0，0x99，0x92，0x82，0XD8，0x80，0x90}；
//不帶小數(shù)點(diǎn)的顯示段碼表
const char table0[10]={0x40，0x79，0x24，0x30，0x19，0x12，0x02，0x78，0x00，0x10}；//帶小數(shù)點(diǎn)的顯示段碼表
//A/D轉(zhuǎn)換初始化子程序
void adinitial()
{
ADCON0=0x41； //選擇A/D通道為RA0，且打開A/D轉(zhuǎn)換器
//在工作狀態(tài)，使A/D轉(zhuǎn)換時(shí)鐘為8Tosc
ADCON1=0X8E； //轉(zhuǎn)換結(jié)果右移，及ADRESH寄存器的高6位為”0”
//把RA0口設(shè)置為模擬量輸入方式
ADIE=1； //A/D轉(zhuǎn)換中斷允許
PEIE=1； //外圍中斷允許
TRISA0=1； //設(shè)置RA0為輸入方式
}
//spi方式顯示初始化子程序
void SPIINIT()
{
PIR1=0；
SSPCON=0x30；
SSPSTAT=0xC0；
//設(shè)置SPI的控制方式，允許SSP方式，并且時(shí)鐘下降沿發(fā)送，與”74HC595，當(dāng)其
//SCLK從低到高跳變時(shí)，串行輸入寄存器”的特點(diǎn)相對(duì)應(yīng)
TRISC=0xD7； //SDO引腳為輸出，SCK引腳為輸出
TRISA5=0； //RA5引腳設(shè)置為輸出，以輸出顯示鎖存信號(hào)
}
//系統(tǒng)其它初始化子程序
void initial()
{
CCP2IE=0； //禁止CCP中斷
SSPIE=0； //禁止SSP中斷
CCP2CON=0X0B； //初始化CCP2CON，CCP2為特別事件觸發(fā)方式
CCPR2H=0X01；
CCPR2L=0XF4； //初始化CCPR2寄存器，設(shè)置采樣間隔500 μs，
//一個(gè)周期內(nèi)電壓采40個(gè)點(diǎn)
}
//中斷服務(wù)程序
void interrupt adint(void)
{
CCP2IF=0；
ADIF=0； //清除中斷標(biāo)志
adresult.adre[0]=ADRESL；
adresult.adre[1]=ADRESH； //讀取并存儲(chǔ)A/D轉(zhuǎn)換結(jié)果，A/D轉(zhuǎn)換的結(jié)果
//通過(guò)共用體的形式放入了變量y1中
re[k]=adresult.y1； //1次A/D轉(zhuǎn)換的結(jié)果存入數(shù)組
k++； //數(shù)組訪問(wèn)指針加1
}
//SPI傳送數(shù)據(jù)子程序
void SPILED(data)
{
SSPBUF=data； //啟動(dòng)發(fā)送
do{
；
}while(SSPIF==0)；
SSPIF=0；
}
//主程序
main( )
{
adinitial()； //A/D轉(zhuǎn)換初始化
SPIINIT()； //spi方式顯示初始化
initial()； //系統(tǒng)其它初始化
while(1){
k=0； //數(shù)組訪問(wèn)指針賦初值
TMR1H=0X00 ；
TMR1L=0X00； //定時(shí)器1清0
ei()； //中斷允許
T1CON=0X01； //打開定時(shí)器1
while(1){
if(k==40) break； //A/D轉(zhuǎn)換次數(shù)達(dá)到40，則終止
}
di()； //禁止中斷
for(k=0；k<40；k++)re[k]=re[k]-0X199；//假設(shè)提升電壓為2 V，對(duì)應(yīng)十六進(jìn)制數(shù)199H，
//則需在采樣值的基礎(chǔ)上減去該值
for(k=0，squad=0；k<40；k++) {
uo=re[k]；
squ=(double)uo； //強(qiáng)制把采得的數(shù)據(jù)量轉(zhuǎn)換成雙精度數(shù)，以便運(yùn)算
squ=squ5/1023； //把每點(diǎn)的數(shù)據(jù)轉(zhuǎn)換成實(shí)際數(shù)據(jù)
squ=squsqu； //求一點(diǎn)電壓的平方
squad=squad+squ；
} //以上求得40點(diǎn)電壓的平方和，存于寄存器 squad中
squ=squad/40； //求得平均值
squ=sqrt(squ)； //開平方，求得最后的電壓值
squ=squ154.054； //通過(guò)變壓器的變比和分壓電阻分配確定該系數(shù)
//以上得到了實(shí)際電網(wǎng)的電壓值
squ=squ10； //為了保證顯示的小數(shù)點(diǎn)的精度，先對(duì)電壓值乘以10
uo=(int)squ； //強(qiáng)制把U轉(zhuǎn)換成有符號(hào)整型量
sprintf(s，”%4d”，uo)； //通過(guò)sprintf函數(shù)把需要顯示的電壓數(shù)據(jù)轉(zhuǎn)換成
//ASII碼，并存于數(shù)組S中
RA5=0； //準(zhǔn)備鎖存
for(k=0；k<4；k++){
data=s[k]；
data=data&0X0F； //通過(guò)按位相與的形式把ASII碼轉(zhuǎn)換成BCD碼
if(k==2) data=table0[data]；//因?yàn)閟qu已乘以10，則需在第2位打小數(shù)點(diǎn)
else data=table[data]； // table0存儲(chǔ)帶小數(shù)點(diǎn)的顯示段碼，
//table存儲(chǔ)不帶小數(shù)點(diǎn)的顯示段碼
SPILED(data)； //發(fā)送顯示段碼
}
for(k=0；k<4；k++) {
data=0xFF；
SPILED(data)； //連續(xù)發(fā)送4個(gè)DARK，使顯示看起來(lái)好看一些，這點(diǎn)與
//該實(shí)驗(yàn)板的LED分布結(jié)構(gòu)有關(guān)
}
RA5=1； //最后給一個(gè)鎖存信號(hào)，代表顯示任務(wù)完成
}
}