Changeset 639 in Sophya for trunk/Poubelle/archediab.old/archediab.sources/c/synchro.c

Timestamp:

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

Author:

ansari

Message:

archediab 25

File:

• trunk/Poubelle/archediab.old/archediab.sources/c/synchro.c (modified) (2 diffs)

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

@@ -120 +120 @@
 int i;  
 double x;
+static long ancien_temps;
 if(select_synchro==7)   // selection  valeur fixe
         {
-        if(sy_per>=synchro_periode)
+        if((gg->temps_cntl%(int)synchro_periode)==0)
+//      if(sy_per>=synchro_periode)
                 {
                 if(gg->trace_ouvert&2)  exec_trace_1_per(fenetre_trace_1_per,ds_debut,0);
@@ -130 +132 @@
         else
                 {
-                sy_per=sy_per+1;
+                if(gg->temps_cntl!=ancien_temps+1)
+                        {
+                        sy_per+=gg->temps_cntl-ancien_temps;
+                        printf("erreur synchro corrigée\n");
+                        }
+                else    sy_per=sy_per+1;
+                
                 if(gg->trace_ouvert&2)  exec_trace_1_per(fenetre_trace_1_per,ds_suite,0);
                 if(gg->trace_ouvert&4)  exec_trace_DS(fenetre_trace_DS,ds_suite,0);
                 }
+        ancien_temps=gg->temps_cntl;
         }
 else