// Simulation of I2C Memory (Slave)

MAP 0x30000, 0x37FFF READ WRITE      // Map User 64kB Memory region

DEFINE int SADR                              // Slave Address

signal void I2CMEMORY (void) {
  unsigned long adr;

  adr = 0x30000;

  while (1) {
    wwatch (I2C_OUT);                        // Wait for data from Microcontroller
    while (I2C_OUT == 0x0100) {              // START detected
      wwatch (I2C_OUT);                      // Wait for data from Microcontroller
      if (I2C_OUT > 0xFF) continue;
      if ((I2C_OUT >> 1) != SADR) continue;  // test if Slave is addressed
      I2C_IN = 0xFF00;                       // ACK to Microcontroller
      if (I2C_OUT & 1) {                     // Slave Read
        while (1) {  
          I2C_IN = _RBYTE(adr);              // Read Byte from Memory
          adr++;                             // Increment Address
          wwatch (I2C_OUT);                  // Wait for ACK from Microcontroller
          if (I2C_OUT != 0xFF00) break;
        }
      }
      else {                                 // Slave Write
        wwatch (I2C_OUT);                    // Wait for data from Microcontroller
        if (I2C_OUT > 0xFF) continue;
        adr = (I2C_OUT << 8) | 0x30000;      // Set Memory Address High Byte
        I2C_IN = 0xFF00;                     // ACK to Microcontroller
        wwatch (I2C_OUT);                    // Wait for data from Microcontroller
        if (I2C_OUT > 0xFF) continue;
        adr = I2C_OUT | adr;                 // Set Memory Address Low Byte
        I2C_IN = 0xFF00;                     // ACK to Microcontroller
        while (1) {
          wwatch (I2C_OUT);                  // Wait for data from Microcontroller
          if (I2C_OUT > 0xFF) break;
          _WBYTE (adr, I2C_OUT);             // Store Byte in Memory
          adr++;                             // Increment Address
          I2C_IN = 0xFF00;                   // ACK to Microcontroller
        }
      }
    }
  }
}


SADR = 0x50  // Slave Address
I2CMemory()  // Starting signal function


//mode com1 38400
//assign com1 <s0in>s0out

SIGNAL void q (void)
{
//     while (1)
//    {
        S0IN = 0xC0;
        twatch (60000);
           S0IN = 0x81;
           twatch (60000);
        S0IN = 0x07;
        twatch (60000);

        S0IN = 0x05;
        twatch (60000);

        S0IN = 0x06;
        twatch (60000);
        S0IN = 0x00;
        twatch (60000);
        S0IN = 0x00;
        twatch (60000);
        S0IN = 0x00;
        twatch (60000);
        S0IN = 0x05;
        twatch (60000);
  
        S0IN = 0xDA;
        twatch (60000);
  //    }
}

#include <aduc845.h>
unsigned char a;
void main(void)
{
    SPICON=0x2b;
    for(;;){
        SPIDAT=0x45;
        for(;! ISPI;);
        a=SPIDAT;       // ставим сюда точку останова
    }
}