久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

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

請人改成STC15W408AS能用的程序,愿用80黑幣給解決問題的人。

[復制鏈接]
跳轉到指定樓層
樓主
ID:126608 發表于 2016-10-5 11:30 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
這是一個網上公開的程序,因只有STC15W408AS,就照樣做了一個,但顯示不正確,請人改成STC15W408AS能用的程序,愿用80黑幣給解決問題的人。
#include<stc15f204ea.h>
//#include<STC15W408AS,H>
#include<intrins.h>
#define    ADC_POWER       0x80                  //ADC 電源控制位
#define    ADC_FLAG        0x10                  //ADC 完成標志
#define    ADC_START       0x08                  //ADC 啟動控制位
#define    ADC_speed_LL    0x00                  //540 時鐘
#define    ADC_speed_L     0x20                  //360 時鐘
#define    ADC_speed_H     0x40                  //180 時鐘
#define    ADC_speed_HH    0x60                  // 90 時鐘
typedef unsigned long  uint;
void delay(unsigned int x);            //函數聲明
void LCD(unsigned int LedNumVal);       //函數聲明
void Delay1ms();                       //函數聲明
void Delay150us();                       //函數聲明
void AD_Init();                           //函數聲明
uint ADC(uint m);                       //函數聲明
void Delay350us();                       //函數聲明
void Delay20ms();                       //函數聲明
unsigned char code   Disp_Tab[] = {0xd7,0x14,0xcd,0x5d,0x1e,0x5b,0xdb,0x15,0xdf,0x5f,0xd7};  //  數組   0-9
unsigned char code   dispbit[4]={0x07,0x0b,0x0d,0x0e};    //位選控制
                                                                                       
/************主函數**********************/
void main()
{
uint Vcc,Int,V,Int_S, Vcc_S;
unsigned char m,M;

P3M1=0x00;
P3M0=0xff;                  //設置P3口強推挽輸出
AD_Init();                 //AD初始化
Delay1ms();                 //開始采樣電壓前延時,電路有幾個電容充電未完成前會拉低部分元器件電壓(導致采樣電壓不準),目測須延時1S,懶得改程序了
   
while(1)
{
        
   
   
    Delay20ms();
    Int_S=0;
    Vcc_S=0;
    m=0;
   
        for(m;m<24;m++)
    {
   
   
        Delay350us();         //采樣電壓時差
        Int_S += ADC(4);
        Vcc_S += ADC(5);   
        Int = Int_S/24;
        Vcc = Vcc_S/24;        //采樣24次電壓求平均值
        
    }
    M=20*Int/Vcc;
    if(M>16) V=19150*Int/Vcc;
    else if(M>11) V=19100*Int/Vcc;         //大于11V電壓轉換公式
    else if(M>10) V=19150*Int/Vcc;         //10V-11V
    else if(M>5) V=19200*Int/Vcc;         //5V-10V
    else if(M>3) V=19350*Int/Vcc;         //3V-5V
    else if(M>1) V=19550*Int/Vcc;         //1V-3V
    else if(M>=0) V=20000*Int/Vcc;         //0-1V                 各量程精度調整
   
    LCD(V);                              //電壓顯示
     }
     }
        

/*******數碼管顯示函數*************/
void LCD(unsigned int LedNumVal)
{  
   unsigned int LedOut[4];           //變量定義
      
   
        if(LedNumVal>9999)
    {
     LedOut[0]=Disp_Tab[LedNumVal%100000/10000];            // 千位           
     LedOut[1]=Disp_Tab[LedNumVal%10000/1000]|0x20;                // 百位   
     LedOut[2]=Disp_Tab[LedNumVal%1000/100];                // 十位
     LedOut[3]=Disp_Tab[LedNumVal%100/10];                    // 個位
    }
     if(LedNumVal<10000)   
    {        
     LedOut[0]=Disp_Tab[LedNumVal%10000/1000]|0x20;            // 千位           
     LedOut[1]=Disp_Tab[LedNumVal%1000/100];                   // 百位   
     LedOut[2]=Disp_Tab[LedNumVal%100/10];                    // 十位
     LedOut[3]=Disp_Tab[LedNumVal%10];                        // 個位                     if語句 實現 小數點自動切換
   
    }
   
   
    P3=LedOut[3];
    P11=0;
    delay(700);
    P11=1;
   
   
    P3=LedOut[2];
    P12=0;
    delay(700);
    P12=1;
   
    P3=LedOut[1];
    P10=0;
    delay(700);
    P10=1;
   
    P3=LedOut[0];
    P13=0;
    delay(700);
    P13=1;
   
    delay(700);           //  數碼管消隱                     
     
  }   

