#include "stm32f10x_gpio.h"



#define BIT_IN (1<<1) // номер бита входа SPI
#define SCK_SPI_SET GPIO_SetBits(GPIOD, GPIO_Pin_1)
#define SCK_SPI_CLR GPIO_ResetBits(GPIOD, GPIO_Pin_1)

#define SPI_DATA1 GPIO_SetBits(GPIOD, GPIO_Pin_0)
#define SPI_DATA0 GPIO_ResetBits(GPIOD, GPIO_Pin_0)

#define SPI_CS_SET GPIO_ResetBits(GPIOA, GPIO_Pin_2)
#define SPI_CS_CLR GPIO_SetBits(GPIOA, GPIO_Pin_2)

#define SPI_IN ((GPIOA->IDR & BIT_IN)==BIT_IN)

void soft_spi_init();
void soft_spi_write_instruct(unsigned char instruct);
void soft_spi_write_addr(long addr_dev);
int soft_spi_read();

#include "EN25T80.h"

void delay(long x)
{
while(x)
{
x--;
}
}

void soft_spi_init()
{


GPIOC->CRH |=0x24200000; //
GPIOD->CRL |=0x00000002; //
}

void soft_spi_write_instruct(unsigned char instruct)
{
char x;
SPI_CS_CLR;

for(x=0;x<8;x++) // instruction
{
SCK_SPI_CLR;
delay(100);
SCK_SPI_SET;

if (0x80 & instruct)
{
SPI_DATA1;
}
else
{
SPI_DATA0;
}
instruct = instruct<<1;

delay(100);
}
}

void soft_spi_write_addr(long addr_dev)
{
char x;
for(x=0;x<24;x++) // instruction
{
SCK_SPI_CLR;
delay(100);
SCK_SPI_SET;

if (0x800000 & addr_dev)
{
SPI_DATA1;
}
else
{
SPI_DATA0;
}
addr_dev = addr_dev<<1;

delay(100);
}
}

int soft_spi_read()
{
int data_buff=0;
char x;

for(x=0;x<16;x++)
{
SCK_SPI_CLR;
delay(100);
SCK_SPI_SET;

if (SPI_IN)
{
data_buff |=1;
}
data_buff = data_buff<<1;

delay(100);
}

SPI_CS_SET;

return data_buff;
}

#include "stm32F10x.h"
#include "hd44780_driverhd44780_driver.h"
#include "stm32f10x_rcc.h"
#include "stm32f10x_gpio.h"
#include

#include "EN25T80.h"
unsigned char buffer[25];

int main(void)
{
int x=10000,y=0;
int flags=0;
int flags_button=1;
int timer=0,data_out=0;


RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOB, ENABLE);

GPIOB->CRH = 0x44444444; // конфигурируем на выход частота 2мгЦ бит 8 и 9
GPIOB->CRL = 0x22222222; // конфигурируем на выход частота 2мгЦ бит 8 и 9

RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOD, ENABLE);
GPIOD->CRH = 0x44444444;
GPIOD->CRL = 0x44444222; // конфигурируем на выход частота 2мгЦ бит 8 и 9



RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA, ENABLE); //Вкл порт С
GPIOA->CRH = 0x33333333;
GPIOA->CRL = 0x44444242;

RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOC, ENABLE); //Вкл порт С
GPIOC->CRH = 0x33333333;
GPIOC->CRL = 0x33333433;
while(x)
{
x--;

}

lcd_init(); //Инициализируем дисплей

soft_spi_write_instruct(0x03);
soft_spi_write_addr(0x000000);



while(1)
{
if(timer==0)
{
GPIO_SetBits(GPIOC, GPIO_Pin_8 );

x=45000;
while(x)
{
x--;
}
}
if(timer==1)
{

GPIO_ResetBits(GPIOC, GPIO_Pin_8 );

x=450000;
while(x)
{
x--;
}
}
if(timer==2)
{

GPIO_SetBits(GPIOC, GPIO_Pin_9 );
x=45000;
while(x)
{
x--;
}
}
if(timer==3)
{
GPIO_ResetBits(GPIOC, GPIO_Pin_9 );

x=450000;
while(x)
{
x--;
}

}


timer++;
if(timer>3)timer=0;


if(data_out)
{
if(flags)
{

lcd_xy(0,0); //переводим курсор в первую строку
lcd_out("Yarunka lubit "); //Выводм надпись в нулевую строку

//lcd_set_state(LCD_ENABLE, CURSOR_DISABLE, NO_BLINK); //Включаем курсор и мигалку
lcd_xy(1,0); //переводим курсор в первую строку
lcd_out("Kolbasu! "); //Выводм надпись в нулевую строку


lcd_xy(2,0); //переводим курсор в первую строку
lcd_out("============ "); //Выводм надпись в нулевую строку

data_out=0;

}
else
{

lcd_xy(0,0); //переводим курсор в первую строку
lcd_out("Привет! Я микрок-"); //Выводм надпись в нулевую строку

lcd_xy(1,0); //переводим курсор в первую строку
lcd_out("онтроллер STM32F100!"); //Выводм надпись в нулевую строку

lcd_xy(2,0); //переводим курсор в первую строку
lcd_out("И я умею всё! :) "); //Выводм надпись в нулевую строку


data_out=0;
}
}

if((GPIO_ReadInputDataBit(GPIOA, GPIO_Pin_0)==1) && flags_button==1)
{

if(flags)flags=0;
else flags=1;

data_out=1;
flags_button=0;
}
if((GPIO_ReadInputDataBit(GPIOA, GPIO_Pin_0)==0) && flags_button==0)
{
flags_button=1;
}

sprintf(buffer, "A=%x P=%d ", soft_spi_read(), y++); // колл. этапов
lcd_xy(3,1);
lcd_out(buffer);

delay(500000);

}
}