#include "manip.h" 
#include "FindPeri.h" 
#include "recons_sst.h" 
static float Liminffene=10.,Limsupfene=40.;
double memocoupflux;
float pasx;



//nouveauD(0,FindPeri_id,"FindPeri",exec_FindPeri);


//--------------------  fonction  exec  de  la  fenetre : FindPeri  -------------------------------


void exec_FindPeri(int fen,int item,double valeur,...) 
{
if(item>1000) item-=1000;		// pour appeler le case pour tous les cara d'un edit texte

switch(item)
    {
    case ouverture               :
        				selectgra(fen);
    graph->ymin=0.;
    graph->ymax=500.;
    graph->ypas=100;
    graph->xmin=Liminffene;
    graph->xmax=Limsupfene; 
//    printf("limites a l'ouverture %f %f \n",Liminffene,Limsupfene);
	pasx=10.;
	if(Liminffene!=10.)pasx=1.;
    graph->xpas=pasx;
    graph->grille=0;
    graph->graduations=1;
    graph->taille_graduations=10;
    graph->sans_image=0;      	
    graph->avec_icones=0;      	
    strcpy(graph->xtitre, "delta temps");    	
    strcpy(graph->ytitre, "flux");
    efface(fen);
    retrace(fen);   	
  ecritD(fen,FP_unite6,"%d",CpFl()); //corFC
  ecritD(fen,FP_vperesti," %7.3f ",DonnePeriod());//corFC
//    graph->ytitre[0]=0;   

//    				setup_gra(fen);

                 break;
    case fermeture               :
    memocoupflux=Rd_CpFl(fen);
//    Liminffene=graph->xmin;
//    Limsupfene=graph->xmax; 
//    printf("limites a la fermeture %f %f \n",Liminffene,Limsupfene);

                 break;
    case FP_cpfl :
               break;
    case FP_vcpfl :
      init_recons_sst();
    efface(fen);
                 break;
    case FP_periodest :
                 break;
    case FP_vperesti :
                 break;
    case FP_unite :
                 break;
    case FP_unite6 :
                 break;
    default  :   break;
    }
}


void passargu(float Liminff,float Limsupf,float Papa)
{
Liminffene=Liminff;
Limsupfene=Limsupf;
pasx=Papa;
}

double Rd_CpFl(int fen)
{
double argfen;
if(fen)
{
 argfen=litD(fen,FP_unite6,0L);
 if(argfen<1)argfen=1;
 if(argfen>2047)argfen=2047;
 ecritD(fen,FP_unite6,"%d",(int)(argfen));
 memocoupflux=argfen;
 }else
 {
 argfen=memocoupflux;
 }
  return argfen;
}