【文章內(nèi)容簡介】 盤接口8255A（U3）初始化 MOV DPTR,0FEFFH 。8255A（U3) MOVX @DPTR,A 。A、B口輸出驅(qū)動字段、字位，C口輸入 MOV A,8BH 。LED顯示、開關(guān)、按鍵接口8255A（U5）初始化 MOV DPTR,0FDFFH 。8255A（U5) MOVX @DPTR,A 。 A口輸出驅(qū)L815，B口輸入按鍵PB07，C口輸入電平開關(guān)SW07 MOV DPTR,0FDFCH 。選中A口 MOV A,0FFH 。送暗碼 MOVX @DPTR,A 。L8L15全滅 MOV DPTR,0FEFDH 。DPTR指向U3B口 MOV A,00 MOVX @DPTR,A 。關(guān)顯示(位驅(qū)動全為39。039。無效)。顯緩初始化 MOV 30H,00H 。30H37H為顯示緩沖單元, MOV 31H,01H MOV 32H,00H MOV 33H,02H MOV 34H,10H MOV 35H,01H MOV 36H,05H MOV 37H,10H。時鐘初始化 MOV 38H,00H 。38H單元為實時鐘200uS計數(shù)單元，清0 MOV 39H,00H 。39H單元為10mS計數(shù)單元，清0 MOV 3AH,45H 。秒單元初值 MOV 3BH,59H 。分單元初值 MOV 3CH,08H 。時單元初值，時鐘初值08:59:45。用戶密碼初始化 MOV 40H,11H MOV 41H,11H MOV 42H,11H。管理員密碼初始化 MOV 43H,11H MOV 44H,11H MOV 45H,11H MOV 46H,11H。其他內(nèi)容初始化 MOV 58H,00H 。密碼位數(shù) MOV 59H,57H 。存密碼放置首地址 MOV 6AH,100 。延時初始1S MOV 6BH,3 。延時初始2 MOV 3FH,50 ?？煺{(diào)定時存儲單元 MOV 3DH,5 。密碼錯誤次數(shù)存儲單元 MOV 27H,0 。清空各標(biāo)志位 MOV 28H,0 。定時器中斷設(shè)置 MOV TMOD,02H 。T0為定時方式2。 MOV TL0,00H 。00HFFH=256,256TM*36=9216TM=10MS MOV TH0,00H SETB ET0 。開T0中斷允許 SETB EA 。開中斷總允許 SETB TR0 。啟動T0定時工作。主循環(huán)LOOP: LCALL CZ 。拆字 LCALL CW 。錯誤顯示子程序 LCALL DISP 。顯示刷新 LCALL KEY 。獲取鍵盤輸入 LCALL XDPB 。消抖 LCALL INPUT 。密碼輸入程序 LCALL BZ 。并字 LCALL PP 。密碼匹配 LCALL KM 。開門子程序 LCALL SWITCH 。撥碼開關(guān)開門設(shè)置 LCALL MMXG 。密碼修改 LCALL SJSZ 。管理員03時間調(diào)校 SJMP LOOP。拆字子程序CZ: MOV R0,30H 。設(shè)置顯緩首地址CZLOOP: MOV @R0,12H 。對所有顯緩單元送暗碼 INC R0 CJNE R0,38H,CZLOOP JB ,FCT 。檢測當(dāng)前模式并跳轉(zhuǎn)，為0常態(tài)，為1非常態(tài)。常態(tài)拆字模塊MOV R0,3AH 。顯示內(nèi)容送顯緩子程序(拆字子程序)。置時鐘數(shù)據(jù)單元首地址(秒單元)MOV R1,30H 。置顯示緩沖單元首地址(對應(yīng)于最右顯示位)CZ1:MOV A,@R0 。取當(dāng)前數(shù)據(jù)單元BCD碼 ANL A,0FH 。保留低4位（個位） MOV @R1,A 。送顯緩當(dāng)前個位單元 INC R1 。指向顯緩當(dāng)前十位單元 MOV A,@R0 。再取當(dāng)前數(shù)據(jù)單元BCD碼 ANL A,0F0H 。保留高4位（十位） SWAP A 。交換到低4位 MOV @R1,A 。送顯緩當(dāng)前十位單元 INC R1 。指向顯緩下一個個位單元 INC R0 。指向下一個時鐘數(shù)據(jù)單元 CJNE R0,3DH,CZ1 。未完繼續(xù) SJMP CZRET。非常態(tài)拆字模塊FCT: JB ,KZCZ 。檢測鍵盤輸入模式，0為密碼輸入，1為控制碼輸入。.................................密碼輸入拆字模塊.............................................SRMOD: MOV A,58H 。將密碼位數(shù)給A CJNE A,0,SRMOD2 。判斷密碼位數(shù)是否為0，不為0則跳轉(zhuǎn)，為零則直接退出 SJMP CZRETSRMOD2: MOV R1,37H 。置顯示緩沖單元首地址(對應(yīng)于最右顯示位) MOV R0,58H 。將已輸入的密碼個數(shù)送至R0SRMOD1: MOV @R1,10H 。送密碼個數(shù)個到顯緩 DEC R1 。指向下一個緩沖單元 DJNZ R0,SRMOD1 SJMP CZRET。................................控制碼輸入拆字模塊............................................KZCZ: MOV 36H,5BH 。把5B的值送給30H MOV 37H,5AH 。把5A的值送給30HCZRET: RET。密碼錯誤處理子程序CW: JNB ,CWRET 。判斷錯誤標(biāo)志位，為0則不執(zhí)行，為1則進行處理 MOV R0,30H 。把顯緩首地址送給R0CWLOOP: MOV @R0,12H 。對顯緩單元送暗碼 INC R0 CJNE R0,38H,CWLOOP MOV 30H,0EH 。將最右邊一位設(shè)成E DJNZ 6AH,CWRET 。1S延時 MOV 6AH,100 DJNZ 6BH,CWRET MOV 6BH,3 CLR 。關(guān)閉錯誤標(biāo)志位CWRET: RET。顯示刷新子程序DISP: MOV DPTR,0FEFCH MOV A,0FFH MOVX @DPTR,A MOV R0,30H 。顯示更新子程序。置顯示緩沖單元首地址（對應(yīng)最右位） MOV R3,01H 。位碼初值（從最右位起） MOV A,R3DISP1: MOV DPTR,0FEFDH 。 8255B口（位碼輸出口） MOVX @DPTR,A 。 輸出當(dāng)前字位碼 MOV A,@R0 。 取當(dāng)前位顯示數(shù)據(jù)碼 ADD A,TABNEXTPC 。 加TAB與NEXTPC差址 MOVC A,@A+PC 。 查表得相應(yīng)字段碼NEXTPC: MOV DPTR,0FEFCH 。 8255A口（字段碼輸出口） MOVX @DPTR,A 。 輸出字段碼 LCALL D1MS 。 保持顯示1毫秒MOV DPTR,0FEFCH MOV A,0FFH MOVX @DPTR,A INC R0 。 指向下一顯示緩沖單元 MOV A,R3 。 取出原來的位碼 JB ,DISP2 。 判斷若已顯示到最左位則結(jié)束 RL A 。 未完,字位碼左移1位 MOV R3,A 。 回存新的位碼 LJMP DISP1 。 轉(zhuǎn)下一位的顯示驅(qū)動DISP2: RETTAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H 。顯示字段碼表。0～9 DB 88H,83H,0C6H,0A1H,86H,8EH,0BFH,00H,0FFH 。A～F,,全亮。獲取矩陣鍵盤輸入KEY: MOV A,81H 。鍵盤掃描子程序（反轉(zhuǎn)法） MOV DPTR,0FEFFH MOVX @DPTR,A 。C口先初始化為高4位輸出方式驅(qū)鍵行線、低4位輸入方式鍵列線 MOV DPTR,0FEFEH MOV A,00H 。鍵盤行線(高4位)輸出驅(qū)動全39。039。 MOVX @DPTR,A MOVX A,@DPTR 。輸入鍵盤列線電平(低4位)存60H單元 MOV 60H,A MOV A,88H 。C口改初始化為高4位輸入驅(qū)鍵行線、低4位輸出驅(qū)鍵列線 MOV DPTR,0FEFFH MOVX @DPTR,A MOV DPTR,0FEFEH MOV A,00H 。鍵盤列線(低4位)輸出驅(qū)動全39。039。 MOVX @DPTR,A MOVX A,@DPTR 。輸入鍵盤行線電平(高4位)在A中 ANL 60H,0FH 。列線電平值保留所在的低4位 ANL A,0F0H 。行線電平值保留所在的高4位 ORL 60H,A 。將列線電平值、行線電平值組合成8位行列碼 RET。