标题: 基于STC15f104w单片机的adc和dac读取以及Oled显示 [打印本页]
作者: huaerla    时间: 2021-7-5 16:49
标题: 基于STC15f104w单片机的adc和dac读取以及Oled显示
第一次做这种程序，有很多写的不好的地方，望大神斧正！
  1. /*********************************************************************************
  2. * 【函数功能】： DA-AD试验                                                                                          
  3. * 【使用说明】： 单片机：STC89C52
  4.          1 光敏电阻
  5.                                  2 热敏电阻
  6.                                  3 悬空
  7.                                  4 可调0-5V电压（蓝色电位器调节）
  8.                                  
  9. **********************************************************************************/
  10. /********************************************************************************************/

  12. #include<stc15.h>    //包含单片机寄存器的头文件
  13. #include <I2C.H>

  15. #define uchar unsigned char
  16. #define  PCF8591 0x90    //PCF8591 地址



  20. // 变量定义
  21. unsigned char AD_CHANNEL;
  22. unsigned long xdata  LedOut[8];
  23. unsigned int  D[32];
  24. unsigned char date;



  28.   // 函数申明

  30. void delay(uchar i);
  31. bit DACconversion(unsigned char sla,unsigned char c,  unsigned char Val);
  32. bit ISendByte(unsigned char sla,unsigned char c);
  33. unsigned char IRcvByte(unsigned char sla);
  34. //******************************************************************/
  35. int main()
  36. {  
  37.   oled_init();//初始化
  38.         oled_wr_byte(0x2e,0);//关滚动
  39.   oled_showstring(0,0,"AR VALUE",16);
  40.   oled_showstring(0,2,"PR VALUE",16);
  41.   oled_showstring(0,4,"TM VALUE",16);
  42.   oled_showstring(0,6,"NO VALUE",16);
  43.         while(1)
  44.         {
  45.         
  46.         /********以下AD-DA处理*************/  
  47.         
  48.             switch(AD_CHANNEL)
  49.                 {
  50.                         case 0: ISendByte(PCF8591,0x41);
  51.                              D[0]=IRcvByte(PCF8591);  //ADC0 模数转换1      光敏电阻
  52.                                  break;  
  53.                         
  54.                         case 1: ISendByte(PCF8591,0x42);
  55.                              D[1]=IRcvByte(PCF8591);  //ADC1  模数转换2          热敏电阻
  56.                                  break;  
  57.                         
  58.                         case 2: ISendByte(PCF8591,0x43);
  59.                              D[2]=IRcvByte(PCF8591);  //ADC2        模数转换3           悬空
  60.                                  break;  
  61.                         
  62.                         case 3: ISendByte(PCF8591,0x40);
  63.                              D[3]=IRcvByte(PCF8591);  //ADC3   模数转换4           可调0-5v
  64.                                  break;  
  65.                         
  66.                         case 4: DACconversion(PCF8591,0x40, D[4]); //DAC          数模转换
  67.                              break;
  68.                  
  69.                 }

  71.               D[4]=D[0];//把模拟输入采样的信号 通过数模转换输出
  72.                         
  73.            if(++AD_CHANNEL>4) AD_CHANNEL=0;
  74.         
  75.            /********以下将AD的值通过OLED显示*************/
  76.          delay(200);        
  77.          oled_shownum(96,0,D[0],4,16);                           
  78.          delay(200);
  79.         oled_shownum(96,2,D[1],4,16);                           
  80.          delay(200);
  81.         oled_shownum(96,4,D[2],4,16);                           
  82.          delay(200);
  83.                 oled_shownum(96,6,D[3],4,16);                           
  84.          delay(200);

  86.          
  87.    }
  88. }


  91. void delay(uchar i)
  92. {
  93.   uchar j,k;
  94.   for(j=i;j>0;j--)
  95.     for(k=125;k>0;k--);
  96. }

  98. /*******************************************************************
  99. DAC 变换, 转化函数               
  100. *******************************************************************/
  101. bit DACconversion(unsigned char sla,unsigned char c,  unsigned char Val)
  102. {
  103.    Start_I2c();              //启动总线
  104.    SendByte(sla);            //发送器件地址
  105.    //if(ack==0)return(0);
  106.    SendByte(c);              //发送控制字节
  107.    //if(ack==0)return(0);
  108.    SendByte(Val);            //发送DAC的数值  
  109.    //if(ack==0)return(0);
  110.    Stop_I2c();               //结束总线
  111.    return(1);
  112. }

  114. /*******************************************************************
  115. ADC发送字节[命令]数据函数               
  116. *******************************************************************/
  117. bit ISendByte(unsigned char sla,unsigned char c)
  118. {
  119.    Start_I2c();              //启动总线
  120.    SendByte(sla);            //发送器件地址
  121.    //if(ack==0)return(0);
  122.    SendByte(c);              //发送数据
  123.    //if(ack==0)return(0);
  124.    Stop_I2c();               //结束总线
  125.    return(1);
  126. }

  128. /*******************************************************************
  129. ADC读字节数据函数               
  130. *******************************************************************/
  131. unsigned char IRcvByte(unsigned char sla)
  132. {  unsigned char c;

  134.    Start_I2c();          //启动总线
  135.    SendByte(sla+1);      //发送器件地址
  136.    //if(ack==0)return(0);
  137.    c=RcvByte();          //读取数据0

  139.    Ack_I2c(1);           //发送非就答位
  140.    Stop_I2c();           //结束总线
  141.    return(c);
  142. }
复制代码


以上3个文件下载: adc-OLED显示.rar (6.7 KB, 下载次数: 50)
作者: 我会想你的    时间: 2021-7-9 16:07
下下来看看，正在研究12864，
作者: huaerla    时间: 2021-7-12 00:24
我会想你的 发表于 2021-7-9 16:07
下下来看看，正在研究12864，

更基础的12864显示可以看我的上一篇帖子
作者: WFX777888    时间: 2021-7-12 05:58
有原理图吗
作者: jovew    时间: 2021-7-12 11:55
这个程序能不能再STC08G 上面运行？
作者: huaerla    时间: 2021-7-12 14:34
jovew 发表于 2021-7-12 11:55
这个程序能不能再STC08G 上面运行？

当然可以，只不过需要改一下定义啥的，这个程序几乎兼容所有的STC单片机
作者: huaerla    时间: 2021-7-12 14:35
jovew 发表于 2021-7-12 11:55
这个程序能不能再STC08G 上面运行？

不过STC08G自带ADC，就不需要额外的ADC模块了



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1