// 	“驗證式”	實驗十三  脈沖計數（定時/記數實驗）
#include "reg51.h"
#include "absacc.h"
#define LEDLen 6
#define mode 0x03
xdata unsigned char OUTBIT _at_ 0xe101;   // 位控制口
xdata unsigned char CLK164 _at_ 0xe102;   // 段控制口(接164時鐘位)
xdata unsigned char DAT164 _at_ 0xe102;   // 段控制口(接164數據位)
xdata unsigned char IN     _at_ 0xe103;   // 鍵盤讀入口
xdata unsigned char CAddr _at_  0xe100;

unsigned char LEDBuf[LEDLen];  // 顯示緩沖
code unsigned char LEDMAP[] = {  // 八段管顯示碼
  0x3f, 0x06, 0x5b, 0x4f, 0x66, 0x6d, 0x7d, 0x07,
  0x7f, 0x6f, 0x77, 0x7c, 0x39, 0x5e, 0x79, 0x71
};

void Delay(unsigned char CNT)
{
  unsigned char i;

  while (CNT-- !=0)
    for (i=100; i !=0; i--);
}

void DisplayLED()
{
  unsigned char i, j;
  unsigned char Pos;
  unsigned char LED;

  Pos = 0x20;  // 從左邊開始顯示
  for (i = 0; i < LEDLen; i++) {
    OUTBIT = 0;     // 關所有八段管
    LED = LEDBuf[i];
    for (j = 0; j < 8; j++) {   // 送164
      if (LED & 0x80) DAT164 = 1; else DAT164 = 0;
      CLK164 = CLK164|0x02;
      CLK164 = CLK164&0xfd;
      LED <<= 1;
    }
    OUTBIT = Pos;  // 顯示一位八段管
    Delay(1);
    Pos >>= 1;     // 顯示下一位
  }
  OUTBIT = 0;     // 關所有八段管
}

void main()
{
   unsigned char i = 0,j,k;
   long int  n;

     CAddr = mode;
     TMOD = 0X05;
     TH0 = 0;
     TL0 = 0;
     TR0 = 1;

     while(1){
     n=TH0*256+TL0;
     for(j=0;j<6;j++)
       {
         LEDBuf[5-j]=LEDMAP[n%10];
         n=n/10;
       }

       DisplayLED();   // 延時
       }
}