/*==================================================================*

 *                   3个IO接识别22键测试程序                         *

 *       ------------------------------------------------            *

 *       MCU:     AT89C2051                                          *

 *       OSC:     12M cysytel                                        *

 *       程序设计:Cowboy                                             *

 *       程序版本:V1.0                                               *

 *==================================================================*/

 #include <reg52.h>

 //================== IO口线连接 ==================

sbit Bus          = P1^;

 sbit IO_a         = P1^;

 sbit IO_b         = P1^;

 sbit IO_c         = P1^;

 //================== 变量声明 ====================

unsigned char Disp_buf[];

 unsigned char Dig;

 unsigned char Key_count;

 unsigned char bdata Key_state;    

 sbit KB0 = Key_state^;

 sbit KB1 = Key_state^;

 sbit KB2 = Key_state^;

 sbit KB3 = Key_state^;

 sbit KB4 = Key_state^;

 sbit KB5 = Key_state^;

 //================== 表格数据 ====================

code unsigned char LED_font[]=

 {

         0x84,0x9f,0xa2,0x8a,0x99,0xc8,0xc0,0x9e,0x80, //

         0x88,0x90,0xc1,0xe4,0x83,0xe0,0xf0,0xff,0xfb, //9abcdef -

};

code unsigned char Key_tab[]=     //键码映射表

{//  0  1  2  3  4  5  6  7  8  9   

         , , , , , , , , , , //

          , , , , ,, , , , , //1X

          , , , , , , ,, , , //2X

         ,, , , , , , , ,, //3X

          , , , , ,, ,, , , //4X

          ,, , ,, , ,, , , //5X

         ,, ,                     //6X

 };

 //=============== 检测按键 =================

void Key_scan()

 {   

     unsigned char i;

     Key_count --;                        //扫描次序

    Key_count &= ;

     switch (Key_count)                //按次序处理

    {

         case :                                //第一轮扫描

        KB0 = IO_b; 

         KB1 = IO_c; 

         IO_a = ;

         IO_b = ;

         break;

         case :                                //每二轮扫描

        KB2 = IO_c;

         KB3 = IO_a;

         IO_b = ;

         IO_c = ;

         break;

         case :                                //每三轮扫描

        KB4 = IO_a;

         KB5 = IO_b;

         IO_c = ;

         break;

         default:                        //每四轮扫描

        if (!IO_a) KB0 = ;

         if (!IO_b) KB2 = ;

         if (!IO_c) KB4 = ;

         IO_a = ;

         //======更新显示缓冲区=======

         i = Key_tab[Key_state];

         if (i == )

         {

             Disp_buf[] = 0x11;                //显示三横

            Disp_buf[] = 0x11;

             Disp_buf[] = 0x11;

         }

         else

         {

             Disp_buf[] = 0x0c;     //字符"C"

             Disp_buf[] = i / ;   //键码十位

            Disp_buf[] = B;于      //键码个位

        }

         Key_state = ;

     }

 }    

 /*===================================================================

                     ONE WIRE 显示总线驱动程序       

 ===================================================================*/

 //=============== 发送一位 =================

void Send_bit(bit Dat)    

 {    

     unsigned char i = ;

     if (!Dat) Bus = ;

     else

     {

         Bus = ;

         Bus = ;

     }

     while(--i);                 //延时8us    

     Bus = ;

 }    

 //=============== 总线驱动 =================

void Bus_drive()

 {

     unsigned char i = ;

     unsigned char Sdat;

     Send_bit();                        //Bit6消隐

    do Bus = ; while(--i);             //延时768us

     do Bus = ; while(--i);             //延时768us

     Bus = ;

     Sdat = LED_font[Disp_buf[Dig++]];   //获取显示数据

    Send_bit(Sdat & 0x01);              //发送位0        

     Send_bit(Sdat & 0x02);              //发送位1        

     Send_bit(Sdat & 0x04);              //发送位2        

     Send_bit(Sdat & 0x08);              //发送位3        

     Send_bit(Sdat & 0x10);              //发送位4        

     Send_bit(Sdat & 0x20);              //发送位5        

     Send_bit(Dig  & 0x01);              //发送位选1        

     Send_bit(Dig  & 0x02);              //发送位选2

     while(--i);                         //延时512us

     Send_bit(Sdat & 0x40);              //发送位6

     for (i = ;i> ;i--) Send_bit();  //位6移至Dout

     if (Dig == ) Dig = ;

 }     

 /*===================================================================

                     延时 5ms 程序       

 ===================================================================*/

void Delay_5ms()        

 {    

     while(!TF1);    

     TF1 = ;    

     TH1 = (- ) / ;

     TL1 = (- ) % ;

 }    

 /*===================================================================

                         主程序       

 ===================================================================*/

void main()

 {

     TMOD = 0x10;            //定时器1，16位模式

    TCON = 0xc0;            //TR1=1;TF1=1;

     while()                //主循环

    {

         Bus_drive();        //显示总线驱动 

        Key_scan();         //检测按键

        Delay_5ms();        //延时5MS    

     }

 }