240128蓝屏液晶显示4.asm

辅助说明： 代码交流 QQ59771230 email:[e-mail] 注意事项： 1) LCD 指令中的TEXT GRAPHIC AREA SET效果是什么样的

	MOV R3,40H
	MOV A,R3
	ADDC A,#00H
	MOV R3,A
	CLR C
	DJNZ R6,SE0
	RET	
CPLRHZ8:
;*******一个汉字的右半部分*******
	;DPTR接上面写
	;INC R2
	;DISPLAY The graphic
	SERON0:
	MOV 40H,R3
	MOV R4,#24H
	LCALL OUTI2
	CLR A
	MOVC A,@A+DPTR
	JNB FLAGCPL,CP2
	CPL A
	
	CP2:
	INC DPTR
	MOV R3,A
	MOV R4,#0C0H
	LCALL OUTI1
	
	MOV A,R2
	ADD A,#01EH
	MOV R2,A
	
	MOV R3,40H
	MOV A,R3
	ADDC A,#00H
	MOV R3,A
	CLR C
	DJNZ R6,SERON0
	RET
;*******************
;CPL一个汉字写入结束
;*******************

;*******************
; SMODE CHAR
;*******************
SMODE:
	MOV R4,#9CH
	LCALL OUTIN
	MOV R4,#80H 		;84H 是文本特征为错误， 要将图形区改为特征码
	LCALL OUTIN
	MOV R2,#00H
	MOV R3,#00H
	MOV R4,#24H
	LCALL OUTI2
	MOV 12H,#10 		;10 行5~8 列*8 行
QW1: 	
	MOV R2,#30 		;每行30 个字
	MOV R3,#2CH 		;Char code
	MOV 10H,#10H 		;10H 是字符代码寄存器
	MOV R4,#0C0H
QW: 
	MOV R3,10H
	MOV R4,#0C0H
	LCALL OUTI1
	INC 10H
	DJNZ R2,QW
	DJNZ 12H,QW1
	LCALL TIME
	LCALL TIME
	RET
;*******************
; SMODE CHAR 结束
;*******************

;*******************
;DEL ZI AND TU
;*******************
DELRAM:
	MOV R4,#9CH 		;TEXT ON
	LCALL OUTIN 		;GRAPHIC ON
	
	MOV R2,#00H
	MOV R3,#10H ;
	MOV R4,#24H
	LCALL OUTI2
	
	MOV R4,#0B0H
	LCALL OUTIN
	;MOV R2,#01FH
	MOV R2,#3EH
CLRS00:
	MOV R3,#0FFH
CLRS10:
	CLR A
	LCALL OUTD
	DJNZ R3,CLRS10 		;空白
	DJNZ R2,CLRS00
	MOV R4,#0B2H
	LCALL OUTIN
	;LCALL TIME
	RET
;*******************
; DEL ZI AND TU OVER
;*******************

;*******************
;DEL CHAR
;*******************
DELRAM1:
	MOV R4,#9CH 		;TEXT ON
	LCALL OUTIN		;GRAPHIC ON
	
	MOV R2,#00H
	MOV R3,#00H 		;TEXT WRITE "0"
	MOV R4,#24H
	LCALL OUTI2
	
	MOV R4,#0B0H
	LCALL OUTIN
	;MOV R2,#01FH
	MOV R2,#1EH
CLRS000:
	MOV R3,#010H
CLRS100:
	CLR A
	LCALL OUTD
	DJNZ R3,CLRS100 	;空白
	DJNZ R2,CLRS000
	MOV R4,#0B2H
	LCALL OUTIN
	;LCALL TIME
	RET
;*******************
;DEL CHAR OVER
;*******************

;*******************
;图形写入功能块
;*******************
LDIS1: 
	NOP
	MOV R2,#00H
	MOV R3,#10H
	MOV R4,#24H
	LCALL OUTI2
	
	MOV R4,#0B0H
	LCALL OUTIN
	MOV R5,#8
	
	MOV R1,#128 		;为卷屏预送128行。
LDIS2:
	MOV R2,#30 		;30 COLOUMN
