課程上做的流水燈實驗
0.png (61.22 KB, 下載次數: 48)
下載附件
2017-1-7 01:23 上傳
下載:
流水燈.zip
(18.63 KB, 下載次數: 51)
2016-12-13 11:14 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
- ORG 0000H
- START: MOV R2,#08H
- MOV A,#01H ;FEH=1111 1110設置點亮第一盞燈的燈值
- NEXT: MOV P1,A;根據當前燈值亮燈
- ACALL DELAY ;延時一段時間,讓燈亮一段時間,便于人眼觀察。
- RL A ;左移,準備好下盞燈的燈值
- DJNZ R2,NEXT ;減1不等于0(沒亮完8盞燈),轉到NEXT去點亮下盞燈
- SJMP START
- DELAY: MOV R3,#0FFH ;軟件延時程序
- DEL2: MOV R4,#0FFH
- DEL1: NOP
- DJNZ R4,DEL1
- DJNZ R3,DEL2
- RET
- END
復制代碼
|