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

filtre_RIF.m
function [MOG,DEF,s,NUM]=filtre_RIF(MOGi,DEFi,si)

DEF=DEFi;
MOG=MOGi;
s=si;
boutonok=0;
boutonimp=0;
boutonretour=0;
NUM=[];
figure(1)
e=ecran;
if e(1)<0
    e(1)=0;
end;
set(gcf,'position',e)
set(gcf,'unit','normalized','color','w')
grid off
set(gca,'xcolor','w','ycolor','w')
MOG(2,1)=uicontrol(gcf,'style','text','unit','normalized',...
		'position',[0.1 0.7 0.3 0.05],'backgroundcolor','w',...
	           'foregroundcolor','b','string','Dfinition des coefficients','fontunits','normalized','fontsize',0.5,'fontweight','bold');
 MOG(2,2)=uicontrol(gcf,'style','text','unit','normalized',...
		'position',[0.1 0.65 0.8 0.05],'backgroundcolor','w',...
	           'foregroundcolor','b','string',...
               'Exemples : NUM=[0.25,0.5,1,0.5,0.25]  ou  NUM=ones(1,10)/10','fontunits','normalized','fontsize',0.5,'fontweight','bold'); 
MOG(1,1)=uicontrol(gcf,'style','edit','unit','normalized',...
		'position',[0.1 0.6 0.9 0.05],'backgroundcolor','y',...
	    'foregroundcolor','b','max',1,...
		'string',s,'fontunits','normalized','fontsize',0.5,'fontweight','bold');
%instruction='s=get(MOG(1,1),''string'');[MOG,DEF,NUM]=coeff_RIF(MOG,s,DEF);[MOG,DEF]=lance_RIF(MOG,DEF,NUM);affich_coeff(NUM,DEN,DEF);';
instruction='s=get(MOG(1,1),''string'');[MOG,DEF,NUM]=coeff_RIF(MOG,s,DEF,1);';
       
boutonok=uicontrol(gcf,'style','push','unit','normalized',...
		'position',[0.4 0.1 0.3 0.1],...
	    'string','FILTRAGE','foregroundcolor','r','fontunits','normalized','fontsize',0.3,'fontweight','bold',...
        'callback',instruction);
%instruction2='s=get(MOG(1,1),''string'');[MOG,DEF,NUM]=coeff_RIF(MOG,s,DEF);[MOG,DEF]=amplitude_impulsion(MOG,DEF,NUM);';   
instruction2='s=get(MOG(1,1),''string'');[MOG,DEF,NUM]=coeff_RIF(MOG,s,DEF,2);'; 
boutonimp=uicontrol(gcf,'style','push','unit','normalized',...
		'position',[0.05 0.1 0.3 0.1],...
	    'string','Rponse impulsionnelle','foregroundcolor','r','fontunits','normalized','fontsize',0.3,'fontweight','bold',...
        'callback',instruction2);
boutonsauve=uicontrol(gcf,'style','push','unit','normalized',...
		'position',[0.95 0.1 0.05 0.1],...
	    'string','S','foregroundcolor','r','fontunits','normalized','fontsize',0.3,'fontweight','bold',...
        'callback','sauve_filtre');
boutonretour=uicontrol(gcf,'style','push','unit','normalized',...
		'position',[0.75 0.1 0.15 0.1],...
	    'string','MENU','foregroundcolor','r','fontunits','normalized','fontsize',0.3,'fontweight','bold',...
        'callback','delete(gcf);[MOG,DEF,sn,sd]=filtre_page1(fe,sn,sd);');

Contact us