ps2.i

PS2键盘驱动程序

//PS2键盘驱动程序，使用第二套扫描码
//CLK接INT0(PD2)使用外部中断0来检测时钟脉冲,DATE接PD1

// CodeVisionAVR C Compiler
// (C) 1998-2001 Pavel Haiduc, HP InfoTech S.R.L.

// I/O registers definitions for the ATmega16


#pragma used+
sfrb TWBR=0;
sfrb TWSR=1;
sfrb TWAR=2;
sfrb TWDR=3;
sfrb ADCL=4;
sfrb ADCH=5;
sfrw ADCW=4;      // 16 bit access
sfrb ADCSRA=6;
sfrb ADMUX=7;
sfrb ACSR=8;
sfrb UBRRL=9;
sfrb UCSRB=0xa;
sfrb UCSRA=0xb;
sfrb UDR=0xc;
sfrb SPCR=0xd;
sfrb SPSR=0xe;
sfrb SPDR=0xf;
sfrb PIND=0x10;
sfrb DDRD=0x11;
sfrb PORTD=0x12;
sfrb PINC=0x13;
sfrb DDRC=0x14;
sfrb PORTC=0x15;
sfrb PINB=0x16;
sfrb DDRB=0x17;
sfrb PORTB=0x18;
sfrb PINA=0x19;
sfrb DDRA=0x1a;
sfrb PORTA=0x1b;
sfrb EECR=0x1c;
sfrb EEDR=0x1d;
sfrb EEARL=0x1e;
sfrb EEARH=0x1f;
sfrw EEAR=0x1e;   // 16 bit access
sfrb UBRRH=0x20;
sfrb UCSRC=0X20;
sfrb WDTCR=0x21;
sfrb ASSR=0x22;
sfrb OCR2=0x23;
sfrb TCNT2=0x24;
sfrb TCCR2=0x25;
sfrb ICR1L=0x26;
sfrb ICR1H=0x27;
sfrb OCR1BL=0x28;
sfrb OCR1BH=0x29;
sfrw OCR1B=0x28;  // 16 bit access
sfrb OCR1AL=0x2a;
sfrb OCR1AH=0x2b;
sfrw OCR1A=0x2a;  // 16 bit access
sfrb TCNT1L=0x2c;
sfrb TCNT1H=0x2d;
sfrw TCNT1=0x2c;  // 16 bit access
sfrb TCCR1B=0x2e;
sfrb TCCR1A=0x2f;
sfrb SFIOR=0x30;
sfrb OSCCAL=0x31;
sfrb OCDR=0x31;
sfrb TCNT0=0x32;
sfrb TCCR0=0x33;
sfrb MCUCSR=0x34;
sfrb MCUCR=0x35;
sfrb TWCR=0x36;
sfrb SPMCR=0x37;
sfrb TIFR=0x38;
sfrb TIMSK=0x39;
sfrb GIFR=0x3a;
sfrb GICR=0x3b;
sfrb OCR0=0X3c;
sfrb SPL=0x3d;
sfrb SPH=0x3e;
sfrb SREG=0x3f;
#pragma used-

// Interrupt vectors definitions



// CodeVisionAVR C Compiler
// (C) 1998-2000 Pavel Haiduc, HP InfoTech S.R.L.


#pragma used+

void delay_us(unsigned int n);
void delay_ms(unsigned int n);

#pragma used-

// CodeVisionAVR C Compiler
// (C) 1998-2001 Pavel Haiduc, HP InfoTech S.R.L.

// I/O registers definitions for the ATmega16






// CodeVisionAVR C Compiler
// (C) 1998-2000 Pavel Haiduc, HP InfoTech S.R.L.





