找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開始

搜索
查看: 2236|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

單片機(jī)流水燈設(shè)計(jì)

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:85192 發(fā)表于 2015-7-10 02:28 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式


6M晶振
;上電1S后,第1只LED亮,隨后每2S左移一位。第9 S全亮,第10秒全滅1S;周而復(fù)始。
;E:\DPJ\OHTER\2SLED流水\2s4LED.ASM  2011 06 28

ORG 0000H
LJMP MAIN
ORG 001BH           ;定時(shí)器T1
LJMP T1INT
ORG 4000H           ;主程序入口地址4000H
MAIN:
MOV TMOD,#10H
MOV TH1,#9EH     ;50ms
MOV TL1,#58H
SETB EA
SETB ET1
SETB    TR1
MOV R1,#20
MOV R2,#3
JNB 7FH,$               ;7F為1S標(biāo)志
CLR 7FH
MOV R0,#0FEH
MOV P1,R0
ACALL DISP
AJMP $-2

DISP:
JNB 7EH,DISP1        ;7EH為2S標(biāo)志
CLR 7EH
MOV A,R0
RL  A
MOV R0,A
MOV P1,A
DISP1:
JB P1.4,RT                ;4位是否移完
SETB P1.4
JNB 7FH,RT
CLR 7FH

MOV P1,#00H
JNB 7FH,$-3
CLR 7FH
MOV P1,#0FFH
JNB 7FH,$-3
CLR 7FH
MOV R0,#07FH
RT:
RET

T1INT:
MOV TH1,#9EH
MOV TL1,#58H
DJNZ R1,RTI
MOV R1,#20
SETB 7FH
DJNZ    R2,RTI
MOV R2,#2
SETB 7EH
RTI:
RETI

END


分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表