byeongho song / Mbed 2 deprecated temp

dd

Dependencies:   BufferedSerial FastAnalogIn FastPWM mbed SHT75

controlt.cpp@2:4c51394fb35b, 2016-03-02 (annotated)

Committer:
sbh9428
Date:
Wed Mar 02 16:33:23 2016 +0000
Revision:
2:4c51394fb35b
Parent:
1:5c42ec7f1aeb
Child:
3:72644690e2e6
00;

Who changed what in which revision?

UserRevisionLine numberNew contents of line
sbh9428 0:9bfc4aea91e2 1 /*
sbh9428 0:9bfc4aea91e2 2 * controlt.cpp
sbh9428 0:9bfc4aea91e2 3 *
sbh9428 0:9bfc4aea91e2 4 * Created on: 2016. 2. 19.
sbh9428 0:9bfc4aea91e2 5 * Author: sbh9428
sbh9428 0:9bfc4aea91e2 6 */
sbh9428 0:9bfc4aea91e2 7
sbh9428 0:9bfc4aea91e2 8 #include "controlt.h"
sbh9428 0:9bfc4aea91e2 9
sbh9428 0:9bfc4aea91e2 10 control_t::control_t() {
sbh9428 0:9bfc4aea91e2 11 // TODO Auto-generated constructor stub
sbh9428 0:9bfc4aea91e2 12
sbh9428 0:9bfc4aea91e2 13 }
sbh9428 0:9bfc4aea91e2 14
sbh9428 2:4c51394fb35b 15 control_t::control_t(temp_sensor_t* _temp_sensor, peltier_t* _peltier,BufferedSerial *_pc)
sbh9428 0:9bfc4aea91e2 16 {
sbh9428 1:5c42ec7f1aeb 17 log_count=0;
sbh9428 1:5c42ec7f1aeb 18
sbh9428 1:5c42ec7f1aeb 19 target_temp=15;
sbh9428 1:5c42ec7f1aeb 20 P_value=0;
sbh9428 1:5c42ec7f1aeb 21 I_value=0;
sbh9428 1:5c42ec7f1aeb 22 D_value=0;
sbh9428 1:5c42ec7f1aeb 23
sbh9428 0:9bfc4aea91e2 24 temp_sensor=_temp_sensor;
sbh9428 0:9bfc4aea91e2 25 peltier=_peltier;
sbh9428 2:4c51394fb35b 26 pc=_pc;
sbh9428 2:4c51394fb35b 27
sbh9428 2:4c51394fb35b 28 table_count=0;
sbh9428 2:4c51394fb35b 29 table_mode=0;
sbh9428 0:9bfc4aea91e2 30 }
sbh9428 0:9bfc4aea91e2 31
sbh9428 0:9bfc4aea91e2 32 control_t::~control_t() {
sbh9428 0:9bfc4aea91e2 33 // TODO Auto-generated destructor stub
sbh9428 0:9bfc4aea91e2 34 }
sbh9428 0:9bfc4aea91e2 35
sbh9428 0:9bfc4aea91e2 36 float control_t::get_temp()
sbh9428 0:9bfc4aea91e2 37 {
sbh9428 0:9bfc4aea91e2 38 return temp_sensor->get_temp();
sbh9428 0:9bfc4aea91e2 39 }
sbh9428 0:9bfc4aea91e2 40
sbh9428 0:9bfc4aea91e2 41 void control_t::control_PWM(float PWM)
sbh9428 0:9bfc4aea91e2 42 {
sbh9428 0:9bfc4aea91e2 43 peltier->set_PWM(PWM);
sbh9428 0:9bfc4aea91e2 44 }
sbh9428 0:9bfc4aea91e2 45
sbh9428 0:9bfc4aea91e2 46 void control_t::control_temp()
sbh9428 0:9bfc4aea91e2 47 {
sbh9428 1:5c42ec7f1aeb 48 PWM_value+=calc_P();
sbh9428 0:9bfc4aea91e2 49
sbh9428 1:5c42ec7f1aeb 50 PWM_value+=calc_I();
sbh9428 0:9bfc4aea91e2 51
sbh9428 1:5c42ec7f1aeb 52 PWM_value+=calc_D();
sbh9428 1:5c42ec7f1aeb 53
sbh9428 1:5c42ec7f1aeb 54 if(PWM_value>1)
sbh9428 1:5c42ec7f1aeb 55 {
sbh9428 1:5c42ec7f1aeb 56 PWM_value=1;
sbh9428 1:5c42ec7f1aeb 57 }
sbh9428 1:5c42ec7f1aeb 58 if(PWM_value<-1)
sbh9428 1:5c42ec7f1aeb 59 {
sbh9428 1:5c42ec7f1aeb 60 PWM_value=-1;
sbh9428 1:5c42ec7f1aeb 61 }
sbh9428 1:5c42ec7f1aeb 62 peltier->set_PWM(PWM_value);
sbh9428 0:9bfc4aea91e2 63 }
sbh9428 0:9bfc4aea91e2 64
sbh9428 0:9bfc4aea91e2 65 void control_t::set_mode(int _mode)
sbh9428 0:9bfc4aea91e2 66 {
sbh9428 0:9bfc4aea91e2 67 mode=_mode;
sbh9428 1:5c42ec7f1aeb 68 }
sbh9428 1:5c42ec7f1aeb 69
sbh9428 1:5c42ec7f1aeb 70 void control_t::set_PWM_value(float _PWM_value)
sbh9428 1:5c42ec7f1aeb 71 {
sbh9428 1:5c42ec7f1aeb 72 PWM_value=_PWM_value;
sbh9428 1:5c42ec7f1aeb 73 }
sbh9428 1:5c42ec7f1aeb 74
sbh9428 1:5c42ec7f1aeb 75 void control_t::set_target_temp(float _target_temp)
sbh9428 1:5c42ec7f1aeb 76 {
sbh9428 1:5c42ec7f1aeb 77 target_temp=_target_temp;
sbh9428 1:5c42ec7f1aeb 78 }
sbh9428 1:5c42ec7f1aeb 79
sbh9428 1:5c42ec7f1aeb 80 void control_t::set_P_value(float _P_value)
sbh9428 1:5c42ec7f1aeb 81 {
sbh9428 1:5c42ec7f1aeb 82 P_value=_P_value;
sbh9428 1:5c42ec7f1aeb 83 }
sbh9428 1:5c42ec7f1aeb 84
sbh9428 1:5c42ec7f1aeb 85 void control_t::set_I_value(float _I_value)
sbh9428 1:5c42ec7f1aeb 86 {
sbh9428 1:5c42ec7f1aeb 87 I_value=_I_value;
sbh9428 1:5c42ec7f1aeb 88 }
sbh9428 1:5c42ec7f1aeb 89
sbh9428 1:5c42ec7f1aeb 90 void control_t::set_D_value(float _D_value)
sbh9428 1:5c42ec7f1aeb 91 {
sbh9428 1:5c42ec7f1aeb 92 D_value=_D_value;
sbh9428 1:5c42ec7f1aeb 93 }
sbh9428 1:5c42ec7f1aeb 94
sbh9428 1:5c42ec7f1aeb 95 void control_t::refresh_PWM()
sbh9428 1:5c42ec7f1aeb 96 {
sbh9428 1:5c42ec7f1aeb 97 write_log();
sbh9428 1:5c42ec7f1aeb 98 if(mode==0)
sbh9428 1:5c42ec7f1aeb 99 {
sbh9428 1:5c42ec7f1aeb 100 PWM_value=0;
sbh9428 1:5c42ec7f1aeb 101 control_PWM(0);
sbh9428 1:5c42ec7f1aeb 102 }
sbh9428 1:5c42ec7f1aeb 103 else if(mode==1)
sbh9428 1:5c42ec7f1aeb 104 {
sbh9428 1:5c42ec7f1aeb 105 }
sbh9428 1:5c42ec7f1aeb 106 else if(mode==2)
sbh9428 1:5c42ec7f1aeb 107 {
sbh9428 1:5c42ec7f1aeb 108 control_temp();
sbh9428 1:5c42ec7f1aeb 109 }
sbh9428 2:4c51394fb35b 110 else if(mode==3)
sbh9428 2:4c51394fb35b 111 {
sbh9428 2:4c51394fb35b 112 build_table();
sbh9428 2:4c51394fb35b 113 }
sbh9428 1:5c42ec7f1aeb 114 }
sbh9428 1:5c42ec7f1aeb 115
sbh9428 1:5c42ec7f1aeb 116 int control_t::get_mode()
sbh9428 1:5c42ec7f1aeb 117 {
sbh9428 1:5c42ec7f1aeb 118 return mode;
sbh9428 1:5c42ec7f1aeb 119 }
sbh9428 1:5c42ec7f1aeb 120 float control_t::get_target_temp()
sbh9428 1:5c42ec7f1aeb 121 {
sbh9428 1:5c42ec7f1aeb 122 return target_temp;
sbh9428 1:5c42ec7f1aeb 123 }
sbh9428 1:5c42ec7f1aeb 124 float control_t::get_P_value()
sbh9428 1:5c42ec7f1aeb 125 {
sbh9428 1:5c42ec7f1aeb 126 return P_value;
sbh9428 1:5c42ec7f1aeb 127 }
sbh9428 1:5c42ec7f1aeb 128 float control_t::get_I_value()
sbh9428 1:5c42ec7f1aeb 129 {
sbh9428 1:5c42ec7f1aeb 130 return I_value;
sbh9428 1:5c42ec7f1aeb 131 }
sbh9428 1:5c42ec7f1aeb 132 float control_t::get_D_value()
sbh9428 1:5c42ec7f1aeb 133 {
sbh9428 1:5c42ec7f1aeb 134 return D_value;
sbh9428 1:5c42ec7f1aeb 135 }
sbh9428 1:5c42ec7f1aeb 136 float control_t::get_PWM_value()
sbh9428 1:5c42ec7f1aeb 137 {
sbh9428 1:5c42ec7f1aeb 138 return PWM_value;
sbh9428 1:5c42ec7f1aeb 139 }
sbh9428 1:5c42ec7f1aeb 140
sbh9428 2:4c51394fb35b 141 int control_t::get_table_count()
sbh9428 2:4c51394fb35b 142 {
sbh9428 2:4c51394fb35b 143 return table_count;
sbh9428 2:4c51394fb35b 144 }
sbh9428 2:4c51394fb35b 145
sbh9428 1:5c42ec7f1aeb 146 float control_t::calc_P()
sbh9428 1:5c42ec7f1aeb 147 {
sbh9428 1:5c42ec7f1aeb 148 return (target_temp-temp_sensor->get_temp())*P_value;
sbh9428 1:5c42ec7f1aeb 149 }
sbh9428 1:5c42ec7f1aeb 150
sbh9428 1:5c42ec7f1aeb 151 float control_t::calc_I()
sbh9428 1:5c42ec7f1aeb 152 {
sbh9428 1:5c42ec7f1aeb 153 float data=0;
sbh9428 1:5c42ec7f1aeb 154 for(int i=0;i<10;i++)
sbh9428 1:5c42ec7f1aeb 155 {
sbh9428 2:4c51394fb35b 156 data+=PWM_log[i];
sbh9428 1:5c42ec7f1aeb 157 }
sbh9428 1:5c42ec7f1aeb 158 return data*I_value;
sbh9428 1:5c42ec7f1aeb 159 }
sbh9428 1:5c42ec7f1aeb 160
sbh9428 1:5c42ec7f1aeb 161 float control_t::calc_D()
sbh9428 1:5c42ec7f1aeb 162 {
sbh9428 1:5c42ec7f1aeb 163 return -(temp_log[log_count]-temp_log[(log_count-1)%10])*D_value;
sbh9428 1:5c42ec7f1aeb 164 }
sbh9428 1:5c42ec7f1aeb 165
sbh9428 1:5c42ec7f1aeb 166 void control_t::write_log()
sbh9428 1:5c42ec7f1aeb 167 {
sbh9428 1:5c42ec7f1aeb 168 log_count++;
sbh9428 1:5c42ec7f1aeb 169 log_count=log_count%10;
sbh9428 1:5c42ec7f1aeb 170 temp_log[log_count]=temp_sensor->get_temp();
sbh9428 2:4c51394fb35b 171 PWM_log[log_count]=target_temp-temp_sensor->get_temp();
sbh9428 2:4c51394fb35b 172 }
sbh9428 2:4c51394fb35b 173
sbh9428 2:4c51394fb35b 174 void control_t::build_table()
sbh9428 2:4c51394fb35b 175 {
sbh9428 2:4c51394fb35b 176 if(table_mode==0)
sbh9428 2:4c51394fb35b 177 {
sbh9428 2:4c51394fb35b 178 peltier->set_PWM(-1);
sbh9428 2:4c51394fb35b 179 table_count++;
sbh9428 2:4c51394fb35b 180 if(table_count>50)
sbh9428 2:4c51394fb35b 181 {
sbh9428 2:4c51394fb35b 182 table_mode=1;
sbh9428 2:4c51394fb35b 183 table_count=0;
sbh9428 2:4c51394fb35b 184 }
sbh9428 2:4c51394fb35b 185 pc->printf("set initial temp %d/50 PWM is %f\n", table_count);
sbh9428 2:4c51394fb35b 186 }
sbh9428 2:4c51394fb35b 187 else
sbh9428 2:4c51394fb35b 188 {
sbh9428 2:4c51394fb35b 189 table[table_count]=temp_sensor->get_temp();
sbh9428 2:4c51394fb35b 190 table_count++;
sbh9428 2:4c51394fb35b 191 peltier->set_PWM((float)-1+0.005*table_count);
sbh9428 2:4c51394fb35b 192 if(table_count>=200)
sbh9428 2:4c51394fb35b 193 mode=0;
sbh9428 2:4c51394fb35b 194 pc->printf("build table %d/200, temp is %2.2f", table_count, temp_sensor->get_temp());
sbh9428 2:4c51394fb35b 195 }
sbh9428 2:4c51394fb35b 196 }
sbh9428 2:4c51394fb35b 197
sbh9428 2:4c51394fb35b 198 void control_t::print_table()
sbh9428 2:4c51394fb35b 199 {
sbh9428 2:4c51394fb35b 200 int i;
sbh9428 2:4c51394fb35b 201 for(i=0;i<201;i++)
sbh9428 2:4c51394fb35b 202 {
sbh9428 2:4c51394fb35b 203 pc->printf("PWM: %3.1f, temp is %2.2f\n", (-1+0.005*i), table[i]);
sbh9428 2:4c51394fb35b 204 }
sbh9428 0:9bfc4aea91e2 205 }