本 科 毕 业 设 计
第 45 页 共 48 页
LCALL CLS ；调用清除LCM子程序
MOV A,#80H ；向A送立即数80H设定显示地址为第一行第一列
LCALL WRITE_COM ；调用写指令到LCM子程序
MOV DPTR,#LINE1 ；将第一行字符串的启始地址送如DPTR中
LCALL DISP ；调用显示字符串到LCM子程序
MOV A,#0C0H ；向A送立即数0C0H设定显示地址为第二行第一列
LCALL WRITE_COM MOV DPTR,#LINE2 LCALL DISP SJMP $
INITIAL: MOV A,#38H LCALL WRITE_COM MOV A,#0EH
LCALL WRITE_COM MOV A,#06H LCALL WRITE_COM
RET
CHECK_BUSY: PUSH ACC BUSY_LOOP: CLR LCM_E SETB LCM_RW
CLR LCM_RS
SETB LCM_E
MOV A,LCM_DATA
CLR LCM_E
JB ACC.7,BUSY_LOOP
POP ACC LCALL DEL RET
WRITE_COM: LCALL CHECK_BUSY ；调用写指令到LCM子程序
；将第二行字符串的启始地址送如DPTR中 ；调用显示字符串到LCM子程序 ；启动LCM子程序 ；查询忙碌信号子程序 ；写指令到LCM子程序
本 科 毕 业 设 计
CLR LCM_E CLR LCM_RS CLR LCM_RW
SETB LCM_E MOV LCM_DATA,A
CLR LCM_E
第 46 页 共 48 页
RET
WRITE_DATA: LCALL CHECK_BUSY CLR LCM_E SETB LCM_RS
CLR LCM_RW SETB LCM_E
MOV LCM_DATA,A CLR LCM_E RET
CLS: MOV A,#01H LCALL WRITE_COM
RET
DEL: MOV R6,#5 MOV R7,#248 DJNZ R7,$
DJNZ R6,D1
RET
DISP: PUSH ACC CLR A MOVC A,@A+DPTR JZ END_DISP LCALL WRITE_DATA INC DPTR LCM子程序 LCM子程序 ；2.7MS延时子程序D1: A的内容压栈DISP_LOOP:
A清零
A ；若查到的内容为0则终止查表 ；调用写数据到LCM子程序 ；DPTR加1指向下一个对象
；写数据到；清除；将；；查表将字符串内容送入 本 科 毕 业 设 计
第 47 页 共 48 页
SJMP DISP_LOOP ；跳转到DISP_LOOP循环执行END_DISP: POP ACC ；弹出压栈内容至A
RET
END
********************************结束***************************************
本 科 毕 业 设 计
第 48 页 共 48 页
