|
;51單片機入門程序6
;工程名稱:實現跑馬燈效果,循環移位點亮一盞LED,運用左移指令
;編寫日期:2009.7.4
;編寫者:藍柳柳 ;~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
ORG 0000H MAIN: MOV A,#11111110B ;先把數11111110B送到累加器A,
LOOP: MOV P1,A ;把A里面的數11111110B送到P1端口輸出顯示
ACALL YS ;顯示一小段時間
RL A ;把A里的數11111110B左移一位
AJMP LOOP ;回到LOOP處循環,即把左移后得到新的數碼再顯示,再刷新A
YS: ;延時子程序YS,功能是能讓LED亮起來或者滅掉一小段時間
MOV R1,#200 ;讓燈亮滅時間的長短也就是延時的長短跟#號后面的數據有關
D: MOV R2,#200 ;延時長點#號后面的數據就大點,延時短點#號后面的數據
T: MOV R3,#200 ;就小點,但#號后面最大的數據是255
DJNZ R3,$ DJNZ R2,T
DJNZ R1,D
RET ;子程序返回指令,子程序的設計一般都是因為主程序要調用它,
;調用完是要返回到主程序繼續運行下一個語句的
END
|
|