找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 2970|回復(fù): 3
打印 上一主題 下一主題
收起左側(cè)

PIC16F877A交流采樣+液晶顯示

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:579706 發(fā)表于 2019-7-30 11:16 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
#include<pic.h>
#include<math.h>
#include<stdio.h>
#include"cd1602.h"
union adres
{
int y1;
unsigned char adre[2];
}adresult; //定義一個(gè)共用體
bank3 int re[40]; //定義存放A/D轉(zhuǎn)換結(jié)果的數(shù)組
unsigned char k,data; //定義幾個(gè)通用寄存器
double squ,squad; //二次方寄存器和二次方和寄存器
int uo;
bank1 unsigned char s[4]; //此數(shù)組用于存儲(chǔ)需要顯示的字符的ASCII碼
void adinitial()
{
ADCON0=0x41; //選擇A/D轉(zhuǎn)換通道為RA0,且打開A/D轉(zhuǎn)換器
     //在工作狀態(tài),使A/D轉(zhuǎn)換時(shí)鐘為8T
ADCON1=0x8E; //轉(zhuǎn)換結(jié)果右移,把RA0口設(shè)置為模擬量輸入方式
ADIE=1; //A/D轉(zhuǎn)換中斷允許
PEIE=1; //外部中斷允許
TRISA0=1; //設(shè)置RA0為輸入方式
}
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)
}
                     
void interrupt adint() //中斷服務(wù)程序
{
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é)果
        //通過共用體的形式放入了變量y1中
re[k]=adresult.y1; //1次A/D轉(zhuǎn)換的結(jié)果存入數(shù)組
k++;  //數(shù)組訪問指針加1
}
void conv()
{
s[0]=((int)squ); //個(gè)位
s[1]=((int)(squ*10)-s[0]*10); //小數(shù)點(diǎn)第一位
s[2]=((int)(squ*100)-s[0]*100-s[1]*10); //小數(shù)點(diǎn)第二位
s[3]=((int)(squ*1000)-s[0]*1000-s[1]*100-s[2]*10); //小數(shù)點(diǎn)第三位
}
void lcdxianshi()
{

unsigned char i;
lcdcom(0x80);
for(i=0;i<9;i++)
{
  if(i==0)
  lcddat(0x6A);
  else if(i==1)
  lcddat(0x7A);
  else if(i==2)
  lcddat(0x3A);
  else if(i==3)
  lcddat(s[i-3]+0x30);
  else if(i==4)
  lcddat(0x2E);
  else if(i==8)
  lcddat(0x56);
  else
  lcddat(s[i-4]+0x30);  
}
}
void main()
{
adinitial(); //A/D轉(zhuǎn)換初始化
initial(); //系統(tǒng)其他初始化
k=0; //數(shù)組訪問指針賦初值
TMR1H=0x00;
TMR1L=0x00; //定時(shí)器1清零
ei(); //中斷允許
T1CON=0x01; //打開定時(shí)器1
while(1)
{
  if(k==40) break; //A/D轉(zhuǎn)換次數(shù)達(dá)到40次,則終止
}
di(); //禁止中斷
for(k=0,squad=0;k<40;k++)
{
  uo=re[k];
  squ=(double)uo; //強(qiáng)制把采得的數(shù)據(jù)量轉(zhuǎn)換成雙精度數(shù),以便運(yùn)算
  squ=squ*5/1023; //把每點(diǎn)的數(shù)據(jù)轉(zhuǎn)換成實(shí)際數(shù)據(jù)
  squ=squ*squ; //求一點(diǎn)電壓的二次方
  squad=squad+squ;
} //以上求得40點(diǎn)電壓的二次方和存于寄存器squad中
squ=squad/40; //求得平均值
squ=sqrt(squ); //二分之一次方,求得最后的電壓值
conv();
TRISC=0X00;  //A口設(shè)置為輸出         
TRISD=0X00;
lcdrw=0;    //lcd控制
lcdinit();   //lcd初始化
lcdxianshi();
}


分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:1 發(fā)表于 2019-7-30 18:09 | 只看該作者
本帖需要重新編輯補(bǔ)全電路原理圖,源碼,詳細(xì)說明與圖片即可獲得100+黑幣(帖子下方有編輯按鈕)
回復(fù)

使用道具 舉報(bào)

板凳
ID:775090 發(fā)表于 2021-3-22 17:11 來自手機(jī) | 只看該作者
有原理圖嗎?
回復(fù)

使用道具 舉報(bào)

地板
ID:775090 發(fā)表于 2021-3-22 17:21 來自手機(jī) | 只看該作者
有原理圖嗎?
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表