#include "stm32f10x.h"

#include

#define SCL_H  (GPIOB->BSRR = GPIO_Pin_6)

#define SCL_L  (GPIOB->BRR = GPIO_Pin_6)

#define SDA_H  (GPIOB->BSRR = GPIO_Pin_7)

#define SDA_L  (GPIOB->BRR = GPIO_Pin_7)

#define SCL_READ (GPIOB->IDR & GPIO_Pin_6)

#define SDA_READ (GPIOB->IDR & GPIO_Pin_7)

#define I2C_DELAY (I2C_delay())

/* RCC时钟配置 */

void RCC_config(void)

{ 

 ErrorStatus HSEStartUpStatus;

 /* RCC寄存器设置为默认配置 */

 RCC_DeInit();

 /* 打开外部高速时钟 */

 RCC_HSEConfig(RCC_HSE_ON);

 /* 等待外部高速时钟稳定 */

HSEStartUpStatus = RCC_WaitForHSEStartUp();

 if(HSEStartUpStatus == SUCCESS) 

 { 

 /* 设置HCLK = SYSCLK */

  RCC_HCLKConfig(RCC_SYSCLK_Div1);

  /* 设置PCLK2 = HCLK */

  RCC_PCLK2Config(RCC_HCLK_Div1);

  /* 设置PCLK1 = HCLK / 2 */

  RCC_PCLK1Config(RCC_HCLK_Div2);

//  /* 设置FLASH代码延时 */

//  FLASH_SetLatency(FLASH_Latency_2);

//  /* 使能预取址缓存 */

//  FLASH_PrefetchBufferCmd(FLASH_PrefetchBuffer_Enable);

  /* 设置PLL时钟源为HSE倍频9 72MHz */

  RCC_PLLConfig(RCC_PLLSource_HSE_Div1, RCC_PLLMul_9);

  /* 使能PLL */

  RCC_PLLCmd(ENABLE);

  /* 等待PLL稳定 */

  while(RCC_GetFlagStatus(RCC_FLAG_PLLRDY) == RESET);

  /* 设置PLL为系统时钟源 */

  RCC_SYSCLKConfig(RCC_SYSCLKSource_PLLCLK);

  /* 等待系统时钟源切换到PLL */

  while(RCC_GetSYSCLKSource() != 0x08);

 }

}

/* GPIO配置 */

void GPIO_config(void)

{

 GPIO_InitTypeDef GPIO_InitStructure;

 /* 时钟配置 */

 RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB, ENABLE);

 /* SDA、SCL开漏输出 */

 GPIO_InitStructure.GPIO_Pin = GPIO_Pin_6 | GPIO_Pin_7;

 GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;

 GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_OD;

 GPIO_Init(GPIOB, &GPIO_InitStructure);

}

/* 毫秒延时函数 */

void delay_ms(uint16_t time)

{    

 uint16_t i = 0; 

 while(time--)

 {

  i = 12000;

  while(i--);    

 }

}

/* I2C延时函数 */

void I2C_delay(void)  

{     

 uint8_t i = 100;  

 while(i)   

 {      

  i--;   

 }

}

/* I2C开始信号 */

bool I2C_Start(void)  

{

 SDA_H;

 SCL_H;

 I2C_DELAY;

 if(!SDA_READ)  

  return false;

 SDA_L;

 I2C_DELAY;  

 if(SDA_READ)   

  return false;

 SDA_L;

 I2C_DELAY;

 return true;  

} 

/* I2C停止信号 */

void I2C_Stop(void)

{

 SCL_L;

 I2C_DELAY;

 SDA_L;

 I2C_DELAY;

 SCL_H;

 I2C_DELAY;

 SDA_H;

 I2C_DELAY;

}

/* I2C响应信号 */

void I2C_Ack(void)  

{     

 SCL_L;

 I2C_DELAY;  

 SDA_L;

 I2C_DELAY;  

 SCL_H;

 I2C_DELAY;  

SCL_L;

 I2C_DELAY;  

} 

