1602.c

1602LCD_mega16.rar

//把明浩的1602的程序移植到了ATMEGA8上，共享一下。
/*============================================================
        使用1602液晶显示的实验例子     明浩  2004/2/27
==============================================================

SMC1602A(16*2)模拟口线接线方式
连接线图: 
       ---------------------------------------------------
       |LCM-----51   | LCM-----51   | LCM------51      |
       --------------------------------------------------|
       |DB0-----P1.0 | DB4-----P1.4 | RW-------P2.0    |
       |DB1-----P1.1 | DB5-----P1.5 | RS-------P2.1    |
       |DB2-----P1.2 | DB6-----P1.6 | E--------P2.2    |
       |DB3-----P1.3 | DB7-----P1.7 | VLCD接1K电阻到GND|
       ---------------------------------------------------

SMC1602A(16*2)模拟口线接线方式
连接线图: 
       ---------------------------------------------------
       |LCM-----M8  |  LCM-----M8 | LCM------M8    |
       ----------------------------------------------|
       |DB0-----PB0 | DB4-----PB4 | RW-------PD6     |
       |DB1-----PB1 | DB5-----PB5 | RS-------PD7     |
       |DB2-----PB2 | DB6-----PB6 | E--------PD5     |
       |DB3-----PB3 | DB7-----PB7 | VLCD接1K电阻到GND|
       ---------------------------------------------------
==============================================================*/
#include <iom16V.h>
#include <macros.h>

#define CTLPORT PORTD   //模拟总线用了PD口的PD5,PD6,PD7
#define LCD_RS  5       // pin-0 on CTLPORT
#define LCD_RW  6       // pin-1 on CTLPORT
#define LCD_E   7       // pin-2 on CTLPORT

#define SET_LCD_E       CTLPORT|=(1<<LCD_E)        // LCD: E = 1
#define CLR_LCD_E       CTLPORT&=~(1<<LCD_E)       // LCD: E = 0
#define SET_LCD_RW      CTLPORT|=(1<<LCD_RW)       // LCD: R/W = 1 (read)
#define CLR_LCD_RW      CTLPORT&=~(1<<LCD_RW)      // LCD: R/W = 0 (write)
#define SET_LCD_RS      CTLPORT|=(1<<LCD_RS)       // LCD: R/S = 1 (data reg)
#define CLR_LCD_RS      CTLPORT&=~(1<<LCD_RS)      // LCD: R/S = 0 (status reg)

//#define DataPortOUT     PORTB                // 数据端口PB口
//#define DataPortIN      PINB
#define DataPortfx      DDRB
#define Busy            0x80
#define LCM_Data        PORTB                // 数据端口PB口
#define LCM_Data1       PINB                 // 数据端口PB口

#pragma data:code
unsigned char const table_1[] = {"1515484166"};
//unsigned char  table_2[] = {'0','0','-','0','0','-','0','0'}; 
#pragma data:data
unsigned char  table_2[] = {'0','0','-','0','0','-','0','0'}; 
void WriteDataLCM(unsigned char WDLCM);
void WriteCommandLCM(unsigned char WCLCM,unsigned char BuysC);
unsigned char ReadDataLCM(void);
unsigned char ReadStatusLCM(void);
void LCMInit(void);
void DisplayOneChar(unsigned char X, unsigned char Y, unsigned char DData);
void DisplayListChar(unsigned char X, unsigned char Y, unsigned char const *DData);
void Delay5Ms(void);
void Delay400Ms(void);





//写数据
void WriteDataLCM(unsigned char WDLCM)
{
 ReadStatusLCM(); //检测忙
 LCM_Data = WDLCM;
 SET_LCD_RS;
 CLR_LCD_RW;
 SET_LCD_RS;
 CLR_LCD_RW;
 CLR_LCD_E; //若晶振速度太高可以在这后加小的延时
 CLR_LCD_E; //延时
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 SET_LCD_E;
 SET_LCD_E;
}

//写指令
void WriteCommandLCM(unsigned char WCLCM,unsigned char BuysC) //BuysC为0时忽略忙检测
{
 if (BuysC) ReadStatusLCM(); //根据需要检测忙
 LCM_Data = WCLCM;
 CLR_LCD_RS;
 CLR_LCD_RW; 
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 SET_LCD_E; 
 SET_LCD_E; 
}

//读数据
unsigned char ReadDataLCM(void)
{
 SET_LCD_RS; 
 SET_LCD_RW;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 SET_LCD_E;
 SET_LCD_E;
 return(LCM_Data);
}

//读状态
unsigned char ReadStatusLCM(void)
{
 DDRB=0x00; //输入
 CLR_LCD_RS;
 SET_LCD_RW;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 CLR_LCD_E;
 SET_LCD_E;
 while (LCM_Data1 & Busy); //检测忙信号
 DDRB=0xff;//变回输出
 return(LCM_Data1);
}

void LCMInit(void) //LCM初始化
{
 LCM_Data = 0;
 WriteCommandLCM(0x38,0); //三次显示模式设置，不检测忙信号
 Delay5Ms(); 
 WriteCommandLCM(0x38,0);
 Delay5Ms(); 
 WriteCommandLCM(0x38,0);
 Delay5Ms(); 

 WriteCommandLCM(0x38,1); //显示模式设置,开始要求每次检测忙信号
 WriteCommandLCM(0x08,1); //关闭显示
 WriteCommandLCM(0x01,1); //显示清屏
 WriteCommandLCM(0x06,1); // 显示光标移动设置
 WriteCommandLCM(0x0C,1); // 显示开及光标设置
}

