Changeset 645 in Sophya for trunk/Poubelle/archediab.old/archediab.sources/c/tache_archeops_bit2.c

Timestamp:

Nov 25, 1999, 2:35:30 PM (26 years ago)

Author:

ansari

Message:

archediab 27

File:

• trunk/Poubelle/archediab.old/archediab.sources/c/tache_archeops_bit2.c (modified) (4 diffs)

trunk/Poubelle/archediab.old/archediab.sources/c/tache_archeops_bit2.c

@@ -23 +23 @@
 //
 //
-//   lit directement les blocks recut sur la fifo et les envoie au programme principal
+//   lit directement les blocks recus sur la fifo et les envoie au programme principal
 //
 
@@ -34 +34 @@
 
 //*****************************************************************************************
+unsigned long   N_total_bits,M;
+unsigned short  Max,Min;
 
 void init_tache(void)
@@ -69 +71 @@
 
 
-char    un_bit(void)
+char    un_bit()
 {
 static int i;
 static unsigned long RR;
+unsigned short  Val;
+
 lit_carte;      if(rien_a_lire)         return(bit_vide);       //  fifo vide  ->  retour  ->  sort du while
+
+N_total_bits++;
+Val=((RR>>1) & 0x3f);   //permet de lire les bits de temps dans RR
+
+//Calcul de la nouvelle moyenne glissee du temps
+M=M-(M>>16)+(Val<<8);
+
+        
+//Calcul du Max
+if(N_total_bits==0) Max=Val;    //initialisation au premier passage
+if(Val>Max) Max=Val;    //changement de maximum
+if((N_total_bits%60000)==0)
+{
+        Max=Max-1;      //Diminution tous les 60000 bits
+        N_total_bits=0;
+}
+        
+//Calcul du Min
+if(N_total_bits==0) Min=Val;    //initialisation au premier passage
+if(Val<Min) Min=Val;    //changement de minimum
+if((N_total_bits%60000)==0) Min=Min+1;  //Augmentation tous les 60000 bits
+//tt->nb_lec_fofo_ext=M;
+
+
+        
 //if( RR & 1 )          return(bit_un);
 //else          return(bit_zero);
 if( RR & 1 )    return(bit_zero);
 else            return(bit_un);
+
 }
 
@@ -135 +165 @@
         }
 if(lec_fifo > tt->nb_lec_fofo_int)      tt->nb_lec_fofo_int=lec_fifo;
-if(!tt->nb_lec_fofo_ext)                {tt->nb_lec_fofo_ext=tt->nb_lec_fofo_int;tt->nb_lec_fofo_int=0;}
+//if(!tt->nb_lec_fofo_ext)              {tt->nb_lec_fofo_ext=tt->nb_lec_fofo_int;tt->nb_lec_fofo_int=0;}
 
 }