51单片机一位数码管汇编程序-电子工程世界

;数码管从0-9显示

ORG 0000H

AJMP MAIN

ORG 0030H

MAIN:

MOV R4, #00H ;记录码表的值

MOV DPTR, #TABLE ;把地址送DPTR

STRAT: MOV A, R4

MOVC A, @A+DPTR ;取码

MOV P2, A ;显示

INC R4 ;自增，取下个值做准备

CALL DELAY ;调用

CJNE R4, #16, STRAT ;判断是否显示完16个数值

AJMP MAIN

DELAY:

MOV R6, #1

DELAY4: MOV R1, #10

DELAY3: MOV R2, #100

DEALY1: MOV R3, #250

DEALY2: NOP

NOP

DJNZ R3,DEALY2

DJNZ R2, DEALY1

DJNZ R1, DELAY3

DJNZ R6, DELAY4

RET

;码表

TABLE: DB 0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e

END

仿真图：

程序截图：

关键字：51单片机一位数码管汇编程序引用地址：51单片机一位数码管汇编程序

小广播

最新单片机文章

纳芯微联合芯弦推出NS800RT系列实时控制MCU
11月20日，纳芯微宣布联合芯弦半导体（ChipSine），推出NS800RT系列实时控制MCU。该系列MCU凭借更加高效、功能更强大的实时控制能力和丰富 ...
如何学习基于ARM平台的嵌入式系统
一、嵌入式系统的概念着重理解"嵌入"的概念主要从三个方面上来理解 1、从硬件上,将基于CPU的处围器件,整合到CPU芯片内部,比如早期基于X86体 ...
有关 jffs2_scan_eraseblock 问题小结
总结前面遇到的问题：1 有关类似：mtd->read(0x44 bytes from 0x68cf44) returned ECC errorjffs2_get_inode_nodes(): CRC failed ...
SPCOMM控件在Delphi7.0串口通信中的应用
摘要：利用Delphi开发工业控制系统软件成为越来越多的开发人员的选择，而串口通信是这个过程中必须解决的问题之一。本文在对几种常用串口通 ...
Delphi环境下利用TComm组件实现串行通信
摘要：利用Delphi开发工业控制系统软件成为越来越多的开发人员的选择，而串口通信是这个过程中必须解决的问题之一。本文在对几种常用串口通 ...
嵌入式开发实践的柱状图代码
嵌入式开发学习（10）<汇编写启动代码之设置栈、调用c语言、开关看门狗和开关iCache>
嵌入式开发学习（8）<一步一步点亮LED灯>
嵌入式开发学习（6）