Fonction Scilab
fr

purge_diagr

Contenu du fichier

//purge_diagr
//Fonction qui éxecute la fonction purge de scicos
//Entrée : tt un vecteur de chaînes de caractères de taille nx2
//         tt(,1) : le chemin du fichier
//         tt(,2) : le nom du fichier
function purge_diagr(tt)
  ///////////////////////////////
  load SCI/macros/scicos/lib
  exec(loadpallibs,-1)
  %tcur=0;%cpr=list();alreadyran=%f;needstart=%t;needcompile=4;%state0=list();
  prot=funcprot();funcprot(0);
  deff('disablemenus()',' ');
  deff('enablemenus()',' ');
  funcprot(prot) ;
  pal_mode=%f;
  super_block=%f;
  //////////////////////////////
  
  for i=1:size(tt,1)
    txt_tmp=tt(i,1)+tt(i,2);
    printf("Load and purge file %s\n",txt_tmp);
    load(txt_tmp);
    scs_m=do_purge(scs_m);
    if tt(i,1)<>scs_m.props.title(2) then
     scs_m.props.title(2)=tt(i,1);
    end
    do_save(scs_m)
  end
endfunction