6963.asm

128*64液晶显示模块LCM12864(控制器T6963)演示程序

                MOV     R1,#0
                MOV	DPTR,#HZC_COMPANY6
                LCALL   DISP_HZC
                MOV     R5,#024H ;ADL
                MOV     R6,#1EH ;ADH
                MOV     R7,#10  ;NUMBER
                MOV     R1,#0
                MOV	DPTR,#HZC_COMPANY7
                LCALL   DISP_HZC
                RET
;_____________________________________________
LCD_PIC:        MOV     R3,#0;84H              ;显示标志
                MOV     R4,#02;0CH
                MOV     DPLB,DPL
                MOV     DPHB,DPH
                MOV	R2,#128         ;高度
DISPPIC:        MOV     R5,#30          ;宽度
                MOV	A,R3
		LCALL	LCD_DATA
		MOV	A,R4
		LCALL	LCD_DATA
		MOV	A,#24H	;地址指针设置
		LCALL	LCD_COM
                MOV	A,#0B0H
		LCALL	LCD_COM
PICLOOP:        MOV     DPL,DPLB
                MOV     DPH,DPHB
                MOV	A,#00H
		MOVC	A,@A+DPTR
                CPL     A       ;反白
                INC	DPTR
                MOV     DPLB,DPL
                MOV     DPHB,DPH
		LCALL	LCD_DATAS
		DJNZ    R5,PICLOOP
                MOV	A,#0B2H
		LCALL	LCD_COM
                MOV     A,#30
                ADD     A,R3
                MOV     R3,A
                MOV     A,R4
                ADDC    A,#0
                MOV     R4,A
                DJNZ    R2,DISPPIC

                RET

;____________显示一个汉字_____________________________
;R4(ADRH),R3(ADRL),DPTR(ZIMO)
;R2,R6,R7
;
DISP_HZ:	MOV	R2,#16
                MOV     DPLB,DPL
                MOV     DPHB,DPH
DISP_HZLOOP:    MOV	A,R3
		LCALL	LCD_DATA
		MOV	A,R4
		LCALL	LCD_DATA
		MOV	A,#24H	;地址指针设置
		LCALL	LCD_COM

                MOV    DPL,DPLB
                MOV    DPH,DPHB
                MOV	A,#0
		MOVC	A,@A+DPTR
		;CPL	A
                INC	DPTR
                MOV    DPLB,DPL
                MOV    DPHB,DPH
                LCALL	LCD_DATA
		MOV	A,#0C0H
		LCALL	LCD_COM
                MOV    DPL,DPLB
                MOV    DPH,DPHB
                MOV	A,#0
		MOVC	A,@A+DPTR
		;CPL	A
                INC	DPTR
                MOV    DPLB,DPL
                MOV    DPHB,DPH
		LCALL	LCD_DATA
		MOV	A,#0C4H
		LCALL	LCD_COM
                MOV     A,#30
                ADD     A,R3
                MOV     R3,A
                MOV     A,R4
                ADDC    A,#0
                MOV     R4,A
                DJNZ	R2,DISP_HZLOOP
		RET
;______________显示汉字串________________
DISP_HZC:       MOV     A,R5
                MOV     R3,A
                MOV     A,R6
                MOV     R4,A
                CLR     A
                MOVC    A,@A+DPTR
                MOV     B,A
                INC     DPTR
                CLR     A
                MOVC    A,@A+DPTR
                INC     DPTR
                PUSH    DPL
                PUSH    DPH
                MOV     DPH,B
                MOV     DPL,A
                LCALL   DISP_HZ
                POP     DPH
                POP     DPL
                MOV     A,R1
                ADD     A,#2
                ADD     A,R5
                MOV     R5,A
                MOV     A,R6
                ADDC    A,#0
                MOV     R6,A
                DJNZ    R7,DISP_HZC
                RET


;____________显示一个字符_____________________________
;R4(ADRH),R3(ADRL),A(ZIFU)
;
DISP_ZIFU:	PUSH	ACC
		MOV	A,R4
		LCALL	LCD_DATA
		MOV	A,R3
		LCALL	LCD_DATA
		MOV	A,#24H;设置地址指针
		LCALL	LCD_COM
		POP	ACC
		LCALL	LCD_DATA
		MOV	A,#0C0H
		LCALL	LCD_COM
		RET
;______________显示后续字符__________________________
;A(CHAR)
;
DISP_ZIFUSER:	LCALL	LCD_DATA
		MOV	A,#0C0H
		LCALL	LCD_COM
		RET
;________________LCD 子程序___________________
;R2(L),R3(H)
LCD_DATA:       PUSH	ACC
		MOV         DPTR,#C_ADD       ;设置指令通道地址
