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

QQ登錄

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

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

P3.75單紅64X16半板點(diǎn)陣屏 STC8A單片機(jī)驅(qū)動(dòng)

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
本程序來(lái)自http://www.torrancerestoration.com/bbs/dpj-205333-1.html更改，驅(qū)動(dòng)P3.75單紅64X16。測(cè)試了下驅(qū)動(dòng)9塊板，sta8a選RC22.018MHz,刷新整屏都在98HZ

實(shí)物圖如下：


單片機(jī)源程序如下:
  1. //LED屏控制程序   本程序驅(qū)動(dòng)32*64LED彩色屏
  2. #include <stc15f2k60s2.H>
  3. #include<uart.h>
  4. //#include "common.h"
  5. #include <intrins.h>
  6. #define u8 unsigned        char
  7. #define u16         unsigned int

  9. #define NOP     _nop_()

  11. char Key_Read();

  13. //第1組
  14. //LED端口 共16根，其中3根為GND
  15. sbit XOE     = P1^0;       //傳數(shù)允許
  16. sbit XSHCP=P1^1;           //S   時(shí)鐘
  17. sbit XSTCP=P1^2;           //L   鎖存輸出
  18. sbit XA1     = P1^3;       //A  由138控制的掃描行  共16行
  19. sbit XB1     = P1^4;       //B
  20. sbit XC1     = P1^5;       //C
  21. sbit XD1     = P1^6;       //D
  22. sbit SR1DATA=P1^7;          //數(shù)據(jù)1  紅色


  25. //大字體
  26. u8 code dz1[4][128]={
  27. 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x18,0x00,0x00,0x00,0x3C,
  28. ***********

  30. u8 code kuaile[]={
  31.   
  32. 0x18,0x06,0x18,0x06,0x18,0x06,0xD8,0x3F,0x38,0x36,0x7E,0x36,0x1E,0x36,0x1E,0x36,
  33. 0xFB,0xFF,0x18,0x06,0x18,0x0F,0x18,0x0F,0x98,0x19,0x98,0x19,0xD8,0x30,0x78,0xE0, //快0

  35. 0x00,0x0C,0x00,0x1F,0xF8,0x01,0x18,0x00,0x98,0x01,0x8C,0x01,0x8C,0x01,0xFC,0x7F,
  36. 0x80,0x01,0xB0,0x0D,0xB0,0x19,0x98,0x31,0x8C,0x61,0x86,0x61,0xE0,0x01,0xC0,0x00  //樂(lè)1
  37. };
  38.        
  39.        
  40.        
  41.                 





  47. //第1組上下半部分?jǐn)?shù)據(jù)傳送  紅 1 綠 2 藍(lán)
  48. void shuju_input1(u8 sdat1)    //參數(shù)為上半部數(shù)據(jù) 下半部數(shù)據(jù) 顯示顏色
  49. {
  50.   u8 m;
  51.    sdat1=~sdat1;
  52.   for(m=0;m<8;m++)         //8位數(shù)據(jù)傳送
  53.    {
  54.     if(sdat1 & 0x80)        //判斷最高位  上半部數(shù)據(jù)
  55.                 {
  56.                        
  57.        SR1DATA=1;         
  58.      }
  59.     else
  60.                 {
  61.                
  62.                
  63.        SR1DATA=0;         

  65.                        
  66.       
  67.      }
  68.                

  70.                  
  71.     XSHCP=0;
  72.     XSHCP=1;
  73.     NOP;
  74.     NOP;
  75.     XSHCP=0;
  76.     NOP;
  77.     NOP;
  78.     sdat1=sdat1<<1;       

  80.          }                 
  81. }



  85. /*******************************************************************************************/
  86. void serial_output()
  87. {
  88.     XSTCP=1;
  89.     NOP;
  90.     XSTCP=0;   
  91. }  



  95. void HC138_scan(u8 temp)
  96. {
  97.          XOE=0;
  98.    XA1=0x01 & temp;     
  99.    XB1=0x01 &(temp>>1);
  100.          XC1=0x01 &(temp>>2);
  101.          XD1=0x01 &(temp>>3);
  102. }

  104. //顯示  每一單元板為32*64，能夠顯示二行漢字，每行四字(字模為順向，逐行式，陰碼的算法)
  105. void display(u8 *p)                //4字的首地址
  106. {
  107.   u8 qx=0,qxdata=0,qd=1;//奇數(shù)倍
  108.   u16 j=0,k;
  109.   for(k=0;k<16;k++)                  //16行 控制掃描行
  110.    {        
  111.     for(j=1;j<5;j++)                //共取8個(gè)字符高16X8,4個(gè)大字一個(gè)字是16X16
  112.     {
  113.     shuju_input1(*(p+(j-1)*32+k));                                      //取上下半漢字的第1個(gè)字節(jié)
  114. ////////////////////////////////////////////////////////////////////////////////
  115.              qxdata=0;
  116.                  qx=0;
  117.              while(qd)
  118.                  {
  119.                  qxdata++;
  120.                  if(qxdata%2){qx++;}
  121.                  if(qx==j)qd=0;
  122.                  }
  123.                  qd=1;       
  124. ////////////////////////////////////////////////////////////////生成1 3 5 7 9 11
  125.         shuju_input1(*(p+(qxdata*16)+k));                                  //取上下半漢字的第2個(gè)字節(jié)
  126.         }

  128.    XOE=1;
  129.    serial_output();                //允許輸出控制
  130.    HC138_scan(k);                  //對(duì)應(yīng)行
  131.   }
  132. }


  135. void main()
  136. {  
  137. UartInit(); //串口1初始化        //9600bps@11.0592MHz
  138.   UART1_fs(0x88);
  139.   while(1)
  140.    {
  141.    if(dyjs_1){
  142.          dyjs_1=0;
  143.              UART1_fs(0x99);
  144.              }
  145.          display(dzx4);    //1個(gè)單元控制
  146. //                 display1(dzx1,dzx2);   //1個(gè)單元控制
  147. //                   display2(dz2);
  148. //                   display3(dz1);
  149.     }
  150. }
復(fù)制代碼



Keil代碼下載:
p3.75單紅半板.zip (58.04 KB, 下載次數(shù): 32)

評(píng)分

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

查看全部評(píng)分

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

使用道具 舉報(bào)

沙發(fā)
ID:373 發(fā)表于 2022-12-19 14:43 | 只看該作者
還沒(méi)有做過(guò)，不知道能不能講解一下驅(qū)動(dòng)思路
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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