12864串口程序.txt

来自「金鹏的C系列中文字库液晶」· 文本 代码 · 共 119 行

DA_IN	EQU	30H	       ;数据或指令
RS_STU	BIT	P1.0	  	;数据指令选择
WR_COUNT1 EQU	31H   	;计数器1
WR_COUNT2 EQU	32H	;计数器2



CS	EQU	P3.0
STD	EQU	P3.1
SCLK	EQU	P3.2
PSB	EQU	P3.3
RST	EQU	P3.4





	ORG	0000H
	AJMP	MAIN
	ORG	0030H
MAIN:	NOP
	CLR	PSB

TT:	NOP
	MOV	A,#34H
	MOV	DA_IN,A
	CLR	P1.0
	LCALL	SERIAL_WR

	MOV	A,#30H
	MOV	DA_IN,A
	CLR	P1.0
	LCALL	SERIAL_WR


	MOV	A,#01H
	MOV	DA_IN,A
	CLR	P1.0
	LCALL	SERIAL_WR


	MOV	A,#06H
	MOV	DA_IN,A
	CLR	P1.0
	LCALL	SERIAL_WR



	
	MOV	A,#0CH
	MOV	DA_IN,A
	CLR	P1.0
	LCALL	SERIAL_WR

TA:	LCALL	DEL
	MOV	A,#36H
	MOV	DA_IN,A
	SETB	P1.0
	LCALL	SERIAL_WR
	LCALL	DEL
	AJMP	TA



SERIAL_WR:	PUSH	ACC
		MOV	A,DA_IN
		SETB	CS

		MOV	WR_COUNT1,#05H
		SETB	STD
SERIAL_WR1:	SETB	SCLK
		CLR	SCLK
		DJNZ	WR_COUNT1,SERIAL_WR1
		
		CLR	STD
		SETB	SCLK
		CLR	SCLK
		JNB	P1.0,CLR_RS
		SETB	STD
		SJMP	SETB_RS
CLR_RS:		CLR	STD
SETB_RS:	SETB	SCLK
		CLR	SCLK
		CLR	STD
		SETB	SCLK
		CLR	SCLK

		MOV	WR_COUNT1,#02H
SERIAL_WR2:	MOV	WR_COUNT2,#04H
SERIAL_WR21:	RLC	A
		MOV	STD,C
		SETB	SCLK
		CLR	SCLK
		DJNZ	WR_COUNT2,SERIAL_WR21
		MOV	WR_COUNT2,#04H
		CLR	STD
SERIAL_WR22:	SETB	SCLK
		CLR	SCLK
		DJNZ	WR_COUNT2,SERIAL_WR22
		DJNZ	WR_COUNT1,SERIAL_WR2

		CLR	SCLK
		CLR	CS
;		LCALL	DEL
		POP	ACC
		RET

	

DEL:	MOV	40H,#08H
DEL1:	MOV	41H,#01FH
DEL2:	MOV	42H,#01FH
DEL3:	DJNZ	42H,DEL3
	DJNZ	41H,DEL2
	DJNZ	40H,DEL1
	RET
	END