LDIS3:
	CLR A
	MOVC A,@A+DPTR
	CPL A
	LCALL OUTD
	INC DPTR
	DJNZ R2,LDIS3
	DJNZ R1,LDIS2
	MOV R4,#0B2H
	LCALL OUTIN
	RET
;*******************
;图形写入功能块结束
;*******************

;*******************
;LCD写入信息操作
;*******************
OUTI2: 
	LCALL PR01 
	MOV A,R2
	LCALL OUTD
	
OUTI1: 
	LCALL PR01
	MOV A,R3
	LCALL OUTD
	
OUTIN: 
	LCALL PR01
	MOV A,R4
	SJMP OUTD1
	
OUTD: 
	CLR P3.0 		;FOR WRTIE DATA C/D=0
OUTD1: 				;FOR WRITE COMMAND C/D=0
	CLR P3.1 		;WR=0
	MOV P1,A
	SETB P3.1 		;W/R = 1
	SETB P3.0 		;C/D =1
	RET
	
PR01: 
	LCALL PR0 		;Check the state of the LCD Module
	JNB ACC.0,PR01 		;JUDGE STA0
	JNB ACC.1,PR01 		;JUDGE STA1
	RET
	
PR02: 
	LCALL PR0
	JNB ACC.2,PR02 		;FOR STA2
	RET
	PR03: 
	LCALL PR0
	JNB ACC.3,PR03 		;FOR STA3
	RET
	
PR0: 
	ORL P3,#0BH 		;C/D = 1
	ORL P1,#0FFH 		;P1 PORT IS FOR INPUT
	CLR P3.3 		;RD =0
	MOV A,P1
	SETB P3.3 		;RD = 1
	RET
;*******************
;LCD写入信息操作结束
;*******************

;*******************
;延时功能块
;*******************
MS40: 
	MOV R7,#00FH
MS2: 
	MOV R6,#01FH
MS1: 
	DJNZ R6,MS1
	DJNZ R7,MS2
	RET

TIME: 
	MOV 23H,#03H
TIME1: 
	MOV 21H,#0FFH
TIME2: 
	LCALL MS40
	DJNZ 21H,TIME2
	DJNZ 23H,TIME1
	RET
;*******************
;延时功能块结束
;*******************



;*******************
;字库
;*******************

;*******16*16汉字点阵*******
;福
HANZI:
DB 020H,013H,010H,0FDH,005H,009H,011H,030H
DB 05BH,096H,012H,013H,012H,012H,013H,012H
DB 000H,0FEH,000H,0FCH,004H,004H,0FCH,000H
DB 0FEH,022H,022H,0FEH,022H,022H,0FEH,002H

;莱
HANZI1:
DB 004H,004H,07FH,004H,005H,03FH,011H,009H
DB 009H,0FFH,005H,009H,011H,021H,041H,001H
DB 020H,020H,0FEH,020H,020H,0FCH,010H,010H
DB 020H,0FEH,040H,020H,018H,00EH,004H,000H

;特
HANZI2:
DB 010H,010H,053H,050H,07CH,097H,010H,01CH
DB 033H,0D0H,011H,010H,010H,010H,010H,010H
DB 040H,040H,0FCH,040H,040H,0FEH,010H,010H
DB 0FEH,010H,010H,090H,090H,010H,050H,020H

;电
HANZI3:
DB 001H,001H,001H,03FH,021H,021H,03FH,021H
DB 021H,021H,03FH,021H,001H,001H,000H,000H
DB 000H,000H,000H,0F8H,008H,008H,0F8H,008H
DB 008H,008H,0F8H,008H,002H,002H,0FEH,000H

;气
HANZI4:
DB 008H,008H,01FH,010H,020H,04FH,000H,01FH
DB 000H,000H,000H,000H,000H,000H,000H,000H
DB 000H,000H,0FEH,000H,000H,0F8H,000H,0F0H
DB 010H,010H,010H,010H,00AH,00AH,006H,002H

;有
HANZI5:
DB 001H,001H,07FH,002H,004H,00FH,018H,028H
DB 04FH,088H,008H,00FH,008H,008H,008H,008H
DB 000H,000H,0FEH,000H,000H,0F0H,010H,010H
DB 0F0H,010H,010H,0F0H,010H,090H,070H,020H

