📄 12232.asm
字号:
;***************ET-12232AV1、V2、V3、V4、V5、CV1模块测试程序*****************
RESET EQU P3.6
E1 EQU P3.1
E2 EQU P3.2
R_W EQU P3.3
A0 EQU P3.0
CHOE1 EQU 20H.0
CHOE2 EQU 20H.1
D_ROW EQU 30H
D_PAGE EQU 31H
D_LINE EQU 32H
D_PAGE1 EQU 33H
D_LINE1 EQU 34H
L_PAGE EQU 35H ;每个字（符）页数
L_LINE EQU 36H ;每个字（符）列数
H_WORD EQU 37H ;字（符）行数
L_WORD EQU 38H ;每行字（符）数
DAT EQU 39H
DATA1 EQU 3AH
DATA2 EQU 3BH
COUNTER1 EQU 3CH
COUNTER2 EQU 3DH
COUNTER3 EQU 3EH
STORE EQU 3FH
;********************INITIALIZE***********************
ORG 0000H
AJMP MAIN
ORG 0100H
MAIN: MOV SP,#5FH
SETB RESET
NOP
MOV D_ROW,#0C0H
;*****************************************************
LGS0: SETB CHOE1 ;CHOE1=1 SELECT LEFT SCREEN
SETB CHOE2 ;CHOE2=1 SELECT RIGHT SCREEN
MOV A,#0E2H
LCALL INSTRU
MOV A,#0A4H
LCALL INSTRU
MOV A,#0A9H
LCALL INSTRU
MOV A,#0A0H
LCALL INSTRU
MOV A,#0EEH
LCALL INSTRU
MOV A,#0AFH
LCALL INSTRU
LJMP LGS4
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
LGS3: LCALL WRZERO
MOV DATA1,#0AAH
MOV DATA2,#055H
LCALL LAT_DISP
LCALL DELAY1
;MOV DATA1,#0FFH
;MOV DATA2,#00H
;LCALL LAT_DISP
;LCALL DELAY1
MOV DATA1,#00H
MOV DATA2,#0FFH
LCALL LAT_DISP
LCALL DELAY1
MOV DATA1,#33H
MOV DATA2,#33H
LCALL LAT_DISP
LCALL DELAY1
MOV DATA1,#0CCH
MOV DATA2,#0CCH
LCALL LAT_DISP
LCALL DELAY1
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
LGS4: LCALL WRZERO
MOV DPTR,#TAB4
LCALL PHO_DISP
LCALL DELAY1
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
LJMP LGS3
;*****************************************************
WRZERO: MOV DATA1,#00H ;全屏写零
MOV DATA2,#00H
LCALL LAT_DISP
RET
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
LAT_DISP: SETB CHOE1 ;显示点阵
SETB CHOE2
MOV D_PAGE,#0B8H
MOV D_LINE,#00H
LAT: LCALL WR_ZB
MOV COUNTER1,#1FH
CLR PSW.1
LAT1: JB PSW.1,LAT2
MOV DAT,DATA1
AJMP LAT3
LAT2: MOV DAT,DATA2
LAT3: MOV A,DAT
LCALL INDATA
MOV A,DAT
LCALL INDATA
CPL PSW.1
DJNZ COUNTER1,LAT1
INC D_PAGE
MOV A,D_PAGE
CJNE A,#0BCH,LAT
RET
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
PHO_DISP: MOV D_PAGE,#0BAH ;显示图形
MOV D_LINE,#00H
LCALL PHO
MOV D_PAGE,#0BBH
LCALL PHO
MOV D_PAGE,#0B8H
LCALL PHO
MOV D_PAGE,#0B9H
LCALL PHO
RET
PHO: MOV COUNTER1,#3DH
SETB CHOE1
CLR CHOE2
LCALL WR_ZB
PHO1: CLR A
MOVC A,@A+DPTR
LCALL INDATA
INC DPTR
DJNZ COUNTER1,PHO1
MOV COUNTER1,#3DH
CLR CHOE1
SETB CHOE2
LCALL WR_ZB
PHO2: CLR A
MOVC A,@A+DPTR
LCALL INDATA
INC DPTR
DJNZ COUNTER1,PHO2
RET
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
CHN_DISP: MOV COUNTER1,L_WORD ;在D_PAGE1,D_LINE1处显示H_WORD行（每行L_WORD个）
;8L_PAGE*L_LINE点阵汉字或字符
MOV D_LINE,D_LINE1
CHN_DISP1: MOV COUNTER2,L_PAGE
MOV D_PAGE,D_PAGE1
CHN_DISP2: MOV COUNTER3,L_LINE
LCALL WR_ZB
CHN_DISP3: CLR A
MOVC A,@A+DPTR
LCALL INDATA
INC DPTR
DJNZ COUNTER3,CHN_DISP3
INC D_PAGE
DJNZ COUNTER2,CHN_DISP2
MOV A,D_LINE
ADD A,L_LINE
MOV D_LINE,A
DJNZ COUNTER1,CHN_DISP1
MOV D_PAGE1,D_PAGE
DJNZ H_WORD,CHN_DISP
RET
;*****************************************************
WR_ZB: MOV A,D_PAGE ;定坐标
LCALL INSTRU
MOV A,D_ROW
LCALL INSTRU
MOV A,D_LINE
LCALL INSTRU
RET
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
INSTRU: LCALL CHK_BUSY ;写指令
CLR A0
CLR R_W
JNB CHOE1,NOINSE1
SETB E1
NOINSE1: JNB CHOE2,NOINSE2
SETB E2
NOINSE2: MOV P1,A
NOP
CLR E1
CLR E2
RET
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
INDATA: LCALL CHK_BUSY ;写数据
SETB A0
CLR R_W
JNB CHOE1,NOINDE1
SETB E1
NOINDE1: JNB CHOE2,NOINDE2
SETB E2
NOINDE2: MOV P1,A
NOP
CLR E1
CLR E2
RET
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
RDDATA: LCALL CHK_BUSY ;读数据
SETB A0
SETB R_W
JNB CHOE1,NORDDE1
SETB E1
NORDDE1: JNB CHOE2,NORDDE2
SETB E2
NORDDE2: NOP
MOV A,P1
CLR E1
CLR E2
MOV STORE,A
RET
;$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$
CHK_BUSY: MOV P1,#0FFH ;测忙碌
CLR A0
SETB R_W
JNB CHOE1,NOCHKE1
SETB E1
NOCHKE1: JNB CHOE2,NOCHKE2
SETB E2
NOCHKE2: JB P1.7,$
JB P1.4,$
CLR E1
CLR E2
RET
;*****************************************************
DELAY1: MOV R0,#07H ;TIME DELAY
DEL11: MOV R1,#0FFH
DEL12: MOV R2,#0FFH
DEL13: DJNZ R2,DEL13
DJNZ R1,DEL12
DJNZ R0,DEL11
RET
;*****************************************************
TAB4:
;-- 调入了一幅图像：D:\0程序\图片\12232\12232.bmp --
;-- 宽度x高度=122x32 --
DB 0FFH,003H,001H,001H,001H,001H,021H,0B9H,0BDH,08DH,009H,0E9H,0E9H,009H,089H,0A9H,
DB 0B9H,039H,001H,041H,041H,069H,0E9H,0E9H,0F9H,07DH,07DH,0E9H,0E9H,0E9H,049H,041H,
DB 041H,001H,0A5H,0A5H,0FDH,0FDH,0A5H,005H,08DH,0BDH,021H,0FDH,0FDH,001H,001H,001H,
DB 021H,0FDH,0FDH,021H,001H,051H,051H,07DH,07DH,07DH,0D1H,0D1H,001H,001H,009H,0C9H,
DB 0F9H,0FDH,05DH,04DH,049H,049H,049H,049H,0C9H,0C9H,001H,001H,0FDH,0FDH,0FDH,07DH,
DB 001H,0FDH,0FDH,025H,025H,025H,0FDH,0FDH,001H,001H,081H,0E1H,079H,03DH,08DH,081H,
DB 081H,005H,01DH,07DH,0F1H,0C1H,081H,001H,005H,0A5H,0A5H,0A5H,0A5H,0A5H,0A5H,0A5H,
DB 005H,005H,0FDH,0F9H,001H,001H,001H,001H,003H,0FFH,0FFH,0C0H,080H,080H,080H,080H,
DB 0B8H,09FH,09FH,0A0H,0A0H,0FFH,0BFH,080H,080H,09FH,09FH,0B0H,080H,082H,0B1H,0BBH,
DB 09FH,0AFH,0A4H,0FFH,0BFH,084H,08FH,09FH,0BBH,0B2H,080H,080H,0BFH,080H,0FFH,0FFH,
DB 09FH,0A0H,083H,0B7H,0B4H,0FFH,0FFH,0B0H,090H,080H,0A2H,0FFH,0BFH,081H,0C1H,0A1H,
DB 0B3H,0BFH,09CH,0BEH,0B7H,0E1H,080H,082H,083H,083H,0FFH,0FFH,089H,089H,089H,0A9H,
DB 0C9H,0E9H,0FFH,0BFH,080H,080H,0FFH,0FFH,09FH,09FH,080H,0BFH,0FFH,0A7H,0AFH,0BDH,
DB 0B6H,0E6H,080H,080H,080H,098H,0BCH,0BFH,0A7H,0A1H,0A0H,0A6H,09EH,0BCH,0B0H,0A0H,
DB 080H,080H,080H,08FH,08FH,090H,090H,090H,0AFH,0CFH,0E0H,0E0H,0BFH,0BFH,080H,080H,
DB 080H,080H,0C0H,0FFH,0FFH,003H,001H,001H,001H,001H,001H,001H,001H,001H,001H,001H,
DB 001H,001H,001H,001H,0F1H,0F1H,011H,011H,011H,011H,011H,001H,001H,011H,011H,0F1H,
DB 0F1H,011H,011H,001H,001H,001H,001H,001H,001H,001H,001H,001H,001H,041H,061H,0F1H,
DB 0F1H,001H,001H,001H,061H,071H,011H,011H,0F1H,0E1H,001H,001H,061H,071H,011H,011H,
DB 0F1H,0E1H,001H,001H,061H,071H,011H,011H,011H,0F1H,0E1H,001H,001H,061H,071H,011H,
DB 011H,0F1H,0E1H,001H,001H,001H,001H,001H,091H,0D1H,0B1H,091H,049H,0A9H,001H,001H,
DB 001H,001H,001H,021H,0E1H,091H,091H,091H,001H,0E1H,001H,0F9H,001H,001H,001H,001H,
DB 001H,001H,001H,001H,001H,001H,001H,001H,001H,001H,001H,001H,003H,0FFH,0FFH,0C0H,
DB 080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,09FH,09FH,
DB 091H,091H,091H,091H,090H,080H,080H,080H,080H,09FH,09FH,080H,080H,080H,080H,081H,
DB 081H,081H,081H,081H,081H,080H,080H,080H,080H,09FH,09FH,080H,080H,080H,098H,09CH,
DB 096H,093H,091H,090H,080H,080H,098H,09CH,096H,093H,091H,090H,080H,080H,08CH,09CH,
DB 090H,091H,091H,09FH,08EH,080H,080H,098H,09CH,096H,093H,091H,090H,080H,080H,080H,
DB 080H,0A0H,092H,08AH,093H,0BEH,081H,089H,08BH,090H,080H,080H,082H,0A1H,092H,08CH,
DB 082H,081H,080H,093H,0A0H,09FH,080H,080H,080H,080H,080H,080H,080H,080H,080H,080H,
DB 080H,080H,080H,080H,080H,080H,0C0H,0FFH,
END
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -