首页 > 应用 > 单片机应用
[导读]
;用51单片机控制 2位数码管动态显示 00 ~ 99。;从 00 开始显示,显示数字每隔一段时间加 1,一直到 99,然后回到 00。;从 00 到 10 每隔 100ms 加 1;;从 10 到 20 每隔 200ms 加 1;;其它依此类推;;从

;用51单片机控制 2位数码管动态显示 00 ~ 99。

本文引用地址: http://www.21ic.com/app/mcu/201806/764378.htm


;从 00 开始显示,显示数字每隔一段时间加 1,一直到 99,然后回到 00。


;从 00 到 10 每隔 100ms 加 1;

;从 10 到 20 每隔 200ms 加 1;


;其它依此类推;


;从 90 到 99 然后到 00 每隔 1s 加 1。


;做而论道用汇编语言编写的程序如下:


ORG 0000H

JMP MAIN

ORG 000BH

JMP T0_INT

MAIN:

MOV TMOD, #01H

MOV TH0, #HIGH(65536-50000)

MOV TL0, #LOW(65536-50000)

SETB TR0

SETB ET0

SETB EA

MOV B, #2

MOV R2, B

MOV R4, #0

MOV R5, #0

MOV R6, #2


LOOP:

MOV A, R4

ADD A, #(TAB - $ - 3)

MOVC A, @A + PC

MOV P0, A

MOV P2, #2

DJNZ R7, $

DJNZ R7, $

MOV P2, #0


MOV A, R5

ADD A, #(TAB - $ - 3)

MOVC A, @A + PC

MOV P0, A

MOV P2, #1

DJNZ R7, $

DJNZ R7, $

MOV P2, #0


SJMP LOOP

;---------------------------------------

TAB: ;共阳段码

DB 0C0H, 0F9H, 0A4H, 0B0H

DB 099H, 092H, 082H, 0F8H

DB 080H, 090H

;---------------------------------------

T0_INT:

MOV TH0, #HIGH(65536-50000)

MOV TL0, #LOW(65536-50000)


DJNZ R2, T0_END

MOV R2, B


INC R4

CJNE R4, #10, T0_END

MOV R4, #0


INC R6

INC R6

CJNE R6, #22, T_B

MOV R6, #2

T_B:

MOV B, R6


INC R5

CJNE R5, #10, T0_END

MOV R5, #0


T0_END:

RETI

;---------------------------------------

END


;程序中,用 T0 定时50ms(假设晶振频率是 12MHz)。


;大家都知道,每当中断 20 次,就是 1s。


;如果这个 20,不是固定的常数,而是个变量,分别是:

; 2、4、6...、20,那么,即可实现定时 100ms、200ms、...。


;程序中,使用寄存器B,保存这个变量,初始时,令其为 2。

;以后,每当计数到十位数发生变化时,就把 B 加上 2。

;加到了 22,就再令其为 2。


;程序仿真执行的截图如下:


;图中使用了共阳数码管。


;观看的效果如何呢 ?


;前面的,定时 100ms、200ms...,太快,看不很准。


;但是,可以看出来,计数速度,是逐渐减慢的。


;等到了 90~00,就可以看到,每隔一秒,跳一个字,还是很准确的。


----

C 语言程序如下:


#include


char n1 = 0, n2 = 0; //用于显示

char n_t1 = 0, n_t2 = 2; //用于计数


char code seg[] = { //共阳段码

0xC0, 0xf9, 0xa4, 0xb0, 0x99,

0x92, 0x82, 0xf8, 0x80, 0x90}; //0 ~ 9


void Main(void)

{

char i;

TMOD = 0x01;

TH0 = (65536 - 50000) / 256;

TL0 = (65536 - 50000) % 256;

TR0 = 1;

ET0 = 1;

EA = 1;


while (1) {

P0 = seg[n1]; P2 = 2; for(i = 0; i < 100; i++); P2 = 0;

P0 = seg[n2]; P2 = 1; for(i = 0; i < 100; i++); P2 = 0;

}

}


T0_INT() interrupt 1

{

TH0 = (65536 - 50000) / 256;

TL0 = (65536 - 50000) % 256;

n_t1++;

if (n_t1 == n_t2) {

n_t1 = 0;


n1++;

if (n1 == 10) {

n1 = 0;

n_t2 += 2;

if (n_t2 == 22) n_t2 = 2;


n2++;

if (n2 == 10) n2 = 0;

}

}

}


换一批

延伸阅读

[疯狂史] 历史上的今天系列:1961年10月30日,苏联的“超级氢弹”试验成功

历史上的今天系列:1961年10月30日,苏联的“超级氢弹”试验成功

1961年10月30日把氢弹装进了图-95战略轰炸机。主要问题是轰炸机如何在氢弹爆炸前及时离开杀伤区。氢弹将在4.5公里高空爆炸,是在图-95能够爬上的最高高度15公里高空投下的。......

关键字:苏联 超级氢弹

[真心话] 电子工程师请远离浮躁

电子工程师请远离浮躁

什么样的人是浮躁的人?浮躁的人容易问:我到底该学什么;---踏踏实实的学点基本的吧?单片机不知道是什么就想去学ARM?c语言不会想搞LINUX?别老是好高骛远。......

关键字:电子工程师

[真心话] 泪奔!电子工程师成长历程中不得去面对的15个困扰

泪奔!电子工程师成长历程中不得去面对的15个困扰

中国有多少工作很多年的电子工程师;中国每年有多少电子新手需要开始全新的技术生涯;他们有什么困惑需要去解开;他们最关心的问题是什么?他们对未来的期待是什么?......

关键字:电子工程师

[新鲜事] 美国一名保安机器人投池自杀 莫非机器人的自我意识觉醒了?

美国一名保安机器人投池自杀 莫非机器人的自我意识觉醒了?

据The Verge报道,近日,在美国华盛顿DC的一幢办公楼内,一名保安机器人因“投池自杀”登上了新闻头条。......

关键字:美国 保安机器人 投池

[真心话] 工程师中大热的的“技术型复合人才”究竟是什么?

工程师中大热的的“技术型复合人才”究竟是什么?

经过半年的工作和学习,突然想到以前在哪里听说,技术型复合人才比较抢手。单从技术角度看,我认为在任何科技领域,除了能够出色完成自己手中的工作外,还能帮助两个、多个研发人员甚至整个团队解决从理论、方案到工程实现中所面临各种难题,这样的人才应该能......

关键字:工程师

[趣科技] 还有这种操作!澳大利亚科学家发现烟头新用法

还有这种操作!澳大利亚科学家发现烟头新用法

现在澳大利亚皇家墨尔本理工大学( RMIT )的教授 Dr Abbas Mohajerani 团队已经找到了一种安全处理烟头的新方法,他们希望把这些烟头用在铺设道路的材料上。......

关键字:澳大利亚 科学家 烟头 新用法
条评论

我 要 评 论

网友评论

技术子站

更多

项目外包

更多

推荐博客