;限
HANZI6:
DB 000H,0FBH,092H,093H,0A2H,0A2H,093H,08AH
DB 08AH,0AAH,092H,082H,082H,082H,083H,082H
DB 000H,0F8H,008H,0F8H,008H,008H,0F8H,080H
DB 048H,050H,020H,020H,010H,08EH,004H,000H

;公
HANZI7:
DB 000H,004H,006H,004H,008H,008H,010H,022H
DB 043H,002H,004H,008H,011H,03FH,010H,000H
DB 000H,040H,040H,040H,020H,010H,018H,00EH
DB 004H,000H,020H,010H,0F8H,018H,010H,000H

;司
HANZI8:
DB 000H,03FH,000H,000H,07FH,000H,000H,03FH
DB 020H,020H,03FH,020H,020H,000H,000H,000H
DB 000H,0FCH,004H,004H,0E4H,004H,004H,0C4H
DB 044H,044H,0C4H,044H,004H,014H,008H,000H

;产
HANZI9:
DB 001H,000H,07FH,008H,006H,024H,03FH,020H
DB 020H,020H,020H,020H,040H,040H,080H,000H
DB 000H,080H,0FEH,010H,020H,044H,0FEH,000H
DB 000H,000H,000H,000H,000H,000H,000H,000H

;品
HANZI10:
DB 000H,00FH,008H,008H,008H,00FH,008H,000H
DB 07EH,042H,042H,042H,042H,07EH,042H,000H
DB 000H,0F0H,010H,010H,010H,0F0H,010H,000H
DB 0FCH,084H,084H,084H,084H,0FCH,084H,000H

;欢
HANZI11:
DB 000H,000H,0FCH,005H,085H,04AH,028H,010H
DB 018H,018H,024H,024H,041H,086H,038H,000H
DB 080H,080H,080H,0FEH,004H,048H,040H,040H
DB 040H,060H,0A0H,090H,018H,00EH,004H,000H

;迎
HANZI12:
DB 040H,021H,036H,024H,004H,004H,0E4H,024H
DB 025H,026H,024H,020H,020H,050H,08FH,000H
DB 000H,080H,07CH,044H,044H,044H,044H,044H
DB 044H,054H,048H,040H,040H,000H,0FEH,000H

;使
HANZI13:
DB 008H,00CH,01BH,010H,037H,064H,0A4H,027H
DB 024H,022H,021H,020H,021H,022H,02CH,000H
DB 040H,040H,0FEH,040H,0FCH,044H,044H,0FCH
DB 044H,040H,080H,080H,070H,01EH,004H,000H

;用
HANZI14:
DB 000H,01FH,010H,010H,010H,01FH,010H,010H
DB 010H,01FH,010H,010H,020H,020H,040H,080H
DB 000H,0FCH,084H,084H,084H,0FCH,084H,084H
DB 084H,0FCH,084H,084H,084H,084H,094H,088H

;模  
HANZI15:
DB 020H,020H,027H,020H,0FBH,022H,073H,06AH
DB 0A3H,0A0H,027H,020H,020H,020H,021H,026H
DB 090H,090H,0FCH,090H,0F8H,008H,0F8H,008H
DB 0F8H,040H,0FEH,040H,0A0H,098H,00EH,004H

;块   
HANZI16:
DB 020H,020H,020H,023H,0F8H,020H,020H,020H
DB 02FH,020H,039H,0E1H,042H,002H,004H,008H
DB 080H,080H,080H,0F8H,088H,088H,088H,088H
DB 0FEH,080H,040H,020H,018H,00EH,004H,000H



;二 
 HANZI17:
DB 000H,000H,03FH,000H,000H,000H,000H,000H
DB 000H,000H,000H,000H,07FH,000H,000H,000H
DB 000H,010H,0F8H,000H,000H,000H,000H,000H
DB 000H,000H,000H,004H,0FEH,000H,000H,000H

;三  
HANZI18:
DB 000H,000H,07FH,000H,000H,000H,000H,03FH
DB 000H,000H,000H,000H,000H,07FH,000H,000H
DB 000H,000H,0FCH,000H,000H,000H,000H,0F8H
DB 000H,000H,000H,000H,000H,0FEH,000H,000H

