永发信息网

急求 10秒50秒100秒 的计数定时器单片机编程

答案:1  悬赏:30  手机版
解决时间 2021-07-26 16:13

;;晶体振荡f=12Mhz
TEN_BUF EQU 30H ;10秒 计数器
TWE_BUF EQU 31H ;20s
FIF_BUF EQU 32H ;50s
SENCOND EQU 40H ;s counter
;
TEN_LED REG P1.0 ;DISPLAY
TWE_LED REG P1.1
FIF_LED REG P1.2
;
TEN_KEY REG P1.4 ;KEY
TWE_KEY REG P1.5 ;INPUT
FIF_KEY REG P1.6
;
ORG 0000H
AJMP MAIN
ORG 0003H
RETI
ORG 000BH
AJMP TM_0
ORG 0013H
RETI
ORG 001BH
RETI
ORG 0023H
RETI
;
MAIN: MOV R0,#00H
DJNZ R0,$
MOV SP,#60H
MOV TEN_BUF,#10 ;10S
MOV TWE_BUF,#20 ;20S
MOV FIF_BUF,#50 ;50S
MOV P1,#FFH ;ALL LED CLOSE
CALL RDY_T
$0 JB TEN_KEY,$1
SETB TEN_LED ;关闭LED
MOV TEN_BUF,#10 ;10S
$A CALL DELAY
JNB TEN_KEY,$A ;等待按键放开
;
$1 JB TWE_KEY,$2
SETB TWE_LED
MOV TWE_BUF,#20 ;20S
$B CALL DELAY
JNB TEN_KEY,$B
;
$2 JB FIF_KEY,$0
SETB FIF_LED
MOV FIF_BUF,#50 ;50S
$C CALL DELAY
JNB TEN_KEY,$C
;
AJMP $0
;
;
;
RDY_T MOV TMOD,#11H
MOV TH0,#3CH
MOV TL0,#B0H
MOV SENCOND,#20
CLR TF0
SETB TR0
SETB ET0
SETB EA
RET
;
DELAY: MOV R7,#50
MOV R6,#00
$1 DJNZ R6,$1
DJNZ R7,$1
RET
;
TM_0: MOV TL0,#B0H ; TIMER 50 ms
MOV TH0,#3CH
DJNZ SENCOND,$0 ;50ms * 20 = 1S
MOV SENCOND,#20
MOV A,TEN_BUF
JZ $1 ;10 S 计时完毕
DJNZ TEN_BUF,$1
CLR TEN_LED ;10S 到时 LED 亮
;
$1 MOV A,TWE_BUF
JZ $2
DJNZ TWE_BUF,$2
CLR TWE_LED
;
$2 MOV A,FIF_BUF
JZ $0
DJNZ FIF_BUF,$0
CLR FIF_LED
$0 RETI
;;;;

大家看下 对不!!!

最佳答案

用C来写一个吧


#include<reg52.h>


unsigned int count;


void main()


{


TMOD=0x01;


IE=0x82;


TH0=(65536-50000)/256;


TL0=(65536-50000)%256;


count=0


TR0=1;


while(1)


{


if(count==200)


P1^0=0; //假设p1.0\p1.1\p1.2接共阳二极管则10s后p1.0所接二极管亮50s后p1.1亮100s后p1.3亮


if(count==1000)


P1^1=0;


if(count==2000)


P1^3=0;


}


}


void time0() interrupt 1


{


count++;


TH0=(65536-50000)/256;


TL0=(65536-50000)%256;


}

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
街舞怎样接合运球
天津市区哪里有豆乳的专柜
川师成都学院在哪?
世界是否存在着龙?拜托各位大神
本饮料由纯天然原料制成,绝对不含任何任何化
隔江犹唱后庭花的典故名是什么!是典故名
学彩妆需要哪些工具?
真正的爱需要回报吗
为什么QQ空间那个游戏基地里的QQ炫舞有时打不
我80年6月十七,虎宝宝几月好
物质间发生化学反应的剧烈程度取决于哪些因素
谁知道这歌的名字呀?
如何提高解答一元二次不等式的速度,准确率?
要是黄钻问访别人空间时,看到的就是匿名,可我
你相信这世上有灵魂的存在吗?
推荐资讯
梦幻诛仙买什么吃可以不遇怪
Who is waiting
哪款隔离霜遮瑕效果好,用了隔离霜后可以直接
大气污染英语怎么说,如何防治空气污染
富裕的意思是什么,我的紫薇命盘的意思~~
户外有哪些品牌,国内户外运动品牌有哪些?
程序员需要学什么,做程序员,学历重要吗
QQ炫舞要多少级可以点图标?
求下列韩文歌曲得MV下载地址!急~~韩国各大组
一个不是明码比较的软件怎么去追出它的注册码
65的内功老鼠可以打高血爆吗?打了是不是比外
QQ飞车里 A车大脚怎么改装成功率才高
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?