Modifying afterimage pupil rivalry to add clock and reporting. -MT

002 After Image GUI Project/AfIm_Exp.m

@@ -80,7 +80,7 @@ theDate = fix(clock);
 % a = '/Users/clemente/Dropbox/Luminotecnia/2018/Experiments/Color Background Afterimage/1 Programs/4 ColBackg AI' ;% folder where the program is.
 infoFile = sprintf('%s_SessionsInfo', subName)
 
-aa = cd('/Users/clemente/Desktop/AfterImage Programs/A Outputs'); ;% folder where the program is.
+aa = cd('/Users/clemente/Desktop/AfterImage Programs/A Outputs');% folder where the program is.
 
     checkfile = exist(infoFile, 'file')
     fo = fopen(infoFile, 'at')

002 After Image GUI Project/AfIm_pupil_Exp.m

@@ -60,7 +60,8 @@ redLut = [.8 0 0];
 
 %% Save Session Information
 
-theDate = datestr(now(),'mm/dd/yyyy HH:MM:SS');
+%theDate = datestr(now(),'mm/dd/yyyy HH:MM:SS');
+theDate = fix(clock);
     % a = '/Users/clemente/Dropbox/Luminotecnia/2018/Experiments/Color Background Afterimage/1 Programs/4 ColBackg AI' ;% folder where the program is.
     infoFile = sprintf('%s%s_SessionsInfo', locOutDir, subName);
 

002 After Image GUI Project/AfIm_pupil_Exp_Rivalry.m

@@ -58,7 +58,8 @@ redLut = [.8 0 0];
 
 %% Save Session Information
 
-theDate = datestr(now(),'mm/dd/yyyy HH:MM:SS');
+%theDate = datestr(now(),'mm/dd/yyyy HH:MM:SS');
+theDate = fix(clock);
     % a = '/Users/clemente/Dropbox/Luminotecnia/2018/Experiments/Color Background Afterimage/1 Programs/4 ColBackg AI' ;% folder where the program is.
     infoFile = sprintf('%s%s_SessionsInfo', locOutDir, subName);
 
@@ -436,19 +437,19 @@ WaitSecs(AdaptTime)
             if ~Clock
             WaitSecs(18); % to tell the subject to blink normally
             flatSound;
-            end
+            else
-            
+               Speak('Report Time')
-%            Speak('Report Time')
 
 
-%                 WaitSecs(5)% This is sumed to the ISI except for the last trial
+                WaitSecs(5)% This is sumed to the ISI except for the last trial
-% % % %             while ~keypress
+                while ~keypress
-% % % %                 if CharAvail
+                    if CharAvail
-% % % %                     userRes = input(' ');
+                        userRes = input(' ');
-% % % %                     keypress = 1;
+                        keypress = 1;
-% % % %                 end
+                    end
-% % % %             end
+                end
-% % % %             FlushEvents('mouseDown','keyDown');
+                FlushEvents('mouseDown','keyDown');
+            end
             
 
     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

002 After Image GUI Project/ContMatch_session.m

@@ -60,13 +60,21 @@ fprintf('\nLast calibration was %s\n', describe.date);
 fprintf('\nLast calibration was %s\n', describe.date);
 pix = pix/1001;
 maxLum = 20; %cd/m^2
+% 
+% lumMod_initial = [.6 .7 .8 1 ];
+% 
+% lCont_initial = [0.02 0.026 0.034 .04];
+% 
+% 
+% sCont = [.35 .5 .65 .8];
 
-lumMod_initial = [.6 .7 .8 1 ];
+lumMod_initial = [.7 .8 1 ];
 
-lCont_initial = [0.02 0.026 0.034 .04];
+lCont_initial = [0.026 0.034 .04];
 
 
-sCont = [.35 .5 .65 .8];
+sCont = [.5 .65 .8];
+
 % sCont = [.5 .5 .5 .5];
 
 nCont = length(sCont);