#include <absacc.h>
char xdata DisBuf[8];              	/* 顯示緩沖區 */
unsigned char code keyval[]={0xc1,0xc8,0xc9,0xd0}; /* 鍵值表 */

/****************************** 8279初始化函數 **************************/
void KbDisInit() {					
    XBYTE[0xc801]=0x00;   			/* 設置 8279 工作方式 */
    XBYTE[0xc801]=0x22;      		/* 設置 8279 分頻系數 */
    XBYTE[0xc801]=0xDf;   			/* 清零 8279 */
    while (XBYTE[0xc801] & 0x80);
    XBYTE[0xc801]=0x80;
    XBYTE[0xc800]=0xc8;
}

/****************************** 讀鍵值函數 ******************************/
unsigned char ReadKey() {
unsigned char i,j;
   if (XBYTE[0xc801] & 0x07) {	 /* 8279 Key put */
       XBYTE[0xc801]=0x40;	     /* read 8279 FIFO */
         i=XBYTE[0xc800];        /* i=keyval */
			j=0;
			while (i!=keyval[j]){j++;} /* look up keyval tabel */
			return(j+1);
//       return (XBYTE[0xc800]+1);
   }
   return (0);		     /* no Key put */
 }

/***************************** 循環顯示函數 *****************************/
void KeyShift() {
   unsigned char i;
   for (i=0; i<8; i++)
       DisBuf[i]=DisBuf[i+1];
 }

/****************************** 無按鍵處理函數 **************************/
void NoKey() {
 ;
 }

/****************************** 0鍵處理函數 ****************************/
void k0() {
   KeyShift();
   DisBuf[7]=0;
 }

/****************************** 1鍵處理函數 ****************************/
void k1() {
   KeyShift();
   DisBuf[6]=1;
 }

/* k2, ...其它按鍵處理函數可在此處插入 */

code void (code * KeyProcTab[])()={NoKey, k0,k1 /* k2,... */};

/******************************** 主函數 ********************************/
void main() {
   KbDisInit();						/* 初始化 */
   while(1)
      (* KeyProcTab[ReadKey()])();  /* 根據不同按鍵的值查表散轉 */
 }