Merge branch 'TicTocPaus'

1 files changed, 16 insertions, 5 deletions

diff --git a/Kod/bilbana/yc4/main.m b/Kod/bilbana/yc4/main.m
index 8af4735..4a3d667 100644
--- a/Kod/bilbana/yc4/main.m
+++ b/Kod/bilbana/yc4/main.m
@@ -37,7 +37,7 @@ car2.lap = 0;
 car2.lap_times = [];
 car2.seg_times = [];
 
-tocs = [];
+highToc = 0;
 
 %% ASK ACTIVE CARS
 disp('J = Ja (automatiskt), M = Ja (manuellt), N = Nej');
@@ -67,7 +67,7 @@ end
 
 %% MAIN LOOP
 while 1
-    tic;
+    readTime = tic;
     %% PRE-LOOP
     if strcmp(get(hf,'currentcharacter'),'q')
         close(hf)
@@ -188,13 +188,24 @@ while 1
     %% DISPLAY
     
     %% END OF LOOP
-    pause(0.1)
-    tocs(end + 1) = toc;
+    while 1                     %Whileloop med paus som körs till pausen överskridit 0.07 sekunder
+        pause(0.01)             
+        t = toc(readTime);
+       if t > 0.07
+           if t > highToc
+               highToc = t;     %Om det nya värdet på pausen är högre än den tidigare högsta så sparas det som den högsta
+               end
+           
+           break;
+       end
+    end
+    
+    
     send_data_to_display();
 end
  
 %% END OF PROGRAM
-disp(tocs);
+disp(highToc);
 disp(car1);
 disp(car2);