標(biāo)題: 單片機LED漸變源程序 原理圖與Proteus仿真 [打印本頁]
作者: 51黑電子迷    時間: 2017-5-7 20:59
標(biāo)題: 單片機LED漸變源程序 原理圖與Proteus仿真
下面是單片機LED漸變的proteus仿真原理圖（工程文件可到本帖附件中下載）：


單片機源程序如下：
  1. //#include <reg51.h>
  2. #include<STC12C5A60S2.H>
  3. #define uchar unsigned char
  4. #define uint16 unsigned short int
  5. //#include absacc.h
  6. void delay(uchar);
  7. extern unsigned char _crol_    (unsigned char, unsigned char);
  8. sbit LED0=P2^0;
  9. sbit LED1=P2^1;
  10. sbit LED2=P2^2;
  11. sbit LED3=P2^3;
  12. sbit LED4=P2^4;
  13. sbit LED5=P2^5;
  14. sbit LED6=P2^6;
  15. sbit LED7=P2^7;
  16. uchar        pram[]={01,03,07,0x0f,0x1f};
  17. uchar        nram[]={180,90,30,6,1};
  18. main()
  19. {        //m1:m0  00=標(biāo)準(zhǔn)；   01=推挽；   10=輸入；   11=開漏輸出
  20.         uchar        i=0,j=0,k=0,n=0;
  21.         uchar        temp=0;
  22.         P2M1 = 0X00;
  23.         P2M0 = 0Xff;   //設(shè)定P2推挽輸出
  24.         while(1)
  25.         {       
  26.                                 //n=nram[j];
  27.                                 temp=~pram[j];
  28.                                 temp=_crol_(temp, k);
  29.                                 P2=temp;
  30.                                 delay(1);          //  延時50us

  32.                  i++;
  33.                  if(i==nram[j])
  34.                  {
  35.                         i=0;
  36.                         j++;
  37.                         if(j==6)
  38.                         {
  39.                                 j=0;
  40.                                 n++;
  41.                                 if(n==10)
  42.                                 {
  43.                                         k++;
  44.                                         if(k==8)k=0;
  45.                                         n=0;
  46.                                 }
  47.                         }
  48.                  }

  50.         }
  51. }


  54. void delay(uchar k )
  55. {
  56.         uchar x,y,z;
  57.         for(x=k;x>0;x--)

復(fù)制代碼



給大家分享一些我們老師給的一些經(jīng)典的單片機程序源碼， 一共有十多個.都有詳細(xì)的注釋，然大家快速的理解每一行代碼的意思。而且有proteus仿真原理圖。大家可以直接驗證程序的對錯.


本系列所有源碼打包下載地址（含proteus仿真工程文件和源程序）：
http://www.torrancerestoration.com/bbs/dpj-82474-1.html

本例程下載：
LED漸變.rar (51.02 KB, 下載次數(shù): 37)

作者: QQ314815    時間: 2021-4-17 16:43
讀書沒有好好學(xué)習(xí)，加上工作用的少現(xiàn)在都還給老師了
作者: 東宮承鄞    時間: 2023-10-5 11:37
下載的文件仿真格式是 DSN文件 需要用Proteus7.8版本來打開
作者: ydq2015ok    時間: 2023-11-6 12:39
20年后；自學(xué)單片機；感謝資料！



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