#include "DEPG0213BBS800F41HP-M7.h"
#include "Image.h"

void EpaperIO_Init(void)
{
   GPIO_InitTypeDef GPIO_InitStructure;

   RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA | RCC_APB2Periph_GPIOB | RCC_APB2Periph_GPIOC, ENABLE); // 使能PB端口时钟

   // EPAPER_BS N
   GPIO_InitStructure.GPIO_Pin = GPIO_Pin_8; // 端口配置, 推挽输出
   GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;
   GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
   GPIO_Init(GPIOA, &GPIO_InitStructure);

   // EPAPER_EN
   GPIO_InitStructure.GPIO_Pin = GPIO_Pin_12; // 端口配置, 推挽输出
   GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;
   GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
   GPIO_Init(GPIOA, &GPIO_InitStructure);

   // SPI_CLK-->PB13    SPI_MOSI--->PB15
   GPIO_InitStructure.GPIO_Pin = GPIO_Pin_13 | GPIO_Pin_15; // 端口配置, 推挽输出
   GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;
   GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
   GPIO_Init(GPIOB, &GPIO_InitStructure);

   //  CS-->PC6    D/C--->PC7   RES-->PC8
   GPIO_InitStructure.GPIO_Pin = GPIO_Pin_6 | GPIO_Pin_7 | GPIO_Pin_8 | GPIO_Pin_12; // 端口配置, 推挽输出
   GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP;
   GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;
   GPIO_Init(GPIOC, &GPIO_InitStructure);

   // BUSY--->PC9
   GPIO_InitStructure.GPIO_Pin = GPIO_Pin_9;
   GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IN_FLOATING; // 下拉输入
   GPIO_Init(GPIOC, &GPIO_InitStructure);                // 初始化GPIO

   Epaper_BS = 0;
}

void SPI_DATA_IO_Init(u8 mode)
{
	GPIO_InitTypeDef  GPIO_InitStructure;
		
	RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB, ENABLE);//'??PB??????
	
	if(mode==SPI_OUT)
	 {
		GPIO_InitStructure.GPIO_Pin = GPIO_Pin_15;		//???????, ???????
		GPIO_InitStructure.GPIO_Mode = GPIO_Mode_Out_PP; 		 			
		GPIO_InitStructure.GPIO_Speed = GPIO_Speed_50MHz;		 		
		GPIO_Init(GPIOB, &GPIO_InitStructure);	
	 }

	 if(mode==SPI_IN)
	 {
		GPIO_InitStructure.GPIO_Pin  = GPIO_Pin_15;
		GPIO_InitStructure.GPIO_Mode = GPIO_Mode_IPU;	//????????
		GPIO_Init(GPIOB, &GPIO_InitStructure);				//??'??GPIO
	 }
}

void Epaper_Spi_WriteByte(u8 TxData)
{
   u8 TempData;
   u8 scnt;
   TempData = TxData;
   SPI_DATA_IO_Init(SPI_OUT);
   SPI_CLK = 0;
   for (scnt = 0; scnt < 8; scnt++)
   {
      if (TempData & 0x80)
         SPI_MOSI = 1;
      else
         SPI_MOSI = 0;
      SPI_CLK = 1;
      delay_us(5);
      SPI_CLK = 0;
      TempData = TempData << 1;
      delay_us(5);
   }
}

void Epaper_READBUSY(void)
{ 
  while(1)
  {
     if(Epaper_BUSY==0) break;
		 delay_us(5) ;
  }  
	 delay_us(100) ;
}

void Epaper_Write_Command(u8 cmd)
{
   Epaper_CS = 1;
   Epaper_CS = 0;
   Epaper_DC = 0; // D/C#   0:command  1:data

   delay_us(5);
   Epaper_Spi_WriteByte(cmd);
   delay_us(5);
   Epaper_CS = 1;
}

void Epaper_Write_Data(u8 data)
{
   Epaper_CS = 1;
   Epaper_CS = 0;
   Epaper_DC = 1; // D/C#   0:command  1:data

   delay_us(5);
   Epaper_Spi_WriteByte(data);
   delay_us(5);
   Epaper_CS = 1;
}

/*
 * 函数名：Epaper_Init
 * 描述  ：电子纸初始化程序
 * 输入  ：无
 * 输出  ：无
 */

void Epaper_Initial(void)
{
   Epaper_EN=1; //open the 3V power 
   delay_ms(10);
   Epaper_RESET = 0;    // EPD 硬件复位    Hardware  reset
   delay_ms(10);
   Epaper_RESET = 1;    // EPD 硬件复位释放    Hard  reset  release
   delay_ms(10);
   Epaper_READBUSY(); 	// 读busy信号
 
   Epaper_Write_Command(0x12); 
   Epaper_READBUSY();
	
		
	Epaper_Write_Command(0x01);  			 //驱动输出控制 drive output control    
	Epaper_Write_Data(Y_Addr_Start_L); //Y 的低字节 
	Epaper_Write_Data(Y_Addr_Start_H); //Y 的高字节 
	Epaper_Write_Data(0x00);
	

	Epaper_Write_Command(0x11);        //Data entry mode setting
	Epaper_Write_Data(0x01);           //00 Y decrement, X decrement,
																		 //01 Y decrement, X increment,
																		 //10 Y  increment, X decrement,
																		 //11 Y increment, X increment    

 
	Epaper_Write_Command(0x44);        // Set RAM X - address Start / End position
	Epaper_Write_Data(X_Addr_Start);
	Epaper_Write_Data(X_Addr_End);
 
	Epaper_Write_Command(0x45);        // Set RAM Y - address Start / End position   
	Epaper_Write_Data(Y_Addr_Start_L);
	Epaper_Write_Data(Y_Addr_Start_H);
	Epaper_Write_Data(Y_Addr_End_L);
	Epaper_Write_Data(Y_Addr_End_H); 
	
	Epaper_Write_Command(0x4E);        //Set RAM X address counter
	Epaper_Write_Data(X_Addr_Start);
 
 
	Epaper_Write_Command(0x4F);        //Set RAM Y address counter  
	Epaper_Write_Data(Y_Addr_Start_L);
	Epaper_Write_Data(Y_Addr_Start_H);	 

	Epaper_Write_Command(0x3C);        //Border设置  Border setting 
	Epaper_Write_Data(0x05);
	
	Epaper_Write_Command(0x21);          
	Epaper_Write_Data(0x00);
	Epaper_Write_Data(0x00);
}

