找回密码
 立即注册

QQ登录

只需一步,快速开始

帖子
查看: 2863|回复: 3
收起左侧

LED飞翔的鸟电路设计与仿真 8*8点阵驱动源程序

[复制链接]
ID:193801 发表于 2017-4-26 13:58 | 显示全部楼层 |阅读模式
大家可以参照一下LED飞翔的鸟电路设计仿真原理图如下:
0.png

单片机源程序:
  1.           ;*********16X16图形跳变程序设计************            

  2.               TIM        EQU        30H             ;定议列扫描总数缓冲区
  3.               CNTA        EQU        31H             ;定议一屏列扫描缓冲区
  4.               CNTB        EQU        32H             ;定仪下一屏缓冲区
  5.               ORG        00H
  6.               LJMP        START
  7.               ORG        0BH                     ;T0中断入口地址
  8.               LJMP        T0X
  9.               ORG        0100H
  10.           ;**************初始化部分*************
  11. START:
  12.               MOV TIM,#00H                      ;送初值
  13.               MOV  CNTA,#00H                    
  14.               MOV  CNTB,#00H
  15.               MOV  TMOD,#01H                    ;T0定时方式1
  16.               MOV  TH0,#253;(65536-4000)/256
  17.               MOV  TL0,#96
  18.               SETB  TR0                       ;起动T0
  19.               SETB  ET0                       ;充许T0中断
  20.               SETB  EA                        ;充许总中断             
  21.               SJMP  $
  22.        ;**************显示部分***************
  23. T0X:             
  24.               MOV  TH0,#251;//(65536-4000)/256
  25.               MOV  TL0,#50
  26.               MOV  A,CNTA
  27.               MOV  P1,A                      ;送列数据(第一次:0000 0000)
  28.               MOV  DPTR,#DIGIT              ;//定义点阵上半部行首表地址
  29.               MOV  A,CNTB                   ;选择下一屏数据
  30.               MOV  B,#16     ;//
  31.               MUL  AB            ;低8位在A中高8位在B中.目的是从哪里开始选择
  32.                                   ;下一屏数据(0~15、16~31、….)
  33.                                            ;第一屏CNTB=0,A=0
  34.                                            ;第二屏CNTB=1,A=16
  35.              ADD  A,CNTA
  36.              MOV 33H,A
  37.              MOVC  A,@A+DPTR               ;送上部分行型码数据            
  38.              MOV  P0,A
  39.              MOV  A,33H
  40. M0:          MOV  DPTR,#TAB
  41.              MOVC  A,@A+DPTR               ;送下部分行型码数据
  42.              MOV  P2,A
  43.              INC  CNTA                        ;下一列
  44.              MOV  A,CNTA
  45.              CJNE  A,#16,NEX                   ;不到16列则续继
  46.              MOV  CNTA,#00H
  47. NEXT:
  48.             INC  TIM                             ;TIM+1,显示这一屏开始计数
  49.             MOV  A,TIM
  50.             CJNE  A,#10,NEX                      ;一屏态显示不到4次则续继,屏态变化速度
  51.             MOV  TIM,#00H
  52.       ;************开始下一屏显示*******
  53.             INC  CNTB                           ;下一屏开始
  54.             MOV  A,CNTB
  55.             CJNE  A,#3,NEX                       ;共显示4种屏态了吗?
  56.             MOV  CNTB,#00H                     ; 不断重复这5种屏态
  57.         
  58. NEX:
  59.              RETI


  60. DIGIT:    ;送到P0口
  61. DB 1EH,64H,88H,10H,20H,60H,70H,78H


  62. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码


0.png
下载:
LED飞翔的鸟电路设计与仿真.rar (57.74 KB, 下载次数: 13)


回复

举报

ID:185661 发表于 2017-4-27 08:48 | 显示全部楼层
值得学习,感谢分享
回复

举报

ID:213247 发表于 2017-6-21 11:07 | 显示全部楼层
值得学习,很有帮助,谢谢
回复

举报

ID:213247 发表于 2017-6-21 11:26 | 显示全部楼层
TIM EQU 30H
CNTA EQU 31H
CNTB EQU 32H
ORG 00H
LJMP START
ORG 0BH
LJMP T0X
ORG 0100H

START: MOV TIM,#00H
MOV CNTA,#00H
MOV CNTB,#00H
MOV TMOD,#01H
MOV TH0,#253
MOV TL0,#96
SETB TR0
SETB ET0
SETB EA
SJMP $
T0X: MOV TH0,#251
MOV TL0, #50
MOV A,CNTA
MOV P1,A
MOV DPTR,#DIGIT
MOV A,CNTB
MOV B,#16
MUL AB
ADD A,CNTA
MOV 33H,A
MOVC A,@A+DPTR
MOV P0,A
MOV A,33H
M0: MOV DPTR,#TAB
MOVC A,@A+DPTR
MOV P2,A
INC CNTA
MOV A,CNTA
CJNE A,#16, NEX
MOV CNTA,#00H
NEXT: INC TIM
MOV A,TIM
CJNE A,#10,NEX
MOV TIM , #00H
INC CNTB
MOV A,CNTB
CJNE A,#3,NEX
MOV CNTB,#00H
NEX: RETI
DIGIT: DB 1EH,64H,88H,10H,20H,60H,70H,78H
DB 7CH,0FEH,60H,90H,0B0H,90H,60H,40H
DB 00H,00H,00H,00H,80H,80H,40H,40H
DB 0C0H,40H,60H,90H,0B0H,90H,60H,40H
DB 00H,00H,00H,00H,00H,00H,80H,0C0H
DB 0C0H,0C0H,60H,90H,0B0H,90H,60H,40H
TAB: DB 40H,60H,60H,31H,2AH,24H,14H,14H
DB 12H,09H,04H,02H,01H,00H,00H,00H
DB 44H,66H,67H,37H,2FH,24H,12H,11H
DB 10H,08H,04H,02H,01H,00H,00H,00H
DB 40H,60H,60H,30H,28H,2FH,1FH,3FH
DB 7FH,0FFH,04H,06H,09H,11H,3EH,00H
END

回复

举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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