欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 3069|回復: 3
打印 上一主題 下一主題
收起左側

PIC16F877A交流采樣+液晶顯示

[復制鏈接]
跳轉到指定樓層
樓主
ID:579706 發表于 2019-7-30 11:16 | 只看該作者 回帖獎勵 |正序瀏覽 |閱讀模式
#include<pic.h>
#include<math.h>
#include<stdio.h>
#include"cd1602.h"
union adres
{
int y1;
unsigned char adre[2];
}adresult; //定義一個共用體
bank3 int re[40]; //定義存放A/D轉換結果的數組
unsigned char k,data; //定義幾個通用寄存器
double squ,squad; //二次方寄存器和二次方和寄存器
int uo;
bank1 unsigned char s[4]; //此數組用于存儲需要顯示的字符的ASCII碼
void adinitial()
{
ADCON0=0x41; //選擇A/D轉換通道為RA0,且打開A/D轉換器
     //在工作狀態,使A/D轉換時鐘為8T
ADCON1=0x8E; //轉換結果右移,把RA0口設置為模擬量輸入方式
ADIE=1; //A/D轉換中斷允許
PEIE=1; //外部中斷允許
TRISA0=1; //設置RA0為輸入方式
}
void initial()
{
CCP2IE=0; //禁止CCP中斷
SSPIE=0; //禁止SSP中斷
CCP2CON=0x0B; //初始化CCP2CON,CCP2為特別事件觸發方式
CCPR2H=0x01;
CCPR2L=0xF4; //初始化寄存器CCPR2,設置采樣間隔為500μs
     //一個周期內電壓采樣40個點
}
                     
void interrupt adint() //中斷服務程序
{
CCP2IF=0;
ADIF=0; //清除中斷標志
adresult.adre[0]=ADRESL;
adresult.adre[1]=ADRESH; //讀取并存儲A/D轉換結果,A/D轉換的結果
        //通過共用體的形式放入了變量y1中
re[k]=adresult.y1; //1次A/D轉換的結果存入數組
k++;  //數組訪問指針加1
}
void conv()
{
s[0]=((int)squ); //個位
s[1]=((int)(squ*10)-s[0]*10); //小數點第一位
s[2]=((int)(squ*100)-s[0]*100-s[1]*10); //小數點第二位
s[3]=((int)(squ*1000)-s[0]*1000-s[1]*100-s[2]*10); //小數點第三位
}
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轉換初始化
initial(); //系統其他初始化
k=0; //數組訪問指針賦初值
TMR1H=0x00;
TMR1L=0x00; //定時器1清零
ei(); //中斷允許
T1CON=0x01; //打開定時器1
while(1)
{
  if(k==40) break; //A/D轉換次數達到40次,則終止
}
di(); //禁止中斷
for(k=0,squad=0;k<40;k++)
{
  uo=re[k];
  squ=(double)uo; //強制把采得的數據量轉換成雙精度數,以便運算
  squ=squ*5/1023; //把每點的數據轉換成實際數據
  squ=squ*squ; //求一點電壓的二次方
  squad=squad+squ;
} //以上求得40點電壓的二次方和存于寄存器squad中
squ=squad/40; //求得平均值
squ=sqrt(squ); //二分之一次方,求得最后的電壓值
conv();
TRISC=0X00;  //A口設置為輸出         
TRISD=0X00;
lcdrw=0;    //lcd控制
lcdinit();   //lcd初始化
lcdxianshi();
}


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

使用道具 舉報

地板
ID:775090 發表于 2021-3-22 17:21 來自觸屏版 | 只看該作者
有原理圖嗎?
回復

使用道具 舉報

板凳
ID:775090 發表于 2021-3-22 17:11 來自觸屏版 | 只看該作者
有原理圖嗎?
回復

使用道具 舉報

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

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表