- MOV R1,#09H ;個位
- MOV R2,#09H ;十位
- MOV R3,#09H ;百位
- MOV R4,#09H ;千位
- LOOP:
- MOV A,R1
- ADD A,#70H ;亮個位
- MOV R5,A
- ;MOV P1,R5
- ACALL DELAY
- MOV A,R2
- ADD A,#0B0H ;亮十位
- MOV R5,A
- MOV P1,R5
- ACALL DELAY
- MOV A,R3
- ADD A,#0D0H ;亮百位
- MOV R5,A
- MOV P1,R5
- ACALL DELAY
- MOV A,R4
- ADD A,#0E0H ;亮千位
- MOV R5,A
- MOV P1,R5
- ACALL DELAY
- JMP MAIN
- MAIN:
- DEC R1 ;個位數減一
- MOV A,R1
- INC A
- JZ SHOW1 ;檢查R1是不是0,若是則跳到SHOW1
- AJMP LOOP
- SHOW1:
- MOV R1,#09H
- DEC R2 ;十位數減一
- MOV A,R2
- INC A
- JZ SHOW2 ;檢查R2是不是0,若是則跳到SHOW2
- AJMP LOOP
- SHOW2:
- MOV R2,#09H
- DEC R3 ;百位數減一
- MOV A,R3
- INC A
- JZ SHOW3 ;檢查R3是不是0,若是則跳到SHOW3
- AJMP LOOP
- SHOW3:
- MOV R3,#09H
- DEC R4 ;千位數減一
- MOV A,R4
- INC A
- JZ SHOW4 ;檢查R4是不是0,若是則跳到SHOW4
- AJMP LOOP
- SHOW4:
- MOV R1,#09H
- MOV R2,#09H
- MOV R3,#09H
- MOV R4,#09H
- AJMP LOOP
- DELAY:
- MOV R5,#10
- DELAY1:
- MOV R6,#10
- DELAY2:
- MOV R7,#10
- DELAY3:
- DJNZ R7,DELAY3
- DJNZ R6,DELAY2
- DJNZ R5,DELAY1
- RET
複製代碼 |