数字电子万年历的毕业论文(17)

CJNE R4,#13,L13 INC R6 SJMP L14

TS: MOV R0,#00 L565: LCALL XS1 INC R1 LCALL DL JB P1.0,L1 CJNE R1,#60,L565 MOV R1,#00H

SJMP TS

TS1:

MOV R0,#00 L5651: LCALL XS1 INC R2 LCALL DL JB P1.1,L1 CJNE R2,#24,L5651 MOV R2,#00H

SJMP TS1

TS2:

MOV R0,#00

L5652: LCALL XS1 INC R3 LCALL DL JB P1.2,L1 CJNE R3,#31,L5652 MOV R3,#00H SJMP TS2

/*********显示序`**************/ XS: MOV SCON,#00H MOV DPTR,#TAB MOV B,#10 DIV AB MOV R5,A MOV A,B

MOVC A,@A+DPTR MOV SBUF,A JNB TI,$ MOV A,R5

MOVC A,@A+DPTR MOV SBUF,A JNB TI,$

RET

TAB:

DB

3FH,06H,5bh,4FH,66H,6DH,7DH,07H,7FH,6FH

/**********延时**********/ DL: MOV R7,#5 WW: MOV TMOD,#01H ;50毫秒

延时 MOV TH0,#3CH MOV TL0,#0B0H SETB TR0 JNB TF0,$ CLR TF0 DJNZ R7,WW

RET

RX11: CJNE R4,#2,L391