; ;判断分的各位是否够10
BTFSS STATUS,Z
GOTO KS
INCF QIW,F ;是,分的个位清0,分的十位加1
CLRF BAW
CLRF STATUS
MOVF QIW,W
XORLW .6 ;判断分的十位是否够6(1小时60分)
BTFSS STATUS,Z
GOTO KS
INCF WAW,F ;是,分的十位清0,时的个位加1
CLRF QIW
CLRF STATUS
MOVF WAW,W
XORLW .4 ;判断时的个位是否够4(24小时制)
BTFSS STATUS,Z
GOTO KS
INCF YIW,F ;是,时的个位清0,时的十位加1
CLRF WAW
CLRF STATUS
MOVF YIW,W
XORLW .2 ;判断时的十位是否够2
BTFSS STATUS,Z
GOTO KS
CLRF GEW ;是,使时间回到00-00-00
CLRF SHW
CLRF BAW
CLRF QIW
CLRF WAW
CLRF YIW
GOTO KS ;循环显示
;**************************200ms延时
程序********************
DELAY
NOP
BANKSEL PIE1
BCF PIE1,0 ;禁止TMR1中断
BANKSEL T1CON
MOVLW 24H ;TMR1分频1:4
MOVWF T1CON
BCF PIR1,0
MOVLW 0X3C
MOVWF TMR1H
MOVLW 0XB0
MOVWF TMR1L ;TMR1赋初值0X3CB0
BSF T1CON,0
LOP
BTFSS PIR1,0 &n