0.png (35.37 KB, 下載次數: 56)
下載附件
2017-8-1 23:07 上傳
- ORG 0000H
- ljmp LOOP1
- org 0030H
- LOOP1: MOV R1,#00H
- NEXT: MOV A,R1
- MOV DPTR,#TABLE
- MOVC A,@A+DPTR
- MOV P0,A
- LCALL DELAY
- MOV DPTR,#TABL
- MOV A,P1
- ANL A,#08H
- RL A
- JMP @A+DPTR
- INC R1
- CJNE R1,#10,NEXT
- LJMP LOOP1
- org 1000h
- TABL: AJMP CS0
- AJMP CS1
- AJMP CS2
- AJMP CS3
- AJMP CS4
- AJMP CS5
- AJMP CS6
- AJMP CS7
- CSO:MOV P1,#00000001B
- LCALL DELAY
- CS1:MOV P1,#00000011B
- LCALL DELAY
- CS2:MOV P1,#00000111B
- LCALL DELAY
- CS3:MOV P1,#00001111B
- LCALL DELAY
- CS4:MOV P1,#00011111B
- LCALL DELAY
- CS5:MOV P1,#00111111B
- LCALL DELAY
- CS6:MOV P1,#01111111B
- LCALL DELAY
- CS7:MOV P1,#11111111B
- LCALL DELAY
- DELAY: MOV R5,#20
- D2: MOV R6,#20
- D1: MOV R7,#248
- DJNZ R7,$
- DJNZ R6,D1
- DJNZ R5,D2
- RET
- TABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH
- END
復制代碼
新建文件夾.zip
(11.76 KB, 下載次數: 18)
2017-8-1 22:16 上傳
點擊文件名下載附件
1 下載積分: 黑幣 -5
包含程序和原理圖
|