i2c.rar_I2C proteus

#include<reg51.h> #include<intrins.h> #define OP_READ 0xa1 #define OP_WRITE 0xa0 sbit SDA=P1^7; sbit SCL=P1^6; void delay1ms() { int i; for(i=0;i<330;i++); } void delaynms(unsigned int j) { int i; i=j; for(i=0;i<330;i++) delay1ms(); } void start() { SDA=1; SCL=1; _nop_(); _nop_(); SDA=0; _nop_(); SCL=0; } void stop() { SDA=0; SCL=1; _nop_(); _nop_(); SDA=1; _nop_(); SCL=0; } char ReadData() { int i; char x ; for(i=1;i<=8;i++) { SCL=1; x<<=1; x=(char)x|SDA; SCL=0; } return (x); } void WriteCurrent(char W) { int i; for(i=1;i<=8;i++) { SDA=(bit)(W&0x80); _nop_(); SCL=1; _nop_(); _nop_(); SCL=0; W<<=1; } } bit TestAck() { bit ask_bit; SDA=1; _nop_(); SCL=1; _nop_(); ask_bit=SDA;//-1-0-1-0 SCL=0; ask_bit=SDA; return ask_bit; } void WriteSet(unsigned char add,char datas) { start(); WriteCurrent(OP_WRITE) ; TestAck(); WriteCurrent(add) ; TestAck(); WriteCurrent(datas) ; TestAck(); stop(); delaynms(4); } /////////////////////////////// unsigned char ReadCurrent() { char x; start(); WriteCurrent(OP_READ) ; TestAck(); x= ReadData() ; stop(); return x; } char ReadSet(unsigned char set_addr) { char x ; start(); WriteCurrent(OP_WRITE) ; TestAck(); WriteCurrent(set_addr) ; TestAck(); x= ReadCurrent(); return(x); stop(); } main() { SDA=1; SCL=1; WriteSet(0x36,0x0a); P1= ReadSet(0x36); while(1); }