【正文】 LPP2: MOV A,NHOR LCALL BIN_BCD MOV LED2,B MOV LED1,A MOV A,NMIN LCALL BIN_BCD MOV LED4,B MOV LED3,A MOV A,NSEC LCALL BIN_BCD MOV LED6,B MOV LED5,A MOV A,LED_LP MOV B,08 DIV AB MOV A,B RL A MOV DPTR,NTAB_SCAN JMP A+DPTR NTAB_SCAN:AJMP NSCAN_L1 45 AJMP NSCAN_L2 AJMP NSCAN_L3 AJMP NSCAN_L4 AJMP NSCAN_L5 AJMP NSCAN_L6 AJMP NSCAN_L7 AJMP NSCAN_L8 NSCAN_L1: MOV DIG_PORT,0 MOV A,LED1 JMP NEND_SCAN NSCAN_L2: MOV DIG_PORT,1 MOV A,LED2 JMP NEND_SCAN NSCAN_L3: MOV DIG_PORT,2 MOV A,11 JMP NEND_SCAN NSCAN_L4: MOV DIG_PORT,3 MOV A,LED3 JMP NEND_SCAN NSCAN_L5: MOV DIG_PORT,4 46 MOV A,LED4 JMP NEND_SCAN NSCAN_L6: MOV DIG_PORT,5 MOV A,11 JMP NEND_SCAN NSCAN_L7: MOV DIG_PORT,6 MOV A,LED5 JMP NEND_SCAN NSCAN_L8: MOV DIG_PORT,7 MOV A,LED6 NEND_SCAN:MOV DPTR,TAB_LED MOVC A,A+DPTR MOV LED_PORT,A POP PSW POP ACC RETI END 。T1=4MS MOV TL1,060H INC LED_LP MOV A,LED_LP CJNE A,250,RCONT_SCAN 。號(hào)減 1 SETB F_BEEP LCALL DEL 40 CLR F_BEEP JMP NWAIT_KEY 。鬧鐘分減 1 SETB F_BEEP LCALL DEL CLR F_BEEP JMP NWAIT_KEY 39 NSW5_OK: MOV A,NSEC CJNE A,59,NSW5_OVER MOV NSEC,00H SETB F_BEEP LCALL DEL CLR F_BEEP JMP NWAIT_KEY NSW5_OVER:INC NSEC 。鬧鐘時(shí)減 1 SETB F_BEEP LCALL DEL CLR F_BEEP JMP NWAIT_KEY NSW3_OK: MOV A,NMIN CJNE A,59,NSW3_OVER MOV NMIN,00H SETB F_BEEP LCALL DEL 38 CLR F_BEEP JMP NWAIT_KEY NSW3_OVER:INC NMIN 。T1=4MS MOV TL1,060H MOV NHOR,0 SETB TR1 SETB ET1 NWAIT_KEY:JNB SW7,NLOOP CLR TR1 POP PSW POP ACC 36 RETI NLOOP:JNB SW1,NSW1_OK JNB SW2,NSW2_OK JNB SW3,NSW3_OK JNB SW4,NSW4_OK JNB SW5,NSW5_OKA JNB SW6,NSW6_OKA JMP NWAIT_KEY NSW5_OKA: JMP NSW5_OK NSW6_OKA: JMP NSW6_OK NSW1_OK: MOV A,NHOR CJNE A,23,NSW1_OVER MOV NHOR,00H SETB F_BEEP LCALL DEL CLR F_BEEP JMP NWAIT_KEY NSW1_OVER:INC NHOR 。號(hào)減 1 SETB F_BEEP LCALL DEL CLR F_BEEP JMP RWAIT_KEY 。月減 1 34 SETB F_BEEP LCALL DEL CLR F_BEEP JMP RWAIT_KEY RSW5_OK: MOV A,DAT CJNE A,30,RSW5_OVER MOV DAT,00H SETB F_BEEP LCALL DEL CLR F_BEEP JMP RWAIT_KEY RSW5_OVER:INC DAT 。年減 1 SETB F_BEEP LCALL DEL CLR F_BEEP JMP RWAIT_KEY RSW3_OK: MOV A,MOT 33 CJNE A,12,RSW3_OVER MOV MOT,00H SETB F_BEEP LCALL DEL CLR F_BEEP JMP RWAIT_KEY RSW3_OVER:INC MOT 。 RWAIT_KEY:JNB SW0,RLOOP CLR TR1 POP PSW POP ACC RETI RLOOP:JNB SW1,RSW1_OK JNB SW2,RSW2_OK JNB SW3,RSW3_OK JNB SW4,RSW4_OK JNB SW5,RSW5_OKA JNB SW6,RSW6_OKA JMP RWAIT_KEY RSW5_OKA: JMP RSW5_OK RSW6_OKA: JMP RSW6_OK RSW1_OK: MOV A,YER CJNE A,99,RSW1_OVER MOV YER,00H SETB F_BEEP LCALL DEL CLR F_BEEP 32 JMP RWAIT_KEY RSW1_OVER:INC YER 。進(jìn)入日期顯示 T_0:PUSH ACC PUSH PSW MOV TH1,0F0H 。250*4MS=1S MOV LED_LP,00H