point.h

lcm2401282液晶模块的调试程序

;绘点演示程序段：
;从(0,0)-(80,80)-(160,0)-(240,80)作折线

	MOV	R5,#00H		;X坐标=0
	MOV	R6,#00H		;Y坐标=0
	MOV	R0,#50H		;循环量=80
LOOP1:	MOV	A,R5	
	MOV	O_X,A		;设置X坐标
	MOV	A,R6
	SETB	ACC.7		;设置置点标志位
	MOV	O_Y,A		;设置Y坐标
	LCALL	WRI_D		;调绘点子程序
	INC	R5		;X坐标加一
	INC	R6		;Y坐标加一
	DJNZ	R0,LOOP1	;循环
	DEC	R6		;Y坐标减二
	DEC	R6
LOOP2:	MOV	A,R5		
	MOV	O_X,A
	MOV	A,R6
	SETB	ACC.7
	MOV	O_Y,A
	LCALL	WRI_D
	INC	R5		;X坐标加一
	DJNZ	R6,LOOP2	;循环
	MOV	R0,#50H		;循环量=80
LOOP3:	MOV	A,R5
	MOV	O_X,A
	MOV	A,R6
	SETB	ACC.7
	MOV	O_Y,A
	LCALL	WRI_D
	INC	R5		;X坐标加一
	INC	R6		;Y坐标加一
	DJNZ	R0,LOOP3	;循环
	SJMP	$

;从(0,0)-(80,80)-(160,0)-(240,80)清除折线

	MOV	R5,#00H		;设置X坐标=0
	MOV	R6,#00H		;设置Y坐标=0
	MOV	R0,#50H		;循环量=80
LOOP4:	MOV	A,R5
	MOV	O_X,A
	MOV	A,R6
	CLR	ACC.7		;置清点标志位
	MOV	O_Y,A
	LCALL	WRI_D
	INC	R5
	INC	R6
	DJNZ	R0,LOOP4
	DEC	R6
	DEC	R6
LOOP5:	MOV	A,R5
	MOV	O_X,A
	MOV	A,R3
	CLR	ACC.7
	MOV	O_Y,A
	LCALL	WRI_D
	INC	R5
	DJNZ	R6,LOOP5
	MOV	R0,#50H
LOOP6:	MOV	A,R5
	MOV	O_X,A
	MOV	A,R6
	CLR	ACC.7
	MOV	O_Y,A
	LCALL	WRI_D
	INC	R5
	INC	R6
	DJNZ	R0,LOOP6
	SJMP	$