source: Sophya/trunk/Poubelle/archediab.old/archediab.sources/c/acquisition_diabolo.c@ 2008

#include "diabolo.h"
#include "bolo.h"
#include "acqui.h"
#include "carte_acqui.h"
#include "carte_pci.h"
#include "trace.h"
#include "corel.h" 
#include "montimer.h"
#include "synchro.h"
#include "fichier.h"
#include "onde.h"
#include "tm.h"
#include "tache.h"
#include "compress.h"
#include "controle.h"
#include "menu.h"



//*****************************************************************************************
//                                                                                      ***
#ifdef _diabolo         //---------   pour  Diabolo    ------------------------------   ***
//                                                                                      ***
//*****************************************************************************************



void lit_block_diabolo(int err)

{
int i,j;
int glitch;
glitch=litD(fenetre_acquisition,e_deglitch,0L);

for(j=0;j<nb_max_bolo;j++)                              //  lit les courbes de bolos individuelles
        for (i=0;i<gg->reglage.horloge.nb_mesures;i++)
                gg->bol_per[j][i]=tt->tm.btm[tt->tm.pos_lit].bol_per[j][i];

                                        
glitch=litD(fenetre_acquisition,e_deglitch,0L);

for (i=0;i<nb_per_block*2;i++)
        {
        for(j=0;j<nb_max_bolo;j++)      
                gg->don.don_bolo[j]=tt->tm.btm[tt->tm.pos_lit].don[i].don_bolo[j];              // copy bolos
                
        for(j=0;j<nb_sync;j++)                  
                gg->don.sync[j]=tt->tm.btm[tt->tm.pos_lit].don[i].sync[j];                              // copy synchros

        gg->temps_cntl=tt->tm.btm[tt->tm.pos_lit].temps_cntl[i];                
        gg->temps_mac=tt->tm.btm[tt->tm.pos_lit].temps_mac[i];          

        exec_synchro(0,100,err);                // en premier pour construire le flag  scan_en_cours 
                //  le trace ds et 1p est fait avec les points corelles du coups precedent !!!

        if(gg->fichier_dia2_ouvert)     ecrit_fichier_dia2(gg->don,gg->temps_cntl,gg->temps_mac);// ecrit les donnees dans le fichier  
        if(gg->fichier_arch_ouvert)     fabrique_block_type_bolo_synchro();             // ecrit un block bolo archeops 
        
        if(glitch)      deglitch();

        corel();
        
//      if(gg->trace_ouvert&1)          exec_trace_tout(fenetre_trace_tout,tache_de_fond,0);
        for(j=0;j<8;j++)        if(gg->trace_tout[j]) exec_trace_tout(gg->trace_tout[j],tache_de_fond,0);
        if( (gg->trace_ouvert&16)  &&   // trace carte et pas de select synchro
          (! (gg->trace_ouvert&32)))    trace_annexe(gg->corel);
        if(gg->flag_fou)                foufou();       
        if(gg->trace_ouvert&8)          exec_ondelette(fenetre_ondelette,0,0);
        
        }

        // _____________  affichage numerique de la valeur d'un bolometre  _______________
j=litD(fenetre_acquisition,e_bolo,0L)-1;  
        if( (j<0) ou (j>=nb_max_bolo) ) ecritD(fenetre_acquisition,e_valeur,"--");
                                else            ecritD(fenetre_acquisition,e_valeur,"b%d=%g µV",j+1,xbol(j));

ecritD(fenetre_controle,con_chauf,tt->tm.btm[tt->tm.pos_lit].chauf_regul);

if(gg->fichier_arch_ouvert)             fabrique_block_type_une_periode();      // ecrit un block une periode archeops  
affi_bolo();                    // affichage des bolo individuels
}
//_____________________________________________________________________________________________

//*****************************************************************************************
//                                                                                      ***
#endif          //--------------------------------------------------------------------  ***
//                                                                                      ***
//*****************************************************************************************