找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 4379|回复: 4
收起左侧

基于51单片机的数控直流电源(proteus仿真+源程序+原理图+PCB文件)

[复制链接]
ID:265801 发表于 2017-12-23 20:10 | 显示全部楼层 |阅读模式
2.png
1.png

0.jpg

单片机源程序如下:
  1. #include<reg51.h>
  2. #include<absacc.h>
  3. #define  dac0832 XBYTE[0X7fff]
  4. unsigned char code shu[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90};
  5. float s;
  6. sbit ALE=P3^0;
  7. sbit START=P3^1;
  8. sbit EOC=P3^2;
  9. sbit OE=P3^3;
  10. sbit SHCP=P2^0;
  11. sbit DS=P2^1;
  12. sbit STCP=P2^2;
  13. sbit P11=P3^5;
  14. sbit P12=P3^7;
  15. sbit clk=P2^6;
  16. unsigned char j,k,m,n,i,a;
  17. unsigned int b;
  18. void delay(unsigned char t)
  19. {  while(t--);
  20.    }
  21. void display()
  22. {
  23.   
  24.   j=0x01;
  25.   for(i=0;i<8;i++)
  26.   { if((shu[m]&j)==0)
  27.        { DS=0;}
  28.      else {DS=1;}
  29.     SHCP=1;
  30.     SHCP=0;
  31.       j<<=1;
  32.     }       
  33.         P12=0;
  34.     P11=1;

  35.    
  36.           
  37.    

  38.     STCP=0;
  39.     STCP=1;
  40.     delay(200);
  41.    j=0x01;
  42.     for(i=0;i<8;i++)
  43.      { if((shu[n]&j)==0)
  44.        { DS=0;}
  45.    else {DS=1;}
  46.      SHCP=1;
  47.    SHCP=0;
  48.      j<<=1;
  49.     }
  50.            P11=0;
  51.     P12=1;
  52.   
  53.    
  54.        
  55.       STCP=0;
  56.    STCP=1;
  57.    delay(200);
  58.      }
  59.   

  60. void main()
  61. {
  62. P2=0X87;
  63. TMOD=0X20;
  64. TH1=0X06;
  65. TL1=0X06;
  66. EA=1;
  67. ET1=1;
  68. TR1=1;

  69. while(1)
  70. {
  71.    ALE=1;
  72.    ALE=0;
  73.    START=1;
  74.    START=0;
  75.    while(EOC==0);
  76.    OE=1;
  77.    k=P1;
  78.    a=P1;
  79.    b=a*6;
  80.    m=b/1000;
  81.    n=b%1000/100;
  82.    
  83.    dac0832=k;
  84.   
  85. ……………………

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

所有资料51hei提供下载:

原理图和PCB.zip

315.78 KB, 下载次数: 80, 下载积分: 黑币 -5

源程序.zip

39.01 KB, 下载次数: 77, 下载积分: 黑币 -5

Proteus仿真.zip

72.06 KB, 下载次数: 84, 下载积分: 黑币 -5

回复

使用道具 举报

ID:658116 发表于 2020-12-1 19:42 | 显示全部楼层
这个程序不能编译,
回复

使用道具 举报

ID:328014 发表于 2020-12-1 20:16 | 显示全部楼层
qhz 发表于 2020-12-1 19:42
这个程序不能编译,

51hei.png

删掉这个项目就可以编译ok了
回复

使用道具 举报

ID:991158 发表于 2021-12-12 11:00 | 显示全部楼层
程序的第二布不太懂,能详细讲解一下吗
回复

使用道具 举报

ID:991158 发表于 2021-12-12 11:04 | 显示全部楼层
想知道程序的设计原理
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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