Code covered by the BSD License  

Highlights from
Logiciels temps réel

Logiciels temps réel

by

 

Real-time software concerning the domains of the signal processing, feedback and regulation

Td_monte.m
P_PID(3,1)=P_PID(3,1)+P_PID(3,2);
if isinf(P_PID(4,1))
    P_PID(4,1)=P_PID(3,1)/DEF(1);
    P_PID(6,1)=0;
else
    if P_PID(3,1)==0
        P_PID(4,1)=0;
        P_PID(6,1)=0;
    else
        tau=P_PID(3,1)/P_PID(4,1);
        P_PID(6,1)=exp(-DEF(1)/tau);
    end;
end;
schema_modele=[get_param(gcs,'name'),'/Correcteur'];
bloc_pid=[schema_modele,'/PID'];
set_param(bloc_pid,'a',num2str(P_PID(6,1)))
 set_param(bloc_pid,'Kd',num2str(P_PID(4,1)))
schema_modele=get_param(gcs,'name');
bloc_Td=[schema_modele,'/ValeurTd'];
set_param(bloc_Td,'Td',num2str(P_PID(3,1)))
set(MOG(1,5),'string',num2str(P_PID(3,1)))

Contact us