10.3.1 段式lcd显示.txt

51单片机实用子程序

CLKPIN		BIT		P1.6
D1PIN		BIT		P1.5
LOADPIN		BIT 		P1.7
LCDBUF		EQU		10H
LCDBUFEND	EQU		LCDBUF+(N-1)
START:
MOV	SP,#60H
MAIN:
CALL	COUNT
CALL	TRANSRAM					
JMP		$
COUNT:								
RET
TRANSRAM:
CLR		LOADPIN						
MOV	R1,#LCDBUF				
TSR:
MOV	A,@R1
CALL	TRANSBYTE
INC		R1
CJNE	R1,#LCDBUFEND+1,TSR
SET		LOADPIN						
RET
TRANSBYTE:							
MOV	R0,#8
TSB:
RRC		A
CALL	TRANSBIT
DJNZ	TSB
RRC		A
RET
TRANSBIT							
MOV	D1PIN,C
SETB	CLKPIN	
CLR		CLKPIN
SETB	CLKPIN
RET