<?xml:namespace prefix = v ns = "urn:schemas-microsoft-com:vml" /><?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />
1602液晶显示字符A,我们已经做过了!我又做了这个,就是通过按键控制液晶显示特定的字符!仿真图如上图所示!
汇编程序如下:
RS EQU P3.4 RW EQU P3.5 E EQU P3.6 DBZ DATA P2 ORG 0000H LJMP MAIN ORG 0030H MAIN: MOV SP,#60H MOV P1,#0FFH MOV DBZ,#01H ;清除屏幕 LCALL ENABLE MOV DBZ,#38H ;8位点阵 LCALL ENABLE MOV DBZ,#0FH ;开显示 LCALL ENABLE MOV DBZ,#06H ;移动光标 LCALL ENABLE MOV DBZ,#80H ;显示位置 LCALL ENABLE D1: LCALL DELAY JNB P1.0,L1 MOV DBZ,#01H LCALL ENABLE MOV DPTR,#TABLE1 ;送第一句话 LCALL WRITE1 LCALL ENABLE MOV DBZ,#01H LJMP L1 D2: LCALL DELAY JNB P1.1,L1 MOV DBZ,#01H LCALL ENABLE MOV DPTR,#TABLE2;送第二句话 LCALL WRITE1 LCALL ENABLE MOV DBZ,#01H LJMP L1 D3: LCALL DELAY JNB P1.2,L1 MOV DBZ,#01H LCALL ENABLE MOV DPTR,#TABLE3 ;送第三句话 LCALL WRITE1 LCALL ENABLE MOV DBZ,#01H LJMP L1 D4: LCALL DELAY JNB P1.3,L1 MOV DBZ,#01H LCALL ENABLE MOV DPTR,#TABLE4 ;送第四句话 LCALL WRITE1 LCALL ENABLE MOV DBZ,#01H LJMP L<?xml:namespace prefix = st1 ns = "urn:schemas-microsoft-com:office:smarttags" />1 L1: JNB P1.0,D1 ;监测键盘 JNB p1.1,D2 JNB p1.2,D3 JNB P1.3,D4 LJMP L1 ENABLE: ;送命令 CLR RS CLR RW CLR E LCALL DELAY SETB E RET WRITE1: ;送字符串 MOV R1,#00H A1: MOV A,R1 MOVC A,@A+DPTR LCALL WRITE2 INC R1 CJNE A,#00H,a1 ;以00H做字符串结束标志 RET WRITE2: ;送单个字符 MOV DBZ,A SETB RS CLR RW CLR E LCALL DELAY SETB E RET DELAY: ;延时子程序 MOV R7,#255 DEL:MOV R6,#255 DJNZ R6,$ DJNZ R7,DEL RET ;以下每个表格都是一句话,以00H作为每句话的结尾. TABLE1: DB "Welcome to here!" 00H TABLE2: DB " www.wfec.cn " 00H TABLE3: DB " jd.wfec.cn " 00H TABLE4: DB "A good tomorrow!" 00H END
下面是程序运行后初始化显示内容“Welcome to here!”:
按一下按键K1,液晶屏显示“Welcome to here!”如上图所示。
按一下按键K2,液晶屏显示“www.wfec.cn”,也就是我们学院的网址!如下图:
按一下按键K3,液晶屏显示“jd.wfec.cn”,也就是我们系的网址!如下图:
按一下按键K4,液晶屏显示“A good tomorrow”。如下图:
|
文章评论(0条评论)
登录后参与讨论