keyboard.i

4*4键盘扫描程序

	    default:break;  
	  }
   	  if(exit)break;   									  //确认退出
   } 
}
//*************************************
//通讯函数
//说明:参数mark:传送的数据,2为两帧dat1和dat2都有效,1为一帧dat1有效,dat1为数据1, dat2为数据2,com为指令码
//*************************************
void Send_lcd(unsigned char mark,unsigned char dat1,unsigned char dat2,unsigned char com)
{
  if(mark)												//判断指令类型
     {
	  Read_Sta(1);
	  Post_Msg(dat1);		     	//类型1和2dat1均有效
	  if(mark==2)
	  {
	    Read_Sta(1);
	    Post_Msg(dat2);                              	//类型2时dat2有效
	  }	 		
	 }
   Read_Sta(1);
   Post_Com(com);								//送指令码
}
//*************************************
//清显示函数
//说明:此函数可将液晶屏内从00单元开始8200单元结束的所有区域数据清零,但是不会对CGRAM汉字字模区清零
//************************************
void Clear()
{
    unsigned int i;	
	Send_lcd(2,0x00,0x00,0x24);			   //置光标首地址(0x00,0x00)
	Send_lcd(0,0x00,0x00,0xb0);			   //设置自动写方式
    for(i=0;i<0x1b00;i++)
	{Read_Sta(3);					   //判断状态三(自动写标志位)
	 Post_Msg(0x00);					   //当前地址数据清零
	}
    for(i=0x1b00+1100;i<8200;i++)
	{Read_Sta(3);
	 Post_Msg(0x00);
	  }
    Send_lcd(0,0x00,0x00,0xb2);			   //自动写入结束
}
void Reset_Cgram()
{
   unsigned int i;
   Send_lcd(2,0x03,0x00,0x22);				//置CGRAM偏置地址为0x03(0011 100000 000)
   Send_lcd(2,0x00,0x1c,0x24);				//置CGRAM字模首地址为0x1c (001 1100 00000000)
   Send_lcd(0,0x00,0x00,0xb0);				//设置自动写方式,(地址自动增一)
   for(i=0;i<1024;i++)						//将汉字点阵写入对应CGRAM区域
    {
	  Read_Sta(3);  						//读状态三,写标志判断 
	  //delay_us(100);
	  Post_Msg(k[i]);	
	}
   Send_lcd(0,0x00,0x00,0xb2);				//自动写入结束
}
//************************************
//显示屏初始化函数
//************************************
void resetlcd()
{ 
  DDRB=0x2f;
  DDRC=0xff;
  PORTC =0xff;
  Clear();
  Reset_Cgram();
  Send_lcd(2,0x00,0x00,0x40);               //文本区首地址(0x00,0x00)
  Send_lcd(2,30,0x00,0x41);			//文本区宽度(30字符)
  Send_lcd(2,0x00,0x08,0x42);               //图形区首地址(0x00,0x08)
  Send_lcd(2,30,0x00,0x43);           //图形区宽度(30字符位置)  
  Send_lcd(0,0x00,0x00,0xa0);               //光标形状态(一行高度)    
  Send_lcd(0,0x00,0x00,0x80);               //点阵逻辑"或"合成
  Send_lcd(0,0x00,0x00,0x9f);               //开文本显示区,开图形显示区,显示光标,置光标闪烁
}
//************************************
//显示单个英文字符函数
//说明:输入参数x_h:字符行坐标，(0-15),y_l:字符列坐标(0-29),word为字符代码(支持ASCII码)
//************************************
void word(unsigned char x_h,unsigned char y_l,unsigned char word)
{
   	unsigned int sum;
	sum=(unsigned int)(30)*(unsigned int)(x_h)+(unsigned int)(y_l);				   //计算当前字符位置以前的总点阵数量
	Send_lcd(2,sum%256,sum/256,0x24);	   //转换为实际行和列地址,并写入LCD
	Send_lcd(1,word,0x00,0xc0);		   //写入LCD当前字符数据
	Send_lcd(2,0,0,0x24);			    //光标回位
}
//************************************
//显示英文字符串函数
//说明：输入参数x_h:字符串行坐标(0-15),y_l:字符串起始列坐标(0-29)，word_list：字符串指针，（提示：当本行写满时，会自动换行）
//************************************
void listword(unsigned char x_h,unsigned char y_l,unsigned char *word_list)
{
  unsigned char length=0;
  while(word_list[length]!=0x00)    	   //判断是否字符串结束,将字符串拆分成为单个字符轮流显示
	{
	  word(x_h+length/30,y_l+length%256,word_list[length++]-32);	   //得到实际行坐标和列坐标，调用显示当前单字符
	}
  Send_lcd(2,0,0,0x24);					   //光标回位
} 
void chinese(unsigned char x_h,char y_l,unsigned char dat)
{
   unsigned int sum;
   dat=0x80+dat*4;                                 //得到实际地址
   sum=(unsigned int)(x_h)*(unsigned int)(30)+(unsigned int)y_l;					   //得到当前字符位置
   y_l=sum%256;                                    //得到显示列数
   x_h=sum/256;							   //得到显示行数
   Send_lcd(2,y_l,x_h,0x24);					   //置显示地址
   Send_lcd(1,dat,0x00,0xc0);					   //送显示值--汉字左上部分 
   Send_lcd(1,dat+2,0x00,0xc0);					   //送显示值--汉字右上部分
   sum=sum+30;						   //修正下半部分字符位置
   y_l=sum%256;							   //得到显示列数
   x_h=sum/256;							   //得到显示行数
   Send_lcd(2,y_l,x_h,0x24);					   //置显示地址
   Send_lcd(1,dat+1,0x00,0xc0);					   //送显示值--汉字左下部分 
   Send_lcd(1,dat+3,0x00,0xc0);					   //送显示值--汉字右下部分
   Send_lcd(2,0,0,0x24);
}

