//-----------------------------------------------
//MAIN - (MAIN PROGRAM)
//-----------------------------------------------
// Lcd pinout settings
sbit LCD_RS at RB4_bit;
sbit LCD_EN at RB5_bit;
sbit LCD_D7 at RB3_bit;
sbit LCD_D6 at RB2_bit;
sbit LCD_D5 at RB1_bit;
sbit LCD_D4 at RB0_bit;

// Pin direction
sbit LCD_RS_Direction at TRISB4_bit;
sbit LCD_EN_Direction at TRISB5_bit;
sbit LCD_D7_Direction at TRISB3_bit;
sbit LCD_D6_Direction at TRISB2_bit;
sbit LCD_D5_Direction at TRISB1_bit;
sbit LCD_D4_Direction at TRISB0_bit;


void main()
{
  unsigned char data1;
  unsigned char command;
  char txt[4];
  char txt1[] = "Received ";
  char txt3[] = "Slave Test";

  I2C1_Init(100000);         //Initialize I2C Master with 100KHz clock
  Lcd_init();                 //Initialize the LCD
  Lcd_Cmd(_LCD_CLEAR);               // Clear display
  Lcd_Cmd(_LCD_CURSOR_OFF);          // Cursor off
  Lcd_Out(1,0,txt3);                 // Write text in first row


  while(1)
  {
    I2C1_Start();            //Start condition
    I2C1_Wr(0x30);           //7 bit address + Write
    I2C1_Wr(command);        //Write data
    I2C1_Stop();             //Stop condition
    delay_ms(200);
    I2C1_Start();            //Start condition
    I2C1_Wr(0x31);           //7 bit address + Read
    data1 = I2C1_Rd(0);      //Read + Acknowledge
    I2C1_Stop();             //Stop condition
    Lcd_Cmd(_LCD_CLEAR);     // Clear display
    Lcd_Out(0,4,txt1);       // Write text in first row
    Lcd_Cmd(_LCD_SECOND_ROW);
    ByteToStr(data1, txt);
    Lcd_Out(1,6,txt);
    delay_ms(1000);
  }
}

#define SLAVE_ADDRESS 0x30
unsigned char rxbuffer,address, buff;
unsigned char a1=0;

void I2C_Slave_Init(unsigned char address)
{
  SSPSTAT = 0x80;
  SSPADD = address; //Setting address
  SSPCON1 = 0x36;    //As a slave device
  SSPCON2 = 0x01;
  TRISC3_bit = 1;       //Setting as input as given in datasheet
  TRISC4_bit = 1;       //Setting as input as given in datasheet
  GIE_bit = 1;          //Global interrupt enable
  PEIE_bit = 1;         //Peripheral interrupt enable
  SSPIF_bit = 0;        //Clear interrupt flag
  SSPIE_bit = 1;        //Synchronous serial port interrupt enable
}

void interrupt(){
     if (PIR1.SSPIF){
        PIR1.SSPIF = 0;
        if(!SSPSTAT.R_W & SSPSTAT.D_A & SSPSTAT.BF ){
            a1++;
            if (a1==1){
               address=SSPBUF;
            }
            if (a1==2){
               rxbuffer=SSPBUF;
               a1=0;
            }
            PIR1.SSPIF = 0;
        }

        if( !SSPSTAT.R_W & !SSPSTAT.D_A & SSPSTAT.BF ){
            buff = SSPBUF;
            PIR1.SSPIF = 0;
        }
     }
}

void main()
{
  TRISC0_bit = 0;           //PORTC0 output led
  TRISC1_bit = 1;           //PORTC1 input pulsante
  PORTC.F0 = 0;              //LED OFF
  I2C_Slave_Init(SLAVE_ADDRESS);         //Initialize I2C slave
  while (1)
  {
   if (address == SLAVE_ADDRESS) {       // if the device is our own
      PORTC.F0=rxbuffer.F0;              // we set the led accordingly first BIT
   }
   buff=PORTC;                           // always update the PORTC to the master
  }
}