#include "stm32f4xx_hal.h"
#include "hd44780.h"
#include "delay.h"

UART_HandleTypeDef huart1;
SRAM_HandleTypeDef hsram1;

void SystemClock_Config(void);
static void MX_GPIO_Init(void);
static void MX_FMC_Init(void);
static void MX_USART1_UART_Init(void);

// Для записи данных
#define LCD_DATA ((uint32_t)0x60020000)
// Для записи команд
#define LCD_REG ((uint32_t)0x60000000)


#define writeLCDCommand(reg,value) { *(uint16_t *)LCD_REG = reg; *(uint16_t *)LCD_DATA = value; }

#define writeLCDData(value) {*(uint16_t *)LCD_DATA=value;}

uint16_t LCD_GRAM[240][320];

void initLCD()
{
HAL_GPIO_WritePin(GPIOE, GPIO_PIN_1, GPIO_PIN_SET);
HAL_Delay(1);
HAL_GPIO_WritePin(GPIOE, GPIO_PIN_1, GPIO_PIN_RESET);
HAL_Delay(10);
HAL_GPIO_WritePin(GPIOE, GPIO_PIN_1, GPIO_PIN_SET);
HAL_Delay(50);

//************* Start Initial Sequence **********//
writeLCDCommand(0x00E3, 0x3008); // Set internal timing
writeLCDCommand(0x00E7, 0x0012); // Set internal timing
writeLCDCommand(0x00EF, 0x1231); // Set internal timing
writeLCDCommand(0x0001, 0x0100); // set SS and SM bit
writeLCDCommand(0x0002, 0x0700); // set 1 line inversion
//writeLCDCommand(0x0003, 0x1030); // ВЕР ОРИЕН, >
writeLCDCommand(0x0003, 0x1018); // ГОР ОРИЕН, >
writeLCDCommand(0x0004, 0x0000); // Resize register
writeLCDCommand(0x0008, 0x0207); // set the back porch and front porch
writeLCDCommand(0x0009, 0x0000); // set non-display area refresh cycle ISC[3:0]
writeLCDCommand(0x000A, 0x0000); // FMARK function
writeLCDCommand(0x000C, 0x0000); // RGB interface setting
writeLCDCommand(0x000D, 0x0000); // Frame marker Position
writeLCDCommand(0x000F, 0x0000); // RGB interface polarity
//*************Power On sequence ****************//
writeLCDCommand(0x0010, 0x0000); // SAP, BT[3:0], AP, DSTB, SLP, STB
writeLCDCommand(0x0011, 0x0007); // DC1[2:0], DC0[2:0], VC[2:0]
writeLCDCommand(0x0012, 0x0000); // VREG1OUT voltage
writeLCDCommand(0x0013, 0x0000); // VDV[4:0] for VCOM amplitude
HAL_Delay(200); // Dis-charge capacitor power voltage
writeLCDCommand(0x0010, 0x1490); // SAP, BT[3:0], AP, DSTB, SLP, STB
writeLCDCommand(0x0011, 0x0227); // DC1[2:0], DC0[2:0], VC[2:0]
HAL_Delay(50); // Delay 50ms
writeLCDCommand(0x0012, 0x001C); // Internal reference voltage= Vci;
HAL_Delay(50); // Delay 50ms
writeLCDCommand(0x0013, 0x1A00); // Set VDV[4:0] for VCOM amplitude
writeLCDCommand(0x0029, 0x0025); // Set VCM[5:0] for VCOMH
writeLCDCommand(0x002B, 0x000E); // Set Frame Rate
HAL_Delay(50); // Delay 50ms
writeLCDCommand(0x0020, 0x0000); // GRAM horizontal Address
writeLCDCommand(0x0021, 0x0000); // GRAM Vertical Address
// ----------- Adjust the Gamma Curve ----------//
writeLCDCommand(0x0030, 0x0000);
writeLCDCommand(0x0031, 0x0506);
writeLCDCommand(0x0032, 0x0104);
writeLCDCommand(0x0035, 0x0207);
writeLCDCommand(0x0036, 0x000F);
writeLCDCommand(0x0037, 0x0306);
writeLCDCommand(0x0038, 0x0102);
writeLCDCommand(0x0039, 0x0707);
writeLCDCommand(0x003C, 0x0702);
writeLCDCommand(0x003D, 0x1604);
//------------------ Set GRAM area ---------------//
writeLCDCommand(0x0050, 0x0000); // Horizontal GRAM Start Address
writeLCDCommand(0x0051, 0x00EF); // Horizontal GRAM End Address
writeLCDCommand(0x0052, 0x0000); // Vertical GRAM Start Address
writeLCDCommand(0x0053, 0x013F); // Vertical GRAM Start Address
writeLCDCommand(0x0060, 0xA700); // Gate Scan Line
writeLCDCommand(0x0061, 0x0001); // NDL,VLE, REV
writeLCDCommand(0x006A, 0x0000); // set scrolling line
//-------------- Partial Display Control ---------//
writeLCDCommand(0x0080, 0x0000);
writeLCDCommand(0x0081, 0x0000);
writeLCDCommand(0x0082, 0x0000);
writeLCDCommand(0x0083, 0x0000);
writeLCDCommand(0x0084, 0x0000);
writeLCDCommand(0x0085, 0x0000);
//-------------- Panel Control -------------------//
writeLCDCommand(0x0090, 0x0010);
writeLCDCommand(0x0092, 0x0600);

writeLCDCommand(0x0007, 0x0133); // 262K color and display ON


HAL_Delay(50); // Delay 50ms
writeLCDCommand(32, 0);
writeLCDCommand(33, 0);
*(uint16_t *) (LCD_REG) = 34;

uint32_t i;
for (i = 0; i < 153281; i++)
writeLCDData(0);
}


