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

[MOG,DEF,NUM]=coeff_RIF(MOGi,s,DEFi,type)
function [MOG,DEF,NUM]=coeff_RIF(MOGi,s,DEFi,type)

NUM=[];
MOG=MOGi;
te=DEFi(1);
DEF=DEFi;
if s(end)~=';'
    s=[s,';'];
end;
test=findstr(s,'NUM=');
if isempty(test)
    MOG(2,3)=uicontrol(gcf,'style','text','unit','normalized',...
                        'position',[0.1 0.5 0.8 0.05],'backgroundcolor','w',...
                        'foregroundcolor','r','string','DEFINIR LES COEFFICIENTS PAR NUM=...','fontunits','normalized','fontsize',0.5,'fontweight','bold');
else
    try
        eval(s)
    catch
        MOG(2,3)=uicontrol(gcf,'style','text','unit','normalized',...
                        'position',[0.1 0.5 0.8 0.05],'backgroundcolor','w',...
                        'foregroundcolor','r','string','ERREUR DE PROGRAMMATION !','fontunits','normalized','fontsize',0.5,'fontweight','bold'); 
    end;
end;
if ~isempty(NUM)
    if type==1
        [MOG,DEF]=lance_RIF(MOG,DEF,NUM);
        affich_coeff(NUM,[1],DEF);
    else
        [MOG,DEF]=amplitude_impulsion(MOG,DEF,NUM);
    end;
end;

Contact us