当前位置:首页 > 单片机 > 单片机
[导读]吸取各位前辈的经验,将之前二极管用量多的问题优化一下,目前不用二极管能接6键,2只二极管能接12键,6只二极管能接18键,9只二极管能接21键,第22键要单独占用3只二极管最不化算。实验用89S51作试验,电路接线就是

吸取各位前辈的经验,将之前二极管用量多的问题优化一下,目前不用二极管能接6键,2只二极管能接12键,6只二极管能接18键,9只二极管能接21键,第22键要单独占用3只二极管最不化算。

实验用89S51作试验,电路接线就是P1.2,P1.3,P1.4接键盘,P1.0接显示器。





(原文件名:GIF.gif)





(原文件名SC00015.JPG)





(原文件名SC00016.jpg)








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

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

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

* MCU: AT89C2051 *

* OSC: 12M cysytel *

* 程序设计:Cowboy *

* 程序版本:V1.0 *

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



#include



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

sbit Bus = P1^0;

sbit IO_a = P1^4;

sbit IO_b = P1^3;

sbit IO_c = P1^2;



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

unsigned char Disp_buf[3];

unsigned char Dig;

unsigned char Key_count;

unsigned char bdata Key_state;

sbit KB0 = Key_state^0;

sbit KB1 = Key_state^1;

sbit KB2 = Key_state^2;

sbit KB3 = Key_state^3;

sbit KB4 = Key_state^4;

sbit KB5 = Key_state^5;



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

code unsigned char LED_font[24]=

{

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

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

};



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

{//0123456789

22, 0, 2, 0, 0, 0, 0, 0, 4, 0, //0

0, 0, 0, 0, 0,18, 0, 0, 0, 0, //1X

0, 0, 0, 0, 0, 0, 3,14, 0, 0, //2X

20,10, 6, 0, 0, 0, 0, 0, 1,19, //3X

0, 5, 0, 0, 0,15, 0,11, 0, 0, //4X

0,17, 0, 0,13, 8, 0,21, 0, 9, //5X

16,12, 7, 0 //6X

};



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

void Key_scan()

{

unsigned char i;

Key_count --; //扫描次序

Key_count &= 3;

switch (Key_count) //按次序处理

{

case 2: //第一轮扫描

KB0 = IO_b;

KB1 = IO_c;

IO_a = 1;

IO_b = 0;

break;



case 1: //每二轮扫描

KB2 = IO_c;

KB3 = IO_a;

IO_b = 1;

IO_c = 0;

break;



case 0: //每三轮扫描

KB4 = IO_a;

KB5 = IO_b;

IO_c = 1;

break;



default: //每四轮扫描

if (!IO_a) KB0 = 0;

if (!IO_b) KB2 = 0;

if (!IO_c) KB4 = 0;

IO_a = 0;



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

i = Key_tab[Key_state];

if (i == 0)

{

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

Disp_buf[1] = 0x11;

Disp_buf[0] = 0x11;

}

else

{

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

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

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

}

Key_state = 0;

}

}





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

ONE WIRE 显示总线驱动程序

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



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

void Send_bit(bit Dat)

{

unsigned char i = 3;

if (!Dat) Bus = 0;

else

{

Bus = 0;

Bus = 1;

}

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

Bus = 1;

}



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

void Bus_drive()

{

unsigned char i = 0;

unsigned char Sdat;

Send_bit(1); //Bit6消隐

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

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

Bus = 1;

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 = 7;i> 0;i--) Send_bit(1);//位6移至Dout

if (Dig == 3) Dig = 0;

}



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

延时 5ms 程序

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

void Delay_5ms()

{

while(!TF1);

TF1 = 0;

TH1 = (- 5000) / 256;

TL1 = (- 5000) % 256;

}



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

主程序

===================================================================*/
void main()

{

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

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

while(1) //主循环

{

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

Key_scan(); //检测按键

Delay_5ms(); //延时5MS

}

本站声明: 本文章由作者或相关机构授权发布,目的在于传递更多信息,并不代表本站赞同其观点,本站亦不保证或承诺内容真实性等。需要转载请联系该专栏作者,如若文章内容侵犯您的权益,请及时联系本站删除。
换一批
延伸阅读

May 14, 2024 ---- 夏普(Sharp)今(14)日正式宣布位于日本的堺10代线工厂将于今年第三季度开始停止生产。TrendForce集邦咨询认为,夏普堺10代的关闭对于今年的供给量影响甚微,但因为该厂10...

关键字: 液晶电视面板 彩虹光电

为增进大家对氧传感器的认识,本文将对氧传感器的检查方法进行详细的介绍。

关键字: 传感器 指数 氧传感器

为增进大家对氧传感器的认识,本文将对氧传感器的作用、氧传感器坏了的表现以及氧传感器常见故障予以介绍。

关键字: 传感器 指数 氧传感器

为增进大家对氧传感器的认识,本文将对氧传感器的原理、氧传感器的作用予以介绍。

关键字: 传感器 指数 氧传感器

为增进大家对PCB电路板的认识,本文将对PCB电路板翘曲标准、PCB电路板翘曲的原因予以介绍。

关键字: PCB 指数 电路板

为增进大家对PCB电路板的认识,本文将对PCB电路板覆铜的作用、PCB电路板干膜种类予以介绍。

关键字: PCB 指数 电路板

为增进大家对PCB电路板的认识,本文将对PCB电路板扇孔、PCB设计对PCB扇孔的要求予以介绍。

关键字: PCB 指数 电路板

May 14, 2024 ---- TrendForce集邦咨询研究最新显示,OLED桌上型显示器(Monitor)2024年第一季出货总量约为20万台,年成长率121%。第二季在品牌新机陆续上市后,当季成长幅度预估将达...

关键字: OLED 显示器

为增进大家对有源滤波器的认识,本文将对有源滤波器的选型方法、环路滤波器对有源、无源滤波器的选择予以介绍。

关键字: 滤波器 指数 有源滤波器

为增进大家对滤波器的认识,本文将对切比雪夫滤波器阶数以及LC滤波器设计优化流程予以介绍。

关键字: 滤波器 指数 切比雪夫滤波器
关闭
关闭