【正文】 //小喇叭 END ；結(jié)束。寫自定義字符入CGRAM RET 。 ACALL WCOM ACALL DELAY1 MOV A,06H ACALL WCOM ACALL DELAY1 MOV A,01H 。進(jìn)行忙檢測 MOV A,0CH 。雙列顯示，字形5*7點(diǎn)陣 ACALL WCOM ACALL DELAY1 MOV A,38H 。不進(jìn)行忙檢測 MOV A,38H 。繼續(xù)填入字符 RET。 ACALL DELAY INC DPTR 。 MOV R5,TIMES 。判斷是否為結(jié)束碼 RETF_CHAR: ACALL WDATA 。填入字符 MOVC A,A+DPTR 。寫入命令 ACALL FILL_CHAR RET。 寫字符串子程序2W_STRING2: MOV A,0C0H 。設(shè)置 LCD 的第一行地址 ORL A,B ACALL WCOM 。計(jì)數(shù)結(jié)束 RET。載入空格符至LCD ACALL WDATA 。 MOV R0,16 。 清除LCD的第二行CLR_LINE2: MOV A,0C0H 。輸出字符至LCD DJNZ R0,CLR1 。設(shè)置計(jì)數(shù)值CLR1: MOV A,20H 。設(shè)置 LCD 的第一行地址 ACALL WCOM 。 在 LCD 第二行的指定顯示位置SET_X2: MOV A,LCD_X ADD A,0C0H ACALL WCOM RET。寫入數(shù)據(jù) SETB LCD_RS CLR LCD_RW NOP SETB LCD_EN NOP CLR LCD_EN RET。LCD寫數(shù)據(jù)子程序。LCD_RS=L,LCD_RW=L,D0D7=指令碼，E=高脈沖WCOM: JNB BUSY_CHECK,WCOM_1 ACALL LCD_BUSYWCOM_1: MOV DATAPORT,A 。busy為0時(shí),閑，可寫指令與數(shù)據(jù) LCD_BUSY: MOV DATAPORT,0FFHBUSY_1: CLR LCD_RS SETB LCD_RW CLR LCD_EN NOP SETB LCD_EN JB BUSY,BUSY_1 CLR LCD_EN RET。檢查LCD忙狀態(tài) 。 延時(shí)R5*10MS子程序DELAY: MOV R6,50DEL1: MOV R7,93DEL2: DJNZ R7,DEL2 DJNZ R6,DEL1 DJNZ R5,DELAY RET。秒單元清0 SETB SEC10 。置3s標(biāo)志位T0_0: CJNE A,10,T0_END 。50ms 計(jì)數(shù)值加1 CJNE A,20,T0_END MOV COUNT,0 INC SEC 。定時(shí)器0計(jì)時(shí)中斷子程序TIMER0: PUSH ACC PUSH PSW MOV TL0,00H 。蜂鳴器取反產(chǎn)生驅(qū)動脈沖 DJNZ R6,BL1 SETB BEEP 。E鍵退出 ACALL MENU1 ACALL BEEP_BL SETB TR0LOOK_END: RET。查看密碼子程序PASS_LOOK:ACALL KEY_SCAN CJNE A,0AH,LOOK_END 。清密碼正確標(biāo)志位 MOV B,00H MOV DPTR,INFO6 。清10s標(biāo)志位 MOV COUNT,00H 。指針指到信息5 ACALL W_STRING2 MOV SEC,00H 。置密碼正確標(biāo)志位 CLR RELAY 。PASS_COMP: MOV R2,06H 。 密碼比較子程序。E鍵確定退出 ACALL MENU1 ACALL BEEP_BL AJMP CH_ENDCH_IN7: CJNE A,0CH,CH_IN6 。顯示－ ACALL WDATA ACALL BEEP_BL 。C修改鍵 MOV A,POS CJNE A,09H,CH_IN5 。蜂鳴器響一聲 INC POS INC R0 DJNZ R2,CH_IN1 。轉(zhuǎn)換為ASCII碼 ACALL WDATA 。取鍵值 MOV R0,A 。=時(shí)，C=0 MOV LCD_X,POS 。判是否有鍵按下？ AJMP CH_IN1CH_IN2: ACALL KEY_SCAN CJNE A,0AH,CH_IN3 。6位密碼 MOV POS,09H 。判B鍵是否按下？ CLR TR0 ACALL MENU4 MOV R0,PASS_OLD 。清中斷計(jì)數(shù)單元 RET。清秒計(jì)數(shù)單元 CLR SEC10 。顯示輸入密碼的位數(shù) ACALL BEEP_BL 。保存輸入密碼值 INC R0 MOV A,2AH 。=時(shí)，C=0 MOV A,R3 。判是否有鍵按下？ AJMP P_IN1P_IN2: ACALL KEY_SCAN CJNE A,0AH,P_IN3 。清秒計(jì)數(shù)單元 MOV COUNT,00H 。確定顯示首位置 ACALL SET_X2 CLR SEC10 。存放輸入密碼單元首地址 MOV R2,06H 。清中斷計(jì)數(shù)單元 MOV SEC,00H AJMP S_IN1S_END: RET。停止TIMER0中斷 CLR SEC3 。清3s標(biāo)志位 MOV SEC,00H MOV COUNT,00H 。沒有達(dá)到3s，轉(zhuǎn)移 CLR TR0 。啟動TIMER0中斷S_IN2: ACALL KEY_SCAN CJNE A,0FH,S_IN3 。清中斷計(jì)數(shù)單元 MOV SEC,00HS_IN1: ACALL KEY_SCAN CJNE A,0FH,S_IN1 。 按F鍵大于3秒，方可退出此程序START_IN: CLR SEC3 。修改存放數(shù)據(jù)地址 DJNZ R2,P_PLAY RET。轉(zhuǎn)換為ASCII碼 ACALL WDATA 。第二行P_PLAY: MOV A,