Response collection over blank

[Aad Pors]

*UPDATE*

it seems that in previous versions I have not been able to collect 
responses during the blank properly as well. So now it seems to have become 
a matter of response time extension from the StimExp into the blank. Google 
provides hits with nested lists and other stuff which I believe to be more 
difficult than it has to be in my case.

A helping word please?

Op maandag 18 augustus 2014 09:43:41 UTC+2 schreef Aad Pors:
>
> Dear all,
>
> I'll try to be short.
>
> Stimulus setup: text screen with stimulus (StimExp) is presented for 250 
> ms, followed by an empty text screen (BlankExp) for 900 ms. This cycle is 
> repeated multiple times with different contents of the stimulus screen.
> I want to collect multiple keyboard 'b' presses and releases (b{-b}, max 
> count 10). This works to the extent that I can indeed collect all these 
> responses, as long as StimExp is being presented. I want to collect 
> responses over the complete period of 1150 ms, as defined in the StimExp 
> Duration properties Time Limit (1150 ms). Responses that are provided 
> whilst the blank is being presented are not recorded. What can I do about 
> that? The InLIne reads as follows:
>
>
> Dim theResponseObject As RteRunnableInputObject
> Set theResponseObject = CRteRunnableInputObject(Rte.GetObject("StimExp"))
>
> 'If the assert below fires, then the object named in the line above does 
> not exist
> Debug.Assert Not theResponseObject Is Nothing
>
> 'Counter variable for the number of responses made
> Dim nPressCount As Long
>
> 'Counter variable
> Dim nIndex As Integer
>
> 'Used to set attributes for statistics
> Dim strStatistic As String
>  'Enumerate through the response collection 
> 'If any of the responses were made by the keyboard, display
> 'the statistics to the user. 
> For nIndex = 1 To theResponseObject.InputMasks.Responses.Count
>
> 'Set theKeyboardResponseData equal to the current keyboard response
> Dim theKeyboardResponseData As KeyboardResponseData 
> Set theKeyboardResponseData = 
> CKeyboardResponseData(theResponseObject.InputMasks.Responses(nIndex))
> If Not theKeyboardResponseData Is Nothing Then
>
> 'Increment the press count
> nPressCount = nPressCount + 1
>
> 'Log reaction time and response for each key press.
> c.SetAttrib "KeyPress" & nIndex & "RT", theKeyboardResponseData.RT
> c.SetAttrib "KeyPress" & nIndex & "RESP", theKeyboardResponseData.RESP
>  End If
>
>
> Next 'nIndex
>
>

-- 
You received this message because you are subscribed to the Google Groups "E-Prime" group.
To unsubscribe from this group and stop receiving emails from it, send an email to e-prime+unsubscribe at googlegroups.com.
To post to this group, send email to e-prime at googlegroups.com.
To view this discussion on the web visit https://groups.google.com/d/msgid/e-prime/6661a444-51db-4466-bdcd-d87662818c93%40googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://listserv.linguistlist.org/pipermail/eprime/attachments/20140818/f327d9a9/attachment.htm>