【正文】 權(quán)，汪明慧，黃英. 單片機(jī)在控制系統(tǒng)中的應(yīng)用[M].北京:電子工業(yè)出版社，2003.[11]附 錄附 錄附錄一源程序：LCD_CS BIT LCD_SID BIT LCD_CLK BIT S1 BIT S2 BIT S3 BIT S4 BIT lcd_m EQU 30H 。前導(dǎo)碼緩沖器lcd_data EQU 31H 。讀寫數(shù)據(jù)緩沖器w_m DATA 11111000b 。寫指令前導(dǎo)碼w_data DATA 11111010b 。寫數(shù)據(jù)前導(dǎo)碼r_bf DATA 11111100b 。讀忙標(biāo)志前導(dǎo)碼r_data DATA 11111110b 。讀數(shù)據(jù)前導(dǎo)碼count EQU 32H。*******************************************************。 主程序。******************************************************* ORG 0000H AJMP main ORG 0030Hmain: MOV SP,60H CLR LCD_CS 。準(zhǔn)備lcd引腳信號(hào) CLR LCD_SID CLR LCD_CLK ACALL KEY 。按鍵初始化 LCALL LCDreset 。lcd初始化 MOV DPTR,boot_char11。顯示開機(jī)界面 ACALL dischar1 MOV DPTR,boot_char12 ACALL dischar2S1_loop: JNB S1,START1 。循環(huán)等待S1鍵按下，默 。認(rèn)進(jìn)入菜單（光標(biāo)指在器 。件檢測(cè)） AJMP S1_loop。*******************************************************。 按鍵初始化子程序。*******************************************************KEY: SETB S1 。按鍵初始化(置1) SETB S2 SETB S3 SETB S4 RET。*******************************************************。 主菜單子程序。*******************************************************START1: ACALL KEY MOV DPTR,boot_char21。顯示菜單（光標(biāo)指在器 。件檢測(cè)） ACALL dischar1 MOV DPTR,boot_char22 ACALL dischar2loop1: MOV C,S1 。循環(huán)檢測(cè)S1和S3是否按 。下 ANL C,S3 JNB C,loop11 AJMP loop1 loop11: JNB S1,TEST 。S1按下表示確定，則進(jìn) 。入測(cè)試子程序(TEST) JNB S3,START2 。S3按下表示光標(biāo)下移， 。進(jìn)入START2 RETSTART2: ACALL KEY MOV DPTR,boot_char23。顯示菜單（光標(biāo)指在器件 。查詢） ACALL dischar1 MOV DPTR,boot_char24 ACALL dischar2 loop2: MOV C,S1 。循環(huán)檢測(cè)S1和S2是否按 。下 ANL C,S2 JNB C,loop22 AJMP loop1 loop22: JNB S1,INQUIRE 。S1按下表示確定，則 。進(jìn)入查詢子程序 。(INQUIRE) JNB S2,START1 。S2按下表示光標(biāo)上移， 。進(jìn)入START1 RET。*******************************************************DELAY40MS: MOV R7,250LOOP: MOV R6,40 DJNZ R6,$ DJNZ R7,LOOP RETDELAY100US: MOV R7,50 。100us時(shí)間較短，可在 。255內(nèi)完成，故只需一個(gè) 。變量R7，不需LOOP循 。環(huán) DJNZ R7,$ RETDELAY10MS: MOV R7,250LOOP1: MOV R6,10 DJNZ R6,$ DJNZ R7,LOOP RET。*********************************************************LCDreset: LCALL DELAY40MS 。開電源延遲40ms后 。再初始化，使液晶復(fù) 。位。set MOV lcd_m,w_m。先進(jìn)行功能設(shè)置，進(jìn)行 。兩遍，中間延遲100us， 。B存放寫指令前導(dǎo)碼， MOV lcd_data,00110000b。A存放功能設(shè)置指令， LCALL LCDwritedata 。調(diào)用寫數(shù)據(jù)子程序 LCALL DELAY100US。set MOV lcd_m,w_m。存入寫指令 11111000b MOV lcd_data,00110000b LCALL LCDwritedata LCALL DELAY100US。Display ON/OFF control 打開顯示 MOV lcd_m,w_m MOV lcd_data,00001100B LCALL LCDwritedata LCALL DELAY100US。Display clear 清除顯示 MOV lcd_m,w_m MOV lcd_data,00000001B LCALL LCDwritedata LCALL DELAY10MS。Enter Mode Set進(jìn)入模式設(shè)置 MOV lcd_m,w_m MOV lcd_data,00000110B LCALL LCDwritedata LCALL DELAY10MS RET。****************************************************顯示子程序boot_char11: DB 39。集成電路測(cè)試儀39。 DB 00H boot_char12: DB 39。電信601 秦潤(rùn)東39。 。當(dāng)漢字和 ASCII 混和 。時(shí)，注意英文字母必須要 。為偶數(shù)個(gè) DB 00Hboot_char21: DB 39。**器件檢測(cè)39。 DB 00Hboot_char22: DB 39。 器件查詢39。 DB 00Hboot_char23: DB 39。 器件檢測(cè)39。 DB 00Hboot_char24: DB 39。**器件查詢39。 DB 00Hboot_char3: DB 39。錯(cuò) 誤39。 DB 00Hboot_char4: DB 39。第一個(gè)門電路損壞39。 DB 00Hboot_char5: DB 39。第二個(gè)門電路損壞39。 DB 00Hboot_char6: DB 39。第三個(gè)門電路損壞39。 DB 00Hboot_char7: DB 39。第四個(gè)門電路損壞39。 DB 00Hboot_char20: DB 39。OK39。 DB 00Hboot_char21: DB 39。檢測(cè)完成39。 DB 00Hboot_char81: DB 39。*74LS0039。 DB 00Hboot_char82: DB 39。 74LS0239。 DB 00Hboot_char83: DB 39。 74LS0039。 DB 00Hboot_char84: DB 39。*74LS0239。 DB 00Hboot_char91: DB 39。74LS00資料39。 DB 00Hboot_char92: DB 39。74LS00資料39。 DB 00Hboot_char93: DB 39。74LS02資料39。 DB 00Hboot_char94: DB 39。74LS02資料39。 DB 00Hdischar1: MOV lcd_m,w_m。設(shè)置第一行地址 MOV lcd_data,80H ACALL LCDwritedata LCALL DELAY100US LCALL LCDdisString 。顯示界面第一行內(nèi)容 RETdischar2: MOV lcd_m,w_m。設(shè)置第二行地址 MOV lcd_data,90H ACALL LCDwritedata LCALL DELAY100US LCALL LCDdisString 。顯示界面第二行內(nèi)容 RET。********************************************************LCDwritedata: CLR LCD_CS 。準(zhǔn)備 NOP SETB LCD_CS 。選中 MOV A,lcd_m 。向液晶發(fā)送寫指令前 。導(dǎo)碼 ACALL LCDwritedata_SendByte MOV A,lcd_data 。向液晶發(fā)送功能指令 。00110000 ANL A,11110000B 。A為00110000 ACALL LCDwritedata_SendByte MOV A,lcd_data 。A為00110000 SWAP A ANL A