找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

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

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

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

P3M1=0x00;
P3M0=0xff;                  //設(shè)置P3口強推挽輸出
AD_Init();                 //AD初始化
Delay1ms();                 //開始采樣電壓前延時,電路有幾個電容充電未完成前會拉低部分元器件電壓(導(dǎo)致采樣電壓不準(zhǔn)),目測須延時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電壓轉(zhuǎn)換公式
    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                 各量程精度調(diào)整
   
    LCD(V);                              //電壓顯示
     }
     }
        

/*******數(shù)碼管顯示函數(shù)*************/
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語句 實現(xiàn) 小數(shù)點自動切換
   
    }
   
   
    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);           //  數(shù)碼管消隱                     
     
  }   

/***********AD初始化***************/
void AD_Init()
{
P1M1=0x30;
P1M0=0x00;                 //設(shè)置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轉(zhuǎn)換
    _nop_();
    _nop_();
    _nop_();
    _nop_();
    while(!(ADC_CONTR & 0x10));  
    ADC_CONTR &= ~ADC_FLAG;
    return ADC_RES;               //返回轉(zhuǎn)換結(jié)果

}
/*******************延時函數(shù)**********/
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空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報

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

使用道具 舉報

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

不用謝,共同學(xué)習(xí)共同進步。
回復(fù)

使用道具 舉報

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

使用道具 舉報

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

使用道具 舉報

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

本版積分規(guī)則

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

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

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