【正文】 . . .. . 學(xué)習(xí)好幫手 SETB 46H ；長按調(diào)整（調(diào)時快進(jìn)）標(biāo)志 LCALL ADD_KEY LCALL DEC_KEY LOOP3: JNZ LOOP ；等待鍵釋放 MOV A,R5 ；輸出鍵值 RET EXIT_KEY: RET /*****延時子程序*****/ DELAY: MOV R7,150 DJNZ R7,$ RET /*****選擇鍵處理子程序*****/ SET_KEY: CJNE R5,01H,EXIT ；選擇鍵鍵值 INC R1 ；調(diào)整選擇功能標(biāo)志加一 SETB BEEP CJNE R1,4,EXIT MOV R1,0 MOV 24H,00H ；調(diào)時閃爍基準(zhǔn)清零 RET /*****增加鍵處理子程序*****/ ADD_KEY: CJNE R5,02H,EXIT ；增加鍵鍵值 CJNE R1,01H,NEXT1 ；選擇鍵功能標(biāo)志為 1，調(diào)時，否則跳出 MOV A,23H ADD A,01H DA A MOV 23H,A CJNE A,24H,EXIT MOV 23H,00H NEXT1: CJNE R1,02H,NEXT2 ；選擇鍵功能標(biāo)志為 2，調(diào)分，否則跳出 . . . .. . 學(xué)習(xí)好幫手 MOV A,22H ADD A,01H DA A MOV 22H,A CJNE A,60H,EXIT MOV 22H,00H NEXT2: CJNE R1,03H,EXIT ；選擇鍵功能標(biāo)志為 3，調(diào)秒，否則跳出 MOV 21H,00H ；如增加鍵按下直接清零秒 RET /*****減少鍵處理子程序*****/ DEC_KEY: CJNE R5,04H,EXIT ；減少鍵鍵值 CJNE R1,01H,NEXT3 ；選擇鍵功能標(biāo)志為 1，調(diào)時，否則跳出 MOV A,23H ADD A,99H DA A MOV 23H,A CJNE A,99H,EXIT MOV 23H,23H NEXT3: CJNE R1,02H,NEXT4 ；選擇鍵功能標(biāo)志為 2，調(diào)分，否則跳出 MOV A,22H ADD A,99H DA A MOV 22H,A CJNE A,99H,EXIT MOV 22H,59HNEXT4: CJNE R1,03H,EXIT ；選擇鍵功能標(biāo)志為 3，調(diào)秒，否則跳出 MOV 21H,00H ；如較少鍵按下直接清零秒 RET /*****強制響鈴鍵處理子程序*****/ DALING_KEY: CJNE R5,08H,EXIT ；選擇鍵鍵值 . . . .. . 學(xué)習(xí)好幫手 JNB 45H,LP1 ；判斷是否正在響鈴 CLR 45H RETLP1: JNB 44H,LP2 CLR 44H RETLP2: MOV R2,01H RET /*****萬用返回程序*****/ EXIT: RET /*****數(shù)碼管字形編碼表*****/ TABLE: DB 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,00H ；（共陰極）顯示編碼 TABLE1: DB 00H,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,00H ；小時位的十位數(shù)編碼/*****打鈴時間對比程序（上、下課）*****/ BIJIAO2: MOV A,23H CJNE A,08H,B1 MOV A,22H CJNE A,00H,B1 ；8:00 SETB 44H ；開啟響鈴方式 2 RET B1: MOV A,23H CJNE A,08H,B2 MOV A,22H CJNE A,50H,B2 ；8:50 SETB 44H RET B2: MOV A,23H . . . .. . 學(xué)習(xí)好幫手 CJNE A,09H,B3 MOV A,22H CJNE A,00H,B3 ；9:00 SETB 44H RET B3: MOV A,23H CJNE A,09H,B4 MOV A,22H CJNE A,50H,B4 ；9:50 SETB 44H RET B4: MOV A,23H CJNE A,10H,B5 MOV A,22H CJNE A,15H,B5 ；10:15 SETB 44H RET B5: MOV A,23H CJNE A,11H,B6 MOV A,22H CJNE A,05H,B6 ；11:05 SETB 44H RET B6: MOV A,23H CJNE A,11H,B7 MOV A,22H CJNE A,15H,B7 ；11:15 SETB 44H RET B7: MOV A,23H . . . .. . 學(xué)習(xí)好幫手 CJNE A,12H,B8 MOV A,22H CJNE A,05H,B8 ；12:05 SETB 44H RET B8: MOV A,23H CJNE A,13H,B9 MOV A,22H CJNE A,30H,B9 ；13:30 SETB 44H RET B9: MOV A,23H CJNE A,14H,EXIT_2 MOV A,22H CJNE A,20H,EXIT_2 ；14:20 SETB 44H RET EXIT_2: CLR 44H RET /*****響鈴方式 2 程序（響 5 秒）*****/ DALING2: JNB 44H,EXIT_DALING MOV A,21H ；響鈴起始時間由秒實時控制 CJNE A,05H,L6 SETB BEEP RET L6: JNC EXIT_DALING CPL BEEP LCALL DELAY1 RET /*****響鈴方式 3 程序*****/ . . . .. . 學(xué)習(xí)好幫手DALING3: CJNE R2,01H,EXIT_DALING CJNE R3,05H,DL3 MOV R2,00H MOV R3,00H SETB BEEP RET DL3: CPL BEEP LCALL DELAY1 RET EXIT_DALING: RET DELAY1: MOV R6,10 ；短延時子程序 X1: MOV R7,80 X2: DJNZ R7,X2 DJNZ R6,X1 RET END ；程序結(jié)束寧可累死在路上，也不能閑死在家里！寧可去碰壁，也不能面壁。是狼就要練好牙，是羊就要練好腿。什么是奮斗？奮斗就是每天很難，可一年一年卻越來越容易。不奮斗就是每天都很容易，可一年一年越來越難。能干的人，不在情緒上計較，只在做事上認(rèn)真；無能的人！不在做事上認(rèn)真，只在情緒上計較。拼一個春夏秋冬！贏一個無悔人生！早安！ —————獻(xiàn)給所有努力的人.