/********************************************************************************
*  標題:  xl系列單片機實驗儀演示程序 LCD1602 滾動顯示                          *
*  文件:   lcd1602gd.C                                                         *
*  日期:  2006-1-5                                                             *
*  版本:  3.0 （試驗通過版）可用xl600-xl1000單片機綜合試驗儀試驗               *
*  郵箱:  sxj1974@163.com                                                      *
*  網站： http://www.51c51.com    www.8951.com                                 *
********************************************************************************
*  描述:                LCD1602 滾動顯示                                       *
* 顯示方式：                                                                   *
* 1、從左到右逐字顯示，閃動二次，清屏。                                        *
* 2、再從右到左逐字顯示，閃動二次，清屏。                                      *
* 3、周期性地重復上述顯示方式。                                                *                            
********************************************************************************
* 【版權】 Copyright(C)深圳市學林電子有限公司 www.51c51.com                    *
* 【聲明】 此程序僅用于學習與參考，引用請注明版權和作者信息！                  *
*  【技術支持】請訪問http://www.51c51.com/bbs/index.asp  官方論壇              *
********************************************************************************/

#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.51C51.COM "};
BYTE code dis3[] = {"   OT  EMOCLW   "};
BYTE code dis4[] = {" MOC.15C15.WWW "};
char code SST516[3] _at_ 0x003b;
delay(int ms)
{                           // 延時子程序
int i;
while(ms--)
{
  for(i = 0; i< 250; i++)
  {
   _nop_();
   _nop_();
   _nop_();
   _nop_();
  }
}
}

BOOL lcd_bz()
{                          // 測試LCD忙碌狀態
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)
{                          // 寫入指令數據到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)
{                          //設定顯示位置
lcd_wcmd(pos | 0x80);
}

lcd_wdat(BYTE dat) 
{                          //寫入字符顯示數據到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初始化設定
lcd_wcmd(0x38);          //16*2顯示，5*7點陣，8位數據
delay(1);
lcd_wcmd(0x0c);          //顯示開，關光標
delay(1);
lcd_wcmd(0x06);          //移動光標
delay(1);
lcd_wcmd(0x01);          //清除LCD的顯示內容
delay(1);
}

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

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

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

      lcd_wcmd(0x01);            //清除LCD的顯示內容
      delay(200);                //控制兩屏轉換時間
          
   }
}