LCD12864液晶显示程序

                                                                                                 /***********************************************************************
工    程：ST7920驱动的12864液晶的3线串行驱动模式
创建日期：2008年11月23日
创 建 人：lqg
邮    箱：lqg_k@163.com      QQ:253076338
引脚定义：RS(CS)=====>  PD3   //PB0
    RW(SID)====> PD4     //PB1
          EN(SCLK)===>   PD6//   PB2
    PSB为硬件控制，接高电平为8位或4位的并行模式，接低电平为串行模式
************************************************************************/
#include <iom16v.h>
#include <macros.h>
#define uchar unsigned char
#define uint unsigned int
#define nop()  NOP()
#define xtal 8
#define Set_CS() DDRD |= (1<<3);PORTD |= (1<<3)
#define Set_SID() DDRD |= (1<<4);PORTD |= (1<<4)
#define Set_SCLK() DDRD |= (1<<6);PORTD |= (1<<6)
#define Clr_CS() DDRD |= (1<<3);PORTD &=~(1<<3)
#define Clr_SID() DDRD |= (1<<4);PORTD &=~(1<<4)
#define Clr_SCLK() DDRD |= (1<<6);PORTD &=~(1<<6)


//====================================================================
//函数声明
void Delay(uint ms);      //延时子程序
void W_1byte(uchar RW, uchar RS, uchar W_data);
void Write_8bits(uint W_bits);
void LCD_Init(void);
/********************************************************************
********************************************************************/
//===================================================================
const uchar mynew1[]={"欢迎你来到我的家"};
const uchar mynew2[]={"Create by:LQG  "};
const uchar mynew3[]={"海内存知己"};
const uchar mynew4[]={"天涯若比邻"};
/********************************************************************
********************************************************************/
void main()
{ uchar i = 0;
DDRD &= ~BIT(7);
PORTD &= ~BIT(7);
DDRC |=BIT(6);
PORTC &= ~BIT(6);
DDRC &= ~BIT(7);
PORTC &= ~BIT(7);
Clr_CS();
Clr_SID();
Clr_SCLK();
LCD_Init();
while(1)
{
  nop();
  nop();
  W_1byte(0,0,0x80);   //显示的地址0x80
  nop();
  for(i=0;mynew1[ i]!='\0';i++)
  {
   W_1byte(0,1,mynew1);
  }
  W_1byte(0,0,0x90);     //显示的地址0x90
  for(i=0;mynew2!='\0';i++)
  {
   W_1byte(0,1,mynew2);
  }
  W_1byte(0,0,0x88);   //显示的地址0x88
  for(i=0;mynew3!='\0';i++)
  {
   W_1byte(0,1,mynew3);
  }
  W_1byte(0,0,0x98+3);     //显示的地址0x98  +3是空格三个字开始写，否则乱码
  for(i=0;mynew4!='\0';i++)
  {
   W_1byte(0,1,mynew4);
  }
  nop();
  for(;;)
  {
    continue;
  }
}
}
/******************************************************************/
void LCD_Init(void)
{
  uchar cmd;
  cmd=0x30;   //功能设置 8位数据，基本指令
W_1byte(0,0,cmd);
Delay(2);
cmd=0x0C;   //显示状态 ON，游标OFF，反白OFF
W_1byte(0,0,cmd); //写指令
Delay(2);
cmd=0x01;   //清除显示
W_1byte(0,0,cmd); //写指令
Delay(2);
cmd=0x02;   //地址归位
W_1byte(0,0,cmd); //写指令
Delay(2);
cmd=0x80;   //设置DDRAM地址
W_1byte(0,0,cmd); //写指令
Delay(2);   //延时
}
/*******************************************************************
函 数 名：W_1byte
入口参数：RW、RS、W_data
出口参数：无
建立日期：2007年3月3日
修改日期：
函数作用：写一个字节的数据到12864液晶，包括指令和数据
说    明：RW=1，从液晶读数据到MCU；RW=0，写一个数据到液晶；
   （一般RW都设为0，即只向液晶写数据，不读数据）
          RS=1，写入的是数据；RS=0，写入的是指令；
    一般模式：RW=0，RS=1;写数据
       RW=0，RS=0;写指令
********************************************************************/
void W_1byte(uchar RW, uchar RS, uchar W_data)
{
uint H_data,L_data,S_ID = 0xf8;  //11111RWRS0
if(RW == 0)
{
   S_ID &=~ 0x04;
}
else     //if(RW==1)
{
   S_ID |= 0X04;
}
if(RS == 0)
{
   S_ID &=~ 0x02;
}
else     //if(RS==1)
{
   S_ID |= 0X02;
}
H_data = W_data;
H_data &= 0xf0;   //屏蔽低4位的数据
L_data = W_data;     //xxxx0000格式
L_data &= 0x0f;   //屏蔽高4位的数据
L_data <<= 4;   //xxxx0000格式
Set_CS();
Write_8bits(S_ID);   //发送S_ID
Write_8bits(H_data); //发送H_data
Write_8bits(L_data); //发送L_data
Clr_CS();
}
/********************************************************************
函 数 名：Write_8bits
入口参数：W_bits
出口参数：无
建立日期：2007年3月3日
修改日期：
函数作用：负责串行输出8个bit位
说    明：
********************************************************************/
void Write_8bits(uint W_bits)
{
uint i,Temp_data;
for(i=0; i<8; i++)
{
  Temp_data = W_bits;
  Temp_data <<= i;
  if((Temp_data&0x80)==0)  //bit7 is zero
  {
   Clr_SID();
   nop();
   Set_SCLK();
   nop();
   nop();
   Clr_SCLK();
   nop();
   Clr_SID();
  }
  else         //bit7 is one
  {
   Set_SID();
   nop();
   Set_SCLK();
   nop();
   nop();
   Clr_SCLK();
   nop();
   Clr_SID();
  }
}
}
/********************************************************************
函 数 名：Delay
入口参数：ms
出口参数：无
建立日期：2007年3月3日
修改日期：
函数作用：毫秒级的延时程序，当晶振为1Mhz时，xtal=1;
说    明：
********************************************************************/
void Delay(uint ms)
{
    uint i;
    while(ms--)   
   {
     for(i=1;i<(uint)(xtal*143-2);i++)
         ;
   }   
}
//===================================================================*/