找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2353|回復(fù): 2
收起左側(cè)

keilc實(shí)驗(yàn)作業(yè)——基于c51的點(diǎn)陣LED顯示實(shí)驗(yàn)

[復(fù)制鏈接]
ID:158802 發(fā)表于 2017-1-3 18:29 | 顯示全部樓層 |閱讀模式
keilc實(shí)驗(yàn)作業(yè)——基于c51的點(diǎn)陣LED顯示實(shí)驗(yàn)
標(biāo)準(zhǔn)答案分享
供實(shí)驗(yàn)課同學(xué)下載
0.png

單片機(jī)源程序:
  1. #include<reg51.h>
  2. #define uint unsigned int
  3. #define uchar unsigned char
  4. const uchar tab[][8]={
  5. 0x3c,0x66,0x6e,0x6e,0x76,0x76,0x66,0x3c,
  6. 0x18,0x78,0x18,0x18,0x18,0x18,0x18,0x7e,
  7. 0x3c,0x66,0x66,0x06,0x1c,0x30,0x66,0x7e,
  8. 0x3c,0x66,0x06,0x1c,0x06,0x66,0x66,0x3c,
  9. 0x1c,0x3c,0x6c,0xcc,0xcc,0xfe,0x0c,0x0c,
  10. 0x7e,0x60,0x7c,0x66,0x06,0x06,0x66,0x3c,
  11. 0x1c,0x30,0x60,0x7c,0x66,0x66,0x66,0x3c,
  12. 0x7e,0x66,0x06,0x0c,0x08,0x18,0x30,0x30,
  13. 0x3c,0x66,0x66,0x3c,0x66,0x66,0x66,0x3c,
  14. 0x3c,0x66,0x66,0x66,0x3e,0x06,0x0c,0x38,
  15. };

  16. void delay(uchar x)
  17. {
  18. uint i;
  19. while((x--)!=0)
  20. {
  21. for(i=0;i<125;i++)
  22. {;}
  23. }
  24. }


  25. void main(void)
  26. {
  27.    uchar i,j,k,m,n,p,q;
  28.    while(1)
  29.    {
  30.     for(j=0;j<10;j++)
  31.      {
  32.       for(q=0;q<8;q++)
  33.          {
  34.          for(k=0;k<15;k++)
  35.             {
  36.                  m=0x80;
  37.                 for(i=0;i<15;i++)
  38.                   {
  39.                    P3=~m;
  40.                      n=tab[j][i];
  41.                      n=(n<<q);
  42.                      if(j==9)
  43.                      p=tab[0][i];
  44.                      else
  45.                       p=tab[j+1][i];
  46.                                                          p=(p>>8-q);
  47.                       n=n|p;
  48.                       P2=n;
  49.                       delay(1);
  50.                       m=(m>>1);
  51.                      }
  52.               }
  53.             }

  54.           }

  55.       }
  56. }
復(fù)制代碼

0.png
所有資料下載:
實(shí)驗(yàn)二-數(shù)字顯示.zip (51.97 KB, 下載次數(shù): 12)
回復(fù)

使用道具 舉報(bào)

ID:256263 發(fā)表于 2017-12-1 20:42 | 顯示全部樓層
謝謝
回復(fù)

使用道具 舉報(bào)

ID:256263 發(fā)表于 2017-12-1 20:44 | 顯示全部樓層
謝謝啊
回復(fù)

使用道具 舉報(bào)

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

本版積分規(guī)則

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

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

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