;********************************************************************************
;* 硬件：此程序在本公司xlisp系列单片机实验仪运行通过 *
;********************************************************************************
;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！ *
;********************************************************************************
RS EQU p2.0;液晶接口的定义
RW EQU p2.1
E EQU p2.2
org0000h
MOV SP ,#70H;设置堆栈
MOV p0,#01H;清屏
CALL ENABLE
MOV p0,#38H;显示功能
CALL ENABLE
MOV p0,#0FH;显示开关控制
CALL ENABLE
MOV p0,#06H;+1
CALL ENABLE
MOV p0,#80H;第一行的开始位置
cALL ENABLE
MOV DPTR,#TABLE1;显示
CALL WRITE1;到TABLE1取码?
MOV p0,#0C0H;第二行的位置
CALL ENABLE
MOV DPTR,#TABLE2;显示
CALL WRITE1;到TABLE2 取码
;MOV p0,#0C2H;光标定位0C0H
CALL ENABLE
JMP $
ENABLE: CLR RS ;送命令
CLR RW
CLR E
CALL DELAY
SETB E
RET
WRITE1: MOV R1,#00H ;显示table中的值
A1: MOV A,R1;到table取码
MOVC A,@A+DPTR
call wRITE2 ;显示到lcd
INC R1
CJNE A,#00H,A1 ;是否到00h
RET
WRITE2:MOV p0,A ;显示
SETB RS
CLR RW
CLR E
CALL DELAY
SETB E
RET
DELAY: MOV R4,#05
D1:MOV R5,#0FFH
DJNZ R5,$
DJNZ R4,D1
RET
table1: db"CHINA--SHEN ZHEN",00H
table2: db" XUE LIN DIAN ZI",00H
end
hex格式文件下载（点右键，目标另存为hex即可直接烧写）
|