//按指定位置显示一个字符
void DisplayOneChar(unsigned char X, unsigned char Y, unsigned char DData)
{
 Y &= 0x1;
 X &= 0xF; //限制X不能大于15，Y不能大于1
 if (Y) X |= 0x40; //当要显示第二行时地址码+0x40;
 X |= 0x80; //算出指令码
 WriteCommandLCM(X, 1); //这里不检测忙信号，发送地址码
 WriteDataLCM(DData);
 WriteCommandLCM(X, 0); //光标返回，调节时很重要
}

//按指定位置显示一串字符
void DisplayListChar(unsigned char X, unsigned char Y, unsigned char const *DData)
{
 unsigned char ListLength;

  ListLength = 0;
 Y &= 0x1;
 X &= 0xF; //限制X不能大于15，Y不能大于1
 while (DData[ListLength]>0x20) //若到达字串尾则退出
  {
   if (X <= 0xF) //X坐标应小于0xF
    {
     DisplayOneChar(X, Y, DData[ListLength]); //显示单个字符
     ListLength++;
     X++;
    }
  }
}

//5ms延时
void Delay5Ms(void)
{
 unsigned int TempCyc = 5552;
 while(TempCyc--);
}

//400ms延时
void Delay400Ms(void)
{
 unsigned char TempCycA = 9;
 unsigned int TempCycB;
 while(TempCycA--)
 {
  TempCycB=7777;
  while(TempCycB--);
 };
}

/************************************************************************/

unsigned char dispbuf[]={'0','1','2','3','4','5','6','7','8','9'};
unsigned char dispbitcnt=8;

unsigned char second;
unsigned char minite;
unsigned char hour;
unsigned int tcnt;
unsigned char mstcnt=8,i;


void port_init(void)
{
 PORTA = 0x00;
 DDRA  = 0xFF;
 PORTB = 0x00;
 DDRB  = 0xFF;
 PORTC = 0x00; //m103 output only
 DDRC  = 0xFF;
 PORTD = 0x00;
 DDRD  = 0xFF;
}
//TIMER0 initialize - prescale:64
// WGM: Normal
// desired value: 1mSec
// actual value:  1.000mSec (0.0%)
void timer0_init(void)
{
 TCCR0 = 0x00; //stop
 TCNT0 = 0x83; //set count
 OCR0  = 0x7D;  //set compare
 TCCR0 = 0x03; //start timer
}

#pragma interrupt_handler timer0_ovf_isr:iv_TIM0_OVF
void timer0_ovf_isr(void)
{
 //mstcnt--;
  //if(mstcnt==0)
    //{
    //  mstcnt=8;

   // }	 
 //for(i=0;i<8;i++)
 tcnt++;

  if(tcnt==1000)
    {
      tcnt=0;
      second++;
      if(second==60)
        {
          second=0;
          minite++;
          if(minite==60)
            {
              minite=0;
              hour++;
              if(hour==24)
                {
                  hour=0;
                }
            }
        }
      table_2[7]=dispbuf[second%10];
      table_2[6]=dispbuf[second/10];
      table_2[4]=dispbuf[minite%10];
      table_2[3]=dispbuf[minite/10];
      table_2[1]=dispbuf[hour%10];
      table_2[0]=dispbuf[hour/10];

    }
  DisplayOneChar(i, 1, table_2[i]); //显示单个字符
 
      i++;
      if(i==8)
        {
          i=0;
        }


 TCNT0 = 0x83; //reload counter value
}

//call this routine to initialize all peripherals
void init_devices(void)
{
 //stop errant interrupts until set up
 CLI(); //disable all interrupts
 port_init();
 timer0_init();

 MCUCR = 0x00;
 GICR  = 0x00;
 TIMSK = 0x01; //timer interrupt sources
 SEI(); //re-enable interrupts
 //all peripherals are now initialized
}


/*******************************************************************************/

void main(void)
{
 unsigned  char i;
 DDRD=0XFF;//PD设为输出
 DDRB=0XFF;//PB设为输出
 Delay400Ms(); //启动等待，等LCM讲入工作状态
 LCMInit(); //LCM初始化
 Delay5Ms(); //延时片刻(可不要)

 DisplayListChar(0, 0, table_1);
 /*Delay400Ms(); //启动等待，等LCM进入工作状态
 WriteCommandLCM(0x08,1); //关闭显示
 WriteCommandLCM(0x01,1); //显示清屏
 WriteCommandLCM(0x06,1); // 显示光标移动设置
 WriteCommandLCM(0x0f,1); // 显示开及光标设置，闪
 for(i=0;i<8;i++)
 {
  DisplayOneChar(i, 0, table_1[i]); //显示单个字符
 }
 WriteCommandLCM(0x07,1); // 显示光标移动设置
 
 for(i=0;i<8;i++)
 {
  DisplayOneChar(i, 1, table_2[i]); //显示单个字符
 }
 //WriteCommandLCM(0x0c,1); // 显示开及光标设置，不闪
 //ReadDataLCM();//测试用句无意义*/
 init_devices();
 while(1);
}