text1.asm

这是一种火灾报警控制器的源代码

LCDCD DATA 30H
LCDP  DATA 31H
YLCDL XDATA 9000H

	ORG 0000H
	JMP CRLCD
	ORG 0030H
MAIN:	MOV SP,#5FH
	CALL CRLCD
MAIN1:	CPL T0
	JMP MAIN1
CRLCD :
	MOV LCDCD,#3FH	;开显示
	MOV LCDP,#0
	CALL PRX00
	INC LCDP
	CALL PRX00
	INC LCDP
	CALL PRX00
	MOV LCDCD,#0C0H	;设置初始行
	MOV LCDP,#0
	CALL PRX00
	INC LCDP
	CALL PRX00
	INC LCDP
	CALL PRX00
	MOV R4,#00H
INL1:	MOV A,R4
	ANL A,#07H
	ORL A,#0B8H	;页设置
	MOV LCDCD,A
	MOV LCDP,#0
	CALL PRX00
	INC LCDP
	CALL PRX00
	INC LCDP
	CALL PRX00
	MOV LCDCD,#40H	;列设置
	MOV LCDP,#0
	CALL PRX00
	INC LCDP
	CALL PRX00
	INC LCDP
	CALL PRX00
	MOV R3,#40H
INL2:	MOV LCDCD,#00H
	MOV LCDP,#0
	CALL PRX01
	INC LCDP
	CALL PRX01
	INC LCDP
	CALL PRX01
	DJNZ R3,INL2
	INC R4
	CJNE R4,#08H,INL1
	RET

PRX00:	MOV A,LCDP
	MOV DPTR,#YLCDL+2
	ADD A,DPH
	MOV DPH,A
PRX00A:	MOVX A,@DPTR
	JB ACC.7,PRX00A
	MOV DPL,#00H
	MOV A,LCDCD
	MOVX @DPTR,A
	RET
PRX01:	MOV A,LCDP
	MOV DPTR,#YLCDL+2
	ADD A,DPH
	MOV DPH,A
PRX01A: MOVX A,@DPTR
	JB ACC.7,PRX01A
	DEC DPL
	MOV A,LCDCD
	MOVX @DPTR,A
	RET
	
END