找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 5127|回复: 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 单片机教程网

快速回复 返回顶部 返回列表