// ;		“驗證式”	實驗八 力測量實驗

#define LEDLen 6
#define MODE 0x03
xdata unsigned char CS0809 _at_ 0xA000;
xdata unsigned char CAddr  _at_ 0xe100;   // 命令控制口
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;   // 鍵盤讀入口

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;     // 關所有八段管
}
unsigned char Read0809()
{
  unsigned char i;

  CS0809 = 0;                // 起動 A/D
  for (i=0; i<0x20; i++) ;   // 延時 > 100us
  return(CS0809);            // 讀入結果
}

void main()
{

   unsigned char j;
    unsigned char b;
   CAddr= MODE;
   while(1) {
     LEDBuf[0] = 0Xb8;
     LEDBuf[1] = 0X40;
     LEDBuf[2] = 0X40;
     LEDBuf[3] = 0X40;
     LEDBuf[4] = 0X00;
     LEDBuf[5] = 0X00;

     //b = Read0809();

     LEDBuf[5] = LEDMAP[Read0809() & 0x0f] ;
     LEDBuf[4] = LEDMAP[Read0809()>>4 & 0x0f] ;
     for(j=0; j<5; j++)
       DisplayLED();   // 延時
   }
}