单片机汇编实验七：扫描键盘及液晶显示实验
加入技术交流群
////////////////////////////////////
//初始化液晶屏程序段
INTE: CLR P1.1 //读写选择端口清零
CLR P2.6 //关闭数码管
CLR P2.7
MOV A,#0X38
CALL WRITE_COM
CALL DELAY
MOV A,#0X0E
CALL WRITE_COM
CALL DELAY
CALL DELAY
MOV A,#0X06
CALL WRITE_COM
CALL DELAY
CALL DELAY
MOV A,#0X01
CALL WRITE_COM
CALL DELAY
CALL DELAY
MOV A,#0X80
CALL WRITE_COM
CALL DELAY0
RET
//10ms延时函数
DELAY:MOV R7,#0FFH
DELY1:MOV R6,#02AH
DELY2:NOP
DJNZ R6,DELY2
DJNZ R7,DELY1
RET
//5ms延时函数
DELAY0:MOV R7,#0FEH
DELY10:MOV R6,#02FH
DELY20:NOP
DJNZ R6,DELY2
DJNZ R7,DELY1
RET
//写命令函数
WRITE_COM:
MOV P0,A //暂定A为数据传输寄存器
CLR P1.0 //打开命令选择端口
CLR P1.1 //打开写选择端口
CLR P2.5 //液晶使能端
CALL DELAY //10MS
SETB P2.5 //液晶使能端
CALL DELAY //10MS
CLR P2.5 //液晶使能端
RET
// 写数据函数
WRITE_DATE:
MOV P0,A //暂定A为数据传输寄存器
SETB P1.0 //液晶数据/命令选择端口
CLR P1.1 //读写选择端口
CLR P2.5 //液晶使能端
CALL DELAY //10MS
SETB P2.5 //液晶使能端
CALL DELAY //10MS
CLR P2.5 //液晶使能端
RET
TABLE: DB 30H,31H,32H,33H,34H,35H,36H,37H,38H,39H,41H,42H,43H,44H,45H,46H,47H
END
评论