完善资料让更多小伙伴认识你,还能领取20积分哦, 立即完善>
本帖最后由 Lin-811 于 2012-5-24 12:00 编辑
;==========定义符号=============== GREEN BIT P0.7 ;绿色灯 YELLOW BIT P1.0 RED BIT P2.7 DY_CK BIT P1.5 DG_CK BIT P1.6 DR_CK BIT P1.7 WORK0_0 EQU 23H tiMECOU EQU 22H ;用于计数 ;--------------------------------- ;----------入口地址--------------- ORG 0000H LJMP MAIN ORG 000BH ;定时器0入口 LJMP T0_S ;------定时器0初始化子程序-------- T0_INIT: MOV TMOD,#01H MOV TH0,#03CH MOV TL0,#0B0H SETB TR0 SETB ET0 SETB EA RET ;==========主程序================= MAIN: ;----------初始化----------------- MOV SP,#2FH CALL T0_INIT MOV P0,0FFH MOV P1,0FFH MOV P2,0FFH ;---------取倒计时时间------------ DE9: ANL P3,#03CH CJNE P3,#0,DE10 LJMP DAO9 DE10: ANL P3,#03CH CJNE P3,#004H,DE25 LJMP DAO10 DE25: ANL P3,#03CH CJNE P3,#008H,DE36 LJMP DAO25 DE36: ANL P3,#03CH CJNE P3,#00CH,DE48 LJMP DAO36 DE48: ANL P3,#03CH CJNE P3,#010H,DE74 LJMP DAO48 DE74: ANL P3,#03CH CJNE P3,#18H,DE86 LJMP DAO74 DE86: ANL P3,#03CH CJNE P3,#01CH,DE98 LJMP DAO86 DE98: ANL P3,#03CH CJNE P3,#020H,DE180 LJMP DAO98 DE180: ANL P3,#03CH CJNE P3,#03CH,DE9 LJMP DAO180 DAO9: MOV A,#9 LJMP WORK0_0 DAO10: MOV A,#10 LJMP WORK0_0 DAO25: MOV A,#25 LJMP WORK0_0 DAO36: MOV A,#36 LJMP WORK0_0 DAO48: MOV A,#48 LJMP WORK0_0 DAO74: MOV A,#74 LJMP WORK0_0 DAO86: MOV A,#86 LJMP WORK0_0 DAO98: MOV A,#98 LJMP WORK0_0 DAO180: MOV A,#180 LJMP WORK0_0 ;-------检测红绿黄哪路来电--------- SCANRGY: JNB DY_CK,DISY JNB DR_CK,DISR JNB DG_CK,DISG ;------------赋值显示------------- WORK0_0: MOV B,#10 DIV AB ANL A,#00001111B MOV DPTR,#TAB MOVC A,@A+DPTR MOV P2,A ANL B,#11110000B MOV DPTR,#TAB MOVC B,@B+DPTR MOV P0,B ;---点亮对应颜色灯,并进入倒计时--- DISR: CLR RED LCALL WORK0_0 LCALL T0_S DJNZ A,WORK0_0 LJMP MAIN DISG: CLR GREEN LCALL WORK0_0 LCALL T0_S DJNZ A,WORK0_0 LJMP MAIN DISY: CLR YELLOW LCALL T0_S LCALL T0_S LCALL T0_S LJMP MAIN ;------中断服务子程序1秒延时------ T0_S: MOV TH0,#03CH MOV TL0,#0B0H PUSH ACC PUSH PSW MOV TIMECON,#20 DEC TIMECON DJNZ TIMECON,#0,RES RES: POP PSW POP ACC RETI ;---------延时1秒子程序----------- ;DELAY_2:MOV R5,#10 ;DEL2_01:MOV R6,#200 ;DEL2_02:MOV R7,#250 ;DEL2_03:DJNZ R7,DEL2_03 ; DJNZ R6,DEL2_02 ; DJNZ R5,DEL2_01 ; RET ;=============显示字表============ TAB: DB 081H,0B7H,0C2H,092H,0B4H,098H,088H,0B3H,080H,090H END ;程序结束 |
|
相关推荐
1个回答
|
|
|
|
你正在撰写答案
如果你是对答案或其他答案精选点评或询问,请使用“评论”功能。
135 浏览 0 评论
为什么用FatFS在SD卡创建文件,在单片机上读写正常,用读卡器插到电脑上就什么都没有
1485 浏览 0 评论
1368 浏览 2 评论
《DNK210使用指南 -CanMV版 V1.0》第九章 打印输出实验
567 浏览 0 评论
stm32f407+ksz8863rlli概率性ping不通
1277 浏览 1 评论
【youyeetoo X1 windows 开发板体验】少儿AI智能STEAM积木平台
11393 浏览 31 评论
小黑屋| 手机版| Archiver| 电子发烧友 ( 湘ICP备2023018690号 )
GMT+8, 2024-10-4 05:56 , Processed in 0.639668 second(s), Total 74, Slave 57 queries .
Powered by 电子发烧友网
© 2015 bbs.elecfans.com
关注我们的微信
下载发烧友APP
电子发烧友观察
版权所有 © 湖南华秋数字科技有限公司
电子发烧友 (电路图) 湘公网安备 43011202000918 号 电信与信息服务业务经营许可证:合字B2-20210191 工商网监 湘ICP备2023018690号