% 50 HZ 
% 100 step i Voltage to PWM
% loops pr sec

Hz = 50;
PWMStep=100;
SecPrLoop=1;
TsPWM=(Hz)^-1/(PWMStep*(SecPrLoop*Hz)^-1);
Ts=25;
TsStoker=TsPWM;
TsMaaling=0.1;
Stokerstep=250;
BlowerStep=100;

% omregning fra K Ti Td til P I D for begge regulatorer.
K0=3;
Ti0=400;
Td0=400;
Ts0=Ts;

P0 = K0;
I0 = K0 * (Ts0 / Ti0);
D0 = -K0 * (Td0 / Ts0); %denne udregning passer ikke men det er det vi bruger den.
D01 = -K0 * (Ts0 / Td0); %denne udregning passer ikke men det er det vi bruger den.


K1=3;
Ti1=400;
Td1=400;
Ts1=Ts;

P1 = K1;
I1 = K1 * (Ts1 / Ti1);
D1 = -K1 * (Td1 / Ts1);

disp('Constans loaded')