找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 7985|回复: 18
收起左侧

0-30V 4A单片机数控稳压电源设计资料

  [复制链接]
ID:290170 发表于 2018-9-17 10:02 | 显示全部楼层 |阅读模式
电路图.jpg 4.jpg 3.jpg 2.jpg 1.jpg 0-30V 4A数控稳压电源资料.JPG

单片机源程序如下:

  1. /***********************************************************************
  2. 名字:  main.c
  3. 作者:  春风  
  4. 创建日:2008-8-15
  5. 工程:  数控稳压电源  
  6. ***********************************************************************/

  7. #include"reg52.h"
  8. //#include"math.h"
  9. #include"stdlib.h"
  10. #include"function.h"


  11. sbit RS = P1^4;
  12. sbit RW = P1^5;
  13. sbit E  = P1^6;

  14. #define DBUS P0
  15. sbit clk_574_1 = P2^3;
  16. //sbit clk_574_2 = P1^3;
  17. //sbit lcd_rs    = P1^4;

  18. uint idac;
  19.        

  20. idata uchar GOUT[7];
  21. idata float temp1;
  22. idata float dac_temp;
  23. idata float sheding_temp;
  24. idata float sheding_temp1;
  25. char  code dx516[3] _at_ 0x003b;//这是为了仿真设置的(大虾仿真器)

  26. /************************************************************************************
  27.                               把浮点数拆开存储指针型数据  
  28.                                                           输入浮点数,方式0:设定值,1:检测值  
  29. ************************************************************************************/
  30. void chai(float x,bit y)  
  31. {
  32.         uint i;
  33.         for(i = 0;i < 7;i ++)
  34.                 GOUT[i] = 0;
  35.         if(y == 0)
  36.         {
  37.                 i = x / 10;
  38.                 if(i == 0)
  39.                         GOUT[0] = ' ';
  40.                 else
  41.                         GOUT[0]        = i + '0';
  42.                 GOUT[1] = (int)x % 10 + '0';
  43.                 x = x * 10;
  44.                 GOUT[3] = (int)x % 10 + '0';

  45.                 x = x * 10;
  46.                 if(((int)x % 10) >= 5 )// 防止后面大于4的数被舍去  
  47.                 {GOUT[3] = GOUT[3] + 1;}
  48.                 else
  49.                 {;}

  50.                 GOUT[4] = ' ';
  51.                 GOUT[5] = ' ';
  52.         }
  53.         else
  54.         {
  55.                 i = x / 10;
  56.                 if(i == 0)
  57.                         GOUT[0] = ' ';
  58.                 else
  59.                         GOUT[0] = i + '0';
  60.                 GOUT[1] = (int)x % 10 + '0';
  61.                 x = x * 10;
  62.                 GOUT[3] = (int)x % 10 + '0';
  63.                 x = x * 10;
  64.                 GOUT[4] = (int)x % 10 + '0';
  65.                 x = (x * 10);
  66.                 GOUT[5] = (unsigned int)x % 10 + '0';
  67.         }
  68.         GOUT[2] =  '.';
  69.         GOUT[6] =  '\0';
  70. }

  71. /************************************************************************************

  72. //向LCM发送一个字符串,长度64字符之内。  

  73. ************************************************************************************/
  74. void lcm_w_word(uchar x,uchar y,uchar *str)
  75. {
  76.    x = x+y;
  77.    w_code(x);
  78.   while(*str != '\0')
  79.   {
  80.        w_data(*str++);
  81.    }
  82.   *str = 0;
  83. }
  84. /************************************************************************************
  85.                               显示设定电压  
  86. ************************************************************************************/
  87. void  disp_sheding()
  88. {
  89.     lcm_w_word(0x90,0x00,"设定:");
  90.     sheding_temp1 = sheding_temp + 0.0005;//------加0.0005修正有时显示.0999
  91.         chai(sheding_temp1,1);  
  92.     lcm_w_word(0x90,3,GOUT);
  93.         w_code(0x96);
  94.     w_data('V');       
  95. }
  96. /************************************************************************************
  97.                  AD的16位整形数转换成浮点电压或电流值  
  98. ************************************************************************************/
  99. float adjisuan_U(uint x)
  100. {
  101.         temp1 = 11.990 / 0x5e1f;
  102.         temp1 = x * temp1;
  103.         return temp1;
  104. }

  105. float adjisuan_I(uint x)  //
  106. {
  107.         temp1 = 0.899 / 0x253d;
  108.         temp1 = (x * temp1)-0.005;
  109.         return temp1;
  110. }
  111. /************************************************************************************
  112. *
  113. *函数功能:输入浮点数  
  114. *
  115. ************************************************************************************/
  116. float scanf_float(void)
  117. {
  118.         static uchar i = 0;
  119.         static uchar x[5] = {'0','0','0','0','0'};
  120.         static bit k = 1;
  121.         uchar temp1,temp2;
  122.         temp1 = key_sm();
  123.         temp2 = key_sm();
  124.         if((temp2 == 0xff) || (temp1 != temp2))
  125.         {
  126.                 k = 1;
  127.                 return(atof(x));
  128.         }
  129.         else if(k)
  130.         {
  131.                 k = 0;
  132.                 x[i] = temp1;
  133.                 i ++;
  134.                 if((temp1 == key_esc) || (i == 4))
  135.                 {
  136.                         x[0] = '0';
  137.                         x[1] = '0';
  138.                         x[2] = '0';
  139.                         x[3] = '0';
  140.                         x[4] = '0';
  141.                         i = 0;
  142.                 }
  143.                 return(atof(x));
  144.         }
  145. }

  146. /************************************************************************************

  147.                               扫描按键,并根据键值修改DAC的电压  

  148. ************************************************************************************/
  149. void key_dac()
  150. {
  151.                 uchar key_qiao;
  152.            key_qiao = key_sm();
  153.         switch(key_sm())
  154.                 {
  155.         case key_shang:dac_temp = dac_temp + 1.0;break;//---按下上键电压加1V
  156.         case key_xia  :dac_temp = dac_temp - 1.0;break;//---按下下键电压减1
  157.         case key_zuo  :dac_temp = dac_temp - 0.1;break;//---按下左键电压减0.1
  158.     case key_you  :dac_temp = dac_temp + 0.1;break;//---按下右键电压加0.1
  159.     case key_0    :dac_temp = 0;             break;//---按下0键电压归0
  160.         default: key_qiao = 0xff;
  161.                  }
  162.                 if(key_qiao != 0xff)  //  10月1日 这里原来是0x00就读AD不正常            
  163.                            {
  164.                        RS  =  1;                       
  165.                            RW  =  0;        //--------避免液晶屏干扰数据总线
  166.                            if(dac_temp < 0){dac_temp = 0;}        //----判断电压低于0大于30时把数据归0
  167.                         if(dac_temp >= 30.10){dac_temp = 0;}       
  168.                         sheding_temp = dac_temp ;
  169.                         disp_sheding();
  170.                         idac = conver(dac_temp);  
  171.                           dac(idac);
  172.                         delay(50000);
  173.                         }
  174. }
  175. /************************************************************************************
  176.                                      主函数   
  177. ************************************************************************************/
  178. main()
  179. {

  180.                         lcd_rst(0);
  181.                         rst_ad();       
  182.                         dac_temp = 0 ;
  183.                        RS  =  1;                       
  184.                        RW  =  0;        //--------避免液晶屏干扰数据总线                 
  185.                              dac(conver(dac_temp));           //吸合低压继电器并输出0V
  186.                        LED_ONOFF(1);//  打开背光源   
  187.                           set_7705_ch(0);
  188.                     read_AD_data(0x38);
  189.                     set_7705_ch(1);
  190.                     read_AD_data(0x39);

  191.                    disp_sheding();//显示设定电压   
  192.                    while(1)
  193.                    {
  194.                    lcm_w_word(0x80,0x02,"稳压电源");
  195.                    lcm_w_word(0x90,0x00,"设定:");                  
  196.                    lcm_w_word(0x88,0x00,"电压:");   
  197.                    lcm_w_word(0x98,0x00,"电流:");
  198.                           
  199.                    write_ad(0x10);
  200.                write_ad(0x04);
  201.                    adjisuan_U(read_AD_data(0x38));
  202.                    chai(temp1,1);  
  203.            lcm_w_word(0x88,3,GOUT);
  204.                    key_dac();
  205. ……………………

  206. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
数控稳压电源程序.rar (86.33 KB, 下载次数: 238)
回复

使用道具 举报

ID:450548 发表于 2019-1-2 19:01 | 显示全部楼层
这么好的资料,怎么没人顶啊,楼主再上几张测试图片。
回复

使用道具 举报

ID:588322 发表于 2019-8-4 20:06 | 显示全部楼层
好资料,下载研究
回复

使用道具 举报

ID:601757 发表于 2019-8-28 19:08 | 显示全部楼层
板子做的比我漂亮
回复

使用道具 举报

ID:629626 发表于 2019-11-6 19:25 | 显示全部楼层
很好啊
回复

使用道具 举报

ID:3666 发表于 2019-12-5 16:19 | 显示全部楼层
必需要顶的
回复

使用道具 举报

ID:673647 发表于 2019-12-26 13:49 | 显示全部楼层
很好的东西,谢谢分享!
回复

使用道具 举报

ID:679350 发表于 2020-1-2 09:23 | 显示全部楼层
非常棒的东西!
回复

使用道具 举报

ID:27825 发表于 2020-1-13 16:33 来自手机 | 显示全部楼层
下来试一试
回复

使用道具 举报

ID:8222 发表于 2020-1-17 21:53 | 显示全部楼层
很好,非常感谢分享。
回复

使用道具 举报

ID:689425 发表于 2020-2-4 17:53 | 显示全部楼层
已下载,谢谢楼主
回复

使用道具 举报

ID:72011 发表于 2020-2-10 06:50 | 显示全部楼层
很好,非常感谢分享。
回复

使用道具 举报

ID:345173 发表于 2020-2-19 14:36 | 显示全部楼层
板子做的漂亮,学习一下。
回复

使用道具 举报

ID:695751 发表于 2020-2-20 17:28 | 显示全部楼层
谢谢分享!
回复

使用道具 举报

ID:703081 发表于 2020-3-7 21:49 来自手机 | 显示全部楼层
电流可以调吗
回复

使用道具 举报

ID:224578 发表于 2021-5-19 12:11 | 显示全部楼层
暂时还看不懂
回复

使用道具 举报

ID:932479 发表于 2021-6-4 13:59 | 显示全部楼层
好厉害啊,不明觉厉
回复

使用道具 举报

ID:138707 发表于 2021-8-11 13:04 | 显示全部楼层
很厉害,高手。
回复

使用道具 举报

ID:73370 发表于 2021-9-8 14:15 | 显示全部楼层
TIP41原理图封装不对吧?是N管,不是P管
另外 D9、D10好像没什么用啊
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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