【正文】 MOV R7,200 BL3: NOP DJNZ R7,BL3 RET。定時器0計時中斷子程序TIMER0: PUSH ACC PUSH PSW MOV TL0,00H 。50ms定時常數(shù) MOV TH0,4CH INC COUNT MOV A,COUNT 。50ms 計數(shù)值加1 CJNE A,20,T0_END MOV COUNT,0 INC SEC 。秒加1 MOV A,SEC CJNE A,03H,T0_0 SETB SEC3 。置3s標(biāo)志位T0_0: CJNE A,10,T0_END 。是否到10秒？ MOV SEC,0 。秒單元清0 SETB SEC10 。置10s標(biāo)志位T0_END: POP PSW POP ACC RETI。 延時R5*10MS子程序DELAY: MOV R6,50DEL1: MOV R7,93DEL2: DJNZ R7,DEL2 DJNZ R6,DEL1 DJNZ R5,DELAY RET。 延時5MS子程序DELAY1: MOV R6,25DEL3: MOV R7,93DEL4: DJNZ R7,DEL4 DJNZ R6,DEL3 RET。檢查LCD忙狀態(tài) 。busy為1時，忙，等待。busy為0時,閑，可寫指令與數(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寫命令子程序。LCD_RS=L,LCD_RW=L,D0D7=指令碼，E=高脈沖WCOM: JNB BUSY_CHECK,WCOM_1 ACALL LCD_BUSYWCOM_1: MOV DATAPORT,A 。寫入指令與地址 CLR LCD_RS CLR LCD_RW NOP SETB LCD_EN NOP CLR LCD_EN RET。LCD寫數(shù)據(jù)子程序。LCD_RS=H,LCD_RW=L,D0D7=數(shù)據(jù)碼，E=高脈沖WDATA: ACALL LCD_BUSY MOV DATAPORT,A 。寫入數(shù)據(jù) SETB LCD_RS CLR LCD_RW NOP SETB LCD_EN NOP CLR LCD_EN RET。 在 LCD 第一行的指定顯示位置SET_X1: MOV A,LCD_X ADD A,80H ACALL WCOM RET。 在 LCD 第二行的指定顯示位置SET_X2: MOV A,LCD_X ADD A,0C0H ACALL WCOM RET。 清除LCD的第一行CLR_LINE1: MOV A,80H 。設(shè)置 LCD 的第一行地址 ACALL WCOM 。 MOV R0,16 。設(shè)置計數(shù)值CLR1: MOV A,20H 。載入空格符至LCD ACALL WDATA 。輸出字符至LCD DJNZ R0,CLR1 。計數(shù)結(jié)束 RET。 清除LCD的第二行CLR_LINE2: MOV A,0C0H 。設(shè)置 LCD 的第二行地址 ACALL WCOM 。 MOV R0,16 。設(shè)置計數(shù)值CLR2: MOV A,20H 。載入空格符至LCD ACALL WDATA 。輸出字符至LCD DJNZ R0,CLR2 。計數(shù)結(jié)束 RET。 寫字符串子程序1W_STRING1: MOV A,80H 。設(shè)置 LCD 的第一行地址 ORL A,B ACALL WCOM 。寫入命令 ACALL FILL_CHAR RET。 寫字符串子程序2W_STRING2: MOV A,0C0H 。設(shè)置 LCD 的第二行地址 ORL A,B ACALL WCOM 。寫入命令 ACALL FILL_CHAR RET。 寫入字符子程序FILL_CHAR: CLR A 。填入字符 MOVC A,@A+DPTR 。由字符區(qū)取出字符 CJNE A,0,F_CHAR 。判斷是否為結(jié)束碼 RETF_CHAR: ACALL WDATA 。寫入數(shù)據(jù) 。 MOV R5,TIMES 。延時，形成逐字顯示的效果 。 ACALL DELAY INC DPTR 。指針加1 AJMP FILL_CHAR 。繼續(xù)填入字符 RET。 LCD 初始化子程序LCD_INIT: CLR BUSY_CHECK 。不進行忙檢測 MOV A,38H 。雙列顯示，字形5*7點陣 ACALL WCOM ACALL DELAY1 MOV A,38H 。雙列顯示，字形5*7點陣 ACALL WCOM ACALL DELAY1 MOV A,38H 。雙列顯示，字形5*7點陣 ACALL WCOM ACALL DELAY1 SETB BUSY_CHECK 。進行忙檢測 MOV A,0CH 。開顯示，不顯示光標(biāo)。 ACALL WCOM ACALL DELAY1 MOV A,06H ACALL WCOM ACALL DELAY1 MOV A,01H 。清除 LCD 顯示屏 ACALL WCOM ACALL DELAY1 ACALL WRITE_CHAR 。寫自定義字符入CGRAM RET 。 自定義字符寫入CGRAM子程序WRITE_CHAR: MOV A,40H ACALL WCOM MOV R1,08H MOV DPTR,SPEAKERW_CHAR1: CLR A MOVC A,@A+DPTR ACALL WDATA INC DPTR DJNZ R1,W_CHAR1 RETSPEAKER:DB 01H,1BH,1DH,19H,1DH,1BH,01H,00H 。//小喇叭 END ；