標(biāo)題: 單片機(jī)數(shù)控直流穩(wěn)壓電源Proteus仿真0-15V 帶源程序 [打印本頁(yè)]
作者: 虎兔賽高    時(shí)間: 2017-5-19 12:17
標(biāo)題: 單片機(jī)數(shù)控直流穩(wěn)壓電源Proteus仿真0-15V 帶源程序
基于51單片機(jī)的直流穩(wěn)壓電源設(shè)計(jì)，電壓：0-15V

電源的仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）：



單片機(jī)源程序如下:
  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;

  36.    
  37.            
  38.    

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

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

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

  91. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
0025、數(shù)控直流穩(wěn)壓電源.7z (40.05 KB, 下載次數(shù): 160)


作者: xymiss    時(shí)間: 2017-10-13 20:23
正好需要單片機(jī)控制超過(guò)5V的例程看一下。下來(lái)學(xué)習(xí)一下。謝謝分享
作者: 江夏    時(shí)間: 2019-1-10 21:41
大佬，這個(gè)接個(gè)電機(jī)怎么接呀？
作者: 兀自清涼    時(shí)間: 2019-1-12 21:11
最近做正負(fù)15伏的，敲不出來(lái)。下回去看看，謝謝分享
作者: 1874198704    時(shí)間: 2019-4-28 12:28
學(xué)習(xí)學(xué)習(xí)



歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1