Dim A As Bit
Dim C As Bit
Dim D As Bit
Dim E As Bit

Config Sda = P0.1
Config Scl = P0.0
Dim Value1 As Byte
Dim Value2 As Byte


Do

I2creceive 32 , Value1                                      
If Value1 = 1 Then                                          
End If
If Value1 = 2 Then
End If
 If Value1 = 4 Then
 End If
 If Value1 = 8 Then
program do something
End If

  I2creceive 36 , Value 2
  If Value2 = 1 Then
  End If
  If Value2 = 2 Then
   End If
   If Value2 = 128 Then
   End If
 Loop