#define MMC_Slow SPI_CSR1=0x00004B02; //@400 kHz
#define MMC_Fast SPI_CSR1=0x00000202; //@15 MHz

#define MMC_CS(mmc_cs) \
{ \
  A_ODSR=(A_ODSR&0xFFFFFFEF)|(mmc_cs<<4); \
  PIOA_ODSR=A_ODSR; \
}

u32 A_ODSR=0x00000038;

u8 MMCBuffer[512]; //Буфер MMC-карточки

s8 DetectMMC(void) //Наличие MMC
{
  if(PIOA_PDSR&0x00000100) return -1;
  return 0;
}

u8 IO(u8 io)
{
  SPI_TDR=io|0x00010000;
  while((SPI_SR&3)!=3);
  return SPI_RDR;
}

s8 PrepareMMC(void) //Подготовка MMC к работе
{
  u8 b;
  MMC_Slow
  MMC_CS(1)
  for(b=0;b<10;b++) IO(0xFF);
  SimpleDelay(1000);
  MMC_CS(0)
  IO(0x40);
  IO(0);
  IO(0);
  IO(0);
  IO(0);
  b=IO(0x95);
  while(b==0xFF) b=IO(0xFF);
  if(b!=0x01)
  {
   MMC_CS(1)
   return -1;
  }
  CMD1:
  IO(0x41);
  IO(0);
  IO(0);
  IO(0);
  IO(0);
  b=IO(0xFF);
  while(b==0xFF) b=IO(0xFF);
  if(b!=0x00) goto CMD1;
  MMC_CS(1)
  MMC_Fast
  return 0;
}

s8 InMMC(u32 Sector) //Чтение сектора MMC
{
  u8 b;
  u16 i;
  Sector<<=9;
  MMC_CS(0)
  IO(0x51);
  IO(Sector>>24);
  IO(Sector>>16);
  IO(Sector>> 8);
  IO(Sector    );
  b=IO(0xFF);
  while(b==0xFF) b=IO(0xFF);
  if(b)
  {
   MMC_CS(1)
   return -1;
  }
  while(b!=0xFE) b=IO(0xFF);
  for(i=0;i<512;i++) MMCBuffer[i]=IO(0xFF);
  IO(0xFF);
  IO(0xFF);
  MMC_CS(1)
  return 0;
}