|
|
Post by juochoa on Jan 18, 2021 15:03:20 GMT
Hello,
I am trying to record what participants do during a period where a new stimulus is overlaid an original stimulus. Currently I am trying to show the new stimulus for 1 second with the delay function, however, I am not able to get the program to record anything during this delay. Is it possible to do this? The part of the code in question is everything nested under the "if &b == $p || &b > $p" statement.
Thank you for any help!
options
fullscreen
mouse on
escape
background color white
resolution 800 600
bitmaps
SD
Sdelta
Neutral
Punish
Background
Reinforcement
Instructions
Thankyou
task neutral
mouse on
draw off
show bitmap SD 175 0
show bitmap Sdelta -175 0
show bitmap Background 0 0
draw on
set $click 0
set $r random 7 9
set $p random 4 6
readmouse l 1 20000 range 1 3
set $click UNDER_MOUSE
if $click == 3
set &clicksoutside increase 1
fi
if $click == 1
set &clicksSD increase 1
set &a increase 1
set &b increase 1
fi
if $click == 2
set &clicksSdelta increase 1
fi
if &a == $r || &a > $r
mouse off
show bitmap Reinforcement
set &cubecounter increase 1
set &a 0
delay 1000
clear -1
mouse on
fi
if &b == $p || &b > $p
draw off
show bitmap Neutral 175 0
show bitmap Sdelta -175 0
show bitmap Background 0 0
draw on
delay 1000
set &b 0
if $click == 1
set &clicksneutral increase 1
set &neucounter increase 1
fi
if $click == 2
set &clicksSdelta increase 1
fi
if $click == 3
set &clicksoutside increase 1
fi
clear -1
clear -2
clear -3
fi
if &cubecounter == 3
set &cubecounter 0
end tasklist
fi
save TASKNAME &cubecounter RT $click &clicksSD &clicksSdelta &clicksoutside &neucounter &clicksneutral
|
|
|
|
Post by PsyToolkit on Jan 18, 2021 23:08:32 GMT
You can check the keyboard or mouse during a "waiting" period.
Instead of delay, use "readmouse" or "readkey" with a certain time.
For example, imagine you want to wait 500 ms and check if the keyboard was pressed during the delay.
task mytask keys space x y z ## keys you expect to be pressed readkey 1 500 if STATUS != TIMEOUT show text "You pressed a key, but you should not have" delay 500 clear -1
fi
|
|
|
|
Post by juochoa on Jan 19, 2021 19:34:20 GMT
Thank you for the reply! This is very helpful. I've played around with it more but I am still not getting what I want from it.
Ideally, I would like a new stimulus to show up for 1000ms after the participant has clicked a different stimulus an average of 5 times. During these 1000ms, I'd like to record the RT of all clicks that happen. After the 1000ms, the new stimulus will disappear. Do you know a good way to do this?
I tried doing this with a while loop, but obviously, I was not able to get the RT of each click
task neutral
mouse on
draw off
show bitmap SD 175 0
show bitmap Sdelta -175 0
show bitmap Background 0 0
draw on
set $click 0
set $r random 7 9
set $p random 4 6
readmouse l 1 20000 range 1 3
set $click UNDER_MOUSE
if $click == 3
set &clicksoutside increase 1
fi
if $click == 1
set &clicksSD increase 1
set &a increase 1
set &b increase 1
fi
if $click == 2
set &clicksSdelta increase 1
fi
if &a == $r || &a > $r
mouse off
show bitmap Reinforcement
set &cubecounter increase 1
set &a 0
delay 1000
clear -1
mouse on
fi
if &b == $p || &b > $p
set &b 0
set &neucounter increase 1
timestamp start
while $time < 1000
draw off
show bitmap Neutral 175 0
show bitmap Sdelta -175 0
show bitmap Background 0 0
draw on
readmouse l 1 1000 range 1 3
if $click == 1
set &clicksneutral increase 1
fi
if $click == 2
set &clicksSdelta increase 1
fi
if $click == 3
set &clicksoutside increase 1
fi
timestamp end
set $time timestamp-diff start end
while-end
clear -1
clear -2
clear -3
fi
if &cubecounter == 3
set &cubecounter 0
end tasklist
fi
save TASKNAME &cubecounter &neucounter RT $click &clicksSD &clicksSdelta &clicksoutside &clicksneutral
|
|
|
|
Post by PsyToolkit on Jan 27, 2021 7:30:44 GMT
It depends a bit on your stimuli. Contact me via psytoolkit@gmx.com and maybe I can help.
|
|
|
|
Post by PsyToolkit on Feb 1, 2021 22:01:17 GMT
This experiment can be copied and pasted to your PsyToolkit account and works directly.
It shows a yellow rectangle that you can click up to 5 seconds (my_delay) after it has been presented.
This experiment works and shows the idea of how you can do it using the following key components: - a while to while-end loop
- keep track of time with timestamp
- make the readmouse maxtime shorter and short by subtracting from your total time you want the stimulus to be clickable
- the really important stuff is in red color
- d is the time that passed in the while loop
- remaining_time is how much time of your 5 second delay has been left for clicking
options set &my_delay 5000 ## choose how long you can click after presentation
task my_task
show text "Click the rectangle one or more times" 0 -250
set $x random -300 300
set $y random -200 200
set $w random 50 150
set $h random 50 150
show rectangle $x $y $w $h 255 255 0
timestamp begintime
timestamp now
set $remaining_time &my_delay
while $d < &my_delay
readmouse l 1 $remaining_time range 2 2 # range makes only the yellow rect clickable
show circle MOUSE_X MOUSE_Y 3 255 100 100 # this just shows where you clicked
timestamp now
set $remaining_time expression &my_delay - $d
set $d timestamp-diff begintime now
save "RT = " RT "d = " $d " ; remaining_time = " $remaining_time
while-end
save RT
block test
tasklist
my_task 5
end |
|
