dlydavood
18-12-2008, 01:41
سلام
ممنون میشم ببینید مشکله این ساعت دیجیتال چیه؟؟؟
ORG 00H
N1 EQU 7FH
N2 EQU 7EH
N3 EQU 7DH
N4 EQU 7CH
N5 EQU 7BH
N6 EQU 7AH
CLR A
MOV P0,A
MOV P3,A
MOV N1,A
MOV N2,A
MOV N3,A
MOV N4,A
MOV N5,A
MAIN:
CALL SHOW
MOV A,N1
INC A
MOV N1,A
CJNE A,#10,MAIN
MOV N1,#00H
MOV A,N2
INC A
MOV N2,A
CJNE A,#6,MAIN
MOV N2,#00H
MOV A,N3
INC A
MOV N3,A
CJNE A,#10,MAIN
MOV N3,#00H
MOV A,N4
INC A
MOV N4,A
CJNE A,#6,MAIN
MOV N4,#00H
MOV A,N5
INC A
MOV N5,A
ADD A,N6
CJNE A,#6,NEXT
MOV N5,#00H
MOV N6,#00H
SJMP MAIN
NEXT: MOV A,N5
CJNE A,#10,MAIN
MOV N5,#00H
MOV A,N6
INC A
MOV N6,A
CJNE A,#3H,MAIN
SJMP MAIN
SHOW:
MOV DPTR,#COD
MOV A,N1
MOVC A,@A+DPTR
MOV P3,#3Fh
MOV P0,A
MOV P3,#3EH
CALL DELAY
MOV A,N2
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#3DH
CALL DELAY
MOV A,N3
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#3bH
CALL DELAY
MOV A,N4
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#37H
CALL DELAY
MOV A,N5
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#2FH
CALL DELAY
MOV A,N6
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#1FH
CALL DELAY
RET
DELAY:
MOV R7,#50
AGN: MOV TMOD,#01H
MOV TL0,# - LOW 10000
MOV TH0,#- HIGH 10000
SETB TR0
LOOP: JNB TF0, LOOP
CLR TR0
CLR TF0
DJNZ R7,AGN
RET
COD: DB 0111111B,0000110B,1011011B,1001111B,1100110B,11011 01B,1111101B,0000111B,1111111B,1101111B
END
ممنون میشم ببینید مشکله این ساعت دیجیتال چیه؟؟؟
ORG 00H
N1 EQU 7FH
N2 EQU 7EH
N3 EQU 7DH
N4 EQU 7CH
N5 EQU 7BH
N6 EQU 7AH
CLR A
MOV P0,A
MOV P3,A
MOV N1,A
MOV N2,A
MOV N3,A
MOV N4,A
MOV N5,A
MAIN:
CALL SHOW
MOV A,N1
INC A
MOV N1,A
CJNE A,#10,MAIN
MOV N1,#00H
MOV A,N2
INC A
MOV N2,A
CJNE A,#6,MAIN
MOV N2,#00H
MOV A,N3
INC A
MOV N3,A
CJNE A,#10,MAIN
MOV N3,#00H
MOV A,N4
INC A
MOV N4,A
CJNE A,#6,MAIN
MOV N4,#00H
MOV A,N5
INC A
MOV N5,A
ADD A,N6
CJNE A,#6,NEXT
MOV N5,#00H
MOV N6,#00H
SJMP MAIN
NEXT: MOV A,N5
CJNE A,#10,MAIN
MOV N5,#00H
MOV A,N6
INC A
MOV N6,A
CJNE A,#3H,MAIN
SJMP MAIN
SHOW:
MOV DPTR,#COD
MOV A,N1
MOVC A,@A+DPTR
MOV P3,#3Fh
MOV P0,A
MOV P3,#3EH
CALL DELAY
MOV A,N2
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#3DH
CALL DELAY
MOV A,N3
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#3bH
CALL DELAY
MOV A,N4
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#37H
CALL DELAY
MOV A,N5
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#2FH
CALL DELAY
MOV A,N6
MOVC A,@A+DPTR
MOV P3,#3FH
MOV P0,A
MOV P3,#1FH
CALL DELAY
RET
DELAY:
MOV R7,#50
AGN: MOV TMOD,#01H
MOV TL0,# - LOW 10000
MOV TH0,#- HIGH 10000
SETB TR0
LOOP: JNB TF0, LOOP
CLR TR0
CLR TF0
DJNZ R7,AGN
RET
COD: DB 0111111B,0000110B,1011011B,1001111B,1100110B,11011 01B,1111101B,0000111B,1111111B,1101111B
END