/*7218在硬件譯碼的時候，低四位數據進行譯碼，最高位控制小數點，其余三位無效*/
// distab保存要顯示的8位數據（每一位為一個字節）
// ledtab為7218軟件譯碼字型表
#include<reg52.h>
#include<absacc.h>
#define DisCmd XBYTE [0xC100]                     //7218控制字地址
#define DisData XBYTE [0xC000]                    //7218數據口地址
#define scode 0xb0                                //7218軟件譯碼方式命令字
#define bcode 0x90                                //B碼譯碼方式命令字
#define hexcode 0xd0                              //軟件譯碼方式命令字
#define unchar  unsigned char 
sbit P3_0=P3^0;
sbit P1_0=P1^0;
bit enter=0;
char keynum;                                       //按鍵號 
char ledcursor=7;                                  //保存光標當前位置
char distab[8]={0x13,0x13,0x10,0x10,0x10,0x10,0x10,0x10} ; // 要顯示的內容 hello-pp
char code ledtab[]={ 0xfb,0xb0,0xed,0xf5,0xb6,0xd7,0xdf,0xf0,
               //0,   1,    2,   3,   4,   5,   6,   7 
                0xff,0xf7,0xfe,0x9f,0xcb,0xbd,0xcf,0xce,
               //8    ,9   ,a   ,b   ,c    ,d  ,e    ,f  
                0x80,0xbe,0x8b,0xee,0x84 };
               //熄滅 H    L    P    -
void delay200ms()
 { 
   int i=8000,j=10000;
   for(j;j>0;j--)
   for(i;i>0;i--);
  }           
void display()
{
   unchar i;      
   DisCmd=scode;            //采用軟件譯碼
   for(i=0;i<8;i++)      //將distab中的數據送如7218
   {
  DisData=ledtab[distab[i]]; //查表轉化并將字型送入7218
	 
}
   
}

//**************************************************************************************

void keyprg(unchar key)  //鍵盤鍵值執行的程序
{  
  unchar i;
  if((key<=9)&enter)
   {   
      distab[ledcursor]=keynum;        //鍵值送入distab最低位保存
	   if(ledcursor>0)                //光標移位
           ledcursor--;
       else 
           ledcursor=7;
   	}
  
  else 
   {
    switch(key)
	   {
	     case 0x0D:  //加
		 if(distab[ledcursor]<0x09)
		 distab[ledcursor]++;
		 else
         distab[ledcursor]=0;
	     break;	
 		 case 0x0E:    //減
		  if(distab[ledcursor]>0)
		 distab[ledcursor]--;
		 else
         distab[ledcursor]=9;
	     break;	 
		 case 0x0A:
		 //KeyprgF1();
         for(i=0;i<8;i++)      //將distab中的數據送如7218
         {
          distab[i]=0;
          }
		  ledcursor=7;
	     break;	 
		 case 0x0B:            //功能鍵F2
		//KeyprgF2();
	     break;	 
		 case 0x0C:
		 //KeyprgClear();
         if(ledcursor<7)                //光標移位
           ledcursor++;
       else 
           ledcursor=0;
	     break;	 
		 case 0x0F:
		 enter=!enter;
		 //KeyprgEnter();
	     break;	 
		 default:
	     break;	 
		}
	 }
	 display(); //顯示鍵值
}
//**************************************************************************************
void intt0() interrupt 0 
{ 
   char xdata *cpld;
   unchar j=0,a;
   cpld=0xA000;
   EX0=0;              //關鍵盤中斷，禁止相應其他按鍵
   keynum=P1;          //從p1口讀入鍵盤值
   keynum=keynum&0x0f; //取低四位;
 //keyprg(keynum);
      if(keynum==0x0f)
   {     
      a=*cpld;
      distab[0]=a&0x0f;
      distab[1]=(a&0xf0)/16;
      display();
   }
  else
 {
   *cpld=keynum;
 }

  EX0=1;
}

//**************************************************************************************
void flink()
{
  unchar  i;
  while(enter)           //光標位置閃爍
   {
    DisCmd=scode;         //采用軟件譯碼
    for(i=0;i<8;i++)      //將distab中的數據送如7218       
      {
        if(i==ledcursor)
	        DisData=0x80; //查表轉化并將字型送入7218 
	    else
            DisData=ledtab[distab[i]]; //查表轉化并將字型送入7218
      }
	  delay200ms();
	 DisCmd=scode;            
	 display();
     delay200ms();
   }
}
//***************************************************************************************
void main()
{ 

  EX0=1;
  EA=1;
  display();
  while(1);
    
 }