#include <reg51.h>
#include <intrins.h>
//#include <at89x51.h>

sbit LCD_RS=P1^0;//定義引腳
sbit LCD_RW=P1^1;
sbit LCD_E=P1^2;
#define LCD_Data P2
#define Busy    0x80 //用于檢測LCD狀態字中的Busy標識



void WriteDataLCD(unsigned char WDLCD);
void WriteCommandLCD(unsigned char WCLCD,BuysC);
unsigned char ReadDataLCD(void);
unsigned char ReadStatusLCD(void);
void LCDInit(void);
void DisplayOneChar(unsigned char X, unsigned char Y, unsigned char DData);
void DisplayListChar(unsigned char X, unsigned char Y, unsigned char code *DData);
void Delay5Ms(void);
void Delay400Ms(void);


unsigned char code uctech[] = {"ic2012.taobao.co"};
unsigned char code net[] = {"Happy every day!"};

void main(void)
{
 Delay400Ms(); //啟動等待，等LCD講入工作狀態
 LCDInit(); //LCM初始化
 Delay5Ms(); //延時片刻(可不要)

 DisplayListChar(0, 0, uctech);
 DisplayListChar(0, 5, net);
 ReadDataLCD();//測試用句無意義
 while(1);
}

//寫數據
void WriteDataLCD(unsigned char WDLCD)
{
 ReadStatusLCD(); //檢測忙
 LCD_Data = WDLCD;
 LCD_RS = 1;
 LCD_RW = 0;
 LCD_E = 0; //若晶振速度太高可以在這后加小的延時
 LCD_E = 0; //延時
 LCD_E = 1;
}

//寫指令
void WriteCommandLCD(unsigned char WCLCD,BuysC) //BuysC為0時忽略忙檢測
{
 if (BuysC) ReadStatusLCD(); //根據需要檢測忙
 LCD_Data = WCLCD;
 LCD_RS = 0;
 LCD_RW = 0; 
 LCD_E = 0;
 LCD_E = 0;
 LCD_E = 1; 
}

//讀數據
unsigned char ReadDataLCD(void)
{
 LCD_RS = 1; 
 LCD_RW = 1;
 LCD_E = 0;
 LCD_E = 0;
 LCD_E = 1;
 return(LCD_Data);
}

//讀狀態
unsigned char ReadStatusLCD(void)
{
 LCD_Data = 0xFF; 
 LCD_RS = 0;
 LCD_RW = 1;
 LCD_E = 0;
 LCD_E = 0;
 LCD_E = 1;
 while (LCD_Data & Busy); //檢測忙信號
 return(LCD_Data);
}

void LCDInit(void) //LCM初始化
{
 LCD_Data = 0;
 WriteCommandLCD(0x38,0); //三次顯示模式設置，不檢測忙信號
 Delay5Ms(); 
 WriteCommandLCD(0x38,0);
 Delay5Ms(); 
 WriteCommandLCD(0x38,0);
 Delay5Ms(); 

 WriteCommandLCD(0x38,1); //顯示模式設置,開始要求每次檢測忙信號
 WriteCommandLCD(0x08,1); //關閉顯示
 WriteCommandLCD(0x01,1); //顯示清屏
 WriteCommandLCD(0x06,1); // 顯示光標移動設置
 WriteCommandLCD(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; // 算出指令碼
 WriteCommandLCD(X, 0); //這里不檢測忙信號，發送地址碼
 WriteDataLCD(DData);
}

//按指定位置顯示一串字符
void DisplayListChar(unsigned char X, unsigned char Y, unsigned char code *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 = 5;
 unsigned int TempCycB;
 while(TempCycA--)
 {
  TempCycB=7269;
  while(TempCycB--);
 };
}