1602logo.asm

1602的显示程序

;********************************************************************************
;1602液晶显示CHINA SHEN ZHEN XUE LIN DIAN ZI                                    *
;********************************************************************************
;*  日期:  2007-3-25                                                            *
;*  版本:  3.0                                                                  *
;*  作者:  深圳学林电子有限公司     专业8051单片机教学站                        *
;*  邮箱: [e-mail]                                                       *
;*  网站： http://www.51c51.com     http://www.8951.com    更多例程请登陆网站   *
;********************************************************************************
;*  硬件：此程序在本公司xlisp系列单片机实验仪运行通过                           *
;********************************************************************************
;* 【版权】 Copyright(C)深圳学林电子有限公司 www.51c51.com  All Rights Reserved *
;* 【声明】 此程序仅用于学习与参考，引用请注明版权和作者信息！                  *
;********************************************************************************
RS EQU p2.0;液晶接口的定义
RW EQU p2.1
E  EQU p2.2
	org	0000h
	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