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

QQ登錄

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

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

12864顯示漢字c51程序 單片機(jī)：STC12C5A60S2

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:79544 發(fā)表于 2015-7-25 21:25 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
  1. /**************************************************
  2.         功能：12864顯示漢字
  3.         單片機(jī)：STC12C5A60S2
  4.         晶振：11.0592M
  5.         作者：蘇義江
  6.         時(shí)間：2015-7-25修改
  7.                         并行輸出
  8. *****************************************************/
  9. #include<reg52.h>
  10. #define uchar unsigned char
  11. #define uint unsigned int


  14. sbit E=P3^7;//脈沖使能
  15. sbit RW=P3^6;//讀寫(xiě)選擇
  16. sbit RS=P3^5;//數(shù)據(jù)命令選擇
  17. sbit rst=P1^0;//12864復(fù)位
  18. uchar code table3[]="欲窮千里目";
  19. uchar code table4[]="更上一層樓";
  20. uchar code table1[]="白日依山盡";
  21. uchar code table2[]="黃河入海流";
  22. // 延時(shí)ms函數(shù):
  23. void Delayms(uint t)//STC12C5A60S2  1ms
  24. {
  25.     uint i,j;
  26.     for(i=t;i>0;i--)
  27.              for(j=0;j<840;j++);
  28. }

  30. // 12864寫(xiě)命令函數(shù):
  31. void Write12864Command(uchar com)
  32. {
  33.                 Delayms(10);
  34.        P0=com;//賦值
  35.        E=0;//寫(xiě)命令前三控制線的狀態(tài)
  36.                 Delayms(10);
  37.        RS=0;
  38.        RW=0;
  39.        E=1;//拉高，寫(xiě)命令
  40.                 Delayms(10);//延時(shí)必須加
  41.        E=0;//寫(xiě)命令后三控制線的狀態(tài)
  42.                 Delayms(10);//延時(shí)必須加
  43.        RS=1;
  44.        RW=1;
  45. }
  46. //12864寫(xiě)數(shù)據(jù)函數(shù):
  47. void Write12864Data( uchar dat)
  48. {
  49.            Delayms(10);
  50.        P0=dat;//賦值
  51.        E=0;//寫(xiě)數(shù)據(jù)前三控制線的狀態(tài)
  52.                 Delayms(10);
  53.        RS=1;
  54.        RW=0;   
  55.        E=1;//拉高，寫(xiě)數(shù)據(jù)
  56.            Delayms(10);//延時(shí)必須加
  57.        E=0;//寫(xiě)數(shù)據(jù)后三控制線的狀態(tài)
  58.                 Delayms(10);//延時(shí)必須加
  59.        RS=0;
  60.        RW=1;
  61. }   
  62. //12864初始化函數(shù):
  63. void Initialize12864()
  64. {
  65.        rst=0;//復(fù)位12864
  66.        Delayms(30);
  67.        rst=1;
  68.        Delayms(20);
  69.        Write12864Command(0x30);//功能設(shè)定：8位控制方式，使用基本指令
  70.        Write12864Command(0x08);//顯示關(guān)
  71.        Write12864Command(0x01);//清屏
  72.        Write12864Command(0x06);//地址計(jì)數(shù)器加一、光標(biāo)右移
  73.        Write12864Command(0x0c);//顯示開(kāi)
  74. }
  75. //在指定行和列顯示漢字
  76. void LCD12864DisplayString( uchar y, uchar x, uchar *pstr)
  77.   //y-行數(shù)值0-3，x-列數(shù)值0-7，pstr-字符串指針
  78. //12864可以顯示32個(gè)漢字（四行每行8個(gè)），一個(gè)地址對(duì)應(yīng)一個(gè)漢字
  79. //可以顯示64個(gè)ASCII碼字符（四行每行16個(gè)），一個(gè)地址對(duì)應(yīng)兩個(gè)字符
  80.   //為了實(shí)現(xiàn)自動(dòng)換行功能，這個(gè)函數(shù)比較繁瑣
  81. {
  82.      uchar row,n=0;
  83.      Write12864Command(0x30);//基本指令
  84.      Write12864Command(0x06);//地址計(jì)數(shù)器自動(dòng)加以，光標(biāo)右移
  85.      switch(y)//根據(jù)行號(hào)選擇行地址
  86.      {
  87.                  case 0:row=0x80;break;//第一行首地址
  88.                  case 1:row=0x90;break;//第二行首地址
  89.                  case 2:row=0x88;break;//第三行首地址
  90.                  case 3:row=0x98;break;//第四行首地址
  91.                  default:;
  92.      }
  93.         Write12864Command(row+x);//寫(xiě)地址
  94.      while(*pstr!='\0')
  95.      {
  96.                 Write12864Data(*pstr);//寫(xiě)字符
  97.                 pstr++;
  98.                 n++;//計(jì)數(shù)
  99.                 if((n+x*2)==16)//如果一行寫(xiě)完，繼續(xù)寫(xiě)第二行
  100.                 {
  101.                        if(y==0) Write12864Command(0x90);//寫(xiě)下一行地址
  102.                        else if(y==1) Write12864Command(0x88);//寫(xiě)下一行地址
  103.                        else if(y==2) Write12864Command(0x98);//寫(xiě)下一行地址
  104.                        else ;
  105.                 }
  106.                 else if((n+x*2)==32)//如果第二行寫(xiě)完，繼續(xù)寫(xiě)第三行
  107.                 {
  108.                         if(y==0) Write12864Command(0x88);//寫(xiě)下一行地址
  109.                         else if(y==1) Write12864Command(0x98);//寫(xiě)下一行地址
  110.                         else ;
  111.                 }
  112.                 else if((n+x*2)==48)//如果第三行寫(xiě)完，繼續(xù)寫(xiě)第四行
  113.                 {
  114.                         if(y==0) Write12864Command(0x98);//寫(xiě)下一行地址
  115.                         else ;
  116.                 }
  117.                 else ;
  118.     }
  119. }   
  120. //清屏
  121. void Clear12864Screen()
  122. {
  123.         Write12864Command(0x01);//清屏
  124.         Write12864Data(0x00);//清屏
  125. }
  126. void main()
  127. {
  128.         uchar i;
  129.         Delayms(100);
  130.         Initialize12864();
  131.         Clear12864Screen();
  132.         while(1)
  133. {
  134.         Write12864Command(0x80);
  135.         for(i=0;i<11;i++)
  136.         {
  137.                 Write12864Data(table1[i]);
  138.                 Delayms(200);
  139.         }
  140. Clear12864Screen();
  141.         Write12864Command(0x90);
  142.         for(i=0;i<11;i++)
  143.         {
  144.                 Write12864Data(table2[i]);
  145.                 Delayms(200);
  146.         }
  147. Clear12864Screen();
  148.         Write12864Command(0x88);
  149.         for(i=0;i<12;i++)
  150.         {
  151.                 Write12864Data(table3[i]);
  152.                 Delayms(200);
  153.         }
  154. Clear12864Screen();
  155.         Write12864Command(0x98);
  156.         for(i=0;i<12;i++)
  157.         {
  158.                 Write12864Data(table4[i]);
  159.                 Delayms(200);
  160.         }
  161. Clear12864Screen();
  162.         LCD12864DisplayString(0, 0, "--蘇義江成心歡迎大家來(lái)到單片機(jī)世界。沒(méi)有想不到只有做不到！");
  163.         Delayms(4000);
  164. Clear12864Screen();
  165.         }
  166.                
  167. }
復(fù)制代碼


評(píng)分

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

查看全部評(píng)分

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

使用道具 舉報(bào)

沙發(fā)
ID:193210 發(fā)表于 2017-9-19 11:28 | 只看該作者
不錯(cuò)不錯(cuò)不錯(cuò)
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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