设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › P3.75单红64X16半板点阵屏 STC8A单片机驱动
返回列表 发新帖
查看: 2462|回复: 1
打印 上一主题 下一主题
收起左侧

P3.75单红64X16半板点阵屏 STC8A单片机驱动

[复制链接]
跳转到指定楼层
楼主
ID:599538 发表于 2022-3-18 16:43 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
本程序来自http://www.51hei.com/bbs/dpj-205333-1.html更改，驱动P3.75单红64X16。测试了下驱动9块板，sta8a选RC22.018MHz,刷新整屏都在98HZ

实物图如下：


单片机源程序如下:
  1. //LED屏控制程序   本程序驱动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;       //传数允许
  16. sbit XSHCP=P1^1;           //S   时钟
  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;          //数据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  //乐1
  37. };
  38.        
  39.        
  40.        
  41.                 





  47. //第1组上下半部分数据传送  红 1 绿 2 蓝
  48. void shuju_input1(u8 sdat1)    //参数为上半部数据 下半部数据 显示颜色
  49. {
  50.   u8 m;
  51.    sdat1=~sdat1;
  52.   for(m=0;m<8;m++)         //8位数据传送
  53.    {
  54.     if(sdat1 & 0x80)        //判断最高位  上半部数据
  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;//奇数倍
  108.   u16 j=0,k;
  109.   for(k=0;k<16;k++)                  //16行 控制扫描行
  110.    {        
  111.     for(j=1;j<5;j++)                //共取8个字符高16X8,4个大字一个字是16X16
  112.     {
  113.     shuju_input1(*(p+(j-1)*32+k));                                      //取上下半汉字的第1个字节
  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个字节
  126.         }

  128.    XOE=1;
  129.    serial_output();                //允许输出控制
  130.    HC138_scan(k);                  //对应行
  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个单元控制
  146. //                 display1(dzx1,dzx2);   //1个单元控制
  147. //                   display2(dz2);
  148. //                   display3(dz1);
  149.     }
  150. }
复制代码



Keil代码下载:
p3.75单红半板.zip (58.04 KB, 下载次数: 32)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

沙发
ID:373 发表于 2022-12-19 14:43 | 只看该作者
还没有做过，不知道能不能讲解一下驱动思路
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表