单片机数字时钟报告 - 图文

JIAM:INC MIAO ;加秒 MOV A,MIAO CJNE A,#60,K2M MOV MIAO,#0

K2M:ACALL CONV ACALL DISPLAY JNB K2,K2M JMP TMM

JIANM:DEC MIAO ;减秒 MOV A,MIAO CJNE A,#255,K3M MOV MIAO,#59 K3M:ACALL CONV ACALL DISPLAY JNB K3,K3M JMP TMM

;------------------------------------------------------------- TF:ACALL DISPLAY ;设置分钟 JNB K1,TF

TFF:ACALL DISPLAYF JNB K1,TM JNB K2,JIAF JNB K3,JIANF JNB K5,QUE JMP TFF

JIAF:INC FEN ;加分钟 MOV A,FEN CJNE A,#60,K2F MOV FEN,#0

K2F:ACALL CONV ACALL DISPLAY JNB K2,K2F JMP TFF

JIANF:DEC FEN ;减分钟 MOV A,FEN

CJNE A,#255,K3F MOV FEN,#59

K3F:ACALL CONV

35

ACALL DISPLAY JNB K3,K3F JMP TFF

;------------------------------------------------------------ DISPLAYS: ;时闪子程序 MOV R3,#20

DISS:MOV R1,#BUF+2 MOV A,#04H MOV R2,#6 ACALL DP1 DJNZ R3,DISS MOV R3,#20

DIS2:MOV R1,#BUF MOV A,#01H MOV R2,#8 ACALL DP1 DJNZ R3,DIS2 RET

DISPLAYF: MOV R3,#20

DISF:MOV R1,#BUF+5 MOV A,#20H MOV R2,#6 ACALL DP1 DJNZ R3,DISF MOV R3,#20 ACALL DIS2 RET

DISPLAYM: MOV R3,#20

DISM:MOV R1,#BUF MOV A,#01H MOV R2,#6 ACALL DP1 DJNZ R3,DISM MOV R3,#20 ACALL DIS2 RET

;分闪子程序 ;秒闪子程序 36

;------------------------------------------------- SETNAO: ;设置闹钟时间 TTN:ACALL CONVNAO

ACALL DISPLAY ;闹设置小时 TSN:JNB K4,TTN

TSSN:ACALL DISPLAYS JNB K4,TFN JNB K2,JIASN JNB K3,JIANSN JNB K5,QUEN SJMP TSSN JIASN:INC HH ;闹加时子程序 MOV A,HH

CJNE A,#24,K2SN MOV HH,#0

K2SN:ACALL CONVNAO ACALL DISPLAY JNB K2,K2SN SJMP TSSN

JIANSN:DEC HH ;闹减时子程序MOV A,HH

CJNE A,#255,K3SN MOV HH,#23

K3SN:ACALL CONVNAO ACALL DISPLAY JNB K3,K3SN SJMP TSSN

QUEN:ACALL BZ SETB TR0 LJMP LOOP

;------------------------------------------------ TMN:ACALL CONVNAO ACALL DISPLAY ;闹设置秒 JNB K4,TMN

TMMN:ACALL DISPLAYM JNB K4,TSN JNB K2,JIAMN JNB K3,JIANMN

37

JNB K5,QUEN JMP TMMN

JIAMN:INC MM ;闹加秒 MOV A,MM

CJNE A,#60,K2MN MOV MM,#0

K2MN:ACALL CONVNAO ACALL DISPLAY JNB K2,K2MN JMP TMMN

JIANMN:DEC MM ;闹减秒 MOV A,MM

CJNE A,#255,K3MN MOV MM,#59

K3MN:ACALL CONVNAO ACALL DISPLAY JNB K3,K3MN JMP TMMN

;------------------------------------------------------------- TFN:ACALL CONVNAO

ACALL DISPLAY ;闹设置分钟JNB K4,TFN

TFFN:ACALL DISPLAYF JNB K4,TMN JNB K2,JIAFN JNB K3,JIANFN JNB K5,QUEN JMP TFFN

JIAFN:INC FF ;闹加分钟 MOV A,FF

CJNE A,#60,K2FN MOV FF,#0

K2FN:ACALL CONVNAO ACALL DISPLAY JNB K2,K2FN JMP TFFN

JIANFN:DEC FF ;减分钟 MOV A,FF

38