/*******************************************************************
*                                                                   
*ME300B單片機(jī)開(kāi)發(fā)系統(tǒng)演示程序 - LCD1602 滾動(dòng)顯示                    
*                                                                   
* 顯示內(nèi)容：WLCOME TO WWW.WILLAR.COM                                
*                                                                   
* 顯示方式：                                                        
* 1、從左到右逐字顯示，閃動(dòng)二次，清屏。                             
* 2、再?gòu)挠业阶笾鹱诛@示，閃動(dòng)二次，清屏。                           
* 3、周期性地重復(fù)上述顯示方式。                                     
*                                                                   
* 郵箱： gguoqing@willar.com                                        
* 網(wǎng)站： http://www.willar.com                                      
* 作者： gguoqing                                                   
* 創(chuàng)作時(shí)間：2005/06/20                                              
* 修改時(shí)間：2006/01/20                                              
*                                                                   
*【版權(quán)】Copyright(C)偉納電子 www.willar.com All Rights Reserved    
*【聲明】此程序僅用于學(xué)習(xí)與參考，引用請(qǐng)注明版權(quán)和作者信息！         
*                                                                   
*******************************************************************/



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

typedef unsigned char BYTE;
typedef bit BOOL;  

sbit LCD_RS = P2^0;             
sbit LCD_RW = P2^1;
sbit LCD_EP = P2^2;

BYTE code dis1[] = {"   WLCOME  TO   "};
BYTE code dis2[] = {" WWW.WILLAR.COM "};
BYTE code dis3[] = {"   OT  EMOCLW   "};
BYTE code dis4[] = {" MOC.RALLIW.WWW "};

delay(int ms)
{                           // 延時(shí)子程序
int i;
while(ms--)
{
  for(i = 0; i< 250; i++)
  {
   _nop_();
   _nop_();
   _nop_();
   _nop_();
  }
}
}

BOOL lcd_bz()
{                          // 測(cè)試LCD忙碌狀態(tài)
BOOL result;
LCD_RS = 0;
LCD_RW = 1;
LCD_EP = 1;
_nop_();
_nop_();
_nop_();
_nop_();
result = (BOOL)(P0 & 0x80);
LCD_EP = 0;
return result; 
}

lcd_wcmd(BYTE cmd)
{                          // 寫(xiě)入指令數(shù)據(jù)到LCD
while(lcd_bz());
LCD_RS = 0;
LCD_RW = 0;
LCD_EP = 0;
_nop_();
_nop_(); 
P0 = cmd;
_nop_();
_nop_();
_nop_();
_nop_();
LCD_EP = 1;
_nop_();
_nop_();
_nop_();
_nop_();
LCD_EP = 0;  
}

lcd_pos(BYTE pos)
{                          //設(shè)定顯示位置
lcd_wcmd(pos | 0x80);
}

lcd_wdat(BYTE dat) 
{                          //寫(xiě)入字符顯示數(shù)據(jù)到LCD
while(lcd_bz());
LCD_RS = 1;
LCD_RW = 0;
LCD_EP = 0;
P0 = dat;
_nop_();
_nop_();
_nop_();
_nop_();
LCD_EP = 1;
_nop_();
_nop_();
_nop_();
_nop_();
LCD_EP = 0; 
}

lcd_init()
{                        //LCD初始化設(shè)定
lcd_wcmd(0x38);          //16*2顯示，5*7點(diǎn)陣，8位數(shù)據(jù)
delay(1);
lcd_wcmd(0x0c);          //顯示開(kāi)，關(guān)光標(biāo)
delay(1);
lcd_wcmd(0x06);          //移動(dòng)光標(biāo)
delay(1);
lcd_wcmd(0x01);          //清除LCD的顯示內(nèi)容
delay(1);
}

main()
{
      BYTE i;
      lcd_init();               // 初始化LCD
      delay(10);

    while(1)              
   { 
      lcd_wcmd(0x06);            //向右移動(dòng)光標(biāo)
      lcd_pos(0);                //設(shè)置顯示位置為第一行的第1個(gè)字符
      i = 0;
     while(dis1[ i ] != '\0')
     {                           //顯示字符"Welcome TO"
       lcd_wdat(dis1[ i ]);
       i++;
       delay(30);                //控制兩字之間顯示速度
     }
      lcd_pos(0x40);             //設(shè)置顯示位置為第二行第1個(gè)字符
      i = 0;
     while(dis2[ i ] != '\0')
     {
       lcd_wdat(dis2[ i ]);      //顯示字符" WWW.WILLAR.COM "
       i++;
       delay(30);                //控制兩字之間顯示速度
     }
      delay(800);                //控制停留時(shí)間

      lcd_wcmd(0x01);            //清除LCD的顯示內(nèi)容
      delay(1);
      lcd_wcmd(0x04);            //向左移動(dòng)光標(biāo)
     
      lcd_pos(15);               //設(shè)置顯示位置為第一行的第16個(gè)字符
      i = 0;
     while(dis3[ i ] != '\0')
     {                           //顯示字符"Welcome TO"
       lcd_wdat(dis3[ i ]);
       i++;
       delay(30);                //控制兩字之間顯示速度
     }
      lcd_pos(0x4F);             //設(shè)置顯示位置為第二行的第16個(gè)字符
      i = 0;
     while(dis4[ i ] != '\0')
     {
       lcd_wdat(dis4[ i ]);      //顯示字符" WWW.WILLAR.COM "
       i++;
       delay(30);                //控制兩字之間顯示速度
     }
      delay(800);                //控制停留時(shí)間

      lcd_wcmd(0x01);            //清除LCD的顯示內(nèi)容
      delay(200);                //控制兩屏轉(zhuǎn)換時(shí)間
          
   }
}