key.i

本资料为基于单片机的AD按键的程序。能用单IO口实现多按键处理

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

// I/O registers definitions for the ATmega32


#pragma used+
#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 ADCSR=6;     // for compatibility with older code
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 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


// Needed by the power management functions (sleep.h)
#asm
	#ifndef __SLEEP_DEFINED__
	#define __SLEEP_DEFINED__
	.EQU __se_bit=0x80
	.EQU __sm_mask=0x70
	.EQU __sm_powerdown=0x20
	.EQU __sm_powersave=0x30
	.EQU __sm_standby=0x60
	.EQU __sm_ext_standby=0x70
	.EQU __sm_adc_noise_red=0x10
	.SET power_ctrl_reg=mcucr
	#endif
#endasm


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


#pragma used+
#pragma used+

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

#pragma used-

/* CodeVisionAVR C Compiler
   Prototypes for standard library functions

   (C) 1998-2003 Pavel Haiduc, HP InfoTech S.R.L.
*/




#pragma used+
#pragma used+
#pragma used+

int atoi(char *str);
long int atol(char *str);
float atof(char *str);
void itoa(int n,char *str);
void ltoa(long int n,char *str);
void ftoa(float n,unsigned char decimals,char *str);
void ftoe(float n,unsigned char decimals,char *str);
void srand(int seed);
int rand(void);
void *malloc(unsigned int size);
void *calloc(unsigned int num, unsigned int size);
void *realloc(void *ptr, unsigned int size); 
void free(void *ptr);

#pragma used-
#pragma library stdlib.lib


  

unsigned char datR_buf[32];
flash unsigned char AC_TABLE[]={
0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,      //第一行汉字位置
0x90,0x91,0x92,0x93,0x94,0x95,0x96,0x97,      //第二行汉字位置
0x88,0x89,0x8a,0x8b,0x8c,0x8d,0x8e,0x8f,      //第三行汉字位置
0x98,0x99,0x9a,0x9b,0x9c,0x9d,0x9e,0x9f      //第四行汉字位置
};
 
//串口发送一个字节
void SendByte(unsigned char Dbyte)
{
     unsigned char i;
     for(i=0;i<8;i++)
     {
           PORTA.6                = 0;
          Dbyte=Dbyte<<1;      //左移一位
          PORTA.5      =SREG&0x01;            //移出的位给SIDW
          PORTA.6                = 1;  
          PORTA.6                = 0;
     }
}

//串口接收一个字节
//仅在读取数据的时候用到
//而读出的数据是一次只能读出4bit的
unsigned char ReceiveByte(void)
{
     unsigned char i,temp1,temp2; 
     temp1=temp2=0;     
    // DDRD.5=0;
     for(i=0;i<8;i++)
     {     
           temp1=temp1<<1;
           PORTA.6                = 0;
           PORTA.6                = 1;            
           PORTA.6                = 0;
           if(PINA.5      ) temp1++;
     }
     for(i=0;i<8;i++)
     {
           temp2=temp2<<1;
           PORTA.6                = 0;
           PORTA.6                = 1;
           PORTA.6                = 0;
           if(PINA.5      ) temp2++;
     }  
  //   DDRD.5=1;
     return ((0xf0&temp1)+(0x0f&temp2));
}

void CheckBusy( void )
{
     do   SendByte(0xfc);      //11111,RW(1),RS(0),0
     while(0x80&ReceiveByte());      //BF(.7)=1 Busy
}

void WriteCommand( unsigned char Cbyte )
{
     PORTA.4 = 1;
     CheckBusy();
     SendByte(0xf8);            //11111,RW(0),RS(0),0
     SendByte(0xf0&Cbyte);      //高四位
     SendByte(0xf0&Cbyte<<4);//低四位(先执行<<)     
     PORTA.4 = 0;
}

void WriteData( unsigned char Dbyte )
{
     PORTA.4 = 1;
     CheckBusy();
     SendByte(0xfa);            //11111,RW(0),RS(1),0
     SendByte(0xf0&Dbyte);      //高四位
     SendByte(0xf0&Dbyte<<4);//低四位(先执行<<)    
     PORTA.4 = 0;
}

unsigned char ReadData( void )
{
     CheckBusy();
     SendByte(0xfe);            //11111,RW(1),RS(1),0
     return ReceiveByte();
}
void LcmInit( void )
{    
     PORTA.7=0;  
     delay_us(10);
     PORTA.7=1;
     WriteCommand(0x30);      //8BitMCU,基本指令集合
     WriteCommand(0x03);      //AC归0,不改变DDRAM内容
     WriteCommand(0x0C);      //显示ON,游标OFF,游标位反白OFF
     WriteCommand(0x01);      //清屏,AC归0
     WriteCommand(0x06);      //写入时,游标右移动
}

//文本区清RAM函数
void LcmClearTXT( void )
{
     unsigned char i;
     WriteCommand(0x30);      //8BitMCU,基本指令集合
     WriteCommand(0x80);      //AC归起始位
     for(i=0;i<64;i++)
        WriteData(0x20);
}

