12864显示程序(汇编语言)

;*********************************************

;Controller:ST7920

;MCU:AT89C51 ,晶体频率：12MHz

;LCM:128*64

;LCM型号:带中文字库的128X64-0402

;LCM 接口:1:GND 2:VCC 3:V0 4.RS 5:RW 6:E 7--14:DB0-DB7 15:PSB 16:NC 17:RST 18:Vout

;**********************************************

;占用单元30H,31H,32H,33H,A,DPTR,R2,R4,R6,R7

;功能：显示 浙江工业职业技术

; 学院电子协会欢迎

; 您

;

RS EQU P2.4 ;RS=“H”,表示DB7——DB0为显示数据

;RS=“L”,表示DB7——DB0为显示指令数据

RW EQU P2.5 ;R/W=“H”,E=“H”,数据被读到DB7——DB0

;R/W=“L”,E=“H→L”, DB7——DB0的数据被写到IR或DR

E EQU P2.6 ;使能信号

PSB EQU P2.7 ;H：8位或4位并口方式，L：串口方式（见注释1）

RST EQU P2.0 ;复位端，低电平有效

;模块内部接有上电复位电路，因此在不需要经常复位的场合可将该端悬空

COM EQU 30H ;DD RAM 地址存放单元

DAT EQU 31H ;汉字代码数据存放单元

DAT1 EQU 32H ;汉字码址表低位存放单元

DAT2 EQU 33H ;汉字码址表高位存放单元

;******************************以上是接口定义

ORG 0000H

AJMP START

ORG 0030H

START: MOV SP,#60H

LJMP DISP

;*********************************

DISP: CLR PSB

LCALL DELAY

SETB PSB ;将PSB置1，通信方式为8位数据并口

LCALL DELAY

MOV COM,#30H ;功能设置---8BIT控制界面，基本指令集

ACALL WRI ;调用写指令子程序

LCALL DELAY ;延迟39uS

MOV COM,#0CH ;显示打开，光标关，反白显示关

ACALL WRI ;调用写指令子程序

LCALL DELAY ;延迟39uS

MOV COM,#01H ;清除屏幕显示，将DDRAM的地址计数器归零

ACALL WRI ;调用写指令子程序

LCALL DELAY ;延迟39uS

MOV COM,#06H ;DDRAM的地址计数器（AC）加1

ACALL WRI ;调用写指令子程序

LCALL DELAY ;延迟39uS

;****************************************************

;右移显示，时间间隔为1秒

DISPX: MOV R0,#00H ;显示文字偏移量

MOV R1,#00H ;附加显示文字偏移量

MOV R2,#1 ;显示文字个数

MOV R3,#1 ;附加显示文字个数

MOV R4,#25 ;总的显示次数

DISP1: MOV COM,#80H ;显示首地址

ACALL WRI ;调用写指令子程序

ACALL DISP11 ;调用右移显示子程序

INC R3 ;取下一次显示文字个数

MOV A,R3

CJNE A,#9,DISP12 ;判断文字个数是

否超过8

MOV A,#8 ;超过8个就定死显示个数

MOV R3,A ;把新的显示个数进行保存

DISP12: MOV R2,A

MOV A,R1 ;把原先的文字偏移量加2得到新的首位文字偏移量

ADD A,#2

MOV R0,A ;保存新的文字偏移量

MOV R1,A

ACALL DELAY1 ;延时下1秒再进行下一次显示

MOV COM,#01H ;清除屏幕显示，将DDRAM的地址计数器归零

ACALL WRI ;调用写指令子程序

ACALL DELAY ;延时

ACALL DELAY

ACALL DELAY

DJNZ R4,DISP1 ;判断移位显示是否完毕

MOV R0,#00H ;显示文字偏移量

MOV R1,#00H ;附加显示文字偏移量

MOV R2,#1 ;显示文字个数

MOV R3,#1 ;附加显示文字个数

MOV R4,#25 ;总的显示次数

MOV B,#97H ;显示首地址

DISP2: MOV COM,B ;送首位显示地址

ACALL WRI ;调用写指令子程序

ACALL DISP21 ;调用左移显示子程序

MOV R0,#00H ;重新放首位显示偏移量

INC R3 ;取下一次显示位数，并进行判断

MOV A,R3

CJNE A,#9,DISP22

MOV A,#8

MOV R3,A ;保存显示位数

DISP22: MOV R2,A

DEC B ;取下一次显示首地址，并进行判断

MOV A,B

CJNE A,#8FH,DISP23

MOV B,#90H ;首地址小于90H时就定死在90H

INC R1 ;这时的首位文字偏移量也要相应改变

INC R1

MOV A,R1

MOV R0,A

DISP23: ACALL DELAY1

MOV COM,#01H ;清除屏幕显示，将DDRAM的地址计数器归零

ACALL WRI ;调用写指令子程序

ACALL DELAY

ACALL DELAY

ACALL DELAY

DJNZ R4,DISP2

;右移显示，时间间隔为1秒

MOV R0,#00H

MOV R1,#00H

MOV R2,#1

MOV R3,#1

MOV R4,#25

DISP3: MOV COM,#88H

ACALL WRI

ACALL DISP11

INC R3

MOV A,R3

CJNE A,#9,DISP32

MOV A,#8

MOV R3,A

DISP32: MOV R2,A

MOV A,R1

ADD A,#2

MOV R0,A

MOV R1,A

ACALL DELAY1

MOV COM,#01H ;清除屏幕显示，将DDRAM的地址计数器归零

ACALL WRI ;调用写指令子程序

ACALL DELAY

ACALL DELAY

