標題: LED跑馬燈 [打印本頁]
作者: h1000222    時間: 2017-12-22 17:59
標題: LED跑馬燈
;******************************************************************
; *                                                               *
; * 單片機開發(fā)板 - LED實驗                                        *
; *                                                               *
; *                                                               *
; *                                                               *
;******************************************************************

org 0000h       ;程序從0000開始運行
jmp init         ;跳到主程序
init:  mov ie,#10000001b ;中斷使能
    mov ip,#00000001b     ;中斷優(yōu)先
       mov tcon,#0000000b    ;中斷為電平觸發(fā)
main:           ;主程序循環(huán)點亮
mov p1,#00h             ;全亮
lcall delay         ;延時一段時間
mov a,#0feh  ;每次只亮一個燈。
loop: mov p1,a  ;輸出到p2
lcall delay  ; 延時
rl a  ;循環(huán)左移。
ajmp loop  ; 跳轉main繼續(xù)循環(huán)
delay: mov r5,#20  ;延時子程序1閃爍燈調用
d1:mov r6,#20
d2: mov r7,#250
djnz r7,$
djnz r6,d2
djnz r5,d1
ret
end





歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1