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

/*********主程序`**************/ L1: JNB P1.0,TS ORG 0000H MOV SCON,#00H MOV A,#3FH MOV SBUF,A JNB TI,$ CLR TI

SJMP L14

TS3:

MOV R0,#00

L5653: LCALL XS1 INC R4 LCALL DL JB P1.3,L1 CJNE R4,#13,L5653 MOV R4,#00H

SJMP TS3

TS4:

MOV R0,#00

L5654: LCALL XS1 INC R6 LCALL DL JB P1.4,L1 CJNE R6,#99,L5654 MOV R6,#00H

SJMP TS4

L14: MOV R4,#1 L13:

MOV R3,#1

L4: MOV R2,#0 L3: MOV R1,#0 L2: MOV R0,#0

JNB P1.1,TS1 JNB P1.2,TS2 JNB P1.3,TS3 JNB P1.4,TS4 LCALL XS1 INC R0 LCALL DL LCALL DL CJNE R0,#60,L1 INC R1 CJNE R1,#60,L2 INC R2 CJNE R2,#24,L3 INC R3 MOV B,#4 MOV A,R6 MOV R7,A JZ L0009 DIV AB MOV A,R7 MOV R6,A MOV A,B

CJNE A,#0,L000

L0009: LCALL RX11

LJMP L334

L000: LCALL RXS L334: JC L4

INC R4