MOV BX,WORD PTR DS:[DATA10] MOV DS:[BX],AL
ADD WORD PTR DS:[DATA10],01H POP AX PUSH CX MOV CL,4H SHR AL,CL POP CX
CALL CONVERS1
MOV BX,WORD PTR DS:[DATA10] MOV DS:[BX],AL RET
CONVERSALL: MOV AL,BYTE PTR DS:[DATA9] CALL CONVERS2
ADD WORD PTR DS:[DATA10],02H MOV AL,BYTE PTR DS:[DATA8] CALL CONVERS2
ADD WORD PTR DS:[DATA10],02H MOV AL,BYTE PTR DS:[DATA7] CALL CONVERS2
MOV WORD PTR DS:[DATA10],DATA4 RET
;********************时间计算*********************************** NEWTIME: CMP BYTE PTR DS:[DATA23],59H JC ADD1
MOV BYTE PTR DS:[DATA23],0D CMP BYTE PTR DS:[DATA22],59H JC ADD2
MOV BYTE PTR DS:[DATA22],0D CMP BYTE PTR DS:[DATA22],00H CMP BYTE PTR DS:[DATA21],23H JC ADD3
MOV BYTE PTR DS:[DATA21],0D CMP BYTE PTR DS:[DATA13],30H JC ADD4
MOV BYTE PTR DS:[DATA13],0D CMP BYTE PTR DS:[DATA12],12H JC ADD5
MOV BYTE PTR DS:[DATA12],0D CMP BYTE PTR DS:[DATA11],99H JC ADD6
MOV BYTE PTR DS:[DATA11],0D JMP OK JMP OK
25
ADD1: MOV AL,BYTE PTR DS:[DATA23] ADD AL,1D DAA
MOV BYTE PTR DS:[DATA23],AL JMP OK
ADD2: MOV AL,BYTE PTR DS:[DATA22] ADD AL,1D DAA
MOV BYTE PTR DS:[DATA22],AL JMP OK
ADD3: MOV AL,BYTE PTR DS:[DATA21] ADD AL,1D DAA
MOV BYTE PTR DS:[DATA21],AL ADD4: MOV AL,BYTE PTR DS:[DATA13] ADD AL,1D DAA
MOV BYTE PTR DS:[DATA13],AL JMP OK
ADD5: MOV AL,BYTE PTR DS:[DATA12] ADD AL,1D DAA
MOV BYTE PTR DS:[DATA12],AL JMP OK
ADD6: MOV AL,BYTE PTR DS:[DATA11] ADD AL,1D DAA
MOV BYTE PTR DS:[DATA11],AL OK: RET
;*****************功能选择***************************** CHOSE: MOV BH,06H CALL SHOW1 CALL KEY
CMP BH,0FH JNZ JUDGE1 CALL KEYTYEAR JUDGE1:
CMP BH,0DH JNZ JUDGE2 CALL KEYTHOUR JUDGE2:
CMP BH,0BH JNZ JUDGE3
CALL SHOWYEAR
26
JUDGE3:
CMP BH,09H JNZ JUDGE4
CALL SHOWHOUR JUDGE4:
RET
;*****************初始化时分秒************************* KEYTYEAR: CLI
MOV AL,0EH
MOV BYTE PTR DS:[DATA8],AL CALL CONVERSALL MOV SI,DATA4 CALL LEDDISP MOV CNT,06H KEYY1: CALL KEY LPY1:
CMP CNT,06H JNZ LPY2 MOV TEMP,BH PUSH CX
MOV CL,04H SHL TEMP,CL POP CX DEC CNT JMP KEYY1 LPY2:
CMP CNT,05H JNZ LPY3 PUSH AX
MOV AL,TEMP OR AL,BH
MOV BYTE PTR DS:[DATA11],AL MOV BYTE PTR DS:[DATA7],AL CALL CONVERSALL MOV SI,DATA4 CALL LEDDISP POP AX
MOV TEMP,00H DEC CNT JMP KEYY1 LPY3:
CMP CNT,04H JNZ LPY4 MOV TEMP,BH
27
PUSH CX
MOV CL,04H SHL TEMP,CL POP CX DEC CNT JMP KEYY1 LPY4:
CMP CNT,03H JNZ LPY5 PUSH MOV OR MOV MOV CALL MOV CALL POP MOV DEC JMP LPY5:
CMP JNZ MOV PUSH MOV SHL POP DEC JMP LPY6:
CMP JNZ PUSH MOV OR MOV MOV CALL MOV CALL POP MOV
AX
AL,TEMP AL,BH
BYTE PTR DS:[DATA12],AL BYTE PTR DS:[DATA8],AL CONVERSALL SI,DATA4 LEDDISP AX
TEMP,00H CNT KEYY1 CNT,02H LPY6 TEMP,BH CX
CL,04H TEMP,CL CX CNT KEYY1 CNT,01H LPENDY AX
AL,TEMP AL,BH
BYTE PTR DS:[DATA13],AL BYTE PTR DS:[DATA9],AL CONVERSALL SI,DATA4 LEDDISP AX
TEMP,00H
28
LPENDY:
MOV BH,0EH ;在chose中选SHOWHOUR STI RET
;*****************初始化时分秒************************* KEYTHOUR: CLI
MOV AL,0AH
MOV BYTE PTR DS:[DATA8],AL CALL CONVERSALL MOV SI,DATA4 CALL LEDDISP MOV CNT,06H KEYH1: CALL KEY LPH1:
CMP CNT,06H JNZ LPH2 MOV TEMP,BH PUSH CX
MOV CL,04H SHL TEMP,CL POP CX DEC CNT JMP KEYH1 LPH2:
CMP CNT,05H JNZ LPH3 PUSH AX
MOV AL,TEMP OR AL,BH
MOV BYTE PTR DS:[DATA21],AL MOV BYTE PTR DS:[DATA7],AL CALL CONVERSALL MOV SI,DATA4 CALL LEDDISP POP AX
MOV TEMP,00H DEC CNT JMP KEYH1 LPH3:
CMP CNT,04H JNZ LPH4 MOV TEMP,BH PUSH CX
29