tlc549.asm

AD AND TLC549 TLC548C, TLC548I, TLC549C, TLC549I

CS		BIT	P3.0
DAT		BIT	P3.1
CLK		BIT	P3.2
ADC		DATA	30H
		ORG	0000H
MAIN:		MOV	SP,#60H
WAIT:		ACALL	TLC549
		LCALL 	DELAY
		ACALL	TLC549	;读取上次ADC值，并再次启动AD转换
		MOV	A,ADC
		CPL	A
		MOV	P1,A
		SJMP	WAIT

TLC549:		CLR	CLK
		CLR	CS	;选中TLC549
		MOV	R6,#8
TLCAD:		SETB	CLK
		MOV	C,DAT
		RLC	A
        	CLR	CLK	;DAT＝0，为读出下一位数据作准备
		DJNZ	R6,TLCAD
		SETB	CS	;禁能TLC549，再次启动AD转换
		SETB	CLK
		MOV 	ADC,A
		RET

DELAY:		MOV	R7,#250
		DJNZ	R7,$
		RET
		END