I2CRESET:setb	SCL
	 setb	SDA
	 acall	DELAY	; a DELAY for 5 uS inserted
	 clr	SDA	;Start condition
	 acall	DELAY
	 clr	SCL
	 nop
	 setb	SDA	;SDA raised
	 mov	r5,#9
	 acall	DELAY
NINE:	 setb	SCL	;9 (NINE) clocks applied
	 acall	DELAY
	 clr	SCL
	 nop
	 nop
	 nop
	 djnz	r5,NINE 
	 setb	SCL
	 acall	DELAY
	 clr	SDA	;Start condition
	 acall	DELAY
	 clr	SCL
	 acall	DELAY
	 setb	SCL 
	 acall	DELAY
	 setb	SDA	;Stop condition

DELAY:    nop
          ret