Форум РадиоКот

Код: Выделить всё

;*************** Упрaвление дисплеем ЖК ***************************** 
;LCD driver load
;Input: DIG1..DIG8, CNT1, CNT2

LCD: 	MOV DIG3,#CH_BL
	JNB BIT_LK,NOLK
	MOV DIG3,#CH_L
NOLK:	MOV DPTR,#FONT
	CLR CS1
	CLR CS2
	MOV A,DIG1
	MOVC A,@A+DPTR
	LCALL SHIFT
	MOV A,DIG2
	MOVC A,@A+DPTR
	LCALL SHIFT
	MOV A,DIG3
	MOVC A,@A+DPTR
	MOV C,DP3
	MOV ACC.0,C
	LCALL SHIFT
	MOV A,DIG4
	MOVC A,@A+DPTR
	LCALL SHIFT
	MOV A,CNT1
	LCALL SHIFT
	SETB CS1
	SETB CS2
	NOP
	CLR CS2
	MOV A,DIG5
	MOVC A,@A+DPTR
	MOV C,DP5
	MOV ACC.0,C
	LCALL SHIFT
	MOV A,DIG6
	MOVC A,@A+DPTR
	LCALL SHIFT
	MOV A,DIG7
	MOVC A,@A+DPTR
	LCALL SHIFT
	MOV A,DIG8
	MOVC A,@A+DPTR
	LCALL SHIFT
	MOV A,CNT2
	LCALL SHIFT
	SETB CS2
	RET

;Data shift into serial port
;Input: A = data

SHIFT:	MOV R1,#8H	;bit counter load
SH1:	RRC A
	MOV DATA,C
	SETB CLK
	CLR CLK
	DJNZ R1,SH1
	RET