標(biāo)題: 51單片機8X8點陣測試實驗 [打印本頁]
作者: qsfan1    時間: 2018-9-15 17:09
標(biāo)題: 51單片機8X8點陣測試實驗
8X8點陣測試實驗

單片機源程序如下:
  1. #include <AT89X52.H>  
  2. #include "74HC595.H"
  3. unsigned char code taba[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf,0x7f};
  4. unsigned char code tabb[]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80};
  5. void delay1(void)
  6. {
  7.   unsigned char i,j,k;
  8.   for(k=10;k>0;k--)
  9.   for(i=20;i>0;i--)
  10.   for(j=248;j>0;j--);
  11. }

  13. void main(void)
  14. {
  15.   unsigned char i,j;
  16.   while(1)
  17.     {
  18.      for(j=0;j<3;j++)//從左到右3次
  19.         {

  21.           for(i=0;i<8;i++)
  22.             {

  24.                 Ser_IN(taba[i]);//8X8點陣列掃描
  25.                   Ser_IN(0xff);//8X8點陣行送掃描數(shù)據(jù)
  26.                   Par_OUT();//74HC595輸出顯示
  27.               delay1();
  28.             }

  30.         }

  32.       for(j=0;j<3;j++)//from right to left 3 time
  33.         {
  34.           for(i=0;i<8;i++)
  35.             {
  36.                             Ser_IN(taba[7-i]);//8X8點陣列掃描
  37.                   Ser_IN(0xff);//8X8點陣行送掃描數(shù)據(jù)
  38.                   Par_OUT();//74HC595輸出顯示
  39.               delay1();

  41.             }

  43.         }

  45. for(j=0;j<3;j++)//從上到下 3次

  47.         {

  49. for(i=0;i<8;i++)

  51.             {


  54.                           Ser_IN(0x00);//8X8點陣列掃描
  55.                   Ser_IN(tabb[i]);//8X8點陣行送掃描數(shù)據(jù)
  56.                   Par_OUT();//74HC595輸出顯示

  58.          

  60.               delay1();

  62.             }

  64.         }
  65.       for(j=0;j<3;j++)//從下到上3次

  67.         {

  69.           for(i=0;i<8;i++)

  71.             {

  73.              Ser_IN(0x00);//8X8點陣列掃描
  74.                   Ser_IN(tabb[7-i]);//8X8點陣行送掃描數(shù)據(jù)
  75.                   Par_OUT();//74HC595輸出顯示

  77.               delay1();

  79.             }

  81.         }

  83.     }

  85. }
復(fù)制代碼

所有資料51hei提供下載:
8X8點陣測試實驗.rar (12.03 KB, 下載次數(shù): 12)


作者: admin    時間: 2018-9-15 23:42
補全原理圖或者詳細(xì)說明一下電路連接即可獲得100+黑幣



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