Fonction Scilab
fr - eng


generate_scs_diagr_dem - add short decription here

Librairie

Séquence d'appel

txt = generate_scs_diagr_dem

Paramètres

Contenu du fichier


//txt : le texte à executer pour ouvrir
//      le menu de demo des diagrammes scicos
function txt=generate_scs_diagr_dem()

demos_list=['diagr_cs','tt_title(1,l_i)';
            'diagr_ds','tt_title(2,l_i)';
            'diagr_os','tt_title(3,l_i)'; 
            'diagr_is','tt_title(4,l_i)';
            'diagr_fs','tt_title(5,l_i)';
            'diagr_PSK','tt_title(6,l_i)';
            'diagr_SD','tt_title(7,l_i)';
            'diagr_FSK','tt_title(8,l_i)';
            'diagr_FSK_chaos','tt_title(9,l_i)';
            'diagr_elec','tt_title(10,l_i)';];

  list_demos=list(list());
  for i=1:size(demos_list,1)
     new_tt=evstr(demos_list(i));
     list_demos(i)="";
     if new_tt<>[] & new_tt<>"" then
       new_tt=[''''+strsubst(new_tt,'''','''''')+''''];
       for j=1:size(new_tt,1)
         stri=strindex(new_tt(j,1),MODNUM);
         if stri<>[] then
           new_tt(j,1)='MODNUM+'+''''+part(new_tt(j,1),stri+length(MODNUM):length(new_tt(j,1)));
         end
       end
       for j=1:size(new_tt,1)
         if j==1 then
           list_demos(i)=[new_tt(j,1)+','+new_tt(j,2)+';'];
         else
           list_demos(i)=[list_demos(i);new_tt(j,1)+','+new_tt(j,2)+';'];
         end
       end
     end
     list_demos(i)=[demos_list(i,1)+'=[';list_demos(i);];
     list_demos(i)(size(list_demos(i),1))=list_demos(i)(size(list_demos(i),1))+'];';
  end

  var_tt=[''''+strsubst(demos_list(:,1),'''','''''')+''''+...
          ','+strsubst(demos_list(:,2),'''','''''')+';'];
  var_tt=['demos_list=[';var_tt];
  var_tt(size(var_tt,1))=var_tt(size(var_tt,1))+'];';
  for i=1:size(demos_list,1)
   var_tt=[var_tt;list_demos(i)];
  end

  var_tt=['if ~exists(''LANGUAGE'') then'
  '   global LANGUAGE;lang=LANGUAGE;clear LANGUAGE;'
  'else'
  '   lang=LANGUAGE;'
  'end'
  ''
  'if lang==''fr'' then'
  '    l_i=2;'
  'else'
  '    l_i=1;'
  'end'
  ''
  'tt_title=[''Chaotic Continous time systems'',''Systèmes chaotiques à temps continu'''
  '          ''Chaotic Discrete time systems'',''Systèmes chaotiques à temps discret'''
  '          ''Open loop models of oscillator'',''Modèles boucle ouverte d''''oscillateur'''
  '          ''Integer N Frequency synthesizers'',''Synthétiseurs de fréquence à rapport de division N entier'''
  '          ''Fractional N/N+1 Frequency synthesizers'',''Synthétiseurs de fréquence à rapport de division fractionnaire'''
  '          ''PSK/QAM Transmission'',''Transmission PSK/QAM'''
  '          ''Delta-Sigma Transmission'',''Transmission Sigma-Delta'''
  '          ''FSK Transmission'',''Transmission FSK'''
  '          ''Chaotic FSK Transmission'',''Transmission chaotique FSK'''
  '          ''Electrical circuits'',''Circuits électriques'''
  '          ''Choose a demo'',''Choisissez une démo''];'
  ''
  var_tt]

  sup_tt=['if ~exists(''fun'') then'
          '  fun=x_choose'
          ' if whereis(''tk_choose'')<>[] then'
          '  if exists(''with_tk'') then'
          '    if with_tk() then fun=tk_choose, end;'
          '  end'
          ' end'
          'end'
          'while %t then'
          '   num=fun(demos_list(:,2),tt_title(11,l_i));'
          '   if num==0 then'
          '      return'
          '   else';
          '      txt=generate_dem_scicos(num,demos_list);'
          '      execstr(txt)';
          '   end';
          'end';
          ];
  txt=[var_tt;sup_tt;]
endfunction


Auteurs

IRCOM Group Alan Layec