【文章內容簡介】 ************************* 。系統(tǒng)起始程序區(qū) ORG 0000H START: LJMP MAIN 。*********************************************************************** 。系統(tǒng)監(jiān)控程序區(qū) ORG 000BH LJMP PIT0 ORG 0100H。 MAIN: MOV SP, 7FH 。確立堆棧區(qū) MOV R0, 78H 。顯示緩沖區(qū)首址 MOV R7, 08H 。顯示位數 ML1: MOV @R0, 00H 。時鐘顯示緩沖單元清 0 INC R0。 DJNZ R7, ML1 MOV 7AH, 12H MOV 7DH, 12H MOV TMOD, 01H 。設置 T/C0 工作方式 1 MOV TL0, 0DCH 。裝載計數初值 MOV TH0, 0BH。 SETB EA。 SETB ET0 CLR TR0。 MOV 30H, 14H 。計數溢出次數 ,即循環(huán)次數 ML0: LCALL GEXING 10 LCALL DISP 。調顯示子程序 LCALL KEY 。調鍵掃描子程序 ML3: LCALL ANJIANG。 ML2: JNB TR0, PARK LCALL DISP FFT: SJMP ML0 。*********************************************************************** 。獨立式鍵盤設定 。 ANJIANG:JB , KEYAA 。是 KEYA 鍵，轉 KEYAA 執(zhí)行 JB , KEYBB 。是 KEYB 鍵，轉 KEYBB 執(zhí)行 JB , KEYCC。 JB , KEYDD RET 。********************************************************************** 。鍵功能程序 。 KEYAA: MOV R0, 75H 。給加一子程序賦初值 LCALL DADD1 。時加一 MOV 25H, 75H 。時的十位送位單元 MOV 26H, 74H 。時的個位送位單元 JB , LOOP7 。判斷十位是否加到 2 LJMP ML2 。 KEYBB: MOV R0, 73H 。給加一子程序賦初值 LCALL DADD1 。分加一 MOV 24H, 73H 。分的十位送位單元 JB , LOOP5 。判斷是否為 6 LJMP ML2 KEYCC: SETB TR0 。開始按鍵 11 LJMP ML2 。 KEYDD: CLR TR0 。停止按鍵 LJMP ML2 。 PARK : MOV P2, 0FEH 。顯示 P. MOV P0, 0CH 。 LCALL KEY AJMP ML3 LOOP5: JB , LOOP6 。判斷是否為 6 ,分到達 60，轉 LOOP6分清零 LJMP ML2 。 LOOP6: MOV 73H, 00H 。分清零 MOV 72H , 00H。 LJMP ML2 LOOP7 : JB , LOOP8 。判斷個位是否加到 4 ，時到達 24 轉 LOOP8，讓時清零 LJMP ML2 。 LOOP8: MOV 75H, 00H 。時清零 MOV 74H, 00H。 LJMP ML2 。 。********************************************************************** 。鍵盤掃描子程序 KEY: LCALL KEYCHULI 。調 P1 口數據處理子程序 JZ EXIT 。沒有鍵按下，轉返回 LCALL DISP 。調顯示子程序去抖動 LCALL DISP LCALL KEYCHULI 。調 P1 口數據處理子程序 JZ EXIT 。沒有鍵按下，轉返回 MOV B, 20H 。保存取反后的鍵值 12 KEYSF: LCALL KEYCHULI 。調 P1 口數據處理子程序 JZ KEY1 。鍵釋放，轉恢復鍵值 LCALL DISP 。調顯示子程序延時 LJMP KEYSF 。等待鍵釋放 KEY1: MOV 20H, B 。鍵值送 20H 保存 EXIT: RET KEYCHULI: PUSH PSW 。保護現(xiàn)場 MOV P1 ,0FFH 。先向 P1 口寫 1 MOV A, P1 。讀 P1 口數據 CPL A 。P1 口數據取反