ps2key.c

PS2扩展功能

/*============================================================
函数名称：1602显示键盘PS2
函数功能：1602显示键盘PS2
李灿松
时间：2008.10.11
说明：
连接线图:	
       ---------------------------------------------------
       |LCM-----51   |	LCM-----51   |	LCM------51      |
       --------------------------------------------------|
       |DB0-----P1.0 |	DB4-----P1.4 |	RW-------P2.1    |
       |DB1-----P1.1 |	DB5-----P1.5 |	RS-------P2.0    |
       |DB2-----P1.2 |	DB6-----P1.6 |	E--------P2.2    |
       |DB3-----P1.3 |	DB7-----P1.7 |	VLCD接1K电阻到GND|
       ---------------------------------------------------

Keyboard接线
      PS/2--------51
      1 DATA------P3.4
      3 GND
      4 VCC
      5 CLK-------P3.3 接在51的外部中断，触发方式为低电平

=============================================================*/
#include <at89x51.h>
#include "scancodes.h"
#include<intrins.h>

#define L1602_RW  P2_1 //定义LCD引脚
#define L1602_RS  P2_0
#define L1602_E   P2_2
#define L1602_DB0_DB7 P0  
#define uchar unsigned char
#define uint  unsigned int

#define Key_Data P3_4 //定义Keyboard引脚
#define Key_CLK  P3_3

#define Busy    0x80 //用于检测LCM状态字中的Busy标识

void Delay5Ms(void);
void Delay400Ms(void);
void Decode(unsigned char ScanCode);
void print(uchar a,uchar *str);
void print1(uchar a,uchar t);
void LCM1602_Init(void);

unsigned char ReadDataLCM(void);
unsigned char ReadStatusLCM(void);
unsigned char code cdle_net[] = {"welcom"};
unsigned char code email[] = {"cansong"};
unsigned char code Cls[] = {"                "};
static unsigned char IntNum = 0; //中断次数计数
static unsigned char KeyV; //键值
static unsigned char DisNum = 0; //显示用指针
static unsigned char Key_UP=0, Shift = 0;//Key_UP是键松开标识，Shift是Shift键按下标识
static unsigned char BF = 0; //标识是否有字符被收到
typedef bit BOOL ; 
uchar aa=0x80;

/**********************************************************************************************
函数名称：主函数
函数功能：主函数
说明： 
**********************************************************************************************/
void main(void)
{
	unsigned char TempCyc;

	Delay400Ms(); //启动等待，等LCM讲入工作状态
	LCM1602_Init(); //LCM初始化
	Delay5Ms(); //延时片刻(可不要)

	print(0x80,cdle_net);
	print(0xc0,email);
	for (TempCyc=0; TempCyc<3; TempCyc++)
			Delay400Ms(); //延时
	LCM1602_Init(); //LCM初始化 
	IT1 = 0; //设外部中断1为低电平触发
	EA = 1;
	EX1 = 1; //开中断

	do
		{
			if (BF)
				Decode(KeyV);
			else
				EA = 1; //开中断
		}
	while(1);
}
/**********************************************************************************************
函数名称：延时函数
函数功能：延时
说明： 
**********************************************************************************************/
void delay(unsigned int delay_time) //延时程序
{
 while(delay_time--);
}


void LCM1602_Delay(uchar count)
{
	uchar i;
	while(--count!=0)
	   {for(i=0;i<250;i++);}	
}
/**********************************************************************************************
函数名称：初始化函数
函数功能：液晶1602初始化
说明：
**********************************************************************************************/
void  LCM1602_Init(void)
{
 void LCM1602_WriteData(uchar LCM1602_data);
 void LCM1602_WriteCMD(uchar LCM1602_command);
 LCM1602_WriteCMD(0x38);    //显示两行，每个字符为5*7个像素
 delay(1);
 LCM1602_WriteCMD(0x06);    //光标移动设置，光标右移
 delay(1);
 LCM1602_WriteCMD(0x0c);    //现设开，光标开，闪烁开
 delay(1);
 LCM1602_WriteCMD(0x01);    //清屏
 delay(1);
}
void  print(uchar a,uchar *str)
{
 void  LCM1602_WriteData(uchar LCM1602_data);
 void  LCM1602_WriteCMD(uchar LCM1602_command);
 LCM1602_WriteCMD(a);
 while(*str!='\0')
    {
    LCM1602_WriteData(*str++);
	}
 *str=0;
}
void print1(uchar a,uchar t)
{
 LCM1602_WriteCMD(a);
 LCM1602_WriteData(t);
}



/**********************************************************************************************
函数名称：写命令和写数据函数
函数功能：向LCD写命令和数据
说明：LCM1602_WriteCMD是写命令函数，void LCM1602_WriteData是写数据函数
**********************************************************************************************/
void LCM1602_WriteCMD(uchar LCM1602_command)
{
BOOL lcd_bz();
while(lcd_bz());	//测忙
L1602_RS=0;
L1602_RW=0;
L1602_E=0;
_nop_();
_nop_();
L1602_DB0_DB7=LCM1602_command;
_nop_();
_nop_();_nop_();
L1602_E=1;    //命令总送出
_nop_();_nop_();_nop_();
L1602_E=0; 
}

