Coldbox/TECware
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

add VARH to PECO

Browse Source
This commit is contained in:
pique_n
2021-12-21 16:51:13 +01:00
parent 3464b100f3
commit ff5a05d32b
3 changed files with 45 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
Core/Drivers/PECO_PeltierController.c
View File

@ -33,9 +33,12 @@
#include "../PDEF_ProjectDefinitions.h"
#include "PECO_PeltierController.h"
//Application
#include "../Application/VARH_VariableHandler.h"
// Driver
#include "../Drivers/ANPO_AnalogPortsOut.h"
#include "../Drivers/DIPO_DigitalPorts.h"
#include "ANPO_AnalogPortsOut.h"
#include "DIPO_DigitalPorts.h"
// Toolbox
#include "../Toolbox/UTIL_Utility.h"
@ -235,8 +238,13 @@ VOID PECO_vTask( PVOID arg )
if( u32Flags & EVENT_TIMER_UPDATE )
{
if (VARH_uGetVariableData(VARH_eMode) == PECO_eConstTemp)
{
// PID Regelung
} else if (VARH_uGetVariableData(VARH_eMode) == PECO_eConstVoltage)
{
boSetPeltierVoltage(VARH_uGetVariableData(VARH_eControlVoltage))
}
}
@ -251,13 +259,13 @@ VOID PECO_vTask( PVOID arg )
// Parameters: S8 Voltage (12V - -3V)
// Returns: Boolean TRUE if successful
//-------------------------------------------------------------------------------------------------
BOOL boSetPeltierVoltage( S16 Voltage ){
BOOL boSetPeltierVoltage( FLOAT Voltage ){
BOOL boOK = TRUE;
if( Voltage > 14000 ) Voltage = 12000;
if( Voltage < -8000 ) Voltage = -3000;
if( Voltage > 12 ) Voltage = 12;
if( Voltage < -3 ) Voltage = -3;
ANPO_boSetVoltage( ((((FLOAT)Voltage)/1000) + 20.088) / 34.103 );
ANPO_boSetVoltage( (((FLOAT)Voltage) + 20.088) / 34.103 );
return( boOK );
}