課程上做的霹靂燈實驗
下載：
霹靂燈.zip
(18.43 KB, 下載次數(shù): 28)
2016-12-13 11:10 上傳
點擊文件名下載附件
- ORG 0000H
- MAIN: MOV R1,#07H
- MOV A,#0FEH
- NEXT: MOV P1,A
- ACALL DELAY
- RL A
- DJNZ R1,NEXT
- MOV R1,#07H
- NEXT1: MOV P1,A;第一次A=7F
- RR A
- ACALL DELAY
- DJNZ R1,NEXT1
- SJMP MAIN
- ;------DELAY 0.2 SEC----
- DELAY: MOV R7,#02
- DEL1:MOV R6,#250
- DEL2:MOV R5,#200
- DEL3:DJNZ R5,DEL3
- DJNZ R6,DEL2
- DJNZ R7,DEL1
- RET
- END
|