/***********AD初始化***************/
void AD_Init()
{
P1M1=0x30;
P1M0=0x00;                 //設置P1.4\P1.5高阻
ADC_RES=0x00;
P1ASF=0x30;
ADC_CONTR=ADC_POWER|ADC_speed_LL;
Delay1ms();   

}
/*********電壓采樣*********/
uint ADC(uint m)
{
        if(m==4)
    {
        ADC_CONTR &=0xf8;    //清空通道
        ADC_CONTR |=0x04;     //更換通道
        Delay150us();         //更換通道延時
    }   
    if(m==5)
    {
        ADC_CONTR &=0xf8;
        ADC_CONTR |=0x05;
        Delay150us();
    }   
    ADC_CONTR |=ADC_START;    //開啟AD轉換
    _nop_();
    _nop_();
    _nop_();
    _nop_();
    while(!(ADC_CONTR & 0x10));  
    ADC_CONTR &= ~ADC_FLAG;
    return ADC_RES;               //返回轉換結果

}
/*******************延時函數**********/
void delay(unsigned int x)
{
    char j;
    for(x; x> 0; x--)
        for(j = 400; j > 0; j--);
}
void Delay1ms()        [url=]//@12.000MHz[/url]
{
    unsigned char i, j;
    i = 2;
    j = 239;
    do
    {
        while (--j);
    } while (--i);
}
void Delay150us()        [url=]//@12.000MHz[/url]
{
    unsigned char i, j;
    i = 2;
    j = 189;
    do
    {
        while (--j);
    } while (--i);
}
void Delay350us()        [url=]//@12.000MHz[/url]
{
    unsigned char i;
    _nop_();
    i = 172;
    while (--i);
}
void Delay20ms()        [url=]//@12.000MHz[/url]
{
    unsigned char i, j;
    i = 39;
    j = 230;
    do
    {
        while (--j);
    } while (--i);
}

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

使用道具 舉報

沙發
ID:126608 發表于 2016-10-21 12:38 | 只看該作者
問題解決了,是劉海龍指導完成的,下載他的51黑論壇_ADC極簡電壓表,就能量電壓了,多謝了
回復

使用道具 舉報

板凳
ID:123732 發表于 2016-10-21 14:57 | 只看該作者
1123212143255 發表于 2016-10-21 12:38
問題解決了,是劉海龍指導完成的,下載他的51黑論壇_ADC極簡電壓表,就能量電壓了,多謝了

不用謝,共同學習共同進步。
回復

使用道具 舉報

地板
ID:315723 發表于 2018-11-7 17:55 | 只看該作者
ADC極簡電壓表在哪下載的。
回復

使用道具 舉報

5#
ID:315723 發表于 2018-11-7 18:10 | 只看該作者
ADC電壓表在哪下載。
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 久久久久国产 | 久久国产精品-国产精品 | 欧美色性| av毛片在线免费观看 | 四虎永久免费黄色影片 | 给我免费的视频在线观看 | 精精国产xxxx视频在线播放 | 97久久精品午夜一区二区 | 麻豆changesxxx国产 | 欧美精品久久久 | 欧美激情亚洲激情 | 久久不射网 | 国产精品成人一区二区三区 | 免费黄色的视频 | 亚洲精品视频免费 | 久久精品一区二区三区四区 | 久久久免费电影 | 伊人免费视频二 | 国产中的精品av涩差av | 国产aaaaav久久久一区二区 | 亚洲欧美日韩在线不卡 | 亚洲免费成人av | 日日夜夜天天 | 国产免费一区二区 | 国产精品久久国产愉拍 | 久久久久久久久久影视 | 欧美日韩高清免费 | 国产一级在线 | 日本视频中文字幕 | 一级a性色生活片久久毛片 午夜精品在线观看 | 福利社午夜影院 | 免费观看一级特黄欧美大片 | 国产偷录叫床高潮录音 | 精品国产一级 | 亚洲精品一级 | 亚洲在线免费观看 | 找个黄色片| 欧美精品中文字幕久久二区 | 在线国产一区二区 | 午夜在线电影网 | 中国一级特黄毛片大片 |