// 功能：1602显示PS2键盘第1类按键的键值，显示单个按键字母小写及数字和标点，不考虑组合键。
// 指示灯: 接收按键值 P30（run） 取反。  键盘上电P31亮，接收按键值，P31灭。

#include

sbit PS2CLK=P3^3;    // PS2时钟
sbit PS2DATA=P3^4;   // PS2数据
sbit RUN=P3^0;       // 运行标志指示灯
sbit P31=P3^1;       // 运行标志指示灯

#define lcd_bus  P0    // 数据总线
sbit rs =P2^0;  //数据&指令选择,H:写数据,L:写指令
sbit rw =P2^1;  //读&写选择,H:read,L:write
sbit e  =P2^2;  //读写使能
sbit bf =P0^7;  //忙闲状态标志位，H：内部正执行操作，L：空闲
void chk_busy(void);//检测LCD忙闲
void init_lcd(void);//LCD初始化
void wr_comm(unsigned char comm); //写指令
void wr_comm_no(unsigned char comm);//写指令，不检测忙闲
void wr_data(unsigned char dat);  // 写数据
void wr_str(unsigned char *p); //显示字符串
unsigned char rd_lcd(void);//读LCD数据
void delayus(unsigned char us);//延时子程序 us
void delayms(unsigned int ms); //延时子程序 ms

unsigned char bitnum=0;  // 中断接收键盘数据位的个数
unsigned char keyval=0;  // 存放按键值
unsigned char keynum=0;  // 存放中断接收键盘数据的个数
unsigned char key[3]={0,0,0};    // 存放按键的1B通码和2B断码
unsigned char lcdbuf[2]={'0',0};    //

unsigned char code unshifted[][2]= //shift键没按下译码表
{
  0x0e,'`',
  0x15,'q',
  0x16,'1',
  0x1a,'z',
  0x1b,'s',
  0x1c,'a',
  0x1d,'w',
  0x1e,'2',
  0x21,'c',
  0x22,'x',
  0x23,'d',
  0x24,'e',
  0x25,'4',
  0x26,'3',
  0x29,' ',
  0x2a,'v',
  0x2b,'f',
  0x2c,'t',
  0x2d,'r',
  0x2e,'5',
  0x31,'n',
  0x32,'b',
  0x33,'h',
  0x34,'g',
  0x35,'y',
  0x36,'6',
  0x39,',',
  0x3a,'m',
  0x3b,'j',
  0x3c,'u',
  0x3d,'7',
  0x3e,'8',
  0x41,',',
  0x42,'k',
  0x43,'i',
  0x44,'o',
  0x45,'0',
  0x46,'9',
  0x49,'.',
  0x4a,'/',
  0x4b,'l',
  0x4c,';',
  0x4d,'p',
  0x4e,'-',
  0x52,'\'',
  0x54,'[',
  0x55,'=',
  0x5b,']',
  0x5d,'\\',
  0x61,'   0x69,'1',
  0x6b,'4',
  0x6c,'7',
  0x70,'0',
  0x71,'.',
  0x72,'2',
  0x73,'5',
  0x74,'6',
  0x75,'8',
  0x79,'+',
  0x7a,'3',
  0x7b,'-',
  0x7c,'*',
  0x7d,'9',
  0,0
};
unsigned char code shifted[][2]= //shift键按下译码表
{
  0x0e,'~',
  0x15,'Q',
  0x16,'!',
  0x1a,'Z',
  0x1b,'S',
  0x1c,'A',
  0x1d,'W',
  0x1e,'@',
  0x21,'C',
  0x22,'X',
  0x23,'D',
  0x24,'E',
  0x25,'$',
  0x26,'#',
  0x29,' ',
  0x2a,'V',
  0x2b,'F',
  0x2c,'T',
  0x2d,'R',
  0x2e,'%',
  0x31,'N',
  0x32,'B',
  0x33,'H',
  0x34,'G',
  0x35,'Y',
  0x36,'^',
  0x39,'L',
  0x3a,'M',
  0x3b,'J',
  0x3c,'U',
  0x3d,'&',
  0x3e,'*',
  0x41,'   0x42,'K',
  0x43,'I',
  0x44,'O',
  0x45,')',
  0x46,'(',
  0x49,'>',
  0x4a,'?',
  0x4b,'L',
  0x4c,':',
  0x4d,'P',
  0x4e,'_',
  0x52,'"',
  0x54,'{',
  0x55,'+',
  0x5b,'}',
  0x5d,'|',
  0x61,'>',
  0x69,'1',
  0x6b,'4',
  0x6c,'7',
  0x70,'0',
  0x71,'.',
  0x72,'2',
  0x73,'5',
  0x74,'6',
  0x75,'8',
  0x79,'+',
  0x7a,'3',
  0x7b,'-',
  0x7c,'*',
  0x7d,'9',
  0,0
};