LCD_STA00:	MOVX        A,@DPTR
		JNB	ACC.0,LCD_STA00
		JNB	ACC.1,LCD_STA00	;判状态位STA1,STA0子程序,两个标志位必须同时为"1"
		POP	ACC
		MOV	DPTR,#D_ADD   ;设置数据通道地址/数据写入入口
		MOVX    @DPTR,A       ;写入操作
                RET

LCD_COM:	PUSH	ACC
		MOV         DPTR,#C_ADD       ;设置指令通道地址
LCD_STA01:	MOVX        A,@DPTR
		JNB	ACC.0,LCD_STA01
		JNB	ACC.1,LCD_STA01	;判状态位STA1,STA0子程序,两个标志位必须同时为"1"
		POP	ACC
		MOV      DPTR,#C_ADD   ;设置数据通道地址/数据写入入口
		MOVX     @DPTR,A       ;写入操作
		RET

LCD_DATAS:		;判状态位STA3子程序（数据自动写状态）
		PUSH	ACC
		MOV         DPTR,#C_ADD       ;设置指令通道地址
LCD_STA10:	MOVX        A,@DPTR
		JNB    ACC.3,LCD_STA10
		POP	ACC
		MOV	DPTR,#D_ADD   ;设置数据通道地址/数据写入入口
		MOVX     @DPTR,A       ;写入操作
		RET
;_____________________________________________
DELAY5S:	MOV	R1,#0
		MOV	R2,#0
		MOV	R3,#8
DELAY5SLOOP:	DJNZ	R1,DELAY5SLOOP
		DJNZ	R2,DELAY5SLOOP
		DJNZ	R3,DELAY5SLOOP
		RET

;_____________________________________________
DELAY1S:	MOV	R1,#0
		MOV	R2,#0
		MOV	R3,#16
DELAY1SLOOP:	DJNZ	R1,DELAY1SLOOP
		DJNZ	R2,DELAY1SLOOP
		DJNZ	R3,DELAY1SLOOP
		RET
;_____________________________________________
DELAY50MS:	MOV	R1,#0
		MOV	R2,#0
                MOV     R3,#1
DELAY50MSLOOP:	DJNZ	R1,DELAY50MSLOOP
		DJNZ	R2,DELAY50MSLOOP
                DJNZ	R3,DELAY50MSLOOP
		RET
;_____________________________________________
DELAY100MS:	MOV	R1,#0
		MOV	R2,#200
                MOV     R3,#1
DELAY100MSLOOP:	DJNZ	R1,DELAY100MSLOOP
		DJNZ	R2,DELAY100MSLOOP
        ;        DJNZ	R3,DELAY100MSLOOP
		RET

;__________________字模____________________
HZC_COMPANY:;楷体
         DW HZ_XI,HZ_AN,HZ_ZHONG,HZ_HAI,HZ_DIAN,HZ_ZI,HZ_YOU,HZ_XIAN,HZ_GONG,HZ_SI
HZC_COMPANY1:;宋体
         DW HZ_XI_S,HZ_AN_S,HZ_ZHONG_S,HZ_HAI_S,HZ_DIAN_S,HZ_ZI_S,HZ_YOU_S,HZ_XIAN_S,HZ_GONG_S,HZ_SI_S
HZC_COMPANY2:;隶书
         DW HZ_XI_L,HZ_AN_L,HZ_ZHONG_L,HZ_HAI_L,HZ_DIAN_L,HZ_ZI_L,HZ_YOU_L,HZ_XIAN_L,HZ_GONG_L,HZ_SI_L
HZC_COMPANY3:;华文中宋
         DW HZ_XI_H,HZ_AN_H,HZ_ZHONG_H,HZ_HAI_H,HZ_DIAN_H,HZ_ZI_H,HZ_YOU_H,HZ_XIAN_H,HZ_GONG_H,HZ_SI_H
HZC_COMPANY4:;华文彩云
         DW HZ_XI_C,HZ_AN_C,HZ_ZHONG_C,HZ_HAI_C,HZ_DIAN_C,HZ_ZI_C,HZ_YOU_C,HZ_XIAN_C,HZ_GONG_C,HZ_SI_C
HZC_COMPANY5:;华文新魏
         DW HZ_XI_W,HZ_AN_W,HZ_ZHONG_W,HZ_HAI_W,HZ_DIAN_W,HZ_ZI_W,HZ_YOU_W,HZ_XIAN_W,HZ_GONG_W,HZ_SI_W
HZC_COMPANY6:;黑体
         DW HZ_XI_B,HZ_AN_B,HZ_ZHONG_B,HZ_HAI_B,HZ_DIAN_B,HZ_ZI_B,HZ_YOU_B,HZ_XIAN_B,HZ_GONG_B,HZ_SI_B
HZC_COMPANY7:;方正舒体
         DW HZ_XI_F,HZ_AN_F,HZ_ZHONG_F,HZ_HAI_F,HZ_DIAN_F,HZ_ZI_F,HZ_YOU_F,HZ_XIAN_F,HZ_GONG_F,HZ_SI_F