uint16_t GetColor(uint8_t RED, uint8_t GREEN, uint8_t BLUE)
{
uint16_t ret;
uint16_t R = RED>>3;
uint16_t G = GREEN>>2;
uint16_t B = BLUE>>3;
ret = (R<<11) | (G<<5) | B;
return ret;
}


int main(void)
{
HAL_Init();

SystemClock_Config();
DelayInit();

MX_GPIO_Init();
MX_USART1_UART_Init();
lcd_init();
lcd_goto(0);
lcd_print("Hello!",0);
HAL_GPIO_WritePin(GPIOA, GPIO_PIN_8, GPIO_PIN_SET);


MX_FMC_Init();
DelayMs(10);
initLCD();


HAL_UART_Transmit(&huart1, (uint8_t*)"Hey! ", 5, 100);

uint32_t i,j,dat,fon,time,otime;
uint16_t a,b,ftime;
a = 20;
b = 0;
ftime = 0;
otime = 0;

fon = 0;
uint16_t * rrr = (uint16_t*)LCD_GRAM;
while(1)
{
time = Delay_Tick;


fon = GetColor(a*6,(40-a)*6,a*6);
for(i=0;i<240;i++)
{
for(j=0;j<320;j++)
{
if(i%40==0 || j%40==0 || j%40==i%40 || 40-(j%40)==i%40) dat = 0xFFFF;
else dat = fon;
writeLCDData(dat);
}
}
if(b == 0) { if(a>=40) { ftime = 0; b = 1; } else a++; }
else { if(a==0) b = 0; else a--; }


if(!ftime)
{
lcd_goto(0x40);
lcd_print("FPS: %d.%d ",2,1000000/otime,(10000000/otime)%10);
ftime = 1;
}

time = Delay_Tick-time;
time = time*DelayDivider;

otime = time;


}

}

void SystemClock_Config(void)
{

RCC_OscInitTypeDef RCC_OscInitStruct;
RCC_ClkInitTypeDef RCC_ClkInitStruct;

__PWR_CLK_ENABLE();

__HAL_PWR_VOLTAGESCALING_CONFIG(PWR_REGULATOR_VOLTAGE_SCALE1);

RCC_OscInitStruct.OscillatorType = RCC_OSCILLATORTYPE_HSI;
RCC_OscInitStruct.HSIState = RCC_HSI_ON;
RCC_OscInitStruct.HSICalibrationValue = 16;
RCC_OscInitStruct.PLL.PLLState = RCC_PLL_ON;
RCC_OscInitStruct.PLL.PLLSource = RCC_PLLSOURCE_HSI;
RCC_OscInitStruct.PLL.PLLM = 10;
RCC_OscInitStruct.PLL.PLLN = 225;
RCC_OscInitStruct.PLL.PLLP = RCC_PLLP_DIV2;
RCC_OscInitStruct.PLL.PLLQ = 4;
HAL_RCC_OscConfig(&RCC_OscInitStruct);

HAL_PWREx_ActivateOverDrive();

RCC_ClkInitStruct.ClockType = RCC_CLOCKTYPE_SYSCLK|RCC_CLOCKTYPE_PCLK1
|RCC_CLOCKTYPE_PCLK2;
RCC_ClkInitStruct.SYSCLKSource = RCC_SYSCLKSOURCE_PLLCLK;
RCC_ClkInitStruct.AHBCLKDivider = RCC_SYSCLK_DIV1;
RCC_ClkInitStruct.APB1CLKDivider = RCC_HCLK_DIV4;
RCC_ClkInitStruct.APB2CLKDivider = RCC_HCLK_DIV2;
HAL_RCC_ClockConfig(&RCC_ClkInitStruct, FLASH_LATENCY_5);

HAL_SYSTICK_Config(HAL_RCC_GetHCLKFreq()/1000);

HAL_SYSTICK_CLKSourceConfig(SYSTICK_CLKSOURCE_HCLK);

}

