找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開(kāi)始

搜索
查看: 2626|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

單片機(jī)LCD1602字符液晶垂直滾動(dòng)可以但是水平滾動(dòng)程序不行 求指導(dǎo)

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
一、電路設(shè)計(jì)此電路由AT89C51最小系統(tǒng)、LCD1602顯示模塊和獨(dú)立按鍵組成。
可實(shí)現(xiàn)文字的上下左右滾動(dòng)
二、運(yùn)行效果
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

三、部分單片機(jī)代碼
  1. /***************   writer:shopping.w   ******************/
  2. #include <reg52.h>
  3. #include <string.h>
  4. #define uchar unsigned char
  5. #define uint unsigned int
  6. void Initialize_LCD();
  7. void ShowString(uchar,uchar,uchar *);
  8. sbit K1 = P3^0;
  9. sbit K2 = P3^1;
  10. sbit K3 = P3^2;

  12. uchar code Prompt[]="PRESS K1--K4 TO START DEMO PROG";
  13. uchar const Line_Count = 6;
  14. uchar code Msg[][80]=
  15. {
  16.      "Many CAD users dismiss",
  17.     "process of creating PCB",
  18.     "of view.with PCB layout",
  19.     "placement and track routing,",
  20.     "can often be the most time",
  21.     "And if you use circuit simulation",
  22.     "you are going to spend even more"
  23. };
  24. uchar Disp_Buffer[32];
  25. void Delayxms(uint ms)
  26. {
  27.      uchar i;
  28.     while(ms--)
  29.     {
  30.          for(i=0;i<120;i++);
  31.     }
  32. }

  34. void V_Scroll_Display()
  35. {
  36.      uchar i,j,k = 0;
  37.     uchar *p = Msg[0];
  38.     uchar *q = Msg[Line_Count] + strlen(Msg[Line_Count]);
  39.     while(p<q)
  40.     {
  41.          for(i=0;(i<16)&&(p<q);i++)
  42.         {
  43.              if(((i==0)||(i==15))&& *p == ' ')
  44.                 p++;
  45.             if(*p != '\0')
  46.             {
  47.                  Disp_Buffer[i] = *p++;
  48.             }
  49.             else
  50.             {
  51.                  if(++k>Line_Count)
  52.                     break;
  53.                 p = Msg[k];
  54.                 Disp_Buffer[i] = *p++;
  55.             }
  56.         }
  57.         for(j=i;j<16;j++)
  58.             Disp_Buffer[j]=' ';
  59.         while(F0)
  60.             Delayxms(5);
  61.         ShowString(0,0,"      ");
  62.         Delayxms(150);
  63.         while(F0)
  64.             Delayxms(5);
  65.         ShowString(0,1,Disp_Buffer);
  66.         Delayxms(150);
  67.         while(F0)
  68.             Delayxms(5);
  69.         ShowString(0,0,Disp_Buffer);
  70.         ShowString(0,1,"      ");
  71.         Delayxms(150);   
  72.     }
  73.     ShowString(0,0,"         ");
  74.     ShowString(0,1,"         ");
  75. }

  77. void H_Scroll_Display()
  78. {
  79.     uchar m,n,t = 0,L=0;
  80.     uchar *p = Msg[0];
  81.     uchar *q = Msg[Line_Count] + strlen(Msg[Line_Count]);
  82.     for(m=0;m<16;m++)
  83.             Disp_Buffer[m]=' ';   
  84.     while(p<q)
  85.     {
  86.          if((m=16||m==31)&& *p == ' ')
  87.             p++;
  88.         for(m=16;m<32&&p<q;m++)
  89.         {
  90.              if(*p != '\0')
  91.             {
  92.                 Disp_Buffer[m] = *p++;     
  93.             }
  94.             else
  95.             {
  96.                  if(++t>Line_Count)
  97.                     break;
  98.                 p = Msg[t];
  99.                 Disp_Buffer[m] = *p++;
  100.             }
  101.         }
  102.         for(n=m;n<32;n++)
  103.             Disp_Buffer[n]=' ';
  104.         for(m=0;m<=16;m++)
  105.         {
  106.              while(F0)
  107.                  Delayxms(5);
  108.                ShowString(0,L,Disp_Buffer+1);
  109.                while(F0)
  110.                  Delayxms(5);
  111.             Delayxms(20);
  112.         }
  113.         L = (L==0)? 1:0;
  114.         Delayxms(200);
  115.     }
  116.     if(L==1)
  117.         ShowString(0,1,"      ");   
  118. }

  120. void EX_INT0() interrupt 0
  121. {
  122.      F0 = !F0;
  123. }

  125. void main()
  126. {
  127.      uint Count = 0;
  128.     IE = 0x81;
  129.     IT0 = 1;
  130. ……………………

  132. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………

復(fù)制代碼
全部資料51hei下載地址：
1602字符液晶滾動(dòng)演示程序.zip (88.69 KB, 下載次數(shù): 35)

評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂 踩踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表