设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › ADE7758三相电能表读写程序和初始化 单片机程序
返回列表 发新帖
查看: 2742|回复: 3
打印 上一主题 下一主题
收起左侧

ADE7758三相电能表读写程序和初始化 单片机程序

[复制链接]
跳转到指定楼层
楼主
ID:648979 发表于 2019-11-26 14:30 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
  1. /*file name :DB_ADE7758_OREG.C*/

  3. /*Function  :Read ADE7758 register and Write ADE7758 register */
  4. #include<AM80C52.H>
  5. #include "DB_ADE7758_OREG.H"

  7. sbit DB_CS_A=0x90;
  8. sbit DB_CS_B=0x91;
  9. sbit DB_CS_C=0x92;

  11. sbit Dout=0x97;
  12. sbit Din =0x96;
  13. sbit Sclk=0x95;

  15. #define DB_X5045_CS0     P1=P1&0x0f8
  16. #define DB_ADE7758_CS1   P1=P1|0x01;P1=P1&0x0f9
  17. #define DB_LED_CS2       P1=P1|0x02;P1=P1&0x0fa
  18. #define DB_LED_CS3       P1=P1|0x03;P1=P1&0x0fb
  19. #define DB_DS1302_CS4    P1=P1|0x04;P1=P1&0x0fc
  20. #define DB_Uselct_CS     P1=P1|0x07

  22. unsigned char ADE7758_ReadData(void)
  23.   {
  24.      unsigned char ReadData;
  25.      unsigned int i;
  26.      ReadData=0x0;
  27.      Dout = 1;
  28.      for(i=0;i<8;i++)
  29.      {
  30.        ReadData=ReadData<<1;
  31.        Sclk=0;
  32.        YS();
  33.        Sclk=1;
  34.        YS();
  35.        if(Dout)
  36.        {
  37.         ReadData=ReadData | 0x01;
  38.        }
  39.        else
  40.        {
  41.         ReadData=ReadData & 0xfe;
  42.        }
  43.        YS();
  44.      }
  45.      Sclk=0;
  46.      return ReadData;

  48.   }

  50. void ADE7758_WriteDatain(unsigned char Datain)
  51.   {
  52.      unsigned char i;
  53.      unsigned char Temp_Data;
  54.      Temp_Data=Datain;
  55.      Sclk=0;
  56.      i=0;

  58.     for(i=0;i<8;i++)
  59.        {

  61.          Sclk = 1;
  62.          YS();
  63.           if((Temp_Data & 0x80)==0x80)
  64.          {
  65.            Din = 1;
  66.          }
  67.          else
  68.          {
  69.            Din = 0;
  70.          }
  71.          Sclk = 0;
  72.          YS();
  73.          Temp_Data=Temp_Data<<1;
  74.        }

  76.   }



  80. void ADE7758_InitA()
  81.   {
  82.      /*写相应寄存器*/
  83.      /*写12位是先写入高4位，再写入低8位*/

  85.      DB_ADE7758_CS1;
  86.      ADE7758_WriteDatain(0x80);
  87.      DB_Uselct_CS;

  89.      /*使能输出脉冲*/
  90.      DB_ADE7758_CS1;
  91.      ADE7758_WriteDatain(OPMODE_W8);
  92.      ADE7758_WriteDatain(0x00);
  93.      DB_Uselct_CS;

  95.      DB_ADE7758_CS1;
  96.      ADE7758_WriteDatain(GAIN_W8);
  97.      ADE7758_WriteDatain(0x00);
  98.      DB_Uselct_CS;

  100.      /*设置VARCF为无功功率输出脉冲*/
  101.      DB_ADE7758_CS1;
  102.      ADE7758_WriteDatain(WAVMODE_W8);
  103.      ADE7758_WriteDatain(0x00);
  104.      DB_Uselct_CS;

  106.      /*设置有功增益*/
  107.      DB_ADE7758_CS1;
  108.      ADE7758_WriteDatain(AWG_W12);
  109.      ADE7758_WriteDatain(ref[133]);
  110.      ADE7758_WriteDatain(ref[132]);
  111.      DB_Uselct_CS;

  113.      DB_ADE7758_CS1;
  114.      ADE7758_WriteDatain(BWG_W12);
  115.      ADE7758_WriteDatain(ref[135]);
  116.      ADE7758_WriteDatain(ref[134]);
  117.      DB_Uselct_CS;

  119.      DB_ADE7758_CS1;
  120.      ADE7758_WriteDatain(CWG_W12);
  121.      ADE7758_WriteDatain(ref[137]);
  122.      ADE7758_WriteDatain(ref[136]);
  123.      DB_Uselct_CS;

  125.      /*设置无功增益为默认1*/
  126.      DB_ADE7758_CS1;
  127.      ADE7758_WriteDatain(AVARG_W12);
  128.      ADE7758_WriteDatain(ref[139]);
  129.      ADE7758_WriteDatain(ref[138]);
  130.      DB_Uselct_CS;

  132.      DB_ADE7758_CS1;
  133.      ADE7758_WriteDatain(BVARG_W12);
  134.      ADE7758_WriteDatain(ref[141]);
  135.      ADE7758_WriteDatain(ref[140]);
  136.      DB_Uselct_CS;

  138.      DB_ADE7758_CS1;
  139.      ADE7758_WriteDatain(CVARG_W12);
  140.      ADE7758_WriteDatain(ref[143]);
  141.      ADE7758_WriteDatain(ref[142]);
  142.      DB_Uselct_CS;

  144.      /*设置输出脉冲累计的是单相还是三相*/
  145.      DB_ADE7758_CS1;
  146.      ADE7758_WriteDatain(COMPMODE_W8);
  147.      ADE7758_WriteDatain(0xbC);
  148.      DB_Uselct_CS;

  150.      DB_ADE7758_CS1;
  151.      ADE7758_WriteDatain(LCYCMODE_W8);
  152.      ADE7758_WriteDatain(0x3f);
  153.      DB_Uselct_CS;

  155.      DB_ADE7758_CS1;
  156.      ADE7758_WriteDatain(LINECYC_W16);
  157.      ADE7758_WriteDatain(0x0f);
  158.      ADE7758_WriteDatain(0xff);
  159.      DB_Uselct_CS;


  162.      DB_ADE7758_CS1;
  163.      ADE7758_WriteDatain(WDIV_W8);
  164.      ADE7758_WriteDatain(0x32);
  165.      DB_Uselct_CS;

  167.      DB_ADE7758_CS1;
  168.      ADE7758_WriteDatain(VARDIV_W8);
  169.      ADE7758_WriteDatain(0x32);
  170.      DB_Uselct_CS;

  172.      DB_ADE7758_CS1;
  173.      ADE7758_WriteDatain(VADIV_W8);
  174.      ADE7758_WriteDatain(0x32);
  175.      DB_Uselct_CS;


  178.      /*设置有功输出脉冲分频系数*/
  179.      DB_ADE7758_CS1;
  180.      ADE7758_WriteDatain(APCFNUM_W16);
  181.      ADE7758_WriteDatain(0x00);
  182.      ADE7758_WriteDatain(0x00);
  183.      DB_Uselct_CS;

  185.      DB_ADE7758_CS1;
  186.      ADE7758_WriteDatain(APCFDEN_W12);
  187.      ADE7758_WriteDatain(ref[57]);
  188.      ADE7758_WriteDatain(ref[56]);
  189.      DB_Uselct_CS;

  191.      /*设置无功输出脉冲分频系数*/
  192.      DB_ADE7758_CS1;
  193.      ADE7758_WriteDatain(VARCFNUM_W16);
  194.      ADE7758_WriteDatain(0x00);
  195.      ADE7758_WriteDatain(0x00);
  196.      DB_Uselct_CS;

  198.      DB_ADE7758_CS1;
  199.      ADE7758_WriteDatain(VARCFDEN_W12);
  200.      ADE7758_WriteDatain(ref[59]);
  201.      ADE7758_WriteDatain(ref[58]);
  202.      DB_Uselct_CS;

  204.      /*相位补偿*/
  205.      DB_ADE7758_CS1;
  206.      ADE7758_WriteDatain(APHCAL_W7);
  207.      ADE7758_WriteDatain(ref[144]);
  208.      DB_Uselct_CS;

  210.      DB_ADE7758_CS1;
  211.      ADE7758_WriteDatain(BPHCAL_W7);
  212.      ADE7758_WriteDatain(ref[146]);
  213.      DB_Uselct_CS;

  215.      DB_ADE7758_CS1;
  216.      ADE7758_WriteDatain(CPHCAL_W7);
  217.      ADE7758_WriteDatain(ref[148]);
  218.      DB_Uselct_CS;

  220.      /*电压补偿*/
  221.      /*DB_ADE7758_CS1;
  222.      ADE7758_WriteDatain(AVRMSOS_W12);
  223.      ADE7758_WriteDatain(ref[13]);
  224.      ADE7758_WriteDatain(ref[12]);
  225.      DB_Uselct_CS;

  227.      DB_ADE7758_CS1;
  228.      ADE7758_WriteDatain(BVRMSOS_W12);
  229.      ADE7758_WriteDatain(ref[15]);
  230.      ADE7758_WriteDatain(ref[14]);
  231.      DB_Uselct_CS;

  233.      DB_ADE7758_CS1;
  234.      ADE7758_WriteDatain(CVRMSOS_W12);
  235.      ADE7758_WriteDatain(ref[17]);
  236.      ADE7758_WriteDatain(ref[16]);
  237.      DB_Uselct_CS; */

  239.       /*电流增益*/
  240.      DB_ADE7758_CS1;
  241.      ADE7758_WriteDatain(AIGAIN_W12);
  242.      ADE7758_WriteDatain(ref[19]);
  243.      ADE7758_WriteDatain(ref[18]);
  244.      DB_Uselct_CS;

  246.      DB_ADE7758_CS1;
  247.      ADE7758_WriteDatain(BIGAIN_W12);
  248.      ADE7758_WriteDatain(ref[21]);
  249.      ADE7758_WriteDatain(ref[20]);
  250.      DB_Uselct_CS;

  252.      DB_ADE7758_CS1;
  253.      ADE7758_WriteDatain(CIGAIN_W12);
  254.      ADE7758_WriteDatain(ref[23]);
  255.      ADE7758_WriteDatain(ref[22]);
  256.      DB_Uselct_CS;
  257. }

  259. void YS()
  260. {
  261. unsigned char  i;
  262. for(i=0;i<0xff;i++);
  263. }
复制代码


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:1 发表于 2019-11-26 14:37 | 只看该作者
本帖需要重新编辑补全电路原理图,源码,详细说明与图片即可获得100+黑币(帖子下方有编辑按钮)
回复

使用道具 举报

板凳
ID:650094 发表于 2019-11-26 17:02 | 只看该作者
我觉得还不错
回复

使用道具 举报

地板
ID:421481 发表于 2019-11-26 19:10 | 只看该作者
我觉得也是
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

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