[637] | 1 | #include "diabolo.h"
|
---|
| 2 | #include "bolo.h"
|
---|
| 3 | #include "acqui.h"
|
---|
| 4 | #include "carte_acqui.h"
|
---|
| 5 | #include "carte_pci.h"
|
---|
| 6 | #include "trace.h"
|
---|
| 7 | #include "corel.h"
|
---|
| 8 | #include "montimer.h"
|
---|
| 9 | #include "synchro.h"
|
---|
| 10 | #include "fichier.h"
|
---|
| 11 | #include "onde.h"
|
---|
| 12 | #include "tm.h"
|
---|
| 13 | #include "tache.h"
|
---|
| 14 | #include "compress.h"
|
---|
| 15 | #include "controle.h"
|
---|
| 16 | #include "menu.h"
|
---|
| 17 |
|
---|
| 18 |
|
---|
| 19 |
|
---|
| 20 | //*****************************************************************************************
|
---|
| 21 | // ***
|
---|
| 22 | #ifdef _diabolo //--------- pour Diabolo ------------------------------ ***
|
---|
| 23 | // ***
|
---|
| 24 | //*****************************************************************************************
|
---|
| 25 |
|
---|
| 26 |
|
---|
| 27 |
|
---|
| 28 | void lit_block_diabolo(int err)
|
---|
| 29 |
|
---|
| 30 | {
|
---|
| 31 | int i,j;
|
---|
| 32 | int glitch;
|
---|
| 33 | glitch=litD(fenetre_acquisition,e_deglitch,0L);
|
---|
| 34 |
|
---|
| 35 | for(j=0;j<nb_max_bolo;j++) // lit les courbes de bolos individuelles
|
---|
| 36 | for (i=0;i<gg->reglage.horloge.nb_mesures;i++)
|
---|
| 37 | gg->bol_per[j][i]=tt->tm.btm[tt->tm.pos_lit].bol_per[j][i];
|
---|
| 38 |
|
---|
| 39 |
|
---|
| 40 | glitch=litD(fenetre_acquisition,e_deglitch,0L);
|
---|
| 41 |
|
---|
| 42 | for (i=0;i<nb_per_block*2;i++)
|
---|
| 43 | {
|
---|
| 44 | for(j=0;j<nb_max_bolo;j++)
|
---|
| 45 | gg->don.don_bolo[j]=tt->tm.btm[tt->tm.pos_lit].don[i].don_bolo[j]; // copy bolos
|
---|
| 46 |
|
---|
| 47 | for(j=0;j<nb_sync;j++)
|
---|
| 48 | gg->don.sync[j]=tt->tm.btm[tt->tm.pos_lit].don[i].sync[j]; // copy synchros
|
---|
| 49 |
|
---|
| 50 | gg->temps_cntl=tt->tm.btm[tt->tm.pos_lit].temps_cntl[i];
|
---|
| 51 | gg->temps_mac=tt->tm.btm[tt->tm.pos_lit].temps_mac[i];
|
---|
| 52 |
|
---|
| 53 | exec_synchro(0,100,err); // en premier pour construire le flag scan_en_cours
|
---|
| 54 | // le trace ds et 1p est fait avec les points corelles du coups precedent !!!
|
---|
| 55 |
|
---|
| 56 | if(gg->fichier_dia2_ouvert) ecrit_fichier_dia2(gg->don,gg->temps_cntl,gg->temps_mac);// ecrit les donnees dans le fichier
|
---|
| 57 | if(gg->fichier_arch_ouvert) fabrique_block_type_bolo_synchro(); // ecrit un block bolo archeops
|
---|
| 58 |
|
---|
| 59 | if(glitch) deglitch();
|
---|
| 60 |
|
---|
| 61 | corel();
|
---|
| 62 |
|
---|
| 63 | // if(gg->trace_ouvert&1) exec_trace_tout(fenetre_trace_tout,tache_de_fond,0);
|
---|
| 64 | for(j=0;j<8;j++) if(gg->trace_tout[j]) exec_trace_tout(gg->trace_tout[j],tache_de_fond,0);
|
---|
| 65 | if( (gg->trace_ouvert&16) && // trace carte et pas de select synchro
|
---|
| 66 | (! (gg->trace_ouvert&32))) trace_annexe(gg->corel);
|
---|
| 67 | if(gg->flag_fou) foufou();
|
---|
| 68 | if(gg->trace_ouvert&8) exec_ondelette(fenetre_ondelette,0,0);
|
---|
| 69 |
|
---|
| 70 | }
|
---|
| 71 |
|
---|
| 72 | // _____________ affichage numerique de la valeur d'un bolometre _______________
|
---|
| 73 | j=litD(fenetre_acquisition,e_bolo,0L)-1;
|
---|
| 74 | if( (j<0) ou (j>=nb_max_bolo) ) ecritD(fenetre_acquisition,e_valeur,"--");
|
---|
| 75 | else ecritD(fenetre_acquisition,e_valeur,"b%d=%g µV",j+1,xbol(j));
|
---|
| 76 |
|
---|
| 77 | ecritD(fenetre_controle,con_chauf,tt->tm.btm[tt->tm.pos_lit].chauf_regul);
|
---|
| 78 |
|
---|
| 79 | if(gg->fichier_arch_ouvert) fabrique_block_type_une_periode(); // ecrit un block une periode archeops
|
---|
| 80 | affi_bolo(); // affichage des bolo individuels
|
---|
| 81 | }
|
---|
| 82 | //_____________________________________________________________________________________________
|
---|
| 83 |
|
---|
| 84 | //*****************************************************************************************
|
---|
| 85 | // ***
|
---|
| 86 | #endif //-------------------------------------------------------------------- ***
|
---|
| 87 | // ***
|
---|
| 88 | //*****************************************************************************************
|
---|
| 89 |
|
---|