1602液晶滾動(dòng)顯示程序

/*******************************************************************
* 顯示內(nèi)容：WLCOME TO www.torrancerestoration.com                                                              
* 顯示方式：
* 1、從左到右逐字顯示，閃動(dòng)二次，清屏。                                                          
* 2、再?gòu)挠业阶笾鹱诛@示，閃動(dòng)二次，清屏。                                                        
* 3、周期性地重復(fù)上述顯示方式。                                                                  
*******************************************************************/

#include <reg51.h>
#include "51hei.h"
#include <intrins.h>

typedef unsigned char BYTE;
typedef bit BOOL; 

sbit LCD_RS = P3^5;            
sbit LCD_RW = P2^7;
sbit LCD_EP = P3^4;

BYTE code dis1[] = {"   WLCOME  TO   "};//原來(lái)空格也算進(jìn)去了，如此
BYTE code dis2[] = {" www.torrancerestoration.com  "};
BYTE code dis3[] = {"   OT  EMOCLW   "};
BYTE code dis4[] = {" MOC.ieh15.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)
{                          // 寫入指令數(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)
{                          //寫入字符顯示數(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);          //顯示開，關(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;
  guandz(); //關(guān)點(diǎn)陣
  guanled();//關(guān)數(shù)碼管
      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.torrancerestoration.com "
       i++;
       delay(30);                //控制兩字之間顯示速度
     }
      delay(800);                //控制停留時(shí)間

      lcd_wcmd(0x01);            //清除LCD的顯示內(nèi)容
      delay(1);
      lcd_wcmd(0x04);            //向左移動(dòng)光標(biāo)    AC自動(dòng)減1（光標(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.torrancerestoration.com "
       i++;
       delay(30);                //控制兩字之間顯示速度
     }
      delay(800);                //控制停留時(shí)間

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