;四   
HANZI19:
DB 000H,07FH,044H,044H,044H,044H,044H,044H
DB 048H,048H,050H,060H,040H,07FH,040H,000H
DB 000H,0FCH,084H,084H,084H,084H,084H,084H
DB 084H,07CH,004H,004H,004H,0FCH,004H,000H

;五   
HANZI20:
DB 000H,07FH,002H,002H,002H,002H,002H,03FH
DB 004H,004H,004H,004H,004H,0FFH,000H,000H
DB 000H,0F8H,000H,000H,000H,000H,020H,0F0H
DB 020H,020H,020H,020H,024H,0FEH,000H,000H

;六   
HANZI21:
DB 004H,003H,001H,001H,0FFH,000H,000H,004H
DB 006H,004H,008H,008H,010H,020H,040H,000H
DB 000H,000H,080H,000H,0FEH,000H,000H,080H
DB 040H,020H,010H,018H,00CH,00CH,008H,000H

;一  
HANZI22:
DB 000H,000H,000H,000H,000H,000H,000H,07FH
DB 000H,000H,000H,000H,000H,000H,000H,000H
DB 000H,000H,000H,000H,000H,000H,004H,0FEH
DB 000H,000H,000H,000H,000H,000H,000H,000H

;配  
HANZI23:
DB 000H,0FEH,028H,028H,0FEH,0AAH,0AAH,0AAH
DB 0C6H,082H,0FEH,082H,082H,0FEH,082H,000H
DB 000H,0FCH,004H,004H,004H,004H,0FCH,080H
DB 080H,080H,080H,082H,082H,082H,07EH,000H

;置   
HANZI24:
DB 03FH,024H,024H,03FH,001H,07FH,002H,01FH
DB 010H,01FH,010H,01FH,010H,01FH,010H,0FFH
DB 0F8H,048H,048H,0F8H,000H,0FCH,000H,0F0H
DB 010H,0F0H,010H,0F0H,010H,0F0H,010H,0FEH

;*******12*12汉字点阵*******
;进   
HZ1:
DB 044H,024H,01FH,004H,0C4H,05FH,044H,044H
DB 048H,0B0H,09FH,000H,080H,080H,0E0H,080H
DB 080H,0E0H,080H,080H,080H,080H,0E0H,000H

;入   
HZ2:
DB 018H,004H,004H,004H,00AH,00AH,011H,011H
DB 020H,040H,080H,000H,000H,000H,000H,000H
DB 000H,000H,000H,000H,080H,040H,020H,000H

;主   
HZ3:
DB 008H,004H,0FFH,004H,004H,004H,07FH,004H
DB 004H,004H,0FFH,000H,000H,040H,0E0H,000H
DB 000H,000H,0C0H,000H,000H,000H,0E0H,000H

;界   
HZ4:
DB 03FH,024H,03FH,024H,03FH,011H,029H,0C9H
DB 009H,011H,061H,000H,0C0H,040H,0C0H,040H
DB 0C0H,000H,080H,060H,000H,000H,000H,000H

;面   
HZ5:
DB 0FFH,004H,008H,07FH,049H,04FH,049H,04FH
DB 049H,049H,07FH,000H,0E0H,000H,000H,0E0H
DB 020H,020H,020H,020H,020H,020H,0E0H,000H

;********LINE********
LLINE1:
DB 01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H,01H
RLINE1:
DB 80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H,80H

;********TEL [phone]********
TELTAB:
DB 34H,25H,2CH,00H,10H,15H,11H,10H,18H,15H,14H,13H,19H,10H,14H,19H

;********FULLRIGHT ELECTRCAL CO.,LTD********
COMTAB:
DB 26H,35H,2CH,2CH,32H,29H,27H,28H,34H
DB 00H
DB 25H,2CH,25H,23H,34H,32H,29H,23H,21H,2CH
DB 00H
DB 23H,2FH,0EH,0CH,2CH,34H,24H

;*******PIC*******
PICDATA:
DB  	 00H, 00H, 00H, 00H, 00H, 1FH, 00H, 00H
DB	 00H, 00H, 00H, 00H, 00H, 00H, 00H,0E0H