//************************************
//画实点函数
//说明：该函数可以产行屏幕上的任意位置上的点,输入参数,X:行坐标(0-127)Ｙ:列坐标(0-239)
//************************************ 

void point(unsigned char X,unsigned char Y)
{
   unsigned int Sum;						       
   Sum=(unsigned int)(X)*(unsigned int)(30)*8+(unsigned int)Y;//得到当单位置前的点阵和
   Send_lcd(2,Sum/8,Sum/2048+0x08,0x24);		   //换算出实际行列坐标，并将操作地址写入lcd
   Send_lcd(0,0x00,0x00,(0x07-Y%8)|0xf8); 		   //换算出当前位，将该位置１显示
}/* */  
void cursor(unsigned char y,unsigned char x)
{Send_lcd(2,x,y,0x21);
 }

unsigned char keydata=0;
//unsigned  char ledcode[16]={0xc0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0x88,0x83,0xC6,0xA1,0x86,0x8E};  
unsigned  char lcdcode[18]={16,17,18,19,20,21,22,23,24,25,33,34,35,36,37,38,39,40};

unsigned char key_read(void)
{ unsigned char i;  
  DDRD = 0xFF;/*获取列地址*/   //出 出 出 出 出 出 出 出
  PORTD   = 0x0F;                 // 0  0  0  0  1  1  1  1
  DDRD = 0xF0;                 //出 出 出 出 入 入 入 入
  i = PIND;                     // 0  0  0  1  1  1  1  1
  
  DDRD = 0xFF;/*获取行地址*/ 
  PORTD   = 0xF0;
  DDRD = 0x0F; 
  i &= PIND;  
  
  DDRD = 0x00;/*输出复位*/ 
  PORTD   = 0xFF;  
  
  switch (i) 
      {/*将按键码转换成键值*/  
        case  0x11: return 0; break; 
        case  0x21: return 1; break; 
        case  0x41: return 2; break; 
        case  0x81: return 3; break; 
        case  0x12: return 4; break; 
        case  0x22: return 5; break; 
        case  0x42: return 6; break; 
        case  0x82: return 7; break; 
        case  0x14: return 8; break; 
        case  0x24: return 9; break; 
        case  0x44: return 10;break;  
        case  0x84: return 11;break;  
        case  0x18: return 12;break;  
        case  0x28: return 13;break;  
        case  0x48: return 14;break;  
        case  0x88: return 15;break;
        case  0x00: return 16;break;
        default : return 17;  
      } 
  }
  

  /*按键获取函数 获取按键信号，其中包含有状态记录及按键去颤抖。
   有正确按键按下返回相应按键值 无正确按键按下返回"0xFF"*/
  unsigned char get_key(void)
  { unsigned char i; 
    unsigned char j;    /*按键记录*/ 
    i = key_read(); 
    if (i == 16)                /*无有效按键按下*/  
    {
     j = 0x00;                  /*清除按键记录*/  
      return 0xFF;              /*程序退出*/  
     }
    if (j== 0x00)
    {               /*为新按键*/  
       j = i;
       delay_ms(10 );
       i = key_read(); 
       if(i == j) 
       {   return i;   }
       else return 0xFF;  
     } 
   
   }
   void main(void)
   {
    //DDRA=0XFF;
    //DDRC=0XFF;
    //DDRD=0XFF;
    DDRA=0xff;
    PORTA=0xff;
 #asm("cli");
  
   delay_ms(1000);               //初始化液晶
   resetlcd();
   delay_ms(500);                     
    while(1)
    {
     keydata=get_key();
     if(keydata!=0xFF)
     {
       //PORTA=ledcode[keydata];
       word(0,0,lcdcode[keydata]);
       delay_ms(300);
     } 
    }
   }