void MX_FMC_Init(void)
{
FMC_NORSRAM_TimingTypeDef Timing;

/** Perform the SRAM1 memory initialization sequence
*/
hsram1.Instance = FMC_NORSRAM_DEVICE;
hsram1.Extended = FMC_NORSRAM_EXTENDED_DEVICE;
/* hsram1.Init */
hsram1.Init.NSBank = FMC_NORSRAM_BANK1;
hsram1.Init.DataAddressMux = FMC_DATA_ADDRESS_MUX_DISABLE;
hsram1.Init.MemoryType = FMC_MEMORY_TYPE_SRAM;
hsram1.Init.MemoryDataWidth = FMC_NORSRAM_MEM_BUS_WIDTH_16;
hsram1.Init.BurstAccessMode = FMC_BURST_ACCESS_MODE_DISABLE;
hsram1.Init.WaitSignalPolarity = FMC_WAIT_SIGNAL_POLARITY_LOW;
hsram1.Init.WrapMode = FMC_WRAP_MODE_DISABLE;
hsram1.Init.WaitSignalActive = FMC_WAIT_TIMING_BEFORE_WS;
hsram1.Init.WriteOperation = FMC_WRITE_OPERATION_ENABLE;
hsram1.Init.WaitSignal = FMC_WAIT_SIGNAL_DISABLE;
hsram1.Init.ExtendedMode = FMC_EXTENDED_MODE_DISABLE;
hsram1.Init.AsynchronousWait = FMC_ASYNCHRONOUS_WAIT_DISABLE;
hsram1.Init.WriteBurst = FMC_WRITE_BURST_DISABLE;
hsram1.Init.ContinuousClock = FMC_CONTINUOUS_CLOCK_SYNC_ONLY;
/* Timing */
Timing.AddressSetupTime = 2;
Timing.AddressHoldTime = 0;
Timing.DataSetupTime = 5;
Timing.BusTurnAroundDuration = 0;
Timing.CLKDivision = 0;
Timing.DataLatency = 0;
Timing.AccessMode = FMC_ACCESS_MODE_A;
/* ExtTiming */

HAL_SRAM_Init(&hsram1, &Timing, NULL);

}

/* USART1 init function */
void MX_USART1_UART_Init(void)
{

huart1.Instance = USART1;
huart1.Init.BaudRate = 115200;
huart1.Init.WordLength = UART_WORDLENGTH_8B;
huart1.Init.StopBits = UART_STOPBITS_1;
huart1.Init.Parity = UART_PARITY_NONE;
huart1.Init.Mode = UART_MODE_TX_RX;
huart1.Init.HwFlowCtl = UART_HWCONTROL_NONE;
huart1.Init.OverSampling = UART_OVERSAMPLING_16;
HAL_UART_Init(&huart1);

}

/** Configure pins as
* Analog
* Input
* Output
* EVENT_OUT
* EXTI
*/
void MX_GPIO_Init(void)
{

GPIO_InitTypeDef GPIO_InitStruct;

/* GPIO Ports Clock Enable */
/* GPIO Ports Clock Enable */
__GPIOC_CLK_ENABLE();
__GPIOH_CLK_ENABLE();
__GPIOE_CLK_ENABLE();
__GPIOD_CLK_ENABLE();
__GPIOA_CLK_ENABLE();

/*Configure GPIO pin : PA8 */
GPIO_InitStruct.Pin = GPIO_PIN_8;
GPIO_InitStruct.Mode = GPIO_MODE_OUTPUT_PP;
GPIO_InitStruct.Pull = GPIO_NOPULL;
GPIO_InitStruct.Speed = GPIO_SPEED_LOW;
HAL_GPIO_Init(GPIOA, &GPIO_InitStruct);

/*Configure GPIO pin : PE1 */
GPIO_InitStruct.Pin = GPIO_PIN_1;
GPIO_InitStruct.Mode = GPIO_MODE_OUTPUT_PP;
GPIO_InitStruct.Pull = GPIO_NOPULL;
GPIO_InitStruct.Speed = GPIO_SPEED_HIGH;
HAL_GPIO_Init(GPIOE, &GPIO_InitStruct);


/*Configure GPIO pin : PA8 */


}

#define writeLCDCommand(reg,value) { *(volatile uint16_t *)LCD_REG = reg; *(volatile uint16_t *)LCD_DATA = value; }

#define writeLCDData(value) {*(volatile uint16_t *)LCD_DATA=value;}

     *(uint16_t *) (LCD_REG) = 34;

#define LCD_DATA                    (*(volatile uint16_t*)0x60020000)
#define LCD_REG                     (*(volatile uint16_t*)0x60000000)