CreateInputMask for Joystick

[David McFarlane]

Tobias,

I would go right to PST Web Support with this, 
you may contact them at 
http://support.pstnet.com/e%2Dprime/support/login.asp 
, and they strive to respond to all requests in 
24-48 hours.  And then please post back here with the answer!

-- David McFarlane, Professional Faultfinder


>I used the following code to call an object in the unreferenced
>objects, "feedback", as a feedback for accuracy and RT in the last
>block.
>
>I used the term "feedback.InputMasks.Add Keyboard.CreateInputMask" to
>specifiy the input. Now I want to use a Joystick instead of a
>keyboard. That works well for the entire experiment, but not for this
>code. The error message is: "Unknown Custom Option: "Response Mode".
>
>By the way: I use E-Prime 2. How can I solve this problem?
>
>Thanks fo all kinds of help!
>
>Tobias
>
>
>This is the code (crucial parts are "feedback.InputMasks.Add
>Joystick.CreateInputMask"):
>
>
>If c.GetAttrib("exppart") = "task" Then
>         If  c.GetAttrib(c.GetAttrib("Running") & ".Sample")  MOD 60 = 0 AND
>c.GetAttrib(c.GetAttrib("Running") & ".Sample")  MOD 1680 <> 0 Then
>                 c.SetAttrib "BlockAcc", 
> Format(CStr(CDbl(SummationAcc.Mean * 100)),
>"0.0")
>                 c.SetAttrib "BlockRT", 
> Format(CStr(CDbl(SummationRT.Mean )), "0")
>                 RT = c.GetAttrib("BlockRT")
>                 Acc = c.GetAttrib("BlockAcc")
>                         blockcount = blockcount +1
>                         feedback.InputMasks.Add 
> Joystick.CreateInputMask("{ANY}", "", CLng
>(feedback.Duration), CLng("1"), ebEndResponseActionTerminate, CLogical
>("Yes"), "", "", "ResponseMode:All ProcessBackspace:Yes")
>                         feedback.text = 
> "Leistung in Block " & blockcount & "/28" & "\n\n\n
>\n" & "Reaktionszeit: " & RT & " ms" & "\n" & "Richtige Antworten: " &
>Acc & " %" & "\n\n\n" & "- Beliebige Taste zum Fortsetzen drücken -"
>                         feedback.run
>                         Set SummationAcc = New Summation
>                         Set SummationRT = New Summation
>                         PauseA.Run
>                         PauseB.InputMasks.Add 
> Joystick.CreateInputMask("{ANY}", "", CLng
>(PauseB.Duration), CLng("1"), ebEndResponseActionTerminate, CLogical
>("Yes"), "", "", "ResponseMode:All ProcessBackspace:Yes")
>                         PauseB.Run
>         End if

--

You received this message because you are subscribed to the Google Groups "E-Prime" group.
To post to this group, send email to e-prime at googlegroups.com.
To unsubscribe from this group, send email to e-prime+unsubscribe at googlegroups.com.
For more options, visit this group at http://groups.google.com/group/e-prime?hl=en.