commc.c

郑州远博公司生产的单片机A型实验板原理图及配套试验源程序

/*======YB-51-A单片机通用实验板串口中断和液晶屏显示演示程序===========================
在pc机上利用通用串口调试程序（在配套光盘上），发送的字符可以在液晶屏上显示出来，同时可以接收单片机回送的字符
注意：程序编译后，会出现警告提示，是由于有未调用的函数和有被多个程序调用的函数，在此不影响实验
结果，暂可不用去理会。（可以通过屏蔽未调用的函数和把被多个程序调用的函数设为再入函数来解决）
======程序来源：远博科技  0371-6949037  13949105551  13603453895=======================
======日期：2004.9.8=====================*/
/*===================================================================

[注]:AT89C51的晶振频率为11.0592MHz
====================================================================*/

/*            ACM1602A （16x2）接线图
=====================================================================
连接线图:   ACM-------51     ACM-------51     ACM--------51
            DB0-----P0.0     DB4-----P0.4     RS-------P1_0
            DB1-----P0.1     DB5-----P0.5     RW-------P1_1
            DB2-----P0.2     DB6-----P0.6     E--------P1_2
            DB3-----P0.3     DB7-----P0.7     BLA------P1_3
            
            VLCD接1K电阻到GND

====================================================================*/
/*阅读本程序之前，请参考光盘上带的LCD1602的工作原理（长沙太阳人科技公司提供）*/

#include <AT89X51.H>
#include <Delay.h>
#include <stdio.h>
#include <Intrins.h>
#define uchar unsigned char
#define uint  unsigned int 

// 1602连线
#define RS    P1_0       //数据/命令选择
#define RW    P1_1       //读/写选择
#define Elcm  P1_2       //使能信号
#define BLA   P1_3       //液晶显示屏背光

#define DataPort P0      // 数据端口
#define Busy    0x80
void WaitForEnable( void );
void LcdWriteData( char dataW );
void LcdWriteCommand( uchar CMD,uchar AttribC ) ;
void LcdReset( void ) ;
void DispOneChar(uchar x,uchar y,uchar Wdata)  ;
void ePutstr(uchar x,uchar y, uchar code *ptr) ;
void comminit(void);
void scomm(void);
code char examp[]="serial communication test"; 
uchar x=0,y=0,sedata;


 void main(void)      {
    DelayMs(1000);                      //延时，保证器件复位
    comminit();                          //串口初始化，打开串口中断
    BLA=0;                               //打开液晶显示屏背光
    LcdReset();                         //液晶屏初始化
    ePutstr(0,0,examp);                 // 液晶屏显示一个预定字符串
	DelayMs(10000);     
    LcdReset();
    while(1);                           //无限循环。
	                    }


/*=======================================================
液晶屏上显示字符串
=======================================================*/
void ePutstr(uchar x,uchar y, uchar code *ptr) {
uchar i,l=0;
    while (*ptr++ >0){l++;};       //统计字符的个数(c中，对于字符串而言，最后是以“\0”结束的，对应的ASC码为零
	ptr=ptr-(l+1);                 //使指针重新指向首个字符
    for (i=0;i<l;i++)     { DispOneChar(x++,y,*ptr++);
                            if ( x == 31 )  { x = 0; y ^= 0; }
                           }
                                                } 


/*=======================================================
显示光标定位
=======================================================*/
void Disp_XY( char posx,char posy) {

uchar temp;

    temp = posx & 0x0f;
    posy &= 0x1;   
    if ( posx>15 )   temp |= 0x40;
	if (posy==1)   temp |=0x40;
    temp |= 0x80;
    LcdWriteCommand(temp,0);
}

/*=======================================================
按指定位置显示数出一个字符
=======================================================*/
void DispOneChar(uchar x,uchar y,uchar Wdata)  {

    Disp_XY( x, y );                // 定位显示地址
    LcdWriteData( Wdata );            // 写字符
}

/*=======================================================
初始化程序, 必须按照产品资料介绍的初始化过程进行
=======================================================*/
void LcdReset( void )  {

       LcdWriteCommand( 0x38, 0);            // 显示模式设置(不检测忙信号)
        DelayMs(10);
    LcdWriteCommand( 0x38, 0);            // 共三次
        DelayMs(10);
    LcdWriteCommand( 0x38, 0);
        DelayMs(10);

    LcdWriteCommand( 0x38, 1);            // 显示模式设置(以后均检测忙信号)
    LcdWriteCommand( 0x08, 1);            // 显示关闭
    LcdWriteCommand( 0x01, 1);            // 显示清屏
    LcdWriteCommand( 0x06, 1);            // 显示光标移动设置
    LcdWriteCommand( 0x0c, 1);            // 显示开及光标设置
}

/*=======================================================
写控制字符子程序: E=1 RS=0 RW=0
=======================================================*/
void LcdWriteCommand( uchar CMD,uchar AttribC )  {

    if (AttribC) WaitForEnable();                // 检测忙信号?
    RS=0; RW=0; _nop_();
    DataPort=CMD; _nop_();
    // 送控制字子程序
    Elcm=1;_nop_();_nop_();Elcm=0;            // 操作允许脉冲信号
}

/*=======================================================
当前位置写字符子程序: E =1 RS=1 RW=0
=======================================================*/
void LcdWriteData( char dataW )  {

    WaitForEnable();
        // 检测忙信号

    RS=1; RW=0; _nop_();

    DataPort=dataW; _nop_();

    Elcm=1; _nop_(); _nop_(); Elcm=0;        // 操作允许脉冲信号

}

/*=======================================================
正常读写操作之前必须检测LCD控制器状态:    CS=1 RS=0 RW=1
DB7:    0  LCD控制器空闲; 1  LCD控制器忙
========================================================*/
void WaitForEnable( void ) {

    DataPort = 0xff;

    RS=0; RW=1; _nop_();    Elcm=1; _nop_(); _nop_();

    while( DataPort & Busy );
    Elcm=0;
}

/********************************************************************************
             串口中断服务程序，在中断中调用液晶屏显示程序
*********************************************************************************/
void scomm(void) interrupt 4 {     
                          while(!RI);  //判断是否接收完成
                          EA=0;
                          RI=0;
                          sedata=SBUF;     //保存数据
                          DispOneChar(x++,y,sedata);
                          if ( x == 32 )  { x = 0; y ^= 0; }  //显示到最后位置以后，重新开始从第一个位置显示
                          SBUF=sedata;     //转发数据
                          while (!TI);  //判断是否发送完成
                          TI=0;
                          EA=1;
                              }
/*********************************************************************************
             串口初始化程序
**********************************************************************************/                        
void comminit(void)     {            
                          TMOD=0x20;   //定时器1方式2定时
                          TH1=0xfd;
                          TL1=0xfd;   //置定时器初值，选定9600bps
                          SCON=0x50;  //选择通讯方式1 （1位起始，8位数据，1位停止）
                          TR1=1;      //启动定时器
						  ET1=0;
                          ES=1;       //开串口中断
                          EA=1;       //开中断 
                         }