-
Notifications
You must be signed in to change notification settings - Fork 0
/
Procedure.m
38 lines (36 loc) · 1.72 KB
/
Procedure.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
% function drawing the cues and returning the VBLTimestamp
function [tar_VBL, tar_SOT, tar_FT] = Procedure(wPtr, trial_SOT, cue_condition, target_condition, center_x, center_y)
s = 0;
switch cue_condition
case 0
s = s + 0.2;
case 1
s = s + 0;
Screen('DrawLine', wPtr, [0 0 0], center_x-510, center_y+30, center_x-450, center_y-30, 5)
Screen('DrawLine', wPtr, [0 0 0], center_x-510, center_y-30, center_x-450, center_y+30, 5)
[~, cued_SOT, ~] = Screen('Flip',wPtr, trial_SOT, 2);
[~, cued_SOT, ~] = Screen('Flip',wPtr, cued_SOT + 0.2, 1);
trial_SOT = cued_SOT;
case 2
s = s + 0;
Screen('DrawLine', wPtr, [0 0 0], center_x+450, center_y+30, center_x+510, center_y-30, 5)
Screen('DrawLine', wPtr, [0 0 0], center_x+450, center_y-30, center_x+510, center_y+30, 5)
[~, cued_SOT, ~] = Screen('Flip',wPtr, trial_SOT, 2);
[~, cued_SOT, ~] = Screen('Flip',wPtr, cued_SOT+0.2, 1);
trial_SOT = cued_SOT;
end
switch target_condition
case 1
Screen('TextFont',wPtr, 'Courier');
Screen('TextSize',wPtr, 50);
Screen('TextStyle', wPtr, 1);
Screen('DrawText', wPtr, 'GO', center_x-510, center_y-15, [0 0 0]);
[tar_VBL, tar_SOT, tar_FT] = Screen('Flip', wPtr, trial_SOT + s + 0.5, 1);
case 2
Screen('TextFont',wPtr, 'Courier');
Screen('TextSize',wPtr, 50);
Screen('TextStyle', wPtr, 1);
Screen('DrawText', wPtr, 'GO', center_x+450, center_y-15, [0 0 0]);
[tar_VBL, tar_SOT, tar_FT] = Screen('Flip', wPtr, trial_SOT + s + 0.5, 1);
end
end