ACALL DELAY

DJNZ R4,DISP3

MOV R0,#00H

MOV R1,#00H

MOV R2,#1

MOV R3,#1

MOV R4,#25

MOV B,#9FH

DISP4: MOV COM,B

ACALL WRI

ACALL DISP21

MOV R0,#00H

INC R3

MOV A,R3

CJNE A,#9,DISP42

MOV A,#8

MOV R3,A

DISP42: MOV R2,A

DEC B

MOV A,B

CJNE A,#97H,DISP43

MOV B,#98H

INC R1

INC R1

MOV A,R1

MOV R0,A

DISP43: ACALL DELAY1

MOV COM,#01H ;清除屏幕显示，将DDRAM的地址计数器归零

ACALL WRI ;调用写指令子程序

ACALL DELAY

ACALL DELAY

ACALL DELAY

DJNZ R4,DISP4

;逐个显示从“浙”开始到“您”；时间间隔为1秒

DISP5: MOV R0,#00H

MOV R2,#8

MOV COM,#80H

ACALL WRI

ACALL DISP31

MOV R0,#10H

MOV R2,#8

MOV COM,#90H

ACALL WRI

ACALL DISP31

MOV R0,#20H

MOV R2,#1

MOV COM,#88H

ACALL WRI

ACALL DISP31

ACALL DELAY1

;====================================

;清除屏幕显示，延时1秒

MOV COM,#01H ;清除屏幕显示，将DDRAM的地址计数器归零

ACALL WRI ;调用写指令子程序

ACALL DELAY1

;====================================

AJMP DISPX

;==============================

;字符显示子程序

DISP11: MOV A,R0 ;送偏高位偏移量

MOV DPTR,#TAB ;置表头地址

MOVC A,@A+DPTR ;查表得到字符代码

MOV DAT,A ;送汉字码址表高位

ACALL WRD ;写入第一字节数据

INC R0

MOV A,R0

MOVC A,@A+DPTR ;查表得到字符代码

MOV DAT,A ;送汉字码址表低位

ACALL WRD ;写入第二字节数据

MOV A,R0 ;文字偏移量减三得到下一个要显示文字的偏移量

CLR C

SUBB A,#3

MOV R0,A

DJNZ R2,DISP11 ;判断是否显示满

RET

;=============================

;字符显示子程序

DISP21: MOV A,R0 ;送偏高位偏移量

MOV DPTR,#TAB ;置表头地址

MOVC A,@A+DPTR ;查表得到字符代码

MOV DAT,A ;送汉字码址表高位

ACALL WRD ;写入第一字节数据

INC R0

MOV A,R0

MOVC A,@A+DPTR ;查表得到字符代码

MOV DAT,A ;送汉字码址表低位

ACALL WRD ;写入第二字节数据

INC R0 ;取下一个字符地址

ACALL DELAY

DJNZ R2,DISP21 ;判断是否显示满

RET

;==========================

;字符显示子程序

DISP31: MOV A,R0 ;送偏高位偏移量

MOV DPTR,#TAB ;置表头地址

MOVC A,@A+DPT

R ;查表得到字符代码

MOV DAT,A ;送汉字码址表高位

ACALL WRD ;写入第一字节数据

INC R0

MOV A,R0

MOVC A,@A+DPTR ;查表得到字符代码

MOV DAT,A ;送汉字码址表低位

ACALL WRD ;写入第二字节数据

INC R0 ;取下一个字符地址

ACALL DELAY1

DJNZ R2,DISP31 ;判断是否显示满

RET

;**************************

WRI: PUSH ACC

CLR RS

SETB RW

WRI1: MOV P0,#0FFH

SETB E

MOV A,P0

CLR E

JB ACC.7,WRI1

CLR RW

MOV P0,COM

SETB E

CLR E

POP ACC

RET

;********************以上是写指令子程序

WRD: PUSH ACC

CLR RS

SETB RW

WRD1: MOV P0,#0FFH

SETB E

MOV A,P0

CLR E

JB ACC.7,WRD1

SETB RS

CLR RW

MOV P0,DAT

SETB E

CLR E

POP ACC

RET

;********************以上是写数据子程序

DELAY: MOV R7,#0FFH

DELAY4: MOV R6,#00FH

LOOP2: DJNZ R6,LOOP2

DJNZ R7,DELAY4

RET

DELAY1: MOV R5,#08H

DELAY11:MOV R7,#0FFH

DELAY41:MOV R6,#0FFH

DJNZ R6,$

DJNZ R7,DELAY41

DJNZ R5,DELAY11

RET

;************************以上是延时子程序

TAB: DB 0D5H,0E3H, 0BDH,0ADH, 0B9H,0A4H, 0D2H,0B5H ;第一行前四个字（浙江工业）

DB 0D6H,0B0H, 0D2H,0B5H, 0BCH,0BCH, 0CAH,0F5H ;第一行后四个字（职业技术）

DB 0D1H,0A7H, 0D4H,0BAH, 0B5H,0E7H, 0D7H,0D3H ;第二行前四个字（学院电子）

DB 0D0H,0ADH, 0BBH,0E1H, 0BBH,0B6H, 0D3H,0ADH ;第二行后四个字（协会欢迎）

DB 0C4H,0FAH, 0A3H,0A0H, 0A3H,0A0H, 0A3H,0A0H ;第三行前四个字（您 ）

DB 0A3H,0A0H, 0A3H,0A0H, 0A3H,0A0H, 0A3H,0A0H ;第三行后四个字（ ）

DB 0A3H,0A0H, 0A3H,0A0H, 0A3H,0A0H, 0A3H,0A0H