📄 正在检测.txt
字号:
NOP
NOP
NOP
NOP
MOV A,DATBUS ; 读状态字
CLR E1 ; E=0
JB ACC.7,PR51 ; 判"忙"标志为"0"否, 否再读
SETB RS ; RS=1
CLR RW ; R/W=0
MOV DATBUS,DAT1 ; 写数据
SETB E1 ; E=1
NOP
NOP
NOP
NOP
NOP
NOP
CLR E1 ; E=0
RET
; 2.3 读显示数据子程序(右)
PR6: SETB CSB ; 片选设置为"10"
CLR CSA ;
CLR RS ; RS=0
SETB RW ; R/W=1
PR61: MOV DATBUS,#0FFH ; DATBUS口置"1"
NOP
NOP
NOP
NOP
NOP
NOP
NOP
SETB E1 ; E=1
NOP
NOP
NOP
NOP
NOP
MOV A,DATBUS ; 读状态字
CLR E1 ; E=0
JB ACC.7,PR61 ; 判"忙"标志为"0"否, 否再读
SETB RS ; RS=1
MOV DATBUS,#0FFH ; DATBUS口置"0"
NOP
NOP
NOP
NOP
NOP
NOP
SETB E1 ; E=1
MOV DAT1,DATBUS ; 读数据
NOP
NOP
NOP
NOP
NOP
NOP
CLR E1 ; E=0
RET
;16*16点阵中文写入子程序CCW_PR(适应MGLS12864)
; 占用内部资源：O_XL,O_YL,CODE,COUNT1,A,B,DPTR
; 内部调用子程序：PR1,PR2,PR4,PR5
; 连接字库： CCTAB
; 程序调用入口： CCW_PR
; 程序输入变量： O_XL，O_YL，CODE
;---------------------------------------------------------------------
CCW_PR: MOV DPTR,#CCTAB ; 确定字符字模块首地址
MOV A,CODE ; 取代码
MOV B,#20H ; 字模块宽度为32个字节
MUL AB ; 代码x32
ADD A,DPL ; 字符字模块首地址
MOV DPL,A ; = 字模库首地址 + 代码x 32
MOV A,B
ADDC A,DPH
MOV DPH,A
PUSH O_XL ; 列地址入栈
PUSH O_XL ; 列地址入栈
MOV CODE,#00H ; 代码寄存器借用为间址寄存器
CCW_1: MOV COUNT1,#10H ; 计数器设置为16
MOV A,O_YL ; 读页地址寄存器
ANL A,#07H
ORL A,#0B8H ; "或"页地址设置代码
MOV COM,A ; 写页地址设置指令
LCALL PR1
LCALL PR4
POP O_XL ; 取列地址值
MOV A,O_XL ; 读列地址寄存器
CLR C
SUBB A,#40H ; 列地址-64
JC CCW_2 ; 〈0为左屏显示区域
MOV O_XL,A ; ≥0为右屏显示区域
MOV A,O_YL
SETB ACC.5 ; 设置区域标志位.
MOV O_YL,A ; "00"为左,"10"为右
CCW_2: MOV COM,O_XL ; 设置列地址值
ORL COM,#40H ; "或"列地址指令标志位
MOV A,O_YL ; 判区域标志以确定设置哪个控制器
ANL A,#30H
CCW_31: CJNE A,#20H,CCW_32 ; "10"为右区
LCALL PR4
LJMP CCW_4
CCW_32: LCALL PR1 ; "00"为左区
CCW_4: MOV A,CODE ; 取间址寄存器值
MOVC A,@A+DPTR ; 取汉字字模数据
MOV DAT1,A ; 写数据
MOV A,O_YL ; 判区域标志
ANL A,#30H
CCW_41: CJNE A,#20H,CCW_42 ; "10"为右区
LCALL PR5
LJMP CCW_5
CCW_42: LCALL PR2 ; "00"为左区
CCW_5: INC CODE ; 间址寄存器加1
INC O_XL ; 列地址寄存器加1
MOV A,O_XL ; 判列地址是否超出区域范围
CJNE A,#40H,CCW_6
CCW_6: JC CCW_7 ; 未超出则继续
MOV O_XL,#00H
MOV A,O_YL ; 超出则判在何区域
JB ACC.5,CCW_8 ; 在右区域则退出
CCW_61: SETB ACC.5 ; 在左区则转右区
MOV O_YL,A
MOV COM,#40H ; 设置右区列地址为"0"
LCALL PR4
CCW_7: DJNZ COUNT1,CCW_4 ; 当页循环
CCW_8: MOV A,O_YL ; 读页地址寄存器
JB ACC.7,CCW_9 ; 判完成标志D7位, "1"则完成退出
INC A ; 否则页地址加1
SETB ACC.7 ; 置完成位为"1"
ANL A,#0CFH ; 清区域标志
MOV O_YL,A
MOV CODE,#10H ; 间址寄存器设置为16
LJMP CCW_1 ; 大循环
CCW_9: RET
;**************************************************************************
;============= 西文显示演示程序段 ====================
DISTEXT: MOV O_YL,#85H ; 8x8点阵字体, 第6页
MOV O_XL,#10H ; 起始列为第48列
MOV CODE,#34H ; 字符代码
LCALL CW_PR
MOV O_YL,#85H
MOV O_XL,#1CH
MOV CODE,#45H
LCALL CW_PR
MOV O_YL,#85H
MOV O_XL,#28H
MOV CODE,#4CH
LCALL CW_PR
MOV O_YL,#85H
MOV O_XL,#34H
MOV CODE,#1AH
LCALL CW_PR
MOV R7,#00H
MOV R6,#40H
LOOP: MOV A,R7
MOV DPTR,#TAB1
MOVC A,@A+DPTR
MOV CODE,A
MOV O_YL,#05H ; 6X8点阵字体, 第4页
MOV O_XL,R6
LCALL CW_PR
INC R7
MOV A,#06H
ADD A,R6
MOV R6,A
CJNE R7,#08H,LOOP
SJMP $
TAB1: DB 16H,12H,16H,11H,16H,18H,12H,17H
; 西文字符写入子程序CW_PR(适应MGLS12864)
; 占用内部资源：O_XL,O_YL,CODE,COUNT1,A,B,DPTR
; 内部调用子程序：PR1,PR2,PR4,PR5
; 连接字库： CHTAB
; 程序调用入口： CW_PR
; 程序输入变量： O_XL，O_YL，CODE
CW_PR: MOV DPTR,#CHTAB ; 确定字符字模块首地址
MOV A,CODE ; 取代码
MOV B,#08H ; 字模块宽度为8个字节
MUL AB ; 代码x8
ADD A,DPL ; 字符字模块首地址
MOV DPL,A ; = 字模库首地址 + 代码x 8
MOV A,B
ADDC A,DPH
MOV DPH,A
MOV CODE,#00H ; 借用为间址寄存器
MOV A,O_YL ; 读页地址寄存器
JB ACC.7,CW_1 ; 判字符体
MOV COUNT1,#06H ; 6x8点阵
LJMP CW_2
CW_1: MOV COUNT1,#08H ; 8x8点阵
CW_2: ANL A,#07H ; 取页地址值
ORL A,#0B8H ; "或"页地址指令代码
MOV COM,A ; 写页地址指针
LCALL PR1
LCALL PR4
MOV A,O_XL ; 读列地址寄存器
CLR C
SUBB A,#40H ; 列地址-64
JC CW_3 ; 〈0为左屏显示区域
MOV O_XL,A ; ≥0为右屏显示区域
MOV A,O_YL
SETB ACC.5 ; 设置区域标志位.
MOV O_YL,A ; "00"为左,"10"为右
CW_3: MOV COM,O_XL ; 设置列地址值
ORL COM,#40H ; "或"列地址指令标志位
MOV A,O_YL ; 判区域标志以确定设置哪个控制器
ANL A,#30H
CW_31: CJNE A,#20H,CW_32 ; "10"为右区
LCALL PR4
LJMP CW_4
CW_32: LCALL PR1 ; "00"为左区
CW_4: MOV A,CODE ; 取间址寄存器值
MOVC A,@A+DPTR ; 取字符字模数据
MOV DAT1,A ; 写数据
MOV A,O_YL ; 判区域标志
ANL A,#30H
CW_41: CJNE A,#20H,CW_42 ; "10"为右区
LCALL PR5
LJMP CW_5
CW_42: LCALL PR2 ; "00"为左区
CW_5: INC CODE ; 间址加1
INC O_XL ; 列地址加1
MOV A,O_XL ; 判列地址是否超出区域范围
CJNE A,#40H,CW_6
CW_6: JC CW_9 ; 未超出则继续
MOV O_XL,#00H ;
MOV A,O_YL ; 超出则判在何区域
JB ACC.5,CW_91 ; 在右区域则退出
CW_61: SETB ACC.5 ; 在左区则转右区
MOV O_YL,A
MOV COM,#40H ; 设置右区列地址为"0"
LCALL PR4
CW_9: DJNZ COUNT1,CW_4 ; 循环
CW_91: RET
;============= 中文演示显示程序段 ==================
DISCHA: MOV O_YL,#02H ; 第3页
MOV O_XL,#00H ;
MOV CODE,#00H ; 汉字代码
LCALL CCW_PR
MOV O_YL,#02H ; 第3页
MOV O_XL,#12H ;
MOV CODE,#01H ; 汉字代码
LCALL CCW_PR
MOV O_YL,#02H ; 第3页
MOV O_XL,#24H ;
MOV CODE,#02H ; 汉字代码
LCALL CCW_PR
MOV O_YL,#02H ; 第3页
MOV O_XL,#36H ;
MOV CODE,#03H ; 汉字代码
LCALL CCW_PR
NOP
NOP
NOP
LJMP DRAW
RET
SJMP $
;=========== 滚动演示程序段 ==============================
S_UP: MOV R7,#00H ; 向上滚动程序
S_UP1: MOV A,#0C0H ; 显示起始行设置代码
ORL A,R7
MOV COM,A
LCALL PR1
LCALL PR4
; LCALL PR7
LCALL DELAY
INC R7
;LCALL DELAY;725
CJNE R7,#40H,S_UP1
MOV R7,#00H
;LCALL DELAY;725
SJMP S_UP1
;------------------------------------------------------------
S_DOWN: MOV R7,#3FH ; 向下滚动程序
MOV COM,#0C0H ; 显示起始行设置代码
LCALL PR1
LCALL PR4
; LCALL PR7
LCALL DELAY
S_DOWN1: MOV A,#0C0H ; 显示起始行设置代码
ORL A,R7
MOV COM,A
LCALL PR1
LCALL PR4
; LCALL PR7
LCALL DELAY
DJNZ R7,S_DOWN1
SJMP S_DOWN
;---------------------------------------
DELAY: MOV R6,#00H ; 延时子程序725
MOV R5,#00H
DELAY1: NOP
DJNZ R5,DELAY1
DJNZ R6,DELAY1
RET
;============== 绘点演示程序段 ======================
;============== 绘点演示程序段 ======================
DRAW:
MOV R1,#4AH
MOV 82H,#03H
;MOV R2,#80H
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -