【正文】 EXDELAY 。延時(shí)約300mS CALL EXDELAY 。延時(shí)約300mS 。EXDELAY: 。演示延時(shí)子程序 MOV R2,30 。延時(shí)約300mSEDY_PA: MOV R1,100EDY_PB: MOV R0,49 DJNZ R0,$ DJNZ R1,EDY_PB DJNZ R2,EDY_PA RET。//子程序名稱:CHARFILL(A).。CHARFILL: 。整屏顯示A代表的ASCII字符子程序 MOV CXPOS,0 。第1列字符位置 MOV CYPOS,0 。第1行字符位置LFL_PA: CALL PUTCHAR 。定位寫(xiě)字符 CALL CHARCURSORNEXT 。置字符位置為下一個(gè)有效位置 MOV R0,CXPOS CJNE R0,0,LFL_PA。字符位置沒(méi)有回到第1列字符位置,則重復(fù)寫(xiě)字符 MOV R0,CYPOS CJNE R0,0,LFL_PA。字符位置沒(méi)有回到第1行字符位置,則重復(fù)寫(xiě)字符 RET//子程序名稱:PUTSTR(DPTR).。PUTSTR: 。定位寫(xiě)字符串子程序 CLR A MOVC A,@A+DPTR JZ PSR_LAX 。為零表示字符串結(jié)束,退出 CALL PUTCHAR 。寫(xiě)1個(gè)字符 CALL CHARCURSORNEXT 。字符位置移到下一個(gè) INC DPTR 。字符串指針移到下一個(gè) JMP PUTSTR 。重新讀字符串PSR_LAX: RET//子程序名稱:PUTCHAR(A).。PUTCHAR: 。在(CXPOS,CYPOS)字符位置寫(xiě)字符子程序 CALL CHARLCDPOS 。設(shè)置(CXPOS,CYPOS)字符位置的DDRAM地址 CALL LCDWD 。寫(xiě)字符 RET//子程序名稱:GETCHAR(A).GETCHAR: 。在(CXPOS,CYPOS)字符位置讀字符子程序 CALL CHARLCDPOS 。設(shè)置(CXPOS,CYPOS)字符位置的DDRAM地址 CALL LCDRD 。讀字符 RET。//子程序名稱:CHARLCDPOS().。CHARLCDPOS: 。設(shè)置(CXPOS,CYPOS)字符位置的DDRAM地址 PUSH ACC ANL CXPOS,0FH 。X位置范圍(0到15) ANL CYPOS,03H 。Y位置范圍(0到3) MOV A,CYPOS 。(CXPOS,CYPOS)對(duì)應(yīng)DDRAM地址 CJNE A,00,LPS_LA1 。(第一行)X: 第015個(gè)字符 MOV A,CXPOS 。 DDRAM: 00FH JMP LPS_LAXLPS_LA1:CJNE A,01,LPS_LA2 MOV A,CXPOS 。(第二行)X: 第015個(gè)字符 ADD A,40H 。 DDRAM: 404FH JMP LPS_LAXLPS_LA2:CJNE A,02,LPS_LAY MOV A,CXPOS 。(第三行)X: 第015個(gè)字符 ADD A,10H DDRAM: 101FH JMP LPS_LAXLPS_LAY:MOV A,CXPOS 。(第四行)X: 第015個(gè)字符 ADD A,50H 。DDRAM: 505FHLPS_LAX:ORL A,80H 。設(shè)置DDRAM地址 CALL LCDWC POP ACC RET。//子程序名稱:CHARCURSORNEXT().。CHARCURSORNEXT: 。置字符位置為下一個(gè)有效位置子程序 INC CXPOS 。字符位置加1 ANL CXPOS,0FH 。字符位置CXPOS的有效范圍為(0到15) MOV R0,CXPOS CJNE R0,0,CSN_LAX 。CXPOS為0表示要換行 INC CYPOS ANL CYPOS,03H 。字符位置CYPOS的有效范圍為(0到3)CSN_LAX: RET。//子程序名稱:LCDRESET().。LCDRESET: 。SMC1604系列液晶顯示控制器初始化子程序 MOV A,38H 。1604的顯示模式字為38H CALL LCDWC 。顯示模式設(shè)置第一次 CALL DELAY3MS 。延時(shí)3MS CALL LCDWC 。顯示模式設(shè)置第二次 CALL DELAY3MS 。延時(shí)3MS CALL LCDWC 。顯示模式設(shè)置第三次 CALL DELAY3MS 。延時(shí)3MS CALL LCDWC 。顯示模式設(shè)置第四次 CALL DELAY3MS 。延時(shí)3MS MOV A,08H 。顯示關(guān)閉 CALL LCDWC MOV A,01H 。清屏 CALL LCDWC CALL DELAY3MS 。延時(shí)3MS MOV A,06H 。顯示光標(biāo)移動(dòng)設(shè)置 CALL LCDWC MOV A,0CH 。顯示開(kāi)及光標(biāo)設(shè)置 CALL LCDWC RET RETDELAY3MS: 。延時(shí)3MS子程序 MOV R1,15DL3_PA: MOV R2,100 DJNZ R2,$ DJNZ R1,DL3_PA RET。//LCDWC,LCDWD,LCDRD為HD44780兼容芯片的MCS51模擬口線方式的基本子程序//LCDWAITIDLE為內(nèi)部子程序.//子程序名稱:LCDWC(A).LCDWC: 。送控制字子程序 CALL LCDWAITIDLE 。HD44780液晶顯示控制器忙檢測(cè) CLR RSPIN 。RS=0 RW=0 E=高脈沖 CLR RWPIN MOV P1,A SETB EPIN NOP CLR EPIN RET。//子程序名稱:LCDWD(A).。LCDWD: 。送數(shù)據(jù)子程序 CALL LCDWAITIDLE 。HD44780液晶顯示控制器忙檢測(cè) SETB RSPIN 。RS=1 RW=0 E=高脈沖 CLR RWPIN MOV P1,A SETB EPIN NOP CLR EPIN RET。//子程序名稱:LCDRD().。LCDRD: 。讀數(shù)據(jù)子程序 CALL LCDWAITIDLE 。HD44780液晶顯示控制器忙檢測(cè) MOV P1,0FFH SETB RSPIN 。RS=1 RW=0 E=高脈沖 SETB RWPIN SETB EPIN NOP MOV A,P1 CLR EPIN RET。//子程序名稱:LCDWAITIDLE().LCDWAITIDLE: 。忙檢測(cè)子程序 PUSH ACC 。正常讀寫(xiě)操作之前必須檢測(cè)LCD控制器狀態(tài) MOV P1,0FFH 。狀態(tài)字的D7位為0表示LCD控制器空閑,可以 。進(jìn)行讀寫(xiě)操作 CLR RSPIN 。RS=0 RW=1 E=高電平 SETB RWPIN SETB EPIN MOV R0,20WTD_PA: NOP 。 JNB ,WTD_LAX 。D7=0 表示LCD控制器空閑,則退出檢測(cè) DJNZ R0,WTD_PA 。D7=1 表示LCD控制器忙,則繼續(xù)檢測(cè)。若忙時(shí)間超過(guò)100uS,則表示LCD控制器硬件。出錯(cuò),退出檢測(cè) NOP 。用戶可在此設(shè)置錯(cuò)誤代碼,或仿真時(shí)設(shè)置斷點(diǎn)WTD_LAX: CLR EPIN POP ACC RE