flash unsigned char k[]={
flash unsigned char k[]={
flash unsigned char k[]={
flash unsigned char k[]={
flash unsigned char k[]={
/*--  文字:  0三  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x00,0x7F,0x00,0x00,0x00,0x00,0x3F,0x00,0x00,0x00,0x00,0x00,0x7F,0x00,0x00,
0x00,0x00,0xFC,0x00,0x00,0x00,0x00,0xF8,0x00,0x00,0x00,0x00,0x00,0xFE,0x00,0x00,
         
/*--  文字:  1峡  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x20,0x20,0x23,0xA8,0xAA,0xA9,0xA9,0xA9,0xAF,0xA8,0xB8,0xE8,0x81,0x02,0x04,0x08,
0x40,0x40,0xFC,0x40,0x48,0x4C,0x48,0x50,0xFE,0x40,0xA0,0xA0,0x10,0x0E,0x04,0x00,
        
/*--  文字:  2大  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x01,0x01,0x01,0x01,0x01,0xFF,0x01,0x02,0x02,0x02,0x04,0x04,0x08,0x10,0x20,0x40,
0x00,0x00,0x00,0x00,0x00,0xFE,0x00,0x80,0x80,0x40,0x40,0x20,0x10,0x18,0x0E,0x04,
        
/*--  文字:  3学  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x01,0x10,0x0C,0x08,0x7F,0x40,0x8F,0x00,0x00,0x7F,0x00,0x00,0x00,0x00,0x02,0x01,
0x08,0x8C,0xC8,0x90,0xFE,0x04,0xE8,0x40,0x80,0xFE,0x80,0x80,0x80,0x80,0x80,0x00,
        
/*--  文字:  4电  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x01,0x01,0x01,0x3F,0x21,0x21,0x3F,0x21,0x21,0x21,0x3F,0x21,0x01,0x01,0x00,0x00,
0x00,0x00,0x00,0xF8,0x08,0x08,0xF8,0x08,0x08,0x08,0xF8,0x08,0x02,0x02,0xFE,0x00,


/*--  文字:  5子  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x3F,0x00,0x00,0x00,0x01,0x01,0x01,0xFF,0x01,0x01,0x01,0x01,0x01,0x05,0x02,
0x00,0xF0,0x20,0x40,0x80,0x00,0x00,0x04,0xFE,0x00,0x00,0x00,0x00,0x00,0x00,0x00,

/*--  文字:  6创  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x08,0x08,0x14,0x13,0x21,0x40,0xBF,0x21,0x21,0x25,0x22,0x20,0x20,0x20,0x1F,0x00,
0x02,0x02,0x12,0x12,0xD2,0x92,0x12,0x12,0x12,0x12,0x12,0x82,0x82,0x8A,0x84,0x00,

/*--  文字:  7新  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x10,0x08,0x7F,0x22,0x14,0xFF,0x08,0x08,0xFF,0x08,0x2C,0x2A,0x4A,0x89,0x2A,0x10,
0x00,0x0E,0x70,0x40,0x40,0x7E,0x48,0x48,0x48,0x48,0x48,0x88,0x88,0x08,0x08,0x08,


/*--  文字:  8实  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x01,0x00,0x3F,0x28,0x46,0x04,0x08,0x06,0x04,0x7F,0x00,0x01,0x02,0x04,0x18,0x60,
0x00,0x80,0xFE,0x04,0x88,0x80,0x80,0x80,0x80,0xFE,0x80,0x40,0x20,0x10,0x18,0x10,
        
/*--  文字:  9验  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0xF8,0x08,0x48,0x48,0x49,0x4B,0x7C,0x04,0x06,0x35,0xC5,0x04,0x17,0x08,0x00,
0x00,0x40,0x40,0xA0,0x90,0x0E,0xF0,0x00,0x84,0x44,0x48,0x48,0x10,0xFE,0x00,0x00,
        
/*--  文字:  10室  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x02,0x01,0x3F,0x20,0x40,0x3F,0x04,0x08,0x1F,0x01,0x01,0x3F,0x01,0x01,0xFF,0x00,
0x00,0x00,0xFE,0x04,0x08,0xFC,0x00,0x20,0xF0,0x10,0x00,0xF8,0x00,0x00,0xFE,0x00,

/*--  文字:  11时  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x00,0x00,0x7C,0x44,0x47,0x44,0x7C,0x45,0x44,0x44,0x7C,0x00,0x00,0x00,0x00,0x00,
0x10,0x10,0x10,0x10,0xFE,0x10,0x10,0x10,0x90,0x90,0x10,0x10,0x10,0x10,0x50,0x20,

/*--  文字:  12间  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x20,0x13,0x10,0x40,0x47,0x44,0x44,0x47,0x44,0x44,0x47,0x40,0x40,0x40,0x40,0x40,
0x00,0xFC,0x04,0x04,0xE4,0x24,0x24,0xE4,0x24,0x24,0xE4,0x04,0x04,0x04,0x14,0x08,

/*--  文字:  13闹  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x20,0x17,0x02,0x21,0x3F,0x21,0x21,0x2F,0x29,0x29,0x29,0x29,0x29,0x21,0x21,0x20,
0x00,0xFC,0x04,0x04,0xF4,0x04,0x04,0xE4,0x24,0x24,0x24,0x64,0x24,0x04,0x14,0x08,

/*--  文字:  14钟  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x10,0x10,0x20,0x3D,0x41,0x7D,0x91,0x11,0xFD,0x10,0x10,0x10,0x10,0x14,0x18,0x10,
0x20,0x20,0x20,0xFC,0x24,0x24,0x24,0x24,0xFC,0x20,0x20,0x20,0x20,0x20,0x20,0x20,

/*--  文字:  15频  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x08,0x08,0x4E,0x48,0x48,0xFE,0x00,0x08,0x4A,0x4A,0x84,0x08,0x10,0x20,0xC3,0x00,
0x00,0xFE,0x20,0x40,0xFC,0x84,0xA4,0xA4,0xA4,0xA4,0xA4,0x50,0x48,0x86,0x02,0x00,

/*--  文字:  16率  --*/
/*--  宋体12;  此字体下对应的点阵为：宽x高=16x16   --*/
0x02,0x01,0x7F,0x41,0x22,0x17,0x04,0x11,0x22,0x47,0x01,0xFF,0x01,0x01,0x01,0x01,
0x00,0x00,0xFE,0x00,0x28,0xD0,0x80,0x10,0x48,0xC4,0x20,0xFE,0x00,0x00,0x00,0x00
};

void Post_Msg(unsigned char msg)
{DDRC=0xff;
 PORTC =0xff; 		
 PORTA.7=0;
 PORTB.2=0;  
 PORTB.0=0;
 delay_us(10);
 PORTC  = msg;
 PORTB.0=1;
 PORTA.7=1;
}
//------------送一条指令函数-----------------
void Post_Com(unsigned char msg)
{DDRC=0xff;
 PORTA.7=0;
 PORTB.2=1; 
 PORTB.0=0;
 PORTC =msg; 
 PORTB.0=1;
 PORTA.7=1;
}
//-------------接收一帧据数-------------------
unsigned char Read_Msg()
{unsigned char Statu;
 DDRC=0xff;
 PORTC =0xFF;
 PORTA.7=0;
 PORTB.2=1;
 PORTB.1=0;
 DDRC=0;
 Statu=PINC;
 PORTB.1=1;
 PORTA.7=1;
 DDRC=0xff;
 return (Statu);
}
//*************************************
//读状态函数
//*************************************
void Read_Sta(unsigned char mark)
{     
   bit exit=0;
   unsigned char Sta;
   while(1)
   {
     Sta=Read_Msg();                                      //取得lcd当前状态	 
     switch(mark)										  //得到需要的状态
	  {
	    case 1:if((Sta&0x03)==0x03)exit=1;break;		  //分离状态１，读写状态
              case 2:if(Sta&0x04)exit=1;break;				  //分离状态２
              case 3:if(Sta&0x10)exit=1;break;				  //分离状态３
	    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);