void LCM1602_WriteData(uchar LCM1602_data)
{
BOOL lcd_bz();
while(lcd_bz());	//测忙
L1602_RS=1;
L1602_RW=0;
L1602_E=0;
L1602_DB0_DB7=LCM1602_data;
_nop_();
_nop_();
_nop_();
_nop_();
L1602_E=1;   //数据送出
_nop_();
_nop_();
_nop_();
L1602_E=0;
}


/**********************************************************************************************
函数名称：LCD检测忙函数
函数功能：检测LCD是否处于忙状态
说明： 
**********************************************************************************************/
BOOL lcd_bz()
{							// 测试LCD忙碌状态
	BOOL result;
	L1602_RS=0;
    L1602_RW=1;
    L1602_E=1;
	_nop_();
	_nop_();
	_nop_();
	_nop_();
	result = (BOOL)(P0 & 0x80);
	L1602_E = 0;
	return result;	
}
/**********************************************************************************************
函数名称：延时函数
函数功能：延时
说明： 
**********************************************************************************************/

//5ms延时
void Delay5Ms(void)
{
	unsigned int TempCyc = 5552;
	while(TempCyc--);
}

//400ms延时
void Delay400Ms(void)
{
	unsigned char TempCycA = 5;
	unsigned int TempCycB;
	while(TempCycA--)
		{
			TempCycB=7269;
			while(TempCycB--);
		};
}
/**********************************************************************************************
函数名称：中断函数
函数功能：每十一次（IntNum）中断一次，读取键盘值
说明： 
**********************************************************************************************/
void Keyboard_out(void) interrupt 2
{
	if ((IntNum > 0) && (IntNum < 9))
		{			
			KeyV = KeyV >> 1; //因键盘数据是低>>高，结合上一句所以右移一位
			if (Key_Data) KeyV = KeyV | 0x80; //当键盘数据线为1时为1到最高位
		}
	IntNum++;
	while (!Key_CLK); //等待PS/2CLK拉高

	if (IntNum > 10)
		{
			IntNum = 0; //当中断11次后表示一帧数据收完，清变量准备下一次接收
			BF = 1; //标识有字符输入完了
			EA = 0; //关中断等显示完后再开中断 (注：如这里不用BF和关中断直接调Decode()则所Decode中所调用的所有函数要声明为再入函数)
		}
}
/**********************************************************************************************
函数名称：读键盘函数
函数功能：将键盘通码读取，并显示
说明： 
**********************************************************************************************/
void Decode(unsigned char ScanCode) //注意:如SHIFT+G为12H 34H F0H 34H F0H 12H，也就是说shift的通码+G的通码+shift的断码+G的断码
{
	unsigned char TempCyc;	

	if (!Key_UP)                //当键盘松开时
		{
			switch (ScanCode)
				{
					case 0xF0 :	// 当收到0xF0，Key_UP置1表示断码开始
						Key_UP = 1;
					break;

					case 0x12 :	// 左 SHIFT
						Shift = 1;
					break;

					case 0x59 :	// 右 SHIFT
						Shift = 1;
					break;

					default:						
							if (DisNum > 15)
							{
								print(0xc0, Cls);//清LCD第二行
								DisNum = 0; 
							}
						if(!Shift)	//如果SHIFT没按下
							{
								for (TempCyc = 0;(UnShifted[TempCyc][0]!=ScanCode)&&(TempCyc<59); TempCyc++); //查表显示
								if (UnShifted[TempCyc][0] == ScanCode) print1(aa,UnShifted[TempCyc][1]);
								DisNum++;  
								if(aa==0x87)  {aa=0xc0;aa++;} 
								else if (aa==0xc7)  aa=0x80;
								else aa++;
							} 
						else  //按下SHIFT
							{
								for(TempCyc = 0; (Shifted[TempCyc][0]!=ScanCode)&&(TempCyc<59); TempCyc++); //查表显示
								if (Shifted[TempCyc][0] == ScanCode) print1(aa, Shifted[TempCyc][1]);
								DisNum++;
								if(aa==0x87)  {aa=0xc0;aa++;} 
								else if (aa==0xc7)  aa=0x80;
								else aa++;
							}

					break;
				}
		}
	else
		{	
			Key_UP = 0;
			switch (ScanCode) //当键松开时不处理判码，如G 34H F0H 34H 那么第二个34H不会被处理
				{
					case 0x12 :	// 左 SHIFT
						Shift = 0;
					break;

					case 0x59 :	// 右 SHIFT
						Shift = 0;
					break;
				}
		}
	BF = 0; //标识字符处理完了
}