zlg7290.inc

AD AND TLC549 TLC548C, TLC548I, TLC549C, TLC549I

;发送命令子程序

SENDCMD:	MOV	SLA,#ZLG7290			;指定器件地址
		MOV	SUBA,#07H			;指定子地址
		MOV	NUMBYTE,#02H			;发送2字节数据
		LCALL	IWRNBYTE			;调用写n字节数据程序
		RET

;键盘扫描,读键值程序
SCANKEY:	MOV	SLA,#ZLG7290			;指定器件地址
		MOV	SUBA,#01H			;指定子地址
		MOV	NUMBYTE,#01H			;读1字节数据
		LCALL	IRDNBYTE			;调用读n字节数据程序
		RET

DELAY:		MOV	R4,#100
DEL:		MOV	R5,#100
		DJNZ	R5,$
		DJNZ	R4,DEL
		RET

DISPLAY:	MOV	A,#60H
		ADD	A,R0
		MOV	MTD,A
		MOV	MTD+1,R1
		LCALL	SENDCMD
		LCALL	DELAY
		RET