/* I2C未响应信号 */

void I2C_NoAck(void)  

{     

 SCL_L;

 I2C_DELAY;  

 SDA_H;

 I2C_DELAY;  

 SCL_H;

 I2C_DELAY;  

 SCL_L;

 I2C_DELAY;  

} 

/* 等待应答信号 */

bool I2C_WaitAck(void)     

{  

 SCL_L;

 I2C_DELAY;  

 SDA_H;

 I2C_DELAY;  

 SCL_H;

 I2C_DELAY;  

 if(SDA_READ)  

 {  

  SCL_L;

  return false;  

 }  

 SCL_L;

 return true;  

} 

/* I2C发送一个字节 */

void I2C_SendByte(uint8_t SendByte)   

{  

 uint8_t i = 8;

 while(i--)  

 {  

  SCL_L;

  I2C_DELAY;

  if(SendByte & 0x80)

   SDA_H;

  else  

   SDA_L;

  SendByte <<= 1;  

  I2C_DELAY; 

  SCL_H;

  I2C_DELAY;  

 }  

 SCL_L;

} 

/* I2C接收一个字节 */

uint8_t I2C_ReceiveByte(void)    

{   

 uint8_t i = 8;  

 uint8_t ReceiveByte = 0; 

 SDA_H;

 while(i--)  

 {  

  ReceiveByte<<=1;        

  SCL_L;

  I2C_DELAY;  

  SCL_H;

  I2C_DELAY;      

  if(SDA_READ)  

  {  

   ReceiveByte|=0x01;

  }  

 }

 SCL_L;

 return ReceiveByte;  

}

#define CTRL_CODE 0xA0

/* 写一个字节 */

bool EEPROM_Write_Byte(uint8_t block, uint8_t addr, uint8_t *data)

{

 uint8_t cnt = 10;

 /* 确认写周期结束，并写入控制字 */

 do

 {

  I2C_Start();

  I2C_SendByte((CTRL_CODE | (block & 0x0E)) & 0xFE);

 }while((I2C_WaitAck() == false) && (--cnt > 0));

 if(cnt == 0)

 {

  I2C_Stop();

  return false; 

 }

 /* 写入地址 */

 I2C_SendByte(addr);

 if(I2C_WaitAck() == false)

 {

  I2C_Stop();

  return false;

 }

 /* 写入数据 */

 I2C_SendByte(*data);

 if(I2C_WaitAck() == false)

 {

  I2C_Stop();

  return false;

 }

 I2C_Stop();

 return true;

}

/* 读一个字节 */

bool EEPROM_Read_Byte(uint8_t block, uint8_t addr, uint8_t *data)

{

 uint8_t cnt = 10;

 /* 确认写周期结束，并写入控制字 */

 do

 {

  I2C_Start();

  I2C_SendByte((CTRL_CODE | (block & 0x0E)) & 0xFE);

 }while((I2C_WaitAck() == false) && (--cnt > 0));

 if(cnt == 0)

 {

  I2C_Stop();

  return false; 

 }

 /* 写入地址 */

 I2C_SendByte(addr);

 if(I2C_WaitAck() == false)

 {

  I2C_Stop();

  return false;

 }

 /* 写入控制字 */

 I2C_Start();

 I2C_SendByte(CTRL_CODE | (block & 0x0E) | 0x01);

 if(I2C_WaitAck() == false)

 {

  I2C_Stop();

  return false;

 }

 /* 读出数据 */

 *data = I2C_ReceiveByte();

 I2C_NoAck();

 I2C_Stop();

 return true;

}

/* 主函数 */

int main(void)

{

 uint8_t data = 3;

 /* RCC时钟配置 */

 RCC_config();

 /* GPIO配置 */

 GPIO_config();

 EEPROM_Write_Byte(0, 0, &data);

 data = 6;

 EEPROM_Read_Byte(0, 0, &data);

 while(1)

 {

  delay_ms(1000);

 }

}