當(dāng)前位置:首頁 > 單片機 > 單片機
[導(dǎo)讀] //這是一個兩路交流信號的AD轉(zhuǎn)換,然后和標(biāo)準(zhǔn)比較決定輸出大于標(biāo)準(zhǔn)的那一路,默認(rèn)輸出A路#include #include #include bank1 int re0[40]; //定義存放A/D轉(zhuǎn)換結(jié)果的數(shù)組,在bank0中bank1 int re1[40]; /

 

//這是一個兩路交流信號AD轉(zhuǎn)換,然后和標(biāo)準(zhǔn)比較決定輸出大于標(biāo)準(zhǔn)的那一路,默認(rèn)輸出A路
#include
#include
#include


bank1 int re0[40]; //定義存放A/D轉(zhuǎn)換結(jié)果的數(shù)組,在bank0中

bank1 int re1[40]; //定義存放A/D轉(zhuǎn)換結(jié)果的數(shù)組,在bank1中
unsigned int i,j, k; //定義幾個整型變量
double squ ,squad; //平方寄存器和平方和寄存器,squ又通用為存儲其它數(shù)值
double standard; //定義雙精度浮點型
int uo;

 


//系統(tǒng)各I/O口初始化
void ioinitial()
{
TRISA=0X03; //RA0~RA1為輸入 RA2~RA4為輸出
TRISB=0XC0; // RB0~RB5為輸出 RB6~RB7為輸入
RB1=1; //B路關(guān)斷
RB2=0; // 選A導(dǎo)通
RB3=0; // A路導(dǎo)通
RB4=0; //LEDB不亮
RB5=1; // LEDA亮
}


//RA0 A/D轉(zhuǎn)換初始化子程序
void ad0initial()
{
ADCON0= 0XC1; //選擇A/D通道為RA0,RC時鐘,且打開A/D轉(zhuǎn)換器
//在工作狀態(tài),使A/D轉(zhuǎn)換時鐘為
ADCON1=0X02; // RA0 RA1為模擬通道 VDD為參考電壓5V
ADIF=0; // 清ad中斷標(biāo)志位
ADIE=1; //A/D轉(zhuǎn)換中斷允許
GIE=1; //全局中斷使能(允許CPU響應(yīng)所有中斷源產(chǎn)生的中斷請求
RP0 =0; //設(shè)置RA0為輸入方式
}

 


//RA1 A/D轉(zhuǎn)換初始化子程序
void ad1initial()
{
ADCON0= 0XC9; //選擇A/D通道為RA1,RC時鐘,且打開A/D轉(zhuǎn)換器
//在工作狀態(tài),使A/D轉(zhuǎn)換時鐘為
ADCON1=0X02; // RA0 RA1為模擬通道 VDD為參考電壓5V
ADIF=0; // 清ad中斷標(biāo)志位
ADIE=1; //A/D轉(zhuǎn)換中斷允許
GIE=1; //全局中斷使能(允許CPU響應(yīng)所有中斷源產(chǎn)生的中斷請求
}

 

//數(shù)據(jù)采集延時子程序
void delay0()
{
for(i=0;i<10;i++) continue;
}

//AD轉(zhuǎn)換間隔
void delay1()
{
for(i=0;i<10;i++) continue;
}

 


// 存AD0結(jié)果
void ad0store()
{
ADIF=0; //清除中斷標(biāo)志
re0[i]=ADRES; //1次A/D轉(zhuǎn)換的結(jié)果存入數(shù)組
}


// 存AD1結(jié)果
void ad1store()
{
ADIF=0; //清除中斷標(biāo)志
re1[j]=ADRES; //1次A/D轉(zhuǎn)換的結(jié)果存入數(shù)組
}

 

// 處理AD040次AD轉(zhuǎn)換結(jié)果得到交流信號有效值
void ad0process()
{for(i=0,squad=0;i<40;i++)
{
uo=re0[i];
squ=(double)uo; //強制把采得的數(shù)據(jù)量轉(zhuǎn)換成雙精度數(shù),以便運算
squ=squ*5/256; //把每點的數(shù)據(jù)轉(zhuǎn)換成實際數(shù)據(jù)
squ=squ*squ; //求一點電壓的平方
squad=squad+squ;
} //以上求得40點電壓的平方和,存于寄存器squad中
squ=squad/40; //求得平均值
squ=sqrt(squ); //開平方,求得最后的電壓值
}


