xlir12864.c

说明：本文件夹一共提供各类编程实例200多个

/********************************************************************************
*  标题:  xl系列单片机实验仪演示程序 遥控键值解码-lcd12864显示                 *
*  文件:   xlir12864.C                                                         *
*  日期:  2006-1-5                                                             *
*  版本:  3.0 （试验通过版）可用xl600-xl1000单片机综合试验仪试验               *
*  邮箱:  [e-mail]                                                      *
*  网站： http://www.51c51.com    www.8951.com                                 *
********************************************************************************
*  描述:                                                                       *
*          lcd12864显示 遥控键值读取器                                         *
*         lcd12864显示 遥控器接p3.2                                            *
*         LCD型号：TS12864A-3（带汉字库）或兼容型号      控制器ST7920          *           
*         P0口为128*64LCD的数据 D0-D7                                          *
*         K17键按下，继电器吸合。K19键按下，继电器关闭                         *
*         显示程序在中断服务程序之中                                           *
*          喇叭接p3.7  继电器接p1.0                                            *
*         17(40h)键按下，继电器吸合。19(04h)键按下，继电器关闭。               *
*                                                                              *
********************************************************************************
* 【版权】 Copyright(C)深圳市学林电子有限公司 www.51c51.com                     *
* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！                   *
*  【技术支持】请访问http://www.51c51.com/bbs/index.asp  官方论坛               *
********************************************************************************/
#include <reg51.h>
#include <intrins.h>
	
#define uchar unsigned char
#define uint  unsigned int
/*TS12864A-3 端口定义*/
#define LCD_data  P0             //数据口
sbit LCD_RS  =  P2^0;            //寄存器选择输入 
sbit LCD_RW  =  P2^1;            //液晶读/写控制
sbit LCD_EN  =  P2^2;            //液晶使能控制
sbit LCD_PSB =  P2^3;            //串/并方式控制
sbit LCD_RST =  P2^5;            //液晶复位端口

sbit  IRIN  = P3^2;				//红外遥控
sbit  BEEP  = P3^7;				//蜂鸣器
sbit  RELAY = P1^3;			    //继电器

uchar code dis1[] = {"红外遥控码读取器"};
uchar code dis2[] = {"----------------"};
uchar code dis3[] = {"键值编码：- - H "};
uchar code dis4[] = {"键值反码：- - H "};

#define delayNOP(); {_nop_();_nop_();_nop_();_nop_();};
uchar IRDIS[2];
uchar IRCOM[4];
void delay0(uchar x);  //x*0.14MS
void beep();
void  dataconv();
void lcd_pos(uchar X,uchar Y);  //确定显示位置
/*******************************************************************/
/*                                                                 */
/*  延时函数                                                       */
/*                                                                 */
/*******************************************************************/
void delay(int ms)
{
    while(ms--)
	{
      uchar i;
	  for(i=0;i<250;i++)  
	   {
	    _nop_();			   
		_nop_();
		_nop_();
		_nop_();
	   }
	}
}		
/*******************************************************************/
/*                                                                 */
/*检查LCD忙状态                                                    */
/*lcd_busy为1时，忙，等待。lcd-busy为0时,闲，可写指令与数据。      */
/*                                                                 */
/*******************************************************************/
bit lcd_busy()
 {                          
    bit result;
    LCD_RS = 0;
    LCD_RW = 1;
    LCD_EN = 1;
    delayNOP();
    result = (bit)(P0&0x80);
    LCD_EN = 0;
    return(result); 
 }
