找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 4499|回复: 2
打印 上一主题 下一主题
收起左侧

51单片机数控电源 tlc5615+tlc1543程序

[复制链接]
跳转到指定楼层
楼主
数控电源,51单片机+tlc5615+tlc1543

源程序:
  1. /*最大电流为6A,最大电压为40V*/
  2. #include<reg52.h>
  3. sbit sclk5615=P1^0;                                                                                                                                /*dac tlc5615串行时钟*/
  4. sbit din5615=P1^1;                                                                                                                                 /*dac tlc5615串行数据输入*/
  5. sbit cs5615=P1^2;                                                                                                                                  /*dac tlc5615片选*/
  6. sbit dout5615=P1^3;                                                                                                                                /*dac tlc5615串行数据输出*/
  7. sbit eoc1543=P3^0;
  8. sbit sclk1543=P3^1;
  9. sbit addr1543=P3^2;
  10. sbit dout1543=P3^3;
  11. sbit cs1543=P3^4;
  12. void Delayms(unsigned int t)                                                                                                    //延时毫秒函数:
  13. {
  14.         unsigned int x,y;
  15.         for(x=t;x>0;x--)
  16.                 for(y=120;y>0;y--);
  17. }
  18. void TLC1543_init(void)
  19. {
  20.     cs1543=1;
  21.     sclk1543=0;
  22. }
  23. unsigned int ReadADC_TLC1543(unsigned char ch)
  24. {
  25.     unsigned char temp;
  26.     unsigned int adc_value=0;
  27.     ch<<=4;
  28.     cs1543=0;
  29.     for(temp=0;temp<10;temp++)         // 将判断语句改为 temp<12
  30.     {                                       // 程序可移殖至 TLC2543.
  31.         adc_value<<=1;
  32.         ch<<=1;
  33.         addr1543=CY;
  34.         if(dout1543)   
  35.                         adc_value+=1;
  36.         sclk1543=1;
  37.         Delayms(1);
  38.         sclk1543=0;
  39.     }
  40.     cs1543=1;
  41.     return adc_value;
  42. }
  43. void WriteTLC5615(unsigned int wdata)                                                                                //写TLC5615数据函数:
  44. {
  45.         unsigned char i;
  46.         cs5615=0;                                                                                                                                        //片选使能
  47.         wdata<<=2;                                                                                                                                //将数据左移两位,补两位扩展位,组成12位数据写入
  48.         for(i=0;i<12;i++)                                                                                                                //写入12位数据
  49.         {
  50.                 sclk5615=0;
  51.                 din5615=(wdata&0x0800)?1:0;                                                                                                //取出最高位(第11位)写入
  52.                 sclk5615=1;                                                                                                                                //上升沿送数据
  53.                 wdata<<=1;                                                                                                                        //下一位移到最高位
  54.         }
  55.         cs5615=1;                                                                                                                                        //片选禁止
  56. }
  57. float get_average(unsigned char ch,unsigned char time)
  58. {
  59.         unsigned char i;
  60.         float v;
  61.         v=ReadADC_TLC1543(ch);
  62.         for(i=0;i<time;i++)
  63.         {
  64.                 v+=v;
  65.                 Delayms(5);
  66.         }
  67.         return v/time;
  68. }
  69. /*unsigned char KEY_Scan()
  70. {
  71.         unsigned char temp=0;
  72.         unsigned char com=0x55,com1=0,com2=0;
  73.         P2=0xf0;
  74.         if(P2!=0xf0)
  75.         {
  76.                 com1=P2;
  77.                 P2=0x0f;
  78.                 com2=P2;        
  79.         }
  80.         P2=0xf0;
  81.     while(P2!=0xf0);          
  82.         temp=com1|com2;
  83.         switch(temp)
  84.         {
  85.                 case 0xee:com=0;break;
  86.                 case 0xed:com=1;break;
  87.                 case 0xeb:com=2;break;
  88.                 case 0xe7:com=3;break;
  89.                 case 0xde:com=4;break;
  90.                 case 0xdd:com=5;break;
  91.                 case 0xdb:com=6;break;
  92.                 case 0xd7:com=7;break;
  93.                 case 0xbe:com=8;break;
  94.                 case 0xbd:com=9;break;
  95.                 case 0xbb:com=10;break;
  96.                 case 0xb7:com=11;break;
  97.                 case 0x7e:com=12;break;
  98.                 case 0x7d:com=13;break;
  99.                 case 0x7b:com=14;break;       
  100.                 case 0x77:com=15;break;                                  
  101.         }
  102.         return(com);
  103. }*/
  104. void main(void)                                                                                                                       
  105. {
  106.         float dat1,dat2,volt,current;
  107.         TLC1543_init();                                                                                                               
  108.         while(1)
  109.         {
  110.                 WriteTLC5615(100);/*向dac写入数据*/
  111.                 dat1=get_average(0,10);/*通道0测电压*/
  112.                 dat2=get_average(1,10);/*通道1测电流*/
  113.                 volt=dat1*8;/*最大电压为40v,分压为5v,分压倍数为8倍*/
  114.                 current=dat2*6/5;/*最大电流6A,采样电阻为1mΩ,采样电阻上面最大电压为6mv,差分放大100倍,即最大电压为6v,分压电阻分压后变成5v*/
  115.                                 


  116. …………余下代码请下载附件…………
复制代码


下载:
电源.zip (30.14 KB, 下载次数: 62)
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:236763 发表于 2018-3-23 19:54 | 只看该作者
大神,有proteus仿真图吗?多谢
回复

使用道具 举报

板凳
ID:123003 发表于 2018-6-16 20:42 | 只看该作者
有没有电路图
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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