//图形区和文本区显示在两个不同的RAM区
//图形区清RAM函数
void LcmClearBMP( void )
{
     unsigned char i,j;
     WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
     WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
     for(i=0;i<32;i++)            //12864实际为256x32
     {
           WriteCommand(0x80|i);      //行位置
           WriteCommand(0x80);      //列位置
           for(j=0;j<32;j++)            //256/8=32 byte
                WriteData(0);
     }
}
/*****************************************   
函数名：PutStr()
功能：  实现任意字符输入（即实现字母、数字和汉字任意结合的语句显示）
输入：row:0~3行；col:0~7列;*puts:要显示的字符串
******************************************/
void PutStr(unsigned char row,unsigned char col,flash unsigned char *puts)
{    
        WriteCommand(0x30);      //8BitMCU,基本指令集合
        //   WriteCommand(AC_TABLE[8*row+col]);      //起始位置
        while(*puts != '\0')      //判断字符串是否显示完毕
        {     
                if(col>=8)            //判断换行
                {            //若不判断,则自动从第一行到第三行
                        col=0;
                        row++;
                }
                if(row>=4) break;      //一屏显示完,回到屏左上角
                WriteCommand(AC_TABLE[8*row+col]);  
                
                if(*puts<0xa1) 
                {       
                        WriteData(*puts);
                        if(*(puts+1)>0xa1)         //紧跟单字节字符后面的是汉字   
                                WriteData(0xa0);      //空格
                        else
                        {       puts++;
                                if(*puts=='\0') 
                                {
                                        WriteData(0xa0);      //空格  
                                        break;
                                }
                                WriteData(*puts);
                        }
                                
                } 
                else
                {
                        WriteData(*puts);      //一个汉字要写两次
                        puts++;
                        WriteData(*puts);   
                }    
                puts++; 

                col++;
        }
}  
void PutStr1(unsigned char row,unsigned char col,unsigned char *puts)
{    
        WriteCommand(0x30);      //8BitMCU,基本指令集合
        //   WriteCommand(AC_TABLE[8*row+col]);      //起始位置
        while(*puts != '\0')      //判断字符串是否显示完毕
        {     
                if(col>=8)            //判断换行
                {            //若不判断,则自动从第一行到第三行
                        col=0;
                        row++;
                }
                if(row>=4) break;      //一屏显示完,回到屏左上角
                WriteCommand(AC_TABLE[8*row+col]);  
                
                if(*puts<0xa1) 
                {       
                        WriteData(*puts);
                        if(*(puts+1)>0xa1)         //紧跟单字节字符后面的是汉字   
                                WriteData(0xa0);      //空格
                        else
                        {       puts++;
                                if(*puts=='\0') 
                                {
                                        WriteData(0xa0);      //空格  
                                        break;
                                }
                                WriteData(*puts);
                        }
                                
                } 
                else
                {
                        WriteData(*puts);      //一个汉字要写两次
                        puts++;
                        WriteData(*puts);   
                }    
                puts++; 

                col++;
        }
}   

/***************************************************************
函数名：disp1616(X,Y,*s)
功能：带字库LCD12864的自定义16*16字体显示
输入：Y：列地址设置0～15；X；行地址设置0和16；*S：字模地址指针; focus:反白显示设置：1：反白；0：非反白
返回：无
*******************************************************************/
void disp1616(unsigned char X,unsigned char Y, flash unsigned char *s, unsigned char focus)
{
        unsigned char i,j;   
        WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
        WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
        for(j=0;j<16;j++)            
        {
                WriteCommand(0x80|X++);      //行位置
                WriteCommand(0x80|Y);      //列位置
                if(focus)
                        for(i=0;i<2;i++)
                                WriteData(~(*s++));
                else
                        for(i=0;i<2;i++)
                                WriteData(*s++); 
        }
        
} 

/***************************************************************
函数名：disp88(X,Y,*s)
功能：带字库LCD12864的自定义8*8字体显示,但一次必须显示两个8*8的字模
输入：Y：列地址设置0～15；X；行地址设置0和16；*S1,*S2：两个字模指针（合并显示）;
返回：无
*******************************************************************/  
void disp88(unsigned char X, unsigned char Y,flash unsigned char *s1,flash unsigned char *s2)
{
        unsigned char i; 
        WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
        WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
        for(i=0;i<8;i++)            
        {
                WriteCommand(0x80|X++);      //行位置
                WriteCommand(0x80|Y);      //列位置
                WriteData(*s1++);
                WriteData(*s2++);
                         
        }
        
}

/***************************************************************
函数名：PutBMP()
功能：全图显示
输入：*puts：字模
返回：无
*******************************************************************/
void PutBMP(flash unsigned char *puts)
{
     unsigned int x=0;
     unsigned char i,j;
     WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
     WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
     for(i=0;i<32;i++)            //12864实际为256x32
     {
           WriteCommand(0x80|i);      //行位置
           WriteCommand(0x80);      //列位置
           for(j=0;j<32;j++)      //256/8=32 byte
           {            //列位置每行自动增加
                 WriteData(puts[x]);
                 x++;
           }
     }
} 

/***************************************************************
函数名：dispint(Num)
功能：显示整型数字
输入：Num:0-99的整型数字
返回：无
*******************************************************************/
void dispint(unsigned char X,unsigned char Y,unsigned int Num)
{      
        unsigned char buf[8]; 
    //    if(Num<0||Num>99)
     //           return;
        itoa(Num,buf); 
        if(Num<10)
        {
                buf[1]=buf[0];
                buf[0]='0';
                buf[2]='\0'; 
        } 
        PutStr1(X,Y,buf);        
        
}                            

//维捷登测试用点阵显示
void DisplayDots(unsigned char DotByte)
{
     unsigned char i,j;
     WriteCommand(0x34);      //8Bit扩充指令集,即使是36H也要写两次
     WriteCommand(0x36);      //绘图ON,基本指令集里面36H不能开绘图
     for(i=0;i<32;i++)            //12864实际为256x32
     {
           WriteCommand(0x80|i);      //行位置
           WriteCommand(0x80);      //列位置
           for(j=0;j<32;j++)      //256/8=32 byte
           {            //列位置每行自动增加
                 WriteData(DotByte);                  
           }
      //     DotByte=~DotByte;
     }
}

/***************************************************************
函数名