PIC單片機(jī)的交流電壓測量C語言實(shí)例

1、第 11 章 交流電壓測量11.3.2 程序清單 該程序已在模板上調(diào)試通過，可作讀者的參考。有關(guān)顯示部分請讀者參考本書相關(guān)章 節(jié)，有關(guān) A/D 轉(zhuǎn)換的詳細(xì)設(shè)置請參考前面章節(jié)。#include <pic.h>#include<math.h>#include<stdio.h>/該程序用于測電網(wǎng)的交流電壓有效值，最后的結(jié)果將在4個(gè)LED上顯示，保留/1 位小數(shù)。需要將 PICC的double型數(shù)據(jù)選成32位/ 為了保證調(diào)試時(shí)數(shù)據(jù)運(yùn)算的精確性， union adresint y1 ；unsigned adresult bank3char adre2/unsigned

2、int re40；char k， data ；/doublesqu ， squad；/定義一個(gè)共用體定義存放 A/D 轉(zhuǎn)換結(jié)果的數(shù)組，在 bank3 中/ 定義幾個(gè)通用寄存器/ 平方寄存器和平方和寄存器， squ 又通用為存儲其它數(shù)值186#int uo#bank1consts4 ；char table10=0xc0unsigned char/ 此數(shù)組用于存儲需要顯示的字符的 ASII 碼， 0xf9 ， 0xa4， 0xb0， 0x99， 0x92， 0x82， 0XD8， 0x80，#0x90 ；/ 不帶小數(shù)點(diǎn)的顯示段碼表， 0x79， 0x24， 0x30 ， 0x19 ， 0x12，

3、0x02， 0x78， 0x00，const char table010=0x400x10 ；/ 帶小數(shù)點(diǎn)的顯示段碼表/A/D 轉(zhuǎn)換初始化子程序void adinitial()#ADCON0=0x4；1/ADCON1=0X8；E/選擇A/D通道為RA0且打開A/D轉(zhuǎn)換器 在工作狀態(tài)，使 A/D 轉(zhuǎn)換時(shí)鐘為 8Tosc 轉(zhuǎn)換結(jié)果右移，及ADRES寄存器的高6位為"0" 把RAO口設(shè)置為模擬量輸入方式ADIE=1；PEIE=1；/A/D 轉(zhuǎn)換中斷允許/ 外圍中斷允許187TRISA0=1；/設(shè)置RAO為輸入方式/spi void方式顯示初始化子程序SPIINIT()188TRI

4、SA0=1；/設(shè)置RAO為輸入方式PIR1=0；SSPCON=0x3；0SSPSTAT=0xC；0 / 設(shè)置 SPI 的控制方式, /SCLK 從低到高跳變時(shí),TRISC=0xD7；TRISA5=0；/ 系統(tǒng)其它初始化子程序void i nitial() 允許SSP方式，并且時(shí)鐘下降沿發(fā)送，與"74HC595,當(dāng)其 串行輸入寄存器 "的特點(diǎn)相對應(yīng)/SDO引腳為輸出，SCK引 |腳為輸出/RA5 引腳設(shè)置為輸出,以輸出顯示鎖存信號#TRISA0=1；/設(shè)置RAO為輸入方式CCP2IE=O；SSPIE=O；CCP2CON=OX；OBCCPR2H=OXO；1CCPR2L=OXF；

5、4/禁止CCF中斷/禁止SSP中斷/初始化CCP2CQNCCP2為特別事件觸發(fā)方式/初始化CCPR2寄存器，設(shè)置采樣間隔500卩s,/ 一個(gè)周期內(nèi)電壓采 4O 個(gè)點(diǎn)#TRISA0=1；/設(shè)置RAO為輸入方式#TRISA0=1；/設(shè)置RAO為輸入方式中斷服務(wù)程序void interrupt/adint(void)CCP2IF=0；ADIF=0；adresult.adre0=ADRESL adresult.adre1=ADRESH/清除中斷標(biāo)志/rek=adresult.y1k+；/SPI 傳送數(shù)據(jù)子程序 void SPILED(data)/讀取并存儲A/D轉(zhuǎn)換結(jié)果，A/D轉(zhuǎn)換的結(jié)果通過共用體的形

6、式放入了變量 y1 中/1 次 A/D 轉(zhuǎn)換的結(jié)果存入數(shù)組數(shù)組訪問指針加 1189SSPBUF=data； do/ 啟動(dòng)發(fā)送while(SSPIF=0) ；190SSPIF=0；/ 主程序 main( ) adinitial() ； SPIINIT() ； initial() ； while(1) k=0； TMR1H=0X00 ； TMR1L=0X0；0 ei() ； T1CON=0X0；1 while(1) if(k=40) di() ；uo=rek ； squ=(double)uo ； squ=squ*5/1023 ； squ=squ*squ ； squad=squad+squ； squ

7、=squad/40 ； squ=sqrt(squ) ； squ=squ*154.054 ；squ=squ*10 ；/A/D 轉(zhuǎn)換初始化/spi 方式顯示初始化/ 系統(tǒng)其它初始化/ 數(shù)組訪問指針賦初值/ 定時(shí)器 1 清 0 / 中斷允許/ 打開定時(shí)器 1break ； /A/D 轉(zhuǎn)換次數(shù)達(dá)到 40，則終止/ 禁止中斷for（k=0 ；k<40；k+）rek=rek-0X199 ；/ 假設(shè)提升電壓為 2 V ，對應(yīng)十六進(jìn)制數(shù)199H，/ 則需在采樣值的基礎(chǔ)上減去該值for(k=0 ，squad=0； k<40；k+) / 強(qiáng)制把采得的數(shù)據(jù)量轉(zhuǎn)換成雙精度數(shù)，以便運(yùn)算/ 把每點(diǎn)的數(shù)據(jù)轉(zhuǎn)換成

8、實(shí)際數(shù)據(jù)/ 求一點(diǎn)電壓的平方/ 以上求得 40 點(diǎn)電壓的平方和，存于寄存器 squad 中/ 求得平均值/ 開平方，求得最后的電壓值/ 通過變壓器的變比和分壓電阻分配確定該系數(shù)/ 以上得到了實(shí)際電網(wǎng)的電壓值/ 為了保證顯示的小數(shù)點(diǎn)的精度，先對電壓值乘以 10uo=（int）squ ； sprintf（s ， "%4d"， uo）；/強(qiáng)制把U轉(zhuǎn)換成有符號整型量/ 通過 sprintf 函數(shù)把需要顯示的電壓數(shù)據(jù)轉(zhuǎn)換成/ASII碼，并存于數(shù)組S中RA5=0；for（k=0 ； k<4； k+） data=sk ； data=data&0X0F；/ 準(zhǔn)備鎖存/通過按位相與的形式把ASII碼轉(zhuǎn)換成BCD碼if(k=2) data=table0data ；/ 因?yàn)?squ 已乘以 10，則需在第 2位打小數(shù)點(diǎn)/ table0 存儲帶小數(shù)點(diǎn)的顯示段碼，/table 存儲不帶小數(shù)點(diǎn)的顯示段碼/ 發(fā)送顯示段碼else data=tabl