📄 h16032.asm
字号:
;***************************************************************************
;* Title : Accessing to LCD-CONTROLLER *
;* Date : 99.4.6 *
;* Support telephone: 0731-4167806,4167808(ChangSha SUMAN) *
;* Support fax : 0731-4167807 *
;* Create by : 褚建军(chujianjun),朱长春(zhuchangchun) *
;* DESCRIPTION:This subroutine shows how to write data to LCD-CONTROLLER *
;***************************************************************************
XPOS EQU 20H
YPOS EQU 21H
ORG 0000H
JMP START
START: MOV SP,#60H
CALL LCDRESET
MAIN:
MOV A,#55H
CALL LCDFILL
MOV DPTR,#STRING1
CALL PUTSTR
CALL PUTSTR
CALL PUTSTR
CALL PUTSTR
JMP MAIN
GETSTRCHAR:
GSC_PA:
CLR A
MOVC A,@A+DPTR
INC DPTR
MOV B,A
INC A
CLR C
JZ GSC_LAX
CLR A
MOVC A,@A+DPTR
INC DPTR
SETB C
GSC_LAX:
RET
PUTSTR:
CALL DELAY
CALL GETSTRCHAR
PUSH DPL
PUSH DPH
JNC PSR_LAX
JNB B.7,PSR_LBY
;CHINESE:
CALL HZKPOS
CALL PUTCHARDOT
CALL PUTCHARDOT
JMP PSR_LBX
PSR_LBY:
;ENGLISH:
CALL HZKPOS
CALL PUTCHARDOT
PSR_LBX:
POP DPH
POP DPL
JMP PUTSTR
PSR_LAX:POP DPH
POP DPL
RET
HZKPOS:
MOV R2,#5
HTP_PA:
CLR C
RLC A
XCH A,B
RLC A
XCH A,B
DJNZ R2,HTP_PA
MOV DPTR,#HZKDOT
ADD A,DPL
MOV DPL,A
MOV A,B
ADDC A,DPH
MOV DPH,A
RET
DELAY:
MOV R6,#2
DLY_PA: MOV R5,#0
DLY_PB: MOV R4,#0
DJNZ R4,$
DJNZ R5,DLY_PB
DJNZ R6,DLY_PA
RET
LCDFILL:
MOV R7,A
MOV XPOS,#0
MOV YPOS,#0
LFL_PA: MOV A,R7
CALL LCDWRITE
CALL CUSORNEXT
MOV A,XPOS
ORL A,YPOS
JNZ LFL_PA
RET
INCLUDE "SB16032.ASM"
HZKDOT:
INCLUDE "SEND\16032\HZKLIB.ASM"
INCLUDE "SEND\16032\HZKSTR.ASM"
END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -