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

choix_signal.m
function [F,A,PHI,CC,U]=choix_signal

delete(gcf)
F=zeros(1,10);
PHI=zeros(1,10);
A=zeros(1,10);
CC=0;
figure(1)
e=ecran;
if e(1)<0
    e(1)=0;
end;
set(gcf,'position',e)
set(gcf,'unit','normalized')
set(gcf,'color','w')
grid off
set(gca,'xcolor','w','ycolor','w')
text(0.5,0.95,'SIGNAL A CONSTRUIRE :','color','r','fontunits','normalized','fontsize',0.05,'fontweight','bold',...
    'horizontalalignment','center','verticalalignment','middle')
signal=0;
texte={'';'Signal triangulaire';'Dents de scie';'Signal carr';'Suite d''impulsions (rapport cyclique =25%)';'Peigne Dirac';'Sinusode redresse double alternance'};  
txt=uicontrol(gcf,'style','text','unit','normalized',...
		            'position',[0.1 0.8 0.4 0.05],'backgroundcolor','w',...
	                'foregroundcolor','r','fontunits','normalized','fontsize',0.5,'fontweight','bold','string','Type de signal :');                
U=uicontrol(gcf,'style','popupmenu','unit','normalized',...
                    'position',[0.1,0.75,0.4,0.05],'backgroundcolor','y',...
                    'foregroundcolor','b','fontunits','normalized','fontsize',0.5,'fontweight','bold','string',texte,...
                    'callback','signal=get(U,''value'');[F,A,PHI,CC]=harmoniques_signal(signal);');       
boutonfin=uicontrol(gcf,'style','push','unit','normalized',...
		'position',[0.1 0.1 0.1 0.1],...
	    'string','FIN','foregroundcolor','r','fontunits','normalized','fontsize',0.5,'fontweight','bold',...
         'callback','delete(gcf);close_system(gcs,0);cd ..;liste_logiciels');                

Contact us