/*------------------LCD初始化-----------------*/
void init_lcd(void)
{
  wr_comm_no(0x38);  //不检测忙闲
  delayms(5);
  wr_comm_no(0x38);
  delayms(5);
  wr_comm_no(0x38);
  delayms(5);
  wr_comm_no(0x38);
  delayms(5);
  wr_comm(0x38);  // 设定LCD为16*2显示，5*7点阵，8位数据接口，检测忙信号
  delayus(3);     // 延时11us
  wr_comm(0x08);  // 关闭显示，检测忙信号
  delayus(3);
  wr_comm(0x01);  // 显示清屏，检测忙信号
  delayus(3);
  wr_comm(0x06);  // 显示光标自动右移，整屏不移动，检测忙信号
  delayus(3);
  wr_comm(0x0c);  //开显示，不显示光标，检测忙信号
  delayus(3);
}
/*--------------检测LCD忙闲---------------*/
void chk_busy(void)
{
  lcd_bus=0xff;
  rs=0;
  rw=1;
  ;
  e=1;
  while(bf==1);
  e=0;
}
/*------------写命令到LCD--------------*/
void wr_comm(unsigned char comm)
{
  chk_busy();
  rs=0;//H:写数据,L:写指令
  rw=0;
  e=0;
  ;
  lcd_bus=comm;//内容
  delayus(3);
  e=1;
  ;
  e=0;
}
/*------------写命令到LCD不检测忙闲--------------*/
void wr_comm_no(unsigned char comm)
{
  rs=0;//H:写数据,L:写指令
  rw=0;
  e=0;
  ;
  lcd_bus=comm;//内容
  delayus(3);
  e=1;
  ;
  e=0;
}
/*------------写数据到LCD--------------*/
void wr_data(unsigned char dat)
{
  chk_busy();
  rs=1;//H:写数据,L:写指令
  rw=0;
  e=0;
  ;
  lcd_bus=dat;//内容
  delayus(3);
  e=1;
  ;
  e=0;
}
/*--------------读LCD数据---------------*/
unsigned char rd_lcd(void)
{
  unsigned char rd_data;
  chk_busy();//检测忙闲
  rs=1;
  rw=1;
  e=1;
  ;
  rd_data=lcd_bus;
  e=0;
  return rd_data;
}
/*-------------写字符串----------------*/
void wr_str(unsigned char *s)
{
   while(*s>0)   //字符串以0结束
   {
      wr_data(*s);
      s++;
   }
}
/*---------------延时子程序us----------------*/
void delayus(unsigned char us)
{
  while(--us);  // 一个循环2us
}
/*---------------延时子程序ms----------------*/
void delayms(unsigned int ms)  //延时 n ms
{
  while(ms)
  {
  int i;
  i=110;
  while(i--);
  ms=ms-1;
  }
}
void kbinter(void) interrupt 2
{
   RUN=~RUN;
   EX1=0;   // 关外部中断1
   if((bitnum>0)&&(bitnum<9))    //  保留接收数据的第1到第8位，即D0-D7，去掉起始位、校验位、停止位
   {
     keyval=keyval>>1;          //   先接收到的是数据的D0位
     if(PS2DATA==1)
       keyval=keyval|0x80;
   }
   bitnum++;      // 中断1次，位数加1
   while(!PS2CLK);   //等待PS2CLK拉高
   if(bitnum>10)  // 接收完1帧数据(11位)
   {
     bitnum=0;
     key[keynum]=keyval;  // 保存接收到的数据
     keynum++;
     if(keyval==0xaa)    // 键盘上电，lcd显示A，P31亮。
     {
       P31=0;      // P31亮
       keynum=0;
       lcdbuf[0]='A';
     }
   }
   EX1=1;   // 开外部中断1
}

void main()
{
   unsigned char i;
   delayms(20);
   init_lcd();     //LCD初始化
   wr_comm(0x80);  //第一行第一个字符地址
   wr_str("Tai shan Dian Zi");

   EA=1;    // 开总中断
   EX1=1;   // 开外部中断1
   IT1=1;   // 外部中断1下降沿触发

   while(1)
   {
     if(keynum==3)  // 接收3个字节数据，1B通码，2B断码
     {
       P31=1;   //  P31灭
       keynum=0;
       i=0;
       while((key[0]!=unshifted[i][0])&&(unshifted[i][0]!=0))      // 查表，将按键值转换成字符，便于1602显示
       {
         i++;
       }
       lcdbuf[0]=unshifted[i][1];
     }
     wr_comm(0xc0); // 第二行第一个字符地址
     wr_str(lcdbuf);
   }
}