RS EQU P2.7
RW EQU P2.6
E EQU P2.5
PSB EQU P2.4 ;高是并行的 低是串行的
RST EQU P2.2 ;復位
com equ 20h
dat equ 21h
;********************************************************************************
;程序開始
;********************************************************************************
ORG 0000H
LJMP MAIN
ORG 0100H
;-----------------------------------------------
MAIN:
CLR P2.1
CLR P2.0
MOV p0,#0ffh
LCALL DELAY2
SETB RST
SETB PSB ;通訊方式為8位數據并口
;********************初始化**********************
LGS0:
MOV com,#30H ;30H--基本指令操作
LCALL SEND_I
MOV com,#01H ;清除顯示
LCALL SEND_I
MOV com,#06H ;指定在資料寫入或讀取時，光標的移動方向
LCALL SEND_I
MOV com,#0cH ;開顯示,關光標,不閃爍
LCALL SEND_I
;===============================================
;顯示漢字和字符
;加入80ms的延時，使你能夠看清楚顯示的過程
;根據漢字顯示坐標分段寫入（順序寫入）
;=================================================
MOV DPTR,#TAB1 ;顯示漢字和字符
MOV com,#82H ;第一行起始地址
LCALL SEND_I
MOV R1,#0
MOV A,#0
MOV R2,#8
LOOP:
MOV a,r1
MOVC A,@A+DPTR
MOV dat,a
LCALL SEND_DATA
inc r1
DJNZ R2,LOOP
sJMP $
;===============================================
;寫數據子程序
;RS=1,RW=0,E=高脈沖,D0-D7=數據
;===============================================
SEND_data:
lcall delay2
clr rs
setb rw
SETB RS
CLR RW
clr e
MOV P0,dat
SETB E
NOP
NOP
CLR E
RET
;===============================================
;寫指令子程序
;RS=0,RW=0,E=高脈沖,D0-D7=指令碼
;===============================================
SEND_I:
lcall delay2
setb rs
setb rw
CLR RS
CLR RW
clr e
MOV P0,com
SETB E
NOP
NOP
CLR E
RET
;延時子程序
DELAY2:
MOV R6,#60H
DEL21: MOV R7,#60H
DEL22: DJNZ R7,DEL22
DJNZ R6,DEL21
RET
;***********************************************
TAB1: DB 0CCH,0ECH,0BFH,0D5H,0B5H,0E7H,0D7H,0D3H ;天空電子
end
| |
|
|
66821730(技術支持)
