/** * @brief Write Data in data buffer to Flash. * @param FlashFree_Address: Page address * @param Data: pointer to data buffer * @param Size: data buffer size in bytes * @retval FLASH programming status */ TSC_FLASH_Status TSC_WriteDataToNVM(uint32_t FlashFree_Address, int32_t *Data, uint32_t Size) { TSC_FLASH_Status TSC_FlashStatus = TSC_FLASH_COMPLETE; #if TOUCH_SCREEN_CAPABILITY uint32_t words = (Size/sizeof(uint32_t)) + ((Size%sizeof(uint32_t))?1:0); uint32_t index = 0; /* Unlock the Flash Program Erase controller */ TSC_FLASH_Unlock(); /* Erase Flash sectors ******************************************************/ /* Clear All pending flags */ TSC_FLASH_ClearFlag( TSC_FLASH_FLAG_BSY | TSC_FLASH_FLAG_EOP | TSC_FLASH_FLAG_PGERR | TSC_FLASH_FLAG_WRPRTERR); /* Erase Last Flash Page */ TSC_FlashStatus = TSC_FLASH_ErasePage( FlashFree_Address ); for(index = 0; index < words; index++) { /* Writing calibration parameters to the Flash Memory */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, Data[index]); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; } #endif return TSC_FlashStatus; }
/** * @brief Calibrate TouchScreen coordinates by LCD touch in 5 points * @param None * @retval None */ void TS_Calibration(void) { uint32_t coordinate_X1a = 0, coordinate_X2a = 0, coordinate_X3a = 0, coordinate_X4a = 0, coordinate_X5a = 0; uint32_t coordinate_Y1a = 0, coordinate_Y2a = 0, coordinate_Y3a = 0, coordinate_Y4a = 0, coordinate_Y5a = 0; uint32_t coordinate_X1b = 0, coordinate_X2b = 0, coordinate_X3b = 0, coordinate_X4b = 0, coordinate_X5b = 0; uint32_t coordinate_Y1b = 0, coordinate_Y2b = 0, coordinate_Y3b = 0, coordinate_Y4b = 0, coordinate_Y5b = 0; uint32_t coordinate_X1 = 0, coordinate_X2 = 0, coordinate_X3 = 0, coordinate_X4 = 0, coordinate_X5 = 0; uint32_t coordinate_Y1 = 0, coordinate_Y2 = 0, coordinate_Y3 = 0, coordinate_Y4 = 0, coordinate_Y5 = 0; uint16_t Xd1 = (LCD_Width / 2), Xd2 = 1 * (LCD_Width / 5), Xd3 = 4 * (LCD_Width / 5), Xd4 = 4 * (LCD_Width / 5), Xd5 = 1 * (LCD_Width / 5); uint16_t Yd1 = (LCD_Height / 2), Yd2 = 1 * (LCD_Height / 5), Yd3 = 1 * (LCD_Height / 5), Yd4 = 4 * (LCD_Height / 5), Yd5 = 4 * (LCD_Height / 5); double A = 0.0, B = 0.0, C = 0.0, D = 0.0, E = 0.0, F = 0.0; double d = 0.0, dx1 = 0.0, dx2 = 0.0, dx3 = 0.0, dy1 = 0.0, dy2 = 0.0, dy3 = 0.0; uint32_t X2_1 = 0, X2_2 = 0, X2_3 = 0, X2_4 = 0, X2_5 = 0; uint32_t Y2_1 = 0, Y2_2 = 0, Y2_3 = 0, Y2_4 = 0, Y2_5 = 0; uint32_t XxY_1 = 0, XxY_2 = 0, XxY_3 = 0, XxY_4 = 0, XxY_5 = 0; uint32_t XxXd_1 = 0, XxXd_2 = 0, XxXd_3 = 0, XxXd_4 = 0, XxXd_5 = 0; uint32_t YxXd_1 = 0, YxXd_2 = 0, YxXd_3 = 0, YxXd_4 = 0, YxXd_5 = 0; uint32_t XxYd_1 = 0, XxYd_2 = 0, XxYd_3 = 0, XxYd_4 = 0, XxYd_5 = 0; uint32_t YxYd_1 = 0, YxYd_2 = 0, YxYd_3 = 0, YxYd_4 = 0, YxYd_5 = 0; uint32_t alfa = 0, beta = 0, chi = 0, Kx = 0, Ky = 0, Lx = 0, Ly = 0; uint16_t epsilon = 0, fi = 0, Mx = 0, My = 0; GL_SetBackColor(GL_White); GL_SetTextColor(GL_Black); GL_Clear(White); GL_DisplayAdjStringLine(3 * (LCD_Height / 7), LCD_Width - 25, "Run Calibration.", GL_FALSE); GL_Delay(40); GL_DisplayAdjStringLine(3 * (LCD_Height / 7), LCD_Width - 25, "Run Calibration..", GL_FALSE); GL_Delay(40); GL_DisplayAdjStringLine(3 * (LCD_Height / 7), LCD_Width - 25, "Run Calibration...", GL_FALSE); GL_Delay(30); touch_done = 0; GL_Clear(White); GL_Cross( (LCD_Height / 2), (LCD_Width / 2) ); /* Absolute Central Point */ while ( touch_done == 0) { TSC_Read(); } coordinate_X1a = TSC_Value_X; coordinate_Y1a = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(1*(LCD_Height / 5), 1*(LCD_Width / 5)); /* Nord-East Corner point */ while ( touch_done == 0) { TSC_Read(); } coordinate_X2a = TSC_Value_X; coordinate_Y2a = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(1*(LCD_Height / 5), 4*(LCD_Width / 5)); /* Nord-West Corner */ while ( touch_done == 0) { TSC_Read(); } coordinate_X3a = TSC_Value_X; coordinate_Y3a = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(4*(LCD_Height / 5), 4*(LCD_Width / 5)); /* Sud-West Corner */ while ( touch_done == 0) { TSC_Read(); } coordinate_X4a = TSC_Value_X; coordinate_Y4a = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(4*(LCD_Height / 5), 1*(LCD_Width / 5)); /* Sud-East Corner point */ while ( touch_done == 0) { TSC_Read(); } coordinate_X5a = TSC_Value_X; coordinate_Y5a = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross( (LCD_Height / 2), (LCD_Width / 2) ); /* Absolute Central Point */ while ( touch_done == 0) { TSC_Read(); } coordinate_X1b = TSC_Value_X; coordinate_Y1b = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(1*(LCD_Height / 5), 1*(LCD_Width / 5)); /* Nord-East Corner point */ while ( touch_done == 0) { TSC_Read(); } coordinate_X2b = TSC_Value_X; coordinate_Y2b = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(1*(LCD_Height / 5), 4*(LCD_Width / 5)); /* Nord-West Corner */ while ( touch_done == 0) { TSC_Read(); } coordinate_X3b = TSC_Value_X; coordinate_Y3b = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(4*(LCD_Height / 5), 4*(LCD_Width / 5)); /* Sud-West Corner */ while ( touch_done == 0) { TSC_Read(); } coordinate_X4b = TSC_Value_X; coordinate_Y4b = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; GL_Clear(White); GL_Cross(4*(LCD_Height / 5), 1*(LCD_Width / 5)); /* Sud-East Corner point */ while ( touch_done == 0) { TSC_Read(); } coordinate_X5b = TSC_Value_X; coordinate_Y5b = TSC_Value_Y; GL_Delay(90); /* This is to catch only one touch event */ TSC_Init(); touch_done = 0; /* Average between X and Y coupled Touchscreen values */ coordinate_X1 = (coordinate_X1a + coordinate_X1b) / 2; coordinate_X2 = (coordinate_X2a + coordinate_X2b) / 2; coordinate_X3 = (coordinate_X3a + coordinate_X3b) / 2; coordinate_X4 = (coordinate_X4a + coordinate_X4b) / 2; coordinate_X5 = (coordinate_X5a + coordinate_X5b) / 2; coordinate_Y1 = (coordinate_Y1a + coordinate_Y1b) / 2; coordinate_Y2 = (coordinate_Y2a + coordinate_Y2b) / 2; coordinate_Y3 = (coordinate_Y3a + coordinate_Y3b) / 2; coordinate_Y4 = (coordinate_Y4a + coordinate_Y4b) / 2; coordinate_Y5 = (coordinate_Y5a + coordinate_Y5b) / 2; X2_1 = (coordinate_X1 * coordinate_X1); X2_2 = (coordinate_X2 * coordinate_X2); X2_3 = (coordinate_X3 * coordinate_X3); X2_4 = (coordinate_X4 * coordinate_X4); X2_5 = (coordinate_X5 * coordinate_X5); Y2_1 = (coordinate_Y1 * coordinate_Y1); Y2_2 = (coordinate_Y2 * coordinate_Y2); Y2_3 = (coordinate_Y3 * coordinate_Y3); Y2_4 = (coordinate_Y4 * coordinate_Y4); Y2_5 = (coordinate_Y5 * coordinate_Y5); XxY_1 = (coordinate_X1 * coordinate_Y1); XxY_2 = (coordinate_X2 * coordinate_Y2); XxY_3 = (coordinate_X3 * coordinate_Y3); XxY_4 = (coordinate_X4 * coordinate_Y4); XxY_5 = (coordinate_X5 * coordinate_Y5); XxXd_1 = ( coordinate_X1 * Xd1 ); XxXd_2 = ( coordinate_X2 * Xd2 ); XxXd_3 = ( coordinate_X3 * Xd3 ); XxXd_4 = ( coordinate_X4 * Xd4 ); XxXd_5 = ( coordinate_X5 * Xd5 ); YxXd_1 = ( coordinate_Y1 * Xd1 ); YxXd_2 = ( coordinate_Y2 * Xd2 ); YxXd_3 = ( coordinate_Y3 * Xd3 ); YxXd_4 = ( coordinate_Y4 * Xd4 ); YxXd_5 = ( coordinate_Y5 * Xd5 ); XxYd_1 = ( coordinate_X1 * Yd1 ); XxYd_2 = ( coordinate_X2 * Yd2 ); XxYd_3 = ( coordinate_X3 * Yd3 ); XxYd_4 = ( coordinate_X4 * Yd4 ); XxYd_5 = ( coordinate_X5 * Yd5 ); YxYd_1 = ( coordinate_Y1 * Yd1 ); YxYd_2 = ( coordinate_Y2 * Yd2 ); YxYd_3 = ( coordinate_Y3 * Yd3 ); YxYd_4 = ( coordinate_Y4 * Yd4 ); YxYd_5 = ( coordinate_Y5 * Yd5 ); alfa = X2_1 + X2_2 + X2_3 + X2_4 + X2_5; beta = Y2_1 + Y2_2 + Y2_3 + Y2_4 + Y2_5; chi = XxY_1 + XxY_2 + XxY_3 + XxY_4 + XxY_5; epsilon = coordinate_X1 + coordinate_X2 + coordinate_X3 + coordinate_X4 + coordinate_X5; fi = coordinate_Y1 + coordinate_Y2 + coordinate_Y3 + coordinate_Y4 + coordinate_Y5; Kx = XxXd_1 + XxXd_2 + XxXd_3 + XxXd_4 + XxXd_5; Ky = XxYd_1 + XxYd_2 + XxYd_3 + XxYd_4 + XxYd_5; Lx = YxXd_1 + YxXd_2 + YxXd_3 + YxXd_4 + YxXd_5; Ly = YxYd_1 + YxYd_2 + YxYd_3 + YxYd_4 + YxYd_5; Mx = Xd1 + Xd2 + Xd3 + Xd4 + Xd5; My = Yd1 + Yd2 + Yd3 + Yd4 + Yd5; d = 5 * ( ((double)alfa * beta) - ((double)chi * chi) ) + 2 * ((double)chi * epsilon * fi) - ((double)alfa * fi * fi ) - ( (double)beta * epsilon * epsilon ); dx1 = 5 * ( ((double)Kx * beta) - ((double)Lx * chi) ) + ((double)fi * ( ((double)Lx * epsilon) - ((double)Kx * fi) )) + ((double)Mx * ( ((double)chi * fi) - ((double)beta * epsilon) )); dx2 = 5 * ( ((double)Lx * alfa) - ((double)Kx * chi) ) + ((double)epsilon * ( ((double)Kx * fi) - ((double)Lx * epsilon) )) + ((double)Mx * ( ((double)chi * epsilon) - ((double)alfa * fi) )); dx3 = ((double)Kx * ( ((double)chi * fi) - ((double)beta * epsilon) )) + ((double)Lx * ( ((double)chi * epsilon) - ((double)alfa * fi) )) + ((double)Mx * ( ((double)alfa * beta) - ((double)chi * chi) )); dy1 = 5 * ( ((double)Ky * beta) - ((double)Ly * chi) ) + ((double)fi * ( ((double)Ly * epsilon) - ((double)Ky * fi) )) + ((double)My * ( ((double)chi * fi) - ((double)beta * epsilon) )); dy2 = 5 * ( ((double)Ly * alfa) - ((double)Ky * chi) ) + ((double)epsilon * ( ((double)Ky * fi) - ((double)Ly * epsilon) )) + ((double)My * ( ((double)chi * epsilon) - ((double)alfa * fi) )); dy3 = ((double)Ky * ( ((double)chi * fi) - ((double)beta * epsilon) )) + ((double)Ly * ( ((double)chi * epsilon) - ((double)alfa * fi) )) + ((double)My * ( ((double)alfa * beta) - ((double)chi * chi) )); A = dx1 / d; B = dx2 / d; C = dx3 / d; D = dy1 / d; E = dy2 / d; F = dy3 / d; /* To avoid computation with "double" variables A, B, C, D, E, F, we use the s32 variables A2, B2, C2, D2, E2, F2, multiplied for a Scale Factor equal to 100000 to retain the precision*/ A2 = (s32)(A * RESCALE_FACTOR); B2 = (s32)(B * RESCALE_FACTOR); C2 = (s32)(C * RESCALE_FACTOR); D2 = (s32)(D * RESCALE_FACTOR); E2 = (s32)(E * RESCALE_FACTOR); F2 = (s32)(F * RESCALE_FACTOR); GL_Clear(White); GL_DisplayAdjStringLine(3 * (LCD_Height / 7), 10 * (LCD_Width / 11), "Calibration done!", GL_FALSE); GL_Delay(25); /* Now show HOME Menu */ GL_Clear(White); calibration_done = 1; /********************* FLASH PROGRAMMING FOR SAVING "calibration_done" variable **********************/ TSC_FlashStatus = TSC_FLASH_COMPLETE; TSC_MemoryProgramStatus = PASSED; FlashFree_Address = CalibrationAddr; /* Unlock the Flash Program Erase controller */ TSC_FLASH_Unlock(); /* Erase Flash sectors ******************************************************/ #if defined(USE_STM3210C_EVAL) || defined(USE_STM32100E_EVAL) || defined(USE_STM3220F_EVAL) /* Clear All pending flags */ TSC_FLASH_ClearFlag( TSC_FLASH_FLAG_BSY | TSC_FLASH_FLAG_EOP | TSC_FLASH_FLAG_PGERR | TSC_FLASH_FLAG_WRPRTERR); /* Erase Last Flash Page */ TSC_FlashStatus = TSC_FLASH_ErasePage( FlashFree_Address ); #endif /* Writing calibration parameters to the Flash Memory */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, calibration_done); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; /* Writing Calibration Parameter */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, A2); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; /* Writing Calibration Parameter */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, B2); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; /* Writing Calibration Parameter */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, C2); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; /* Writing Calibration Parameter */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, D2); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; /* Writing Calibration Parameter */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, E2); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; /* Writing Calibration Parameter */ TSC_FlashStatus = TSC_FLASH_ProgramWord( FlashFree_Address, F2); /* Increasing Flash Memory Page Address */ FlashFree_Address = FlashFree_Address + 4; /* Reading Calibration Flag from the Flash Memory */ calibration_done = (*(__IO uint32_t*) CalibrationAddr) & 0x000000FF; }