void Epaper_Initial_partial(void)
{
	 delay_ms(10);
   Epaper_RESET = 0;    // EPD 硬件复位    Hardware  reset
   delay_ms(10);
   Epaper_RESET = 1;    // EPD 硬件复位释放    Hard  reset  release
   delay_ms(10);
   Epaper_READBUSY(); 	// 读busy信号
 
//   Epaper_Write_Command(0x12); //partial update need remove 0x12 soft reset
//   Epaper_READBUSY();
	Epaper_Write_Command(0x3C); // border folating
  Epaper_Write_Data(0x80); 
}

 void Epaper_Update_and_Deepsleep_full_update(void)
{
	
   Epaper_Write_Command(0x22);
   Epaper_Write_Data(0xF7);
   Epaper_Write_Command(0x20);
   Epaper_READBUSY();

   Epaper_Write_Command(0x10);
   Epaper_Write_Data(0x01);
   delay_ms(100);
}

 void Epaper_Update_and_Deepsleep_partial_update(void)
{
	
   Epaper_Write_Command(0x22);
   Epaper_Write_Data(0xFF);
   Epaper_Write_Command(0x20);
   Epaper_READBUSY();

   Epaper_Write_Command(0x10);
   Epaper_Write_Data(0x01);
   delay_ms(100);
}

 void Epaper_Load_White( )
{
  u32 i,k; 
	
		Epaper_Write_Command(0x24); 
		for(i=0;i<MAX_COLUMN_BYTES;i++)
		{          
			for(k=0;k<MAX_LINE_BYTES;k++)
			Epaper_Write_Data(0xff);
		} 
  

}

 void Epaper_Load_Black( )
{
  u32 i,k; 
	
		Epaper_Write_Command(0x24); 
		for(i=0;i<MAX_COLUMN_BYTES;i++)
		{          
			for(k=0;k<MAX_LINE_BYTES;k++)
			Epaper_Write_Data(0x00);
		} 

  
}
 
void Epaper_load_image_new(u8 *BN_DTM)
{
  u32 i; 
  u8 tempOriginal;      
  u32 tempcol=0;
  u32 tempcol1=0;
  u32 templine=0;
  u32 templine1=0;

	 Epaper_Write_Command(0x24); //DTM1
		for(i=0;i<ALLSCREEN_BYTES;i++)
		{          
			tempOriginal=*(BN_DTM+templine*MAX_COLUMN_BYTES+tempcol);
			templine++;
			if(templine>=MAX_LINE_BYTES)
			{
				tempcol++;
				templine=0;
			}     
			Epaper_Write_Data(tempOriginal);
		} 
		
	Epaper_Write_Command(0x26); //DTM2
		for(i=0;i<ALLSCREEN_BYTES;i++)
		{          
			tempOriginal=*(BN_DTM+templine1*MAX_COLUMN_BYTES+tempcol1);
			templine1++;
			if(templine1>=MAX_LINE_BYTES)
			{
				tempcol1++;
				templine1=0;
			}     
			Epaper_Write_Data(tempOriginal);
		}		
}

void Epaper_load_image_new_patial(u8 *BN_DTM)
{
	u32 i; 
  u8 tempOriginal;      
  u32 tempcol=0;
  u32 templine=0;
	 Epaper_Write_Command(0x24); //DTM1
		for(i=0;i<ALLSCREEN_BYTES;i++)
		{          
			tempOriginal=*(BN_DTM+templine*MAX_COLUMN_BYTES+tempcol);
			templine++;
			if(templine>=MAX_LINE_BYTES)
			{
				tempcol++;
				templine=0;
			}     
			Epaper_Write_Data(tempOriginal);
		} 


}
 
void Display_black( )
{
    Epaper_Initial( ); 
    Epaper_Load_Black( );
    Epaper_Update_and_Deepsleep_full_update( );		
}
 
void Display_white( )
{ 
    Epaper_Initial( );
    Epaper_Load_White( ); 
    Epaper_Update_and_Deepsleep_full_update( );		
}

void Display_image_new(u8 *BN_DTM)
{		
   Epaper_Initial( );
   Epaper_load_image_new((u8*)BN_DTM);
   Epaper_Update_and_Deepsleep_full_update( );
}
 
void Display_image_new_partial_update(u8 *BN_DTM)
{		
   Epaper_Initial_partial( );
   Epaper_load_image_new_patial((u8*)BN_DTM);
   Epaper_Update_and_Deepsleep_full_update( );
}
int main()
{
EpaperIO_Init();
delay_init();	
Display_black( );
Display_white( );
Display_image_new((u8*)dancika_image1);//The full-update before partial haves to send 24ram and 26 ram the same data
	// if you won't execute partial update after full-update you just send the image to 24 will be OK 
Display_image_new_partial_update((u8*)dancika_image2);//just send to 24 will be ok
Display_image_new_partial_update((u8*)dancika_image3);
Display_image_new_partial_update((u8*)dancika_image4);
Display_image_new_partial_update((u8*)dancika_image5);

}