/*******************************************************************/
/*                                                                 */
/*写指令数据到LCD                                                  */
/*RS=L，RW=L，E=高脉冲，D0-D7=指令码。                             */
/*                                                                 */
/*******************************************************************/
void lcd_wcmd(uchar cmd)
{                          
   while(lcd_busy());
    LCD_RS = 0;
    LCD_RW = 0;
    LCD_EN = 0;
    _nop_();
    _nop_(); 
    P0 = cmd;
    delayNOP();
    LCD_EN = 1;
    delayNOP();
    LCD_EN = 0;  
}
/*******************************************************************/
/*                                                                 */
/*写显示数据到LCD                                                  */
/*RS=H，RW=L，E=高脉冲，D0-D7=数据。                               */
/*                                                                 */
/*******************************************************************/
void lcd_wdat(uchar dat)
{                          
   while(lcd_busy());
    LCD_RS = 1;
    LCD_RW = 0;
    LCD_EN = 0;
    P0 = dat;
    delayNOP();
    LCD_EN = 1;
    delayNOP();
    LCD_EN = 0; 
}
/*******************************************************************/
/*                                                                 */
/*  LCD初始化设定                                                  */
/*                                                                 */
/*******************************************************************/
void lcd_init()
{ 
	LCD_RST = 0;		 //液晶复位
    delay(30);                   
    LCD_RST = 1;      
    delay(5);
    LCD_PSB = 1;         //并口方式
    
    lcd_wcmd(0x34);      //扩充指令操作
    delay(5);
    lcd_wcmd(0x30);      //基本指令操作
    delay(5);
    lcd_wcmd(0x0C);      //显示开，关光标
    delay(5);
    lcd_wcmd(0x01);      //清除LCD的显示内容
    delay(5);
}
/*********************************************************/
/*														 */
/* 主程序           									 */
/*                                                       */
/*********************************************************/
  main()
 {
    uchar i;
    IE = 0x81;                 //允许总中断中断,使能 INT0 外部中断
    TCON = 0x01;               //触发方式为脉冲负边沿触发
    IRIN=1;                    //I/O口初始化
    BEEP=1;
    RELAY=1;

    delay(10);                 //延时
    lcd_init();                //初始化LCD             
        
    lcd_pos(0,0);             //设置显示位置为第一行的第1个字符
     i = 0;
    while(dis1[i] != '\0')
     {                         //显示字符
       lcd_wdat(dis1[i]);
       i++;
     }
    lcd_pos(1,0);             //设置显示位置为第二行的第1个字符
     i = 0;
    while(dis2[i] != '\0')
     {
       lcd_wdat(dis2[i]);      //显示字符
       i++;
     }
 	 lcd_pos(2,0);             //设置显示位置为第三行的第1个字符
     i = 0;
    while(dis3[i] != '\0')
     {
       lcd_wdat(dis3[i]);      //显示字符
       i++;
     }
	 lcd_pos(3,0);             //设置显示位置为第四行的第1个字符
     i = 0;
    while(dis4[i] != '\0')
     {
       lcd_wdat(dis4[i]);      //显示字符
       i++;
     }
     while(1);
}
/*********************************************************/
/*														 */
/* INT0外部中断子程序									 */
/*                                                       */
/*********************************************************/
void IR_IN() interrupt 0 using 0   
{
  uchar j,k,N=0;
     EX0 = 0;   
	 delay0(15);
	 if (IRIN==1) 
     { EX0 =1;
	   return;
	  } 
                         //确认IR信号出现
  while (!IRIN)           //等IR变为高电平，跳过9ms的前导低电平信号。
    {delay0(1);}

 for (j=0;j<4;j++)         //收集四组数据
 { 
  for (k=0;k<8;k++)        //每组数据有8位
  {
    while (IRIN);       //等IR变为低电平，跳过4.5ms的前导高电平信号。
    while (!IRIN);      //等IR变为高电平
    while (IRIN)        //计算IR高电平时长
      {
        delay0(1);
        N++;           
       if (N>=30)
	    { EX0=1;
	      return;}            //0.14ms计数过长自动离开。
      }                       //高电平计数完毕                
     IRCOM[j]=IRCOM[j] >> 1;                  //数据最高位补“0”
     if (N>=8) {IRCOM[j] = IRCOM[j] | 0x80;}  //数据最高位补“1”
     N=0;
   }//end for k
 }//end for j
     if (IRCOM[2]!=~IRCOM[3])
   { EX0=1;
     return; }

     IRDIS[0]=IRCOM[2]&0x0F;     //取键码的低四位
     IRDIS[1]=IRCOM[2]>>4;  //取键码的高四位,右移4次，高四位变为低四位
	 dataconv();
     lcd_pos(2,5);             
     lcd_wdat(IRDIS[1]);        //第一位数显示 
     lcd_pos(2,6);             
     lcd_wdat(IRDIS[0]);        //第二位数显示

	 IRDIS[0]=IRCOM[3]&0x0F;     //取键码的低四位
     IRDIS[1]=IRCOM[3]>>4;  //取键码的高四位,右移4次，高四位变为低四位
     dataconv();
     lcd_pos(3,5);             
     lcd_wdat(IRDIS[1]);        //第一位数显示 
     lcd_pos(3,6);             
     lcd_wdat(IRDIS[0]);        //第二位数显示
     beep();
     EX0 = 1; 
}
/*********************************************************/
/*														 */
/* 转换为ASCII码										 */
/*                                                       */
/*********************************************************/
void  dataconv()	 
  {
     uchar  t; 
	 for (t=0;t<2;t++)   
     if(IRDIS[t]>9)
      IRDIS[t]=IRDIS[t]+0x37;
     else
	  IRDIS[t]=IRDIS[t]+0x30;
  }
/*********************************************************/
/*														 */
/* 蜂鸣器响一声子程序									 */
/*                                                       */
/*********************************************************/
void beep()
{
  uchar i;
  for (i=0;i<100;i++)
   {
   delay0(4);
   BEEP=!BEEP;                 //BEEP取反
   } 
  BEEP=1;                      //关闭蜂鸣器
}
/*********************************************************/
/*														 */
/* 延时x*0.14ms子程序									 */
/*                                                       */
/*********************************************************/

void delay0(uchar x)    //x*0.14MS
{
  uchar i;
  while(x--)
 {
  for (i = 0; i<13; i++) {}
 }
}
/*********************************************************/
/*                                                       */
/* 设定显示位置                                          */
/*                                                       */
/*********************************************************/
void lcd_pos(uchar X,uchar Y)
{                          
   uchar  pos;
   if (X==0)
     {X=0x80;}
   else if (X==1)
     {X=0x90;}
   else if (X==2)
     {X=0x88;}
   else if (X==3)
     {X=0x98;}
   pos = X+Y ;  
   lcd_wcmd(pos);     //显示地址
}