找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 1792|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

C51單片機心型燈設(shè)計(代碼+pcb文件)

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:950533 發(fā)表于 2022-4-26 17:25 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
Altium Designer畫的心型燈原理圖和PCB圖如下：(51hei附件中可下載工程文件)


單片機源程序如下:
  1. #include<reg52.h>
  2. #include<intrins.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char

  6. uint k,n,m,q;
  7. void DelayMs(uint ms)
  8. {
  9. uint i,j;
  10. for(i=ms;i>0;i--)
  11. for(j=124;j>0;j--);
  12. }
  13. void xuanzhuan()
  14. {
  15.         int i;
  16. for(i=0;i<3;i++)
  17.         {
  18.     uint a;
  19.     a=0x7f;
  20.     for(k=8;k>0;k--)
  21.      {
  22.       P0=a;
  23.       DelayMs(150);
  24.       a=_cror_(a,1);
  25.      }
  26.      P0=0XFF;
  27.      a=0x7f;
  28.     for(m=8;m>0;m--)
  29.      {
  30.        P2=a;
  31.       DelayMs(150);
  32.        a=_cror_(a,1);
  33.      }
  34.       a=0xfe;
  35.     for(n=8;n>0;n--)
  36.      {
  37.        P2=a;
  38.       DelayMs(150);
  39.       a=_crol_(a,1);
  40.      }
  41.       P2=0XFF;
  42.       a=0xfe;
  43.     for(q=8;q>0;q--)
  44.     {
  45.       P0=a;
  46.      DelayMs(150);
  47.       a=_crol_(a,1);
  48.     }
  49.   }
  50. }
  51. void liangmie()
  52. {
  53.         int i;
  54.         for(i=0;i<3;i++)
  55.         {
  56.     P0=0X00;
  57.           P2=0X00;
  58.           DelayMs(400);
  59.           P0=0XFF;
  60.           P2=0XFF;
  61.                 DelayMs(400);
  62.         }
  63. }
  64. void jiange()
  65. {
  66.         int i,j;
  67.         for(i=0;i<3;i++)
  68.         {
  69.     P0=0XAA;
  70.           P2=0XAA;
  71.           DelayMs(400);
  72.           P0=0XFF;
  73.           P2=0XFF;
  74.                  DelayMs(400);
  75.         }
  76.                 for(j=0;j<3;j++)
  77.         {
  78.     P0=0X55;
  79.           P2=0X55;
  80.           DelayMs(400);
  81.           P0=0XFF;
  82.           P2=0XFF;
  83.                  DelayMs(400);
  84.         }
  85. }

  87. void main()
  88. {
  89.   while(1)
  90.   {
  91.                 liangmie();
  92.     xuanzhuan();
  93.                 jiange();
  94.   }
  95. }
復(fù)制代碼

PCB和Keil代碼下載: PCB和代碼.7z (1.85 MB, 下載次數(shù): 12)

評分

參與人數(shù) 1黑幣 +40 收起 理由
admin + 40 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表