|
/********************************************************************
*
* 程序功能 : ps2鍵盤顯示演示實驗
*
* 應(yīng)用軟件 : KEIL U5
*
* 硬 件 : W2041
*
* 創(chuàng)建時間 : 2015-12-19
*
********************************************************************/
/*
SMC1602A(16*2)模擬口線接線方式
連接線圖:
---------------------------------------------------
|LCM-----51 | LCM-----51 | LCM------51 |
--------------------------------------------------|
|DB0-----P0.0 | DB4-----P0.4 | RW-------P2.5 |
|DB1-----P0.1 | DB5-----P0.5 | RS-------P2.6 |
|DB2-----P0.2 | DB6-----P0.6 | E--------P2.7 |
|DB3-----P0.3 | DB7-----P0.7 | VLCD接1K電阻到GND|
---------------------------------------------------
Keyboard接線
PS/2--------51
1 DATA------P3.4
3 GND
4 VCC
5 CLK-------P3.3 接在51的外部中斷,觸發(fā)方式為低電平
本程序源碼只供學(xué)習(xí)參考,不得應(yīng)用于商業(yè)用途,如有需要請聯(lián)系作者。
[注:AT89x51使用12M或11.0592M晶振,實測使用11.0592M]
*/
#include <AT89X51.h>
#include "scancodes.h"
#include <string.h>
#include <intrins.h>
#include <stdio.h>
#define LCM_RS P2_5 //定義引腳
#define LCM_RW P2_6
#define LCM_E P2_7
#define LCM_Data P0
#define Busy 0x80 //用于檢測LCM狀態(tài)字中的Busy標(biāo)識
#define Key_Data P3_4 //定義Keyboard引腳
#define Key_CLK P3_3
void LCMInit(void);
void DisplayOneChar(unsigned char X, unsigned char Y, unsigned char DData);
void DisplayListChar(unsigned char X, unsigned char Y, unsigned char code *DData);
void Delay5Ms(void);
void Delay400Ms(void);
void Decode(unsigned char ScanCode);
void WriteDataLCM(unsigned char WDLCM);
void WriteCommandLCM(unsigned char WCLCM,BuysC);
unsigned char ReadDataLCM(void);
unsigned char ReadStatusLCM(void);
unsigned char code www[] = {" WWW.QLMCU.COM "};
unsigned char code email[] = {" 0595-28011587 "};
unsigned char code input[] = {" Keyboard Test "};
unsigned char code Cls[] = {" "};
static unsigned char IntNum = 0; //中斷次數(shù)計數(shù)
static unsigned char KeyV; //鍵值
static unsigned char DisNum = 0; //顯示用指針
static unsigned char Key_UP=0, Shift = 0;//Key_UP是鍵松開標(biāo)識,Shift是Shift鍵按下標(biāo)識
static unsigned char BF = 0; //標(biāo)識是否有字符被收到
void main(void)
{
unsigned char TempCyc;
Delay400Ms(); //啟動等待,等LCM講入工作狀態(tài)
LCMInit(); //LCM初始化
Delay5Ms(); //延時片刻(可不要)
DisplayListChar(0, 0, www); //第一行顯示 WWW.QLMCU.COM
DisplayListChar(0, 1, email); //第一行顯示 0595-28011587
for (TempCyc=0; TempCyc<10; TempCyc++)
Delay400Ms(); //延時
DisplayListChar(0, 0, input); //第一行顯示 Keyboard Test
DisplayListChar(0, 1, Cls); //第二行清屏
IT1 = 0; //設(shè)外部中斷1為低電平觸發(fā)
EA = 1;
EX1 = 1; //開中斷
do
{
if (BF)
Decode(KeyV);
else
EA = 1; //開中斷
}
while(1);
}
/*****************************************
********* LCM1602驅(qū)動程序 **************
******************************************/
//----------寫數(shù)據(jù)-----------------------------!!!問題一直出在這里!!!2006.03.18
void WriteDataLCM(unsigned char WDLCM)
{
ReadStatusLCM(); //檢測忙
LCM_Data = WDLCM;
LCM_RS = 1;
LCM_RW = 0;
// LCM_E 必須是由 高 到 低 的電平變化!!!
LCM_E = 1; //-----!!!問題一直出在這里!!!
_nop_(); //-----------------!!!!!加上這四句即可!
_nop_();
LCM_E = 0;
}
//----------寫指令----------------------------!!!問題一直出在這里!!!2006.03.18
void WriteCommandLCM(unsigned char WCLCM,BuysC) //BuysC為0時忽略忙檢測
{
if (BuysC) ReadStatusLCM(); //根據(jù)需要檢測忙
LCM_Data = WCLCM;
LCM_RS = 0;
LCM_RW = 0;
// LCM_E 必須是由 高 到 低 的電平變化!!!
LCM_E = 1; //-----!!!問題一直出在這里!!!
_nop_(); //-----------------!!!!!加上這四句即可!
_nop_();
LCM_E = 0;
}
//讀狀態(tài)
unsigned char ReadStatusLCM(void)
{
LCM_Data = 0xFF;
LCM_RS = 0;
LCM_RW = 1;
_nop_();
LCM_E = 1;
_nop_();
while (LCM_Data & Busy); //檢測忙信號
return(LCM_Data);
}
void LCMInit(void) //LCM初始化
{
LCM_Data = 0x00;
WriteCommandLCM(0x38,0); //三次顯示模式設(shè)置,不檢測忙信號
Delay5Ms();
WriteCommandLCM(0x38,0);
Delay5Ms();
WriteCommandLCM(0x38,0);
Delay5Ms();
WriteCommandLCM(0x38,1); //顯示模式設(shè)置,開始要求每次檢測忙信號
WriteCommandLCM(0x08,1); //關(guān)閉顯示
WriteCommandLCM(0x01,1); //顯示清屏
WriteCommandLCM(0x06,1); // 顯示光標(biāo)移動設(shè)置
WriteCommandLCM(0x0C,1); // 顯示開及光標(biāo)設(shè)置
}
//按指定位置顯示一個字符
void DisplayOneChar(unsigned char X, unsigned char Y, unsigned char DData)
{
Y &= 0x1;
X &= 0xF; //限制X不能大于15,Y不能大于1
if (Y) X |= 0x40; //當(dāng)要顯示第二行時地址碼+0x40;
X |= 0x80; //算出指令碼
WriteCommandLCM(X, 0); //這里不檢測忙信號,發(fā)送地址碼
WriteDataLCM(DData);
}
//按指定位置顯示一串字符 ***原來的遇到空格0x20就不顯示***
void DisplayListChar(unsigned char X, unsigned char Y, unsigned char code *DData)
{
unsigned char ListLength,j;
ListLength = strlen(DData);
Y &= 0x1;
X &= 0xF; //限制X不能大于15,Y不能大于1
if (X <= 0xF) //X坐標(biāo)應(yīng)小于0xF
{
for(j=0;j<ListLength;j++)
{
DisplayOneChar(X, Y, DData[j]); //顯示單個字符
X++;
}
}
}
//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--);
};
}
//************************************************************************
///////////外部中斷 1 子程序,自動產(chǎn)生入口地址,使用第 0 組寄存器
void Keyboard_out(void) interrupt 2
{
if ((IntNum > 0) && (IntNum < 9))
{
KeyV = KeyV >> 1; //因鍵盤數(shù)據(jù)是低>>高,結(jié)合上一句所以右移一位
if (Key_Data) KeyV = KeyV | 0x80; //當(dāng)鍵盤數(shù)據(jù)線為1時為1到最高位
}
IntNum++;
while (!Key_CLK); //等待PS/2CLK拉高
if (IntNum > 10)
{
IntNum = 0; //當(dāng)中斷11次后表示一幀數(shù)據(jù)收完,清變量準(zhǔn)備下一次接收
BF = 1; //標(biāo)識有字符輸入完了
EA = 0; //關(guān)中斷等顯示完后再開中斷 (注:如這里不用BF和關(guān)中斷直接調(diào)Decode()則所Decode中所調(diào)用的所有函數(shù)要聲明為再入函數(shù))
}
}
void Decode(unsigned char ScanCode) //注意:如SHIFT+G為12H 34H F0H 34H F0H 12H,也就是說shift的通碼+G的通碼+shift的斷碼+G的斷碼
{
unsigned char TempCyc;
if (!Key_UP) //當(dāng)鍵盤松開時
{
switch (ScanCode)
{
case 0xF0 : // 當(dāng)收到0xF0,Key_UP置1表示斷碼開始
Key_UP = 1;
break;
case 0x12 : // 左 SHIFT
Shift = 1;
break;
case 0x59 : // 右 SHIFT
Shift = 1;
break;
default:
if (DisNum > 15)
{
DisplayListChar(0, 1, Cls);//清LCD第二行
DisNum = 0;
}
if(!Shift) //如果SHIFT沒按下
{
for (TempCyc = 0;(UnShifted[TempCyc][0]!=ScanCode)&&(TempCyc<59); TempCyc++); //查表顯示
if (UnShifted[TempCyc][0] == ScanCode) DisplayOneChar(DisNum, 1, UnShifted[TempCyc][1]);
DisNum++;
}
else //按下SHIFT
{
for(TempCyc = 0; (Shifted[TempCyc][0]!=ScanCode)&&(TempCyc<59); TempCyc++); //查表顯示
if (Shifted[TempCyc][0] == ScanCode) DisplayOneChar(DisNum, 1, Shifted[TempCyc][1]);
DisNum++;
}
break;
}
}
else
{
Key_UP = 0;
switch (ScanCode) //當(dāng)鍵松開時不處理判碼,如G 34H F0H 34H 那么第二個34H不會被處理
{
case 0x12 : // 左 SHIFT
Shift = 0;
break;
case 0x59 : // 右 SHIFT
Shift = 0;
break;
}
}
BF = 0; //標(biāo)識字符處理完了
}
|
評分
-
查看全部評分
|