欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 2893|回復: 0
打印 上一主題 下一主題
收起左側

單片機LCD1602字符液晶垂直滾動可以但是水平滾動程序不行 求指導

[復制鏈接]
跳轉到指定樓層
樓主
一、電路設計此電路由AT89C51最小系統、LCD1602顯示模塊和獨立按鍵組成。
可實現文字的上下左右滾動
二、運行效果
仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

三、部分單片機代碼
  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. …………限于本文篇幅 余下代碼請從51黑下載附件…………

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

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

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

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表