📄 液晶显示子程序.asm
字号:
;------------------------------------------------------
COM3: PUSH ACC
PUSH DPL
PUSH DPH
MOV DPTR,#disp_kz_add
YY05: MOVX A,@DPTR
JNB ACC.0,YY05
JNB ACC.1,YY05
MOV A,R4
MOV DPTR,#disp_kz_add
MOVX @DPTR,A
POP DPH
POP DPL
POP ACC
RET
;-------------------------
COM2: PUSH ACC
PUSH DPL
PUSH DPH
MOV DPTR,#disp_kz_add
YY09: MOVX A,@DPTR
JNB ACC.0,YY09
JNB ACC.1,YY09
MOV DPTR,#disp_data_add
MOV A,R3
; cpl a
MOVX @DPTR,A
MOV DPTR,#disp_kz_add
YY08: MOVX A,@DPTR
JNB ACC.0,YY08
JNB ACC.1,YY08
MOV A,R4
MOVX @DPTR,A
POP DPH
POP DPL
POP ACC
RET
;-------------------------
COM1: PUSH ACC
PUSH DPL
PUSH DPH
MOV DPTR,#disp_kz_add
YY01: MOVX A,@DPTR
JNB ACC.0,YY01
JNB ACC.1,YY01
MOV DPTR,#disp_data_add
MOV A,R2
MOVX @DPTR,A
MOV DPTR,#disp_kz_add
YY02: MOVX A,@DPTR
JNB ACC.0,YY02
JNB ACC.1,YY02
MOV DPTR,#disp_data_add
MOV A,R3
MOVX @DPTR,A
MOV DPTR,#disp_kz_add
YY03: MOVX A,@DPTR
JNB ACC.0,YY03
JNB ACC.1,YY03
MOV A,R4
MOVX @DPTR,A
POP DPH
POP DPL
POP ACC
RET
;-----------------------------------------
;================================================================
XREAD: MOV R6,#1EH
MOV A,YADD
MOV B,#1EH
MUL AB
MOV R2,A
MOV R3,B
XRED2: MOV R4,#24H
LCALL COM1
PUSH 03H
MOV R3,#0FFH
MOV R4,#0C0H
LCALL COM2
POP 03H
MOV B,#01H
LCALL ADRX
DJNZ R6,XRED2
RET
;=================================================
AREAD: MOV R6,#128
MOV R2,xadd
MOV R3,#00H
ARED2: MOV R4,#24H
LCALL COM1
PUSH 03H
MOV R3,#80H
MOV R4,#0C0H
LCALL COM2
POP 03H
MOV B,#1EH
LCALL ADRX
DJNZ R6,ARED2
RET
;===============================================
BREAD: MOV R6,#128
MOV R2,xadd
MOV R3,#00H
BRED2: MOV R4,#24H
LCALL COM1
PUSH 03H
MOV R3,#10H
MOV R4,#0C0H
LCALL COM2
POP 03H
MOV B,#1EH
LCALL ADRX
DJNZ R6,BRED2
RET
;=================================================
cREAd: MOV R6,#128
MOV R2,xadd
MOV R3,#00H
cREd2: MOV R4,#24H
LCALL COM1
PUSH 03H
MOV R3,#01H
MOV R4,#0C0H
LCALL COM2
POP 03H
MOV B,#1EH
LCALL ADRX
DJNZ R6,cRED2
RET
;===============================================
ADSU: MOV A,R2
CLR C
SUBB A,B
MOV R2,A
MOV A,R3
SUBB A,#00H
MOV R3,A
RET
ASUB: CLR C
MOV A,DPL
SUBB A,#0CH
MOV DPL,A
MOV A,DPH
SUBB A,#00H
MOV DPH,A
RET
AADD: CLR C
MOV A,DPL
ADD A,#0DH
MOV DPL,A
MOV A,DPH
ADDC A,#00H
MOV DPH,A
RET
;-------------------------------------------------
ADSUBB: MOV A,R2
CLR C
SUBB A,#0e1H
MOV R2,A
MOV A,R3
SUBB A,#01H
MOV R3,A
RET
ADSUBA: MOV A,R2
CLR C
SUBB A,#0dfh
MOV R2,A
MOV A,R3
SUBB A,#01H
MOV R3,A
RET
ADSUBC: MOV A,R2
CLR C
SUBB A,#0e0H
MOV R2,A
MOV A,R3
SUBB A,#01H
MOV R3,A
RET
;---------------------------------------------------------------
ADRX: MOV A,R2
ADD A,B
MOV R2,A
MOV A,R3
ADDC A,#00H
MOV R3,A
RET
;================================================================
;================================================================
;======================================================
disp_clr:
MOV R2,#00H
MOV R3,#00H
MOV R4,#24H
LCALL COM1
MOV R4,#0B0H
LCALL COM3
MOV R2,#3ch
CLR1: MOV R3,#0c0h
CLR2: MOV DPTR,#disp_kz_add
YY07: MOVX A,@DPTR
JNB ACC.0,YY07
JNB ACC.1,YY07
mov dptr,#disp_data_add
mov A,#00h
movx @dptr,a
DJNZ R3,CLR2
DJNZ R2,CLR1
MOV R4,#0B2H
LCALL COM3
RET
;------------------------------------------------
WB: MOV R4,#24H
LCALL COM1
MOV R4,#80H
LCALL COM3
MOV R4,#9FH
LCALL COM3
RET
;-----------------------------------------------
CSH: ;初始化
lcall disp_clr
MOV R2,#00H
MOV R3,#00H
MOV R4,#42H
LCALL COM1
MOV R2,#1EH
MOV R3,#00H
MOV R4,#43H
LCALL COM1
MOV R2,#00H
MOV R3,#18H
MOV R4,#40H
LCALL COM1
MOV R2,#1EH
MOV R3,#00H
MOV R4,#41H
LCALL COM1
MOV R4,#0a1H
LCALL COM3
MOV R2,#00H
MOV R3,#18H
MOV R4,#24H
LCALL COM1
MOV R4,#81H
LCALL COM3
MOV R4,#9fH
LCALL COM3
ret
;==========================================================
gb_off:
mov r2,#0ffh
mov r3,#0ffh
mov r4,#21h
lcall com1
ret
gb_on:
mov r4,#21h
lcall com1
ret
;==========================================================================================
;==========================================================================================
;==========================================================================================
;==========================================================================================
;-- 文字: 脉 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_mai:
DB 000H,080H,078H,060H,048H,040H,04BH,0C8H,078H,04CH,048H,048H,04BH,050H,049H,060H
DB 079H,050H,049H,048H,049H,04CH,04AH,046H,04CH,044H,088H,040H,0A9H,040H,010H,080H
;-- 文字: 冲 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_chong:
DB 000H,040H,040H,040H,020H,040H,037H,0FCH,024H,044H,004H,044H,014H,044H,014H,044H
DB 017H,0FCH,024H,044H,0E0H,040H,020H,040H,020H,040H,020H,040H,020H,040H,020H,040H
;-- 文字: 数 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_shu:
DB 008H,020H,049H,030H,02AH,020H,01CH,020H,0FFH,07EH,01CH,044H,02BH,044H,048H,0C4H
DB 008H,028H,0FFH,028H,012H,010H,034H,010H,00CH,028H,032H,04EH,0C0H,084H,000H,000H
;-- 文字: 量 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_liang:
DB 01FH,0F0H,010H,010H,01FH,0F0H,010H,010H,01FH,0F0H,000H,000H,0FFH,0FEH,011H,010H
DB 01FH,0F0H,011H,010H,01FH,0F0H,001H,000H,01FH,0F8H,001H,000H,0FFH,0FEH,000H,000H
;-- 文字: 方 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_fang:
DB 002H,000H,001H,000H,000H,080H,0FFH,0FEH,002H,000H,002H,000H,003H,0F0H,002H,010H
DB 004H,010H,004H,010H,008H,010H,008H,010H,010H,010H,020H,090H,0C0H,060H,000H,000H
;-- 文字: 式 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_se:
DB 000H,0A0H,000H,098H,000H,090H,07FH,0FCH,000H,080H,000H,080H,000H,080H,03EH,080H
DB 008H,040H,008H,040H,008H,040H,00BH,020H,01CH,022H,070H,012H,020H,00AH,000H,004H
;-- 文字: 设 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_she:
DB 040H,000H,021H,0F0H,031H,010H,021H,010H,001H,010H,001H,010H,0E2H,00EH,025H,0F8H
DB 021H,008H,021H,008H,020H,090H,020H,090H,028H,060H,030H,090H,023H,00EH,00CH,004H
;-- 文字: 定 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_ding:
DB 002H,000H,001H,000H,03FH,0FEH,020H,004H,040H,008H,01FH,0F0H,001H,000H,011H,000H
DB 011H,000H,011H,0F0H,011H,000H,029H,000H,025H,000H,043H,000H,081H,0FCH,000H,000H
;-- 文字: 实 --
;-- 宋体12; 此字体下对应的点阵为：宽x高=16x16 --
zk_shi:
DB 001H,000H,000H,080H,03FH,0FEH,028H,004H,046H,088H,004H,080H,008H,080H,006H,080H
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -