ps2lcd1602.c

51单片机试验板-sch-pcb-4.0M.zip

#include <reg52.h>
#include <intrins.h>
#include "code.h"
#define uchar unsigned char
#define uint  unsigned int
#define comm  0
#define dat   1

sbit LCM_RW=P2^1; //定义LCD引脚
sbit LCM_RS=P2^0;
sbit LCM_E=P2^2;
#define LCM_DataPort P0  //定义数据端口

sbit PS2_Data=P3^2; //定义Keyboard引脚
sbit PS2_CLK=P3^3;

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

void Init();
void LCMInit(void);
void DisplayOneChar(uchar X, uchar Y, uchar DData);
void DisplayListChar(uchar X, uchar Y, uchar code *DData);
void Delay(uint i);  
void Decode(uchar ScanCode);
void WriteLCM(bit dat_comm,uchar  LCM_Dat_Comm) ; 

uchar ReadDataLCM(void);
uchar ReadStatusLCM(void);
uchar code table[] = {"   I LOVE MCU   "};
uchar code QQ[] = {"  QQ:81311812   "};
uchar code Clr[] = {" "};


static uchar IntNum = 0; //中断次数计数
static uchar KeyValue; //键值
static uchar PNum = 0; //LCM显示用指针位置
static uchar Key_UP=0, Shift = 0;//Key_UP是键松开标识，Shift是Shift键按下标识
static uchar BF = 0; //标识是否有字符被收到


void Init()
{
  

   Delay(8000); 
   Delay(8000);      //启动等待，等LCM讲入工作状态
   LCMInit();        //LCM初始化
   Delay(5000);      //延时片刻(可不要)
   DisplayListChar(0, 0, table);
   DisplayListChar(0, 1, QQ);
   ReadDataLCM();//测试用句无意义
   Delay(8000); //延时

   DisplayListChar(0, 1, Clr);//清LCM第二行显示

   IT1 = 0; //设外部中断1为低电平触发（因为PS2发送到主机的数据在时钟的下降沿被读取）
   EA = 1;   //开总中断
   EX1 = 1; //开外部中断1

}



void main(void)
{
  Init();

  while(1)
    { 
     if (BF)
         Decode(KeyValue);
     else
         EA = 1; //开中断
    }

}


                     
void Delay(uint i)   //延时
{
    while(i--);
}




/*********LCM1602驱动程序*****************************************************************/
void WriteLCM(bit dat_comm,uchar  LCM_Dat_Comm)  //dat写数据,comm写指令
{
    ReadStatusLCM(); //检测忙
    if(dat_comm==comm)
            LCM_RS = 0;   
    else if(dat_comm==dat)
            LCM_RS = 1; 
    LCM_DataPort=LCM_Dat_Comm;
    LCM_RW = 0;
    LCM_E = 0; //若晶振速度太高可以在这后加小的延时
    _nop_();
    _nop_(); //延时
    LCM_E = 1;
}

/**************LCM读数据**********************************************************************/
uchar ReadDataLCM(void)
{
   LCM_RS = 1;
   LCM_RW = 1;
   LCM_E = 0;
    _nop_();
    _nop_(); //延时
   LCM_E = 1;
   return(LCM_DataPort);
}
/*************读状态*******************************************************************************/
uchar ReadStatusLCM(void)
{
    LCM_DataPort = 0xFF;
    LCM_RS = 0;
    LCM_RW = 1;
    LCM_E = 0;
    _nop_();
    _nop_(); //延时
    LCM_E = 1;
    while (LCM_DataPort & Busy); //检测忙信号
    return(LCM_DataPort);
}
/*****************LCM初始化**************************************************************************/
void LCMInit(void) //LCM初始化
{
    LCM_DataPort = 0;
    Delay(8000);
    Delay(8000);
    WriteLCM(comm,0x38); //显示模式设置,开始要求每次检测忙信号
    WriteLCM(comm,0x08); //关闭显示
    WriteLCM(comm,0x01); //显示清屏
    WriteLCM(comm,0x06); // 显示光标移动设置
    WriteLCM(comm,0x0F); // 显示开及光标设置
}
/************按指定位置显示一个字符*************************************************************************************/
void DisplayOneChar(uchar X, uchar Y, uchar DData)
{
     Y &= 0x1;
     X &= 0xF;                //限制X不能大于15，Y不能大于1
     if (Y) X |= 0x40;       //当要显示第二行时地址码+0x40;
     X |= 0x80;             //算出指令码
     WriteLCM(comm,X); //发命令字
     WriteLCM(dat,DData); //发数据
}

//按指定位置显示一串字符
void DisplayListChar(uchar X, uchar Y, uchar code *DData)
{
     uchar ListLength;

     ListLength = 0;
     Y &= 0x1;
     X &= 0xF;                      //限制X不能大于15，Y不能大于1
    while (DData[ListLength]>0x19) //若到达字串尾则退出
     {
       if (X <= 0xF)              //X坐标应小于0xF
        {
          DisplayOneChar(X, Y, DData[ListLength]); //显示单个字符
          ListLength++;
          X++;
        }
    }
}

/***************PS2KEYBOARD*******************************************************************************/
void Keyboard_out(void) interrupt 2
{
    if ((IntNum > 0) && (IntNum < 9))
     {
      KeyValue = KeyValue >> 1;                 //因键盘数据是低>>高，结合上一句所以右移一位
      if (PS2_Data) KeyValue = KeyValue | 0x80; //当键盘数据线为1时为1到最高位
     }
    IntNum++;
   while (!PS2_CLK); //等待PS/2CLK拉高

   if (IntNum > 10)
     {
      IntNum = 0; //当中断11次后表示一帧数据收完，清变量准备下一次接收
      BF = 1; //标识有字符输入完了
      EA = 0; //关中断等显示完后再开中断 (注：如这里不用BF和关中断直接调Decode()则所Decode中所调用的所有函数要声明为再入函数)
     }
}

void Decode(uchar ScanCode) //注意:如SHIFT+G为12H 34H F0H 34H F0H 12H，也就是说shift的通码+G的通码+shift的断码+G的断码
{
   uchar i;

   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 (PNum > 15)
                      {
                       DisplayListChar(0, 1, Clr);//清LCD第二行
                       PNum = 0;//设置光标位置
                       }
                 if(!Shift) //如果SHIFT没按下
                     {
                      for (i= 0;(UnShifted[i][0]!=ScanCode)&&(i<59); i++); //查表显示
                       if (UnShifted[i][0] == ScanCode) DisplayOneChar(PNum, 1, UnShifted[i][1]);
                            PNum++;
                     }
                 else //按下SHIFT
                    {
                      for(i= 0; (Shifted[i][0]!=ScanCode)&&(i<59);i++); //查表显示
                      if (Shifted[i][0] == ScanCode) DisplayOneChar(PNum, 1, Shifted[i][1]);
                      PNum++;
                     }

                 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; //标识字符处理完了
}