// 處理AD140次AD轉(zhuǎn)換結(jié)果得到交流信號有效值
void ad1process()
{for(j=0,squad=0;j<40;j++)
{
uo=re1[j];
squ=(double)uo; //強制把采得的數(shù)據(jù)量轉(zhuǎn)換成雙精度數(shù),以便運算
squ=squ*5/256; //把每點的數(shù)據(jù)轉(zhuǎn)換成實際數(shù)據(jù)
squ=squ*squ; //求一點電壓的平方
squad=squad+squ;
} //以上求得40點電壓的平方和,存于寄存器squad中
squ=squad/40; //求得平均值
squ=sqrt(squ); //開平方,求得最后的電壓值
}

// A路通
void aon()
{ RB1=1; //B路關(guān)斷
RB2=0; // 選A導(dǎo)通
RB3=0; // A路導(dǎo)通
RB4=0; // LEDB不亮
RB5=1; // LEDA亮
}

// B路通
void bon()
{ RB1=0; //A路關(guān)斷
RB2=1; // 選B導(dǎo)通
RB3=1; // B路導(dǎo)通
RB4=1; // LEDB亮
RB5=0; // LEDA不亮
}


//主程序
main()
{
ioinitial(); //系統(tǒng)各I/O口初始化
standard=0.273861 ; //75dbuv轉(zhuǎn)換為電壓為0.273861
for (i=0;i<40;i++)
{ ad0initial(); //A/D轉(zhuǎn)換初始化
delay0(); //AD采集延時
ADGO=1 ; //啟動A/D轉(zhuǎn)換
for(i=1;ADGO=1;i=1)
{continue;} //go為1循環(huán)等待,go不為1結(jié)束循環(huán)
ad0store() ; // 存AD0結(jié)果
delay1() ; //AD轉(zhuǎn)換間隔
}
ad0process() ; // 處理AD040次AD轉(zhuǎn)換結(jié)果得到交流信號有效值
if(squ>=standard)
{
aon() ; // A路通
}
else
{
for(k=0;k<10;k++)
{
for (i=0 ;i<40;i++)
{ ad1initial(); //A/D轉(zhuǎn)換初始化
delay0(); //AD采集延時
ADGO=1 ; //啟動A/D轉(zhuǎn)換
for(i=1;ADGO=1;i=1)
{continue;} //go為1循環(huán)等待,go不為1結(jié)束循環(huán)
ad1store(); // 存AD1結(jié)果
delay1(); //AD轉(zhuǎn)換間隔
}
ad1process(); // 處理AD040次AD轉(zhuǎn)換結(jié)果得到交流信號有效值
if(squ

 

本站聲明: 本文章由作者或相關(guān)機構(gòu)授權(quán)發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內(nèi)容真實性等。需要轉(zhuǎn)載請聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權(quán)益,請及時聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫毥谦F公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關(guān)鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉(zhuǎn)型技術(shù)解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關(guān)鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術(shù)公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認(rèn)證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

關(guān)鍵字: 汽車 人工智能 智能驅(qū)動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務(wù)能7×24不間斷運行,同時企業(yè)卻面臨越來越多業(yè)務(wù)中斷的風(fēng)險,如企業(yè)系統(tǒng)復(fù)雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務(wù)連續(xù)性,提升韌性,成...

關(guān)鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關(guān)鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會開幕式在貴陽舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關(guān)鍵字: 華為 12nm EDA 半導(dǎo)體

8月28日消息,在2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會上,華為常務(wù)董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權(quán)最終是由生態(tài)的繁榮決定的。

關(guān)鍵字: 華為 12nm 手機 衛(wèi)星通信

要點: 有效應(yīng)對環(huán)境變化,經(jīng)營業(yè)績穩(wěn)中有升 落實提質(zhì)增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務(wù)引領(lǐng)增長 以科技創(chuàng)新為引領(lǐng),提升企業(yè)核心競爭力 堅持高質(zhì)量發(fā)展策略,塑強核心競爭優(yōu)勢...

關(guān)鍵字: 通信 BSP 電信運營商 數(shù)字經(jīng)濟

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術(shù)學(xué)會聯(lián)合牽頭組建的NVI技術(shù)創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術(shù)創(chuàng)新聯(lián)...

關(guān)鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(shù)(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關(guān)鍵字: BSP 信息技術(shù)
